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

Помогите плиз
http://forum.yoko.com.ua/viewtopic.php?f=20&t=13341		 Page 1 of 1
Author:  FreM [ 2008-03-05 21:01:42 ]
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>710 then
;UO.Useobject("0x401D372A",'0x09CC');dagger - fish
;wait(4000)
;UO.Usetype("0x0F51",'0x09CD');dagger - fish
;wait(4000)
;UO.Usetype("0x0F51",'0x09CE');dagger - fish
;wait(4000)
;UO.Usetype("0x0F51",'0x09CF');dagger - fish
;wait(4000)
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 ('1','finditem')
wait (100)
UO.findtype('0x09CD','0x0000','ground') ;fish
UO.grab ('1','finditem')
wait (100)
UO.findtype('0x09CE','0x0000','ground') ;fish
UO.grab ('1','finditem')
wait (100)
UO.findtype('0x09CF','0x0000','ground') ;fish
UO.grab ('1','finditem')
wait (100)
UO.findtype('0x14EB','0x0000','ground') ;tattered map
UO.grab ('1','finditem')
wait (100)
UO.findtype('0x0DD6','0x05F6','ground') ;Truly rare fish
UO.grab ('1','finditem')
wait (100)
UO.findtype('0x0DD6','0x01BB','ground') ;Prize fish
UO.grab ('1','finditem')
wait (100)
UO.UnSetReceivingContainer()
end if
wend
wend
UO.DeleteJournal()
next
next
end sub
Author:  some [ 2008-03-05 21:27:15 ]
Post subject: 
while not UO.InJournal("no fish here") and not UO.InJournal("location") and not UO.InJournal("far away") and not UO.InJournal("in water")

вроде здесь поставить надо что говориться когда не клюёт
Author:  FreM [ 2008-03-06 12:58:14 ]
Post subject: 
нет так не помогает я уже пробовал
Author:  Grin [ 2008-03-06 14:00:14 ]
Post subject: 
получаешь руское сообщение
пишешь ,showjournal
увидишь можешь кракозябру или cliloc
вот то что у видел подставляешь по аналогии с английским
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/