Здравствуйте помогите пожалуйста доработать скрипт,сам скрпит работает очень даже хорошо нужно добавить чтобы он пил инвизку и реколился от пк и элема. Огромное спасибо.
uo.print('!!Auaa?e ?oio A IAUA?O !! ') uo.exec('addobject runeCave') while uo.targeting() wait(100) wend
na4alo: mx = UO.GetX("last") my = UO.GetY("last") mz = UO.GetZ("last") 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("I?y?ainy...") UO.UseSkill("Hiding") wait(4000) wend UO.Print("Eiiaai a eii?aeiaoao: "+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) ; a?aiy a naeoiaao i?e i?eaaiee iiea oeaao IE loot() wait(3000) goto reccal endif next wend if uo.weight > 400 then ; Iaeneiaeuiue aan i?e eioi?ii aiiie n ?oaie goto end endif wend UO.DeleteJournal() next next goto na4alo end: if uo.waiting() then uo.canceltarget() endif uo.waittargetobject('runeHome') ; aiiie wait(500) uo.cast('Recall') wait(3000) loot() wait(3000) reccal: uo.deletejournal() if uo.waiting() then uo.canceltarget() endif uo.waittargetobject('runeCave') ; a oaooo wait(500) uo.cast('Recall') 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() ; ia?aeeaaea ?oau a noiaoe if uo.waiting() then uo.canceltarget() endif VAR a,Exit VAR UnloadCont='0x4002C5E2' ; AEAE noiaoea aey ?oau 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() ; ?aeiee io IE i?e eo iiyaeaiee (a iaea ?oiea a aaciianiia ianoi e ?aae) var mx, my reccal: uo.deletejournal() if uo.waiting() then uo.canceltarget() endif mx = UO.GetX("self") my = UO.GetY("self") UO.DeleteJournal() uo.waittargetobject('runeHome') ; aiiie wait(500) uo.cast('Recall') wait(4000) if not UO.GetX("self") <> mx and not UO.GetY("self") <> my then goto reccal endif end sub
sub pwavw(); caoe i?e iiyaeaiee IE uo.playwav("E:\UO\inject\SOUND\chanting sound 01.wav") endsub
sub Pause() ; Iaoca ne?eioa anee aueiiaee Yeaia (i?iaie?eou neacaa GO ) UO.DeleteJournal() REPEAT WAIT(3000) UO.Print("!!!NE?EIO IA IAOCA!!!!") UNTIL UO.InJournal('GO') UO.Print("!!!NE?EIO I?IAIE?AI!!!!") endif end sub
sub Save() ; ?aeiee io IE i?e eo iiyaeaiee (a iaea ?oiea a aaciianiia ianoi e ?aae) var mx, my reccal: uo.deletejournal() if uo.waiting() then uo.canceltarget() endif mx = UO.GetX("self") my = UO.GetY("self") UO.DeleteJournal() uo.waittargetobject('runeHome') ; aiiie wait(500) uo.cast('Recall') wait(4000) if not UO.GetX("self") <> mx and not UO.GetY("self") <> my then goto reccal endif end sub
вот этот кусок скрипте надо то ко добавить чтобы он пил инвиз
sub Save() ; ?aeiee io IE i?e eo iiyaeaiee (a iaea ?oiea a aaciianiia ianoi e ?aae) var mx, my reccal: uo.deletejournal() if uo.waiting() then uo.canceltarget() endif mx = UO.GetX("self") my = UO.GetY("self") UO.DeleteJournal() uo.waittargetobject('runeHome') ; aiiie wait(500) uo.cast('Recall') wait(4000) if not UO.GetX("self") <> mx and not UO.GetY("self") <> my then goto reccal endif end sub
вот этот кусок скрипте надо то ко добавить чтобы он пил инвиз
Ошибку выдает :Label already defined in this proc-SAVE RECCAL
sub Save() ; ?aeiee io IE i?e eo iiyaeaiee (a iaea ?oiea a aaciianiia ianoi e ?aae) var mx, my reccal: uo.deletejournal() if uo.waiting() then uo.canceltarget() endif mx = UO.GetX("self") my = UO.GetY("self") UO.DeleteJournal() uo.waittargetobject('runeHome') ; aiiie wait(500) uo.cast('Recall') wait(4000) if not UO.GetX("self") <> mx and not UO.GetY("self") <> my then goto reccal endif end sub
вот этот кусок скрипте надо то ко добавить чтобы он пил инвиз
Ошибку выдает :Label already defined in this proc-SAVE RECCAL
этот кусок скрипта он у тебя уже есть я просто показал где надо добавить питя инвиски
Тему клосать не надо. Если у кого то возникнут вопросы по ДАННОМУ скрипту он сможет задать их тут вместо того чтобы плодить одинаковые темы. Рабочий вариант если возможно - выкладывай. Другим будет что использовать.
uo.print('!!Auaa?e ?oio A IAUA?O !! ') uo.exec('addobject runeCave') while uo.targeting() wait(100) wend
na4alo: mx = UO.GetX("last") my = UO.GetY("last") mz = UO.GetZ("last") 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("I?y?ainy...") UO.UseSkill("Hiding") wait(4000) wend UO.Print("Eiiaai a eii?aeiaoao: "+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) ; a?aiy a naeoiaao i?e i?eaaiee iiea oeaao IE loot() wait(3000) goto reccal endif next wend if uo.weight > 500 then ; Iaeneiaeuiue aan i?e eioi?ii aiiie n ?oaie goto end endif wend UO.DeleteJournal() next next goto na4alo end: if uo.waiting() then uo.canceltarget() endif uo.waittargetobject('runeHome') ; aiiie wait(500) uo.Usetype('0x1F4C','0x0000') ;Recall wait(3000) loot() wait(3000) reccal: uo.deletejournal() if uo.waiting() then uo.canceltarget() endif uo.waittargetobject('runeCave') ; a oaooo wait(500) uo.Usetype('0x1F4C','0x0000') ;Recall 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() ; ia?aeeaaea ?oau a noiaoe if uo.waiting() then uo.canceltarget() endif VAR a,Exit VAR UnloadCont='0x4002C5E2' ; AEAE noiaoea aey ?oau 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() ; ?aeiee io IE i?e eo iiyaeaiee (a iaea ?oiea a aaciianiia ianoi e ?aae) var mx, my reccal: uo.deletejournal() if uo.waiting() then uo.canceltarget() endif mx = UO.GetX("self") my = UO.GetY("self") UO.DeleteJournal() uo.waittargetobject('runeHome') ; aiiie wait(500) uo.Usetype('0x1F4C','0x0000') ;Recall wait(4000) if not UO.GetX("self") <> mx and not UO.GetY("self") <> my then goto reccal endif end sub
sub pwav() ; caoe i?e aueaiuaaiee YEAIAIOAEA uo.playwav("D:\Alert") endsub
sub pwavw(); caoe i?e iiyaeaiee IE uo.playwav("E:\UO\inject\SOUND\chanting sound 01.wav") endsub
sub Pause() ; Iaoca ne?eioa anee aueiiaee Yeaia (i?iaie?eou neacaa GO ) UO.DeleteJournal() REPEAT WAIT(3000) UO.Print("!!!NE?EIO IA IAOCA!!!!") UNTIL UO.InJournal('GO') UO.Print("!!!NE?EIO I?IAIE?AI!!!!") endif end sub
sub ExtrimalRecall() var rune='0x400C5998' uo.Usetype('0x0F08','0x07F2') ; Invisibility wait(100) uo.waittargetobject(Rune) uo.Usetype('0x1F4C','0x0000') ;Recall end sub
Ну вот готовый скрипт,в него бы конечно по хорошему ходилочку добавить,но это кому как,т.к на том шарде где я играю чар чаще не успевает даже вокруг себя обкопать,ПК не дремлют,да и элемы помогают:)
sluntai wrote:Ну вот готовый скрипт,в него бы конечно по хорошему ходилочку добавить,но это кому как,т.к на том шарде где я играю чар чаще не успевает даже вокруг себя обкопать,ПК не дремлют,да и элемы помогают:)
sluntai wrote:Ну вот готовый скрипт,в него бы конечно по хорошему ходилочку добавить,но это кому как,т.к на том шарде где я играю чар чаще не успевает даже вокруг себя обкопать,ПК не дремлют,да и элемы помогают:)
А что за шард ?
Не твой,на твоем меня не адекватная администрация забанила за то что я не лестно высказался на счет таблиц на сайте,оказывается чтобы увидеть на странице таблицу допустим магии, нужно мышкой выделить текст этой самой страницы,я должен был до всего этого догадаться,о чем написал ,что сайт сделан через ж..у,Обидчивый админ сказал "я я У нас все через ж...у ,хыыы вот собстно и усе.
Вроде все видно после клика Шард - Таблицы - магия
Меня забанили полгода назад тогда был такой косяк,я не мог посмотреть помоему эту таблицу,обратился за помощью на форум мне объяснили то что я уже написал,я просто под ...л админа маленько,что такой ВЕЛИКИЙ как ДРВ и с таким сайтом ,ну и получил то что получил))
для одной строчки
