fishing HELP

Ask for scripts here

Moderators: Murderator+, Murderator

Post Reply
predator-uo
Posts: 24
Joined: 2006-08-17 16:37:02

fishing HELP

Post by predator-uo »

est' macr, шард антарес, проблема в том что он не поднимает рыбку.

Code: Select all

sub fishing() 
var mx, my, mz, i, j
uo.print('Укажите ведро.')
uo.exec('addobject Bag')
while uo.targeting()
wait(100)
wend

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.Print("Now Fishing In: "+str(mx-i)+" "+str(my-j))
while not UO.InJournal("Тут нету рыбы.") and not UO.InJournal("Вы поймали рыбу") and not UO.InJournal("Попробуйте порыбачить в другом месте")
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("Тут нету рыбы.") and not UO.InJournal("Вы поймали рыбу") and not UO.InJournal("Попробуйте порыбачить в другом месте")
wait (100)
if UO.InJournal("You pull") then
UO.SetReceivingContainer('Bag')
UO.findtype('0x09CC','0x0000','ground') ;fish
UO.grab ('1','finditem')
wait (200)
UO.findtype('0x09CD','0x0000','ground') ;fish
UO.grab ('1','finditem')
wait (200)
UO.findtype('0x09CE','0x0000','ground') ;fish
UO.grab ('1','finditem')
wait (200)
UO.findtype('0x09CF','0x0000','ground') ;fish
UO.grab ('1','finditem')
wait (200)
UO.findtype('0x14EB','0x0000','ground') ;tattered map
UO.grab ('1','finditem')
wait (200)
UO.findtype('0x0DD6','0x05F6','ground') ;Truly rare fish
UO.grab ('1','finditem')
wait (200)
UO.findtype('0x0DD6','0x01BB','ground') ;Prize fish
UO.grab ('1','finditem')
wait (200)
UO.UnSetReceivingContainer()
end if
wend
wend
UO.DeleteJournal()
next
next
end sub


[/code]
Nmy
Expert!
Posts: 2152
Joined: 2005-09-14 15:31:58
Location: Latvia

Post by Nmy »

проверь тип или колор
predator-uo
Posts: 24
Joined: 2006-08-17 16:37:02

Post by predator-uo »

тип и колор правильно
predator-uo
Posts: 24
Joined: 2006-08-17 16:37:02

Post by predator-uo »

всё понятно, там где строчка if UO.InJournal("You pull") then тут место You pull должна стоять фраза после которой идёт массив чтоли :) который поднимает то что выловил. Типо "Вы поймали рыбу"
Nmy
Expert!
Posts: 2152
Joined: 2005-09-14 15:31:58
Location: Latvia

Post by Nmy »

умница 8)
Post Reply