Cerco script che FUNZIONI per disco e che mi permetta di macrarla away
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
Commenta