c.d.t sto cercadno uno script che mi trasformi board in shaft e se poi mi trasforma i shaft in crossbow ancora meglio
ICQ: 381-802-629
ICQ: 381-802-629
;must be standing at bank and bankbox open ;must have fletching tools in bag, ;boards or shafts, and feathers must be in bank ;script uses tinkering to make new tools so might be a good idea to have tinkering tools and iron in bank (or maybe in bag, cant remember) set %bankid X set %shaftamount 2000 ; when making bolts, how many shafts u can carry set %featheramount 2000 ; when making bolts, how many feathers u can carry set %boards 500 ; if needed to craft shafts, how many boards u can carry set %tool UFG ; fletching tool set %shaft SLK set %wood TLK set %feather VLK set %bolt LNK set %iron ENK set %tinkertool KTL msg bank $ wait 1s set %bankid #CONTID wait 1s gosub start sub start gosub reagentsfrombank gosub makebolts gosub boltstobank gosub start sub reagentsfrombank wait 10 Finditem %bankid G_2 set #lobjectid #findid event macro 17 wait 10 gosub checktools Finditem %shaft C_ , %bankid if #findcnt < 1 { gosub makeshafts } wait 10 Finditem %shaft C_ , %bankid Exevent Drag #findid %shaftamount wait 20 Exevent Dropc #backpackid wait 20 Finditem %feather C_ , %bankid if #findcnt < 1 { halt } Exevent Drag #findid %featheramount wait 10 Exevent Dropc #backpackid wait 10 return sub makeshafts for %i 1 20 { gosub checktools Finditem %wood C_ , %bankid if #findcnt < 1 { halt } Exevent Drag #findid %boards wait 10 Exevent Dropc #backpackid wait 20 Finditem %tool C_ , #backpackid set #lobjectid #findid event macro 17 wait 10 click 68 132 wait 5 click 276 132 wait 40 gosub shaftstobank } return sub notools Finditem %iron C_ , %bankid Exevent Drag #findid 20 wait 10 Exevent Dropc #backpackid wait 10 Finditem %tinkertool C_ , #backpackid set #lobjectid #findid event macro 17 wait 5 click 67 151 wait 5 click 423 310 wait 5 click 423 310 wait 5 click 275 110 wait 2s click 69 453 ; exit Finditem %iron C_ , #backpackid Exevent Drag #findid #findstack wait 10 Exevent Dropc %bankid wait 10 return sub checktools Finditem %tool C_ , #backpackid if #findkind = -1 { gosub notools } return sub shaftstobank wait 10 click 69 453 ; exit Finditem %shaft C_ , #backpackid Exevent Drag #findid #findstack wait 10 Exevent Dropc %bankid wait 10 return sub makebolts gosub checktools Finditem %tool C_ , #backpackid set #lobjectid #findid event macro 17 wait 5 click 69 151 wait 5 click 274 133 wait 40 click 69 453 ; exit return sub boltstobank Finditem %bolt C_ , #backpackid Exevent Drag #findid #findstack wait 10 Exevent Dropc %bankid wait 20 return
Commenta