Cerco script che FUNZIONI per disco e che mi permetta di macrarla away
Thanks
Thanks

set %PET
;(Immettere l'ID del pet da discordare)
set %CARNE HQD_FUD_AQD_YRD
set %FRUTTA SQD_QQD_PQD
set %MANGIARE %CARNE
;(Immettere %CARNE se il pet mangia carne, %FRUTTA se
; mangia frutta)
set %STRUMENTI QRF_LQF_PRF_MQF
set %FOOD HQD_FUD_SQD_HND_BND_AQD_QQD_PRD_PQD_YRD
;===================================================
while #TRUE
{
event Macro 1 0 all come
finditem %STRUMENTI c_ , #BACKPACKID
if #FINDKIND = 0
{
gosub Getremain
set #LOBJECTID #FINDID
event Macro 17 0
for %COUNT 1 %REMAIN
{
event Macro 13 15
set #LTARGETID %PET
target 2s
event Macro 22 0
wait 1s
}
gosub Cibapet
}
else
{
event Sysmessage Strumenti esauriti, LogOUT.
event Macro 31 0
sleep 300
event Macro 8 1
sleep 300
set %CLICKX #CONTPOSX + 215
set %CLICKY #CONTPOSY + 110
click %CLICKX %CLICKY
}
}
;SubRoutines
;===========
sub Getremain
event Property #FINDID
str Pos #PROPERTY g:
set %POS #STRRES + 2
if Slayer in #PROPERTY
{
str Pos #PROPERTY $ 3
set %LUNG #STRRES - %POS
str Mid #PROPERTY %POS %LUNG
set %REMAIN #STRRES
}
else
{
str Len #PROPERTY
set %LUNG #STRRES - %POS
str Mid #PROPERTY %POS %LUNG
set %REMAIN #STRRES
}
return
sub Cibapet
for %TOTAL 1 3
{
event Macro 15 1
finditem %FOOD c_ , #BACKPACKID
while #FINDTYPE notin %MANGIARE
{
exevent Drag #FINDID
sleep 650
exevent Dropg #CHARPOSX #CHARPOSY
sleep 650
event Macro 15 1
sleep 650
finditem %FOOD c_ , #BACKPACKID
}
exevent Drag #FINDID
sleep 650
exevent Dropc %PET
sleep 650
}
return


dopo il discord fa create food in loop anche se crea il cibo giusto per il pet 


Commenta