добавьте к скрипту плз...
Posted: 2007-12-12 18:37:26
вот к этому скрипту :
sub Maps_only()
var mx, my, mz, i, j
mx = UO.GetX('self')
my = UO.GetY('self')
mz = UO.GetZ('self')
UO.DeleteJournal()
while true
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("fishing in water")
UO.DeleteJournal()
UO.Waittargettile("6043", str(i), str(j), str(mz))
UO.Usetype('0x0DC0')
while not UO.InJournal('You pull out') and not UO.InJournal('fail') and not UO.InJournal('no fish') and not UO.InJournal("fishing in water")
wait (100)
wend
if UO.InJournal("You pull") then
#UO.WaitTargetGround('0x09CC') ; fish1
#wait(500)
#UO.Grab()
#UO.WaitTargetGround('0x09CD') ; fish2
#wait(500)
#UO.Grab()
#UO.WaitTargetGround('0x09CE') ; fish3
#wait(500)
#UO.Grab()
#UO.WaitTargetGround('0x09CF') ; fish4
#wait(500)
#UO.Grab()
#UO.WaitTargetGround('0x0DD6') ; small fish
#wait(500)
#UO.Grab()
UO.WaitTargetGround('0x14EB') ; maps
wait(500)
UO.Grab()
next
next
endif
wend
UO.DeleteJournal()
next
next
endif
wend
Endsub
надо добавить что бы чар летал по местам ловли... когда рыба в одном месте заканчивается летит на другое и т.д....
не надо тока плз говорить типа юзай поиск...выпеши из другого крипта реколы по рунбукам...если б я мог сам это сделать я бы тему не создавал..
sub Maps_only()
var mx, my, mz, i, j
mx = UO.GetX('self')
my = UO.GetY('self')
mz = UO.GetZ('self')
UO.DeleteJournal()
while true
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("fishing in water")
UO.DeleteJournal()
UO.Waittargettile("6043", str(i), str(j), str(mz))
UO.Usetype('0x0DC0')
while not UO.InJournal('You pull out') and not UO.InJournal('fail') and not UO.InJournal('no fish') and not UO.InJournal("fishing in water")
wait (100)
wend
if UO.InJournal("You pull") then
#UO.WaitTargetGround('0x09CC') ; fish1
#wait(500)
#UO.Grab()
#UO.WaitTargetGround('0x09CD') ; fish2
#wait(500)
#UO.Grab()
#UO.WaitTargetGround('0x09CE') ; fish3
#wait(500)
#UO.Grab()
#UO.WaitTargetGround('0x09CF') ; fish4
#wait(500)
#UO.Grab()
#UO.WaitTargetGround('0x0DD6') ; small fish
#wait(500)
#UO.Grab()
UO.WaitTargetGround('0x14EB') ; maps
wait(500)
UO.Grab()
next
next
endif
wend
UO.DeleteJournal()
next
next
endif
wend
Endsub
надо добавить что бы чар летал по местам ловли... когда рыба в одном месте заканчивается летит на другое и т.д....
не надо тока плз говорить типа юзай поиск...выпеши из другого крипта реколы по рунбукам...если б я мог сам это сделать я бы тему не создавал..