sub kopanie(x,y) uo.exec("usetype '0x0e85'") wait(500) UO.LClick(x,y) wait(5000) end sub var need_hungry_level = 1 sub hungry() var i,htest,htime,htest2 dim a[11] a[0] = "You are absolutely stuffed" a[1] = "You are stuffed" a[2] = "You aren't hungry at all" a[3] = "You are a little hungry" a[4] = "You are somewhat hungry" a[5] = "You are REALLY hungry" a[6] = "Your stomash hurts" a[7] = "Your stomash hurts and you feel dizzy" a[8] = "You are starving" a[9] = "You are almost dying of hunger" a[10] = "You are DYING of hunger" htest = 0 repeat uo.deletejournal() uo.serverprint(".hungry") wait (1000) i = 0 htest2 = 0 if uo.count("0x097B") > 0 then repeat if uo.injournal(a[i]) then if (i - need_hungry_level) > 0 then uo.exec("usetype 0x097B") repeat wait (50) until uo.injournal("Tasty!") or uo.injournal("Good!") or uo.injournal("Yum!") or uo.injournal("I am already") or uo.injournal("123") htest2 = 1 else htest = 1 htest2 = 1 endif endif i = i + 1 until i == 11 or htest2 == 1 else htest = 1 endif until htest == 1 endsub sub main() var x1, y1, x2, y2, xp, x, y, z1 repeat1: if y1==420 then y1=300 y2=180 z1= -1 x1=300 x2=520 else y1=300 y2=420 z1= 1 x1=300 x2=520 endif while y1 <> y2 xp=x1 while xp <> x2 x=xp y=y1 kopanie(x,y) xp=xp+20 wend y1=y1+z1*20 x1=x1+20 x2=x2-20 wend goto repeat1 end sub
Суть скрипта: Копает вокруг себя.
Кто бы мне помог добавить сюда реконектор ? и по возможности чтоб он бежал к дому и сбрасывал всё в сундук.
ну хотябы реконектор
sub kopanie(x,y) UO.Exec('terminate Reconnector') wait(500) UO.Exec('exec Reconnector') wait(500) uo.exec("usetype '0x0e85'") wait(500) UO.LClick(x,y) wait(5000) end sub var need_hungry_level = 1 sub hungry() var i,htest,htime,htest2 dim a[11] a[0] = "You are absolutely stuffed" a[1] = "You are stuffed" a[2] = "You aren't hungry at all" a[3] = "You are a little hungry" a[4] = "You are somewhat hungry" a[5] = "You are REALLY hungry" a[6] = "Your stomash hurts" a[7] = "Your stomash hurts and you feel dizzy" a[8] = "You are starving" a[9] = "You are almost dying of hunger" a[10] = "You are DYING of hunger" htest = 0 repeat uo.deletejournal() uo.serverprint(".hungry") wait (1000) i = 0 htest2 = 0 if uo.count("0x097B") > 0 then repeat if uo.injournal(a[i]) then if (i - need_hungry_level) > 0 then uo.exec("usetype 0x097B") repeat wait (50) until uo.injournal("Tasty!") or uo.injournal("Good!") or uo.injournal("Yum!") or uo.injournal("I am already") or uo.injournal("123") htest2 = 1 else htest = 1 htest2 = 1 endif endif i = i + 1 until i == 11 or htest2 == 1 else htest = 1 endif until htest == 1 endsub sub main() var x1, y1, x2, y2, xp, x, y, z1 repeat1: if y1==420 then y1=300 y2=180 z1= -1 x1=300 x2=520 else y1=300 y2=420 z1= 1 x1=300 x2=520 endif while y1 <> y2 xp=x1 while xp <> x2 x=xp y=y1 kopanie(x,y) xp=xp+20 wend y1=y1+z1*20 x1=x1+20 x2=x2-20 wend goto repeat1 end sub
Sub Reconnector() var RFlag RFlag = 1 Repeat While (UO.ObjAtLayer('Bpack') == '') if RFlag Then RFlag = 0 endif Wait(20000) UO.Say('') Wait(3000) UO.Say('') Wait(3000) UO.Say('') Wait(3000) UO.LDblClick(357,164) UO.LClick(616,459) Wait(3000) WEnd Wait(3000) if (RFlag == 0) Then UO.Exec('terminate main') wait(1000) uo.lclick(494,383) wait(1000) UO.Exec('exec main') wait(1000) RFlag = 1 endif Until false end sub
j=0 repeat wait (50) j=j+1 until uo.injournal("Tasty!") or uo.injournal("Good!") or uo.injournal("Yum!") or uo.injournal("I am already") or uo.injournal("123") or (j>100)