Yoko
http://forum.yoko.com.ua/

Миненг убийство и лут ...
http://forum.yoko.com.ua/viewtopic.php?f=20&t=2928		 Page 1 of 1
Author:  Fenixsis [ 2005-02-01 02:15:25 ]
Post subject:  Миненг убийство и лут ...
У меня возник вопрос следуещего содержания ....
Я скачал скрипт все работает Копание, Рекол домой, Разгрузка, Загрузка регов. Но все хорошо то того момента пока не появится Элем . А тоесть в скрипте забита функция убийства оного .. Все работает пока он (в смысле чар )его не убъёт По скрипту он должен лутать его то-есть забераь руду и Гп ....
Но Этого не происходит он виснет пишет ошибку ...
Если можете подскажите пожалуста в чем дело ... Из за чего Это происходит ...
ВОТ И САМ СКРИПТ ( ТОЕСТЬ ЧАСТЬ КАТОРАЯ ОТВЕЧАТ ЗА KILL ЭЛЕМА )

sub ElemKill()
UO.Exec("terminate Mining")
UO.UseType("0x0F0E","0x0631")
wait(100)
repeat
UO.DeleteJournal()
if UO.Mana<50 then
wait(14000)
UO.UseType("0x0F0E","0x09DF")
endif
UO.WaitMenu("What","Daemon")
UO.Cast("Polymorph")
wait(1000)
while checkmorph()==false
wait(100)
wend
until NOT UO.InJournal("spell fizzles")
UO.FindType("0x0010","0xffff","ground")
UO.GetStatus("finditem")
uo.SetGlobal("name",UO.GetName("finditem"))
uo.textopen()
uo.textprint(UO.GetName("finditem"))
wait(100)
lifeup("healing")
UO.WarMode(1)
wait(100)
UO.DeleteJournal()
UO.Attack("laststatus")
while check("0x0010")==true
gotoxy(UO.GetX("laststatus"),UO.GetY("laststatus"),1)
wait(100)
wend
uo.SetGlobal("timekill",time())
UO.WaitTargetGround("0x19B9")
wait(500)
UO.Grab("all")
UO.WaitTargetGround("0x0EED")
wait(1500)
UO.Grab("all")
wait(100)
UO.Exec("warmode 0")
recall("1")
log(5,uo.GetGlobal("name"),"")
uo.textopen()
uo.textprint("Поимели рудку =)")
UO.Exec("exec Mining")
end sub

Заранее БЛАГОДАРЕН ..................
Author:  Sfagnum [ 2005-02-01 09:35:39 ]
Post subject:  Re: Миненг убийство и лут ...
возьми эту часть из свежего скрипта Саваджа... всё равно все её юзают ;)
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/