Privet vsem!
Dajte pozhalujsto easy UO tinkering skript kotorij beret ingoti iz sunduka, delajet butilki i kidajet butilki v sunduk. I kushajet i pjet kogda hungry.
Te skripti kotorije na forume starije, proboval, oni ne rabotajut.
Spasibo!
|
Posted 22 August 2017 - 10:19
Privet vsem!
Dajte pozhalujsto easy UO tinkering skript kotorij beret ingoti iz sunduka, delajet butilki i kidajet butilki v sunduk. I kushajet i pjet kogda hungry.
Te skripti kotorije na forume starije, proboval, oni ne rabotajut.
Spasibo!
Full newbie necro owner =)
Posted 22 August 2017 - 11:19
initevents
Posted 22 August 2017 - 11:39
Skript rabotajet, no kogda pojavljajietsja fail iz za hungry on ne kushajet...
Zhdet neskolko sekund, i prodolzhajet delatj butilki golodnij.
Full newbie necro owner =)
Posted 22 August 2017 - 12:17
set %box GUCUJMD ; Box gde vsjo lezhat set %regsForInscription RMK ; kakie regi nada zvatj ; ingi set %amountRegs 350 ; skok ix zvatj ingov set %amountScrolls 0 ; skok scrollov zvatj ; nenado stavitj eto set %blankScroll GTL ; tinker tools display ok Target on Ready Product! set #targcurs 1 while #targcurs = 1 wait 1 finditem #ltargetid set %scroll #findtype set %scrollCol #findcol set %eat 0 _start: for %i 1 5 { scanjournal %i deletejournal } set %fail 0 repeat { finditem %blankScroll C_ , #backpackid if #findcol <> 0 ignoreitem #findid finditem %blankScroll C_ , #backpackid } until #findcol = 0 if #findcnt = 0 { gosub drop&take goto _start } set #lobjectid #findid _make: ignoreitem reset event macro 17 0 wait 10 gosub gumpWait _click: click 491 453 gosub scan goto _make sub gumpWait set %failT #scnt + 15 _wait: if #contname = generic_gump && #contkind = UCHB return if #scnt > %failT return wait 10 goto _wait return sub scan deletejournal set %lag #scnt + 15 _scan: for %i 5 1 { scanjournal %i if hungry in #journal && #scnt > %eat { gosub eat return } if world_save in #journal || world_save in #sysmsg { wait 35s goto _start } if you_put in #journal { set %fail 0 return } if you_fail in #journal || you_have_failed in #journal { set %fail %fail + 1 if %fail >= 3 { wait 5s goto _start } else return } if #scnt > %lag goto _start if you_need in #journal || have_no_resources in #journal { gosub drop&take goto _start } } goto _scan return sub drop&take set #lobjectid %box event macro 17 0 while #contid <> %box wait 1 repeat { finditem %scroll C_ , #backpackid if #findcol <> %scrollCol ignoreitem #findid 1 finditem %scroll C_ , #backpackid if #findcnt = 0 halt } until #findcol = %scrollCol exevent drag #findid #findstack exevent dropc %box wait 20 ignoreitem reset 1 finditem %blankScroll C_ , %box exevent drag #findid %amountScrolls exevent dropc #backpackid wait 20 repeat { finditem %regsForInscription C_ , %box exevent drag #findid %amountRegs exevent dropc #backpackid wait 15 ignoreitem #findtype 1 } until #findcnt = 0 ignoreitem reset 1 return sub eat set #lobjectid %box event macro 17 0 while #contid <> %box wait 1 wait 30 finditem ZBM C_ , %box exevent drag #findid 2 exevent dropc #backpackid wait 30 finditem ZBM C_ , %box exevent drag #findid exevent dropc #backpackid wait 30 finditem GND C_ , %box exevent drag #findid exevent dropc #backpackid wait 30 } set %lobjct #lobjectid finditem ZBM C_ , #backpackid set #lobjectid #findid event macro 17 0 wait 10 set %lobjct #lobjectid finditem ZBM C_ , #backpackid set #lobjectid #findid event macro 17 0 wait 10 finditem GND C_ , #backpackid set #lobjectid #findid event macro 17 0 wait 10 set #lobjectid %lobjct set %eat #scnt + 360 return
Posted 22 August 2017 - 12:23
Festmagen tvoj skript ne mozhet vzjatj ingoti s sunduka.
"you can not pick that up"
Full newbie necro owner =)
0 members, 0 guests, 0 anonymous users