Igraju na odnom sharde..
Tak kapaju s scriptom.. No, problema takaja chto nemogu nastroitj ego chtobi on razgruzilsja doma.. ID sunduka propisan.. Vobshem kogda on naberaet polnij ves, on prilitaet damoij, otkrivaet sunduk.. i Vso.. razgruzhatsa on nehochet..
Vobshem vot script.. esli mozhetje pomagite ktoto...
var Chest='0x400475D8'
sub maning()
var mx, my, mz, i, j, jor, ser, noto, ya,k, name, GoL = '0x00079FF4', cave = 1
Uo.exec("set norbcheck 1"); äė˙ šåźīėą
uo.exec("set norbcalc 1"); ņīęå
uo.print('!!Āūįåšč Ėīļąņó!! ')
uo.exec('addobject Shovel')
while uo.targeting()
wait(100)
wend
uo.print('!!Āūįåšč Šóķįóź!! ')
uo.exec('addobject Runebook')
while uo.targeting()
wait(100)
wend
na4alo:
mx = UO.GetX("self")
my = UO.GetY("self")
mz = UO.GetZ("self")
UO.DeleteJournal()
for i = mx-2 to mx+2
for j = my -2 to my+2
UO.Print("Źīļąåģ ā źīīšäčķąņąõ: "+str(mx-i)+" "+str(my-j))
while not UO.InJournal("nothing") and not UO.InJournal("You cannot") and not UO.InJournal("far away") and not UO.InJournal("in rock") and not UO.InJournal("elsewhere")
if UO.Dead() then
pwav()
UO.TextPrint('Źšūńą!!!==='+name+ 'Öāåņ=' +str(noto))
Pause()
end if
UO.DeleteJournal()
if uo.waiting() then
uo.canceltarget()
endif
UO.Deletejournal()
UO.Waittargettile("1341", str(i), str(j), str(mz))
UO.Useobject("Shovel")
k = 0
while not UO.InJournal("You put") and not UO.InJournal("heavy") and not UO.InJournal("location") and not UO.InJournal("nothing") and not UO.InJournal("but fail") and not UO.InJournal("far away") and not UO.InJournal("in rock") and not UO.InJournal("You cannot") and not UO.InJournal("elsewhere") and k < 10
wait (1000)
if uo.injournal("Elemental") or uo.dead() then
pwav()
killelem()
endif
k = k + 1
for jor = 0 to 9
ser = uo.journalserial(jor)
noto = uo.getnotoriety(ser)
name = UO.GetName(ser)
ya = UO.GetSerial('self')
if ser <> ya and noto <> 0 and ser <> GoL then
UO.TextOpen()
UO.TextPrint('Ńšóėčė
--- '+name+ ' Öāåņ=' +str(noto))
if uo.waiting() then
uo.canceltarget()
endif
Save()
pwavw()
RechargeBook()
loot()
cave = cave + 1
if cave > 6 then
cave = 1
end if
Mana()
;wait(30000) ; āšåģ˙ ā ńåźóķäąõ ļšč īęčäąķčč ļīźą óéäåņ ĻŹ
goto reccal
endif
next
wend
if UO.InJournal("but fail") AND k < 2 then
wait(8000)
UO.DeleteJournal()
endif
if uo.weight > 225 then ; Ģąźńčģąėüķūé āåń ļšč źīņīšīģ äīģīé ń šóäīé
goto end
endif
wend
UO.DeleteJournal()
next
next
goto na4alo
end:
if uo.waiting() then
uo.canceltarget()
endif
uo.exec("recall Runebook 15") ; äīģīé ( ā šóķįóźå ńėīņ 5 )
wait(10000)
RechargeBook()
loot()
cave = cave + 1
if cave > 6 then
cave = 1
end if
wait(3000)
reccal:
uo.deletejournal()
if uo.waiting() then
uo.canceltarget()
endif
if cave == 1 then
uo.exec("recall Runebook 3") ; ā ųąõņó ( ā šóķįóźå ńėīņ 1 )
end if
if cave == 2 then
uo.exec("recall Runebook 6") ; ā ųąõņó ( ā šóķįóźå ńėīņ 2 )
end if
if cave == 3 then
uo.exec("recall Runebook 9") ; ā ųąõņó ( ā šóķįóźå ńėīņ 3 )
end if
if cave == 4 then
uo.exec("recall Runebook 12") ; ā ųąõņó ( ā šóķįóźå ńėīņ 4 )
end if
if cave == 5 then
uo.exec("recall Runebook 18") ; ā ųąõņó ( ā šóķįóźå ńėīņ 6 )
end if
if cave == 6 then
uo.exec("recall Runebook 21") ; ā ųąõņó ( ā šóķįóźå ńėīņ 7 )
end if
mx = UO.GetX("self")
my = UO.GetY("self")
wait(10000)
if not UO.GetX("self") <> mx and not UO.GetY("self") <> my then
goto reccal
endif
goto na4alo
end sub
sub loot() ; ļåšåźėąäźą šóäū ā ńóķäóź
if uo.waiting() then
uo.canceltarget()
endif
VAR a,Exit
VAR UnloadCont= '0x400475D8' ; ĄÉÄČ ńóķäóźą äė˙ šóäū
DIM Ore[5]
Ore[0]=0x19B9 ; 4 and more ore
Ore[1]=0x19B7 ; 1 ore
Ore[2]=0x19BA ; 2 ore
Ore[3]=0x19B8 ; 3 ore
UO.SetReceivingContainer(UnloadCont)
wait(500)
For a=0 to 3
Exit=0
repeat
UO.FindType(Ore[a])
if UO.GetQuantity('finditem')>0 then
UO.Grab('0','finditem')
wait(1500)
Else
Exit=1
endif
until Exit==1
Next
UO.UnSetReceivingContainer()
end sub
sub Save() ; Šåźīėė īņ ĻŹ ļšč čõ ļī˙āėåķčč (ā ļąźå šóķźą ā įåēīļąńķīå ģåńņī č šåćč)
var mx, my
var RuneBook='0x40033DA6'
reccal:
uo.deletejournal()
if uo.waiting() then
uo.canceltarget()
endif
UO.DeleteJournal()
UO.Recall(RuneBook, 15)
wait(200)
UO.Usetype('0x0F0E','0x051D')
wait(6000)
if not UO.GetX("self") <> mx and not UO.GetY("self") <> my then
goto reccal
endif
end sub
sub pwav() ; ēāóź ļšč āūźąļūāąķčč ŻĖÅĢÅĶŅĄĖĄ
uo.playwav("C:\Trumpet1.wav")
endsub
sub pwavw(); ēāóź ļšč ļī˙āėåķčč ĻŹ
uo.playwav("C:\Alarm.wav")
endsub
sub Pause() ; Ļąóēą ńźščļņą åńėč āūźīļąėč Żėåģą (ļšīäīėęčņü ńźąēąā GO )
UO.DeleteJournal()
REPEAT
WAIT(3000)
UO.Print("!!!ŃŹŠČĻŅ ĶĄ ĻĄÓĒÅ!!!!")
UNTIL UO.InJournal('GO')
UO.Print("!!!ŃŹŠČĻŅ ĻŠĪÄĪĖĘÅĶ!!!!")
endif
end sub
#############################Ļš˙÷åģ īźķī ÓĪ##################################3
sub HideWindowUO()
UO.asmUOHideEx(); Ļš˙÷åģ īźķī ÓĪ ā ņšåé
end sub
########################################################
sub Mana()
while UO.Mana < UO.Int
UO.Useskill('Meditation')
wait(1000)
wend
end sub
sub killelem()
VAR Count,Elem
UO.UseType('0x13B3')
UO.DeleteJournal()
UO.Exec('warmode 1')
UO.FindType('0x000E',-1,'ground')
Elem=UO.GetSerial('finditem')
wait (300)
UO.Attack(Elem)
repeat
wait(1000)
If UO.Life<100 Then
UO.UseType('0x0F0E','0x0787')
Endif
until UO.IsNPC(Elem)==0
wait(3000)
UO.Exec('warmode 0')
wait(1000)
UO.Print("Sdoh Skotina!")
end sub
sub RechargeBook()
ToRecharge()
end sub
sub CheckLag()
if uo.Waiting()>0 then
uo.Exec('canceltarget')
end if
uo.DeleteJournal()
uo.Click('backpack')
repeat
wait(50)
until uo.InJournal('backpack')
end sub
sub DropScrolls()
if uo.Waiting() then
uo.CancelTarget()
end if
var s,Exit
dim Scrolls[1]
Scrolls[0]=0x1F4C
uo.SetReceivingContainer('0x40048F48')
wait(500)
for s=0 to 0
Exit=0
repeat
uo.FindType(Scrolls[s])
if uo.GetQuantity('finditem')>0 then
uo.Grab('0','finditem')
wait(1500)
else
Exit=1
end if
until Exit==1
next
uo.UnSetReceivingContainer('0x40048F48')
end sub
sub ToRecharge()
uo.SetReceivingContainer('backpack')
uo.UseObject(Chest)
uo.FindType('0x1F4C','-1',Chest)
uo.Grab('2','finditem')
wait(500)
Checklag()
uo.Recall('Runebook', 1)
wait(500)
uo.Recall('Runebook', 1)
wait(200)
Checklag()
uo.UnsetReceivingContainer()
end sub