фишинг помогите потпраивить чучуть

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
megafakel
Posts: 19
Joined: 2006-03-28 07:55:10

фишинг помогите потпраивить чучуть

Post by megafakel »

Code: Select all

sub main() 
uo.deletejournal()
var mx, my, mz, i, j
mx = UO.GetX("self")
my = UO.GetY("self")
mz = UO.GetZ("self")
for i = mx+2 to mx+6
for j = my-3 to my+3
UO.Print("Now Fishing In: "+str(mx-i)+" "+str(my-j))
UO.Waittargettile("1341", str(i), str(j), str(mz))
UO.Usetype("0x0DBF")
uo.deletejournal()
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(500)
wend
next
next
uo.say("back")
wait(10000)
uo.say("stop")
uo.exec("exec main")
end sub


Вот скрипт ... помогите плз чтобы он доплывая до берега сразу делал логаут ... Плз зделайте умоляю васс...

Destruction: ЧИТАЙ ПРАВИЛА !!!
Edred
Expert!
Posts: 2544
Joined: 2004-04-03 17:36:29
Location: Saint-Petersburg

Post by Edred »

Для этого нужно знать сообщение, которое выдает твой шард при попытке ловить на суше. Или если корабль уперся в сушу.

Телепаты в отпуске.
Post Reply