помогите со скриптом
Posted: 2004-04-10 21:42:54
люди я тут скрипт сам переделал из скрипта на мининг сделал скрипт на фишинг сделал так чтобы вылавливал токо карты ( то есть токо их поднимал) но у меня как токо он выловит карту скрипт продалжает работать а чар большет не ловит рубу тормозит и все хотя скрипт запушен помогите исправить скрипт
Code: Select all
sub main()
var mx, my, mz, i, j
mx = UO.GetX("self")
my = UO.GetY("self")
mz = UO.GetZ("self")
Repeat
UO.DeleteJournal()
for i = mx-6 to mx+6
for j = my -6 to my+6
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") and not UO.InJournal("You pull out a fish!") and not UO.InJournal("You put ")
UO.DeleteJournal()
UO.Waittargettile("1341", str(i), str(j), str(mz))
UO.Usetype("0x0DBF")
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")
wait (100)
if UO.InJournal("You pull") then
UO.findtype('0x14EB','0x0000','ground') ;tattered map
UO.grab ('1','finditem')
wait (200)
end if
wend
wend
UO.DeleteJournal()
next
next
Until (1 == 0)
end sub