ciau a tutti, questo semplice script serve a far salire la skill in animal taming:
>>>>>>>>>seguite le istruzioni a fine script<<<<<<<
20 - 11 - 05 - corretti alcuni bug segnalati
>>>>>>>>>seguite le istruzioni a fine script<<<<<<<
codice:
;============AUTO TAMER=================
;============BY NORICUM=================
SET %VECCHI #FOLLOWERS
;SETTARE QUESTA VARIABILE CON
;IL TYPE DELL'ANIMALE DA TAMARE
SET %DATAMARE
START:
FINDITEM %DATAMARE
IF #FINDKIND = 1
{
SET %ANIMALE #FINDID
SET #LTARGETID #FINDID
SET #LTARGETKIND 1
EVENT PATHFIND #FINDX #FINDY
EVENT MACRO 13 35
EVENT MACRO 25 0
EVENT MACRO 22 0
SET #SCNT 0
GOTO PATHLOOP
RIPRENDIPATH:
IF #FOLLOWERS > %VECCHI
{
MSG ALL KILL$
EVENT MACRO 25 0
EVENT MACRO 22 0
GOTO KILLLOOP
RIPRENDIKILL:
}
}
GOTO START
;================================
;===LOOP ZONE====================
;================================
PATHLOOP:
IF #SCNT < 11
{
FINDITEM %ANIMALE
EVENT PATHFIND #FINDX #FINDY
WAIT 20
GOTO PATHLOOP
}
GOTO RIPRENDIPATH
;=============================================
KILLLOOP:
IF #FOLLOWERS = %VECCHI
{
MSG ALL GUARD$
GOTO RIPRENDIKILL
}
GOTO KILLLOOP



Commenta