помогите со скриптом

[999]

люди я тут скрипт сам переделал из скрипта на мининг сделал скрипт на фишинг сделал так чтобы вылавливал токо карты ( то есть токо их поднимал) но у меня как токо он выловит карту скрипт продалжает работать а чар большет не ловит рубу тормозит и все хотя скрипт запушен помогите исправить скрипт

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

[Pummy]

Попробуй убрать цикл:
Repeat
.
.
.
Until(1 == 0)