sub maning() #BETEP™# var mx, my, mz, i, j, jor, ser, noto 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-4 to mx+4 for j = my -4 to my+4 while not UO.Hidden() UO.Warmode("0") uo.print("Ïðÿ÷åìñÿ...") UO.UseSkill("Hiding") wait(4000) wend UO.Print("Êîïàåì â êîîðäèíàòàõ: "+str(mx-i)+" "+str(my-j)) while not UO.InJournal("no ore here") and not UO.InJournal("location") and not UO.InJournal("far away") and not UO.InJournal("in rock") and not UO.InJournal("Iron Ore") and not UO.InJournal("Copper") and not UO.InJournal("Rusty Ore") UO.DeleteJournal() if uo.waiting() then uo.canceltarget() endif UO.Waittargettile("1341", str(i), str(j), str(mz)) UO.Useobject("Shovel") while not UO.InJournal("You put") and not UO.InJournal("heavy") and not UO.InJournal("location") and not UO.InJournal("no ore") and not UO.InJournal("but fail") and not UO.InJournal("far away") and not UO.InJournal("in rock") wait (500) if uo.injournal("heavy") or uo.dead() then pwav() Pause() endif # for jor = 0 to 9 # ser = uo.journalserial(jor) # noto = uo.getnotoriety(ser) # if noto <> 1 and noto <> 0 and not uo.injournal("elemental") then # if uo.waiting() then # uo.canceltarget() # endif # Save() # pwavw() # wait(180000) ; âðåìÿ â ñåêóíäàõ ïðè îæèäàíèè ïîêà óéäåò ÏÊ # loot() # wait(3000) # goto reccal # endif # next wend if uo.weight > 600 then ; Ìàêñèìàëüíûé âåñ ïðè êîòîðîì äîìîé ñ ðóäîé goto end endif wend UO.DeleteJournal() next next goto na4alo end: if uo.waiting() then uo.canceltarget() endif uo.exec("recall Runebook 21") ; äîìîé ( â ðóíáóêå ñëîò 1 ) wait(10000) loot() wait(3000) reccal: uo.deletejournal() if uo.waiting() then uo.canceltarget() endif uo.exec("recall Runebook 33") ; â øàõòó ( â ðóíáóêå ñëîò 8 ) 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='0x403B1E9A' ; ÀÉÄÈ ñóíäóêà äëÿ ðóäû 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 reccal: uo.deletejournal() if uo.waiting() then uo.canceltarget() endif mx = UO.GetX("self") my = UO.GetY("self") UO.DeleteJournal() UO.FindType('0x1F14',-1,'my') wait(200) UO.Cast('Recall','finditem') wait(4000) if not UO.GetX("self") <> mx and not UO.GetY("self") <> my then goto reccal endif end sub
sub pwav() ; çâóê ïðè âûêàïûâàíèè ÝËÅÌÅÍÒÀËÀ uo.playwav("E:\UO\inject\SOUND\chanting sound 01.wav") endsub
sub pwavw(); çâóê ïðè ïîÿâëåíèè ÏÊ uo.playwav("E:\UO\inject\SOUND\chanting sound 01.wav") endsub
sub Pause() ; Ïàóçà ñêðèïòà åñëè âûêîïàëè Ýëåìà (ïðîäîëæèòü ñêàçàâ GO ) UO.DeleteJournal() uo.exec('exec elem') REPEAT WAIT(3000) UO.Print("!!!ÑÊÐÈÏÒ ÍÀ ÏÀÓÇÅ!!!!") UNTIL UO.InJournal('GO') UO.Print("!!!ÑÊÐÈÏÒ ÏÐÎÄÎËÆÅÍ!!!!") end sub sub elem() var monst='0x0010' #??? ????????? uo.ignorereset() UO.Set('finddistance','25') UO.FindType(monst, '-1', 'ground') if UO.FindCount() > 0 then UO.DeleteJournal() uo.print('???? ???? ???????? ????') while uo.findcount() > 0 wait(500) UO.FindType(monst, '-1', 'ground') wend end if uo.print('GO') wait(500) end sub
все норм работает, копает, обнаруживает элема, скрипт встает на паузу, но потом постоянно пишет "скрипт на паузе" хотя после исчезновения элема скрипт должен продолжать работу, если даже в ручную написать GO, то пишет скрипт продолжен но копать не начинает, а если зделать даблклик на кирку а потом на тайл то скрипт начинает работать помогите плизззз!!!
|