sub main() begin: uo.deletejournal() uo.serverprint(".hungry") wait(300) if ((uo.lastmessage()=="You are DYING of hunger...") or (uo.lastmessage()=="You are almost dying of hunger") or (uo.lastmessage()=="You are starving") or (uo.lastmessage()=="Your stomash hurts and you feel dizzy")or (uo.lastmessage()=="Your stomash hurts") or (uo.lastmessage()=="You are REALLY hungry") or (uo.lastmessage()=="You are somewhat hungry") or (uo.lastmessage()=="You are a little hungry") or (uo.lastmessage()=="You aren't hungry at all"))==true then uo.usetype("0x097b") wait(500) endif uo.waittargetobject(Pyda) uo.usetype(0x0FB4) wait(1000) UO.LClick(47,380) wait(65000) while uo.count(0x1414)>0 uo.waittargettype(0x1414) uo.usefromground(0x0FB1) wait(1500) wend go to begin end sub
Что и Как прописать чтобы он после переплавки сделаного выкидывал полученую руду на пол в кучку рядом с собой ???
var Pyda ="0x4EA8102C" #ID метала с которым работаем var MaxWeight ="0"
sub main() var k,w uo.exec ("set finddistance 1") w=uo.lastmessage() while True k=0 if uo.weight > MaxWeight then Drop('0x1BF2','0x07DF','container') #Сделано для купера wait(500) endif uo.waittargetobject(Pyda) uo.usetype(0x0FB4) wait(1000) uo.LClick(47,380) wait(65000) while uo.count(0x1412)>0 #Плайт шлем uo.waittargettype(0x1412) #Плайт шлем uo.usefromground(0x0FB1) #Форжа wait(1700) wend if w=="Saving World State" <>0 Then wait(20000) uo.deletejournal() endif if k==5 then k=0 uo.deletejournal() uo.serverprint(".hungry") wait(300) if ((w=="You are DYING of hunger...") or (w=="You are almost dying of hunger") or (w=="You are starving") or (w=="Your stomash hurts and you feel dizzy")or (w=="Your stomash hurts") or (w=="You are REALLY hungry") or (w=="You are somewhat hungry") or (w=="You are a little hungry") or (w=="You aren't hungry at all"))==true then uo.usetype("0x097b") wait(500) endif k=k+1 endif wend end sub
sub Drop(type,color,container) var serial=0 container = "ground" UO.FindType(type,color,"backpack") if uo.findcount() <> 0 then serial=UO.GetSerial("finditem") UO.Ignore(serial) if container=="ground" then UO.FindType(type,color,"ground") if UO.FindCount()>0 then if uo.getquantity("finditem") < 59000 then UO.MoveItem(serial,"0","finditem","0","0","0") else UO.DropHere(serial) endif else uo.ignore ("finditem") UO.DropHere(serial) endif else UO.MoveItem(serial,"0",container) endif wait(1000) endif else uo.findtype(type,color,"backpack") if uo.findcount() <> 0 then uo.exec ("drop 0 0 0 0 finditem") wait (500) endif wait (500) endif UO.IgnoreReset() end sub