Yoko
http://forum.yoko.com.ua/

Помогите с рыболовством
http://forum.yoko.com.ua/viewtopic.php?f=20&t=3416		 Page 1 of 1
Author:  Adec[DrW] [ 2005-03-17 15:17:14 ]
Post subject:  Помогите с рыболовством
Люди добрые помогите с фишингом. Почему этот скрипт отключается? И можно ли что то зделать чтоб не отключался.

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-4 to mx+4
for j = my -4 to my+4
if UO.dead() then
return
endif
while not UO.Hidden()
UO.Warmode("0")
uo.print("hiding...")
UO.UseSkill("Hiding")
wait(4000)
wend

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")
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("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.SetReceivingContainer('Bag')
UO.findtype('0x09CC','0x0000','ground') ;fish
UO.grab ('3','finditem')
wait (200)
UO.findtype('0x09CD','0x0000','ground') ;fish
UO.grab ('3','finditem')
wait (200)
UO.findtype('0x09CE','0x0000','ground') ;fish
UO.grab ('3','finditem')
wait (200)
UO.findtype('0x09CF','0x0000','ground') ;fish
UO.grab ('3','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
Author:  GimFlex [ 2005-03-17 15:46:01 ]
Post subject: 
купить новые руки :roll:
Author:  Adec[DrW] [ 2005-03-17 16:45:52 ]
Post subject: 
Question wrote:
купить новые руки :roll:

Мда.... Если бы я шарил в скриптах стал бы я тут помощи просить. Если ты такой скриптер лучше бы помог чем умничать
Author:  HellFire [ 2005-03-17 16:48:47 ]
Post subject: 
u mnu takaja ze trabla :roll:
Author:  Destruction [ 2005-03-17 16:57:06 ]
Post subject: 
Adec[DrW] wrote:
Question wrote:
купить новые руки :roll:

Мда.... Если бы я шарил в скриптах стал бы я тут помощи просить. Если ты такой скриптер лучше бы помог чем умничать

Я в скриптах шарю, а от помощи не откажусь, потому что не дурак, зачем что-то делать самому, када мона другого попросить

А ваще просто запихни в цикл.
Author:  GimFlex [ 2005-03-17 17:52:29 ]
Post subject: 
выложил бы я тут свой скрипт на фишинг но не могу жалко :oops:
Author:  Adec[DrW] [ 2005-03-18 02:45:07 ]
Post subject: 
Question wrote:
выложил бы я тут свой скрипт на фишинг но не могу жалко :oops:

А зачем тогда пальцы гнуть мол есть но жалко?
Author:  Goggy [ 2005-03-18 02:49:09 ]
Post subject: 
Code:
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() 
while true
for i = mx-4 to mx+4 
for j = my -4 to my+4 
if UO.dead() then 
return 
endif 
while not UO.Hidden() 
UO.Warmode("0") 
uo.print("hiding...") 
UO.UseSkill("Hiding") 
wait(4000) 
wend 

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") 
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("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.SetReceivingContainer('Bag') 
UO.findtype('0x09CC','0x0000','ground') ;fish 
UO.grab ('3','finditem') 
wait (200) 
UO.findtype('0x09CD','0x0000','ground') ;fish 
UO.grab ('3','finditem') 
wait (200) 
UO.findtype('0x09CE','0x0000','ground') ;fish 
UO.grab ('3','finditem') 
wait (200) 
UO.findtype('0x09CF','0x0000','ground') ;fish 
UO.grab ('3','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 
wend
end sub



пробй так!
Author:  Adec[DrW] [ 2005-03-18 13:26:34 ]
Post subject: 
Goggy wrote:
Code:
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() 
while true
for i = mx-4 to mx+4 
for j = my -4 to my+4 
if UO.dead() then 
return 
endif 
while not UO.Hidden() 
UO.Warmode("0") 
uo.print("hiding...") 
UO.UseSkill("Hiding") 
wait(4000) 
wend 

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") 
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("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.SetReceivingContainer('Bag') 
UO.findtype('0x09CC','0x0000','ground') ;fish 
UO.grab ('3','finditem') 
wait (200) 
UO.findtype('0x09CD','0x0000','ground') ;fish 
UO.grab ('3','finditem') 
wait (200) 
UO.findtype('0x09CE','0x0000','ground') ;fish 
UO.grab ('3','finditem') 
wait (200) 
UO.findtype('0x09CF','0x0000','ground') ;fish 
UO.grab ('3','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 
wend
end sub



пробй так!

А в чем разница???
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/