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

помогите вставить таймер. скрипт на фишинг
http://forum.yoko.com.ua/viewtopic.php?f=20&t=16778		 Page 1 of 1
Author:  Kolenzo [ 2011-09-25 12:40:34 ]
Post subject:  помогите вставить таймер. скрипт на фишинг
Скрипт на фишинг. Взятый с этого форума (чуток отредактированный). Работает нормально, но у меня на сервере стоит антимакрос система. она вылезает когда закидываешь удочку (таргет наводишь на воду). и когда она вылезает, рыбак перестает рыбачить. и стоит. обход АМ я нашел, но рыбак после обхода стоит. он же ждет пока в журнале будет while not uo.injournal("you pull") и тд, а там в журнале пишет инжа, и он на этот текст не реагирует.

как вставить таймер, чтобы по истечению например секунд 5 после закидывания удочки (безрезультатно) он заново её закидывал?

Code:
sub fishing()
var mx, my, mz, i, j


mx = UO.GetX("self")
my = UO.GetY("self")
mz = UO.GetZ("self")
UO.DeleteJournal()
for i = mx-6 to mx+6
for j = my -6 to my+6
if UO.dead() then
return
endif
UO.Warmode("0")



UO.Print("Now Fishing In: "+str(mx-i)+" "+str(my-j))
while not UO.InJournal("no fish here") and not UO.InJournal("location") and not UO.InJournal("far away") and not UO.InJournal("in water")
UO.DeleteJournal()
UO.Waittargettile("1341", str(i), str(j), str(mz))
UO.Usetype("0x0DBF") ;FishingPole
if UO.dead() then
return
endif
if UO.Weight>660 then
return
endif
while not UO.InJournal("You pull") and not UO.InJournal("location") and not UO.InJournal("no fish") and not UO.InJournal("but fail") and not UO.InJournal("far away") and not UO.InJournal("in water") and not UO.InJournal("Number")
wait (100)

wend
wend
UO.DeleteJournal()
next
next
uo.sayu ('Forward')
wait(10000)
uo.sayu ('Stop')
grab()
fishing()
end sub
Author:  ZeroDX [ 2011-11-22 01:23:49 ]
Post subject:  Re: помогите вставить таймер. скрипт на фишинг
Code:
sub fishing()
var mx, my, mz, i, j, time


mx = UO.GetX("self")
my = UO.GetY("self")
mz = UO.GetZ("self")
UO.DeleteJournal()
for i = mx-6 to mx+6
for j = my -6 to my+6
if UO.dead() then
return
endif
UO.Warmode("0")



UO.Print("Now Fishing In: "+str(mx-i)+" "+str(my-j))
while not UO.InJournal("no fish here") and not UO.InJournal("location") and not UO.InJournal("far away") and not UO.InJournal("in water")
UO.DeleteJournal()
UO.Waittargettile("1341", str(i), str(j), str(mz))
UO.Usetype("0x0DBF") ;FishingPole
time = UO.Timer()
if UO.dead() then
return
endif
if UO.Weight>660 then
return
endif
while time + 100 < UO.Timer() and not UO.InJournal("You pull") and not UO.InJournal("location") and not UO.InJournal("no fish") and not UO.InJournal("but fail") and not UO.InJournal("far away") and not UO.InJournal("in water") and not UO.InJournal("Number")
wait (100)

wend
wend
UO.DeleteJournal()
next
next
uo.sayu ('Forward')
wait(10000)
uo.sayu ('Stop')
grab()
fishing()
end sub
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/