Хелп вставьте телепорт по рунбуке и к следующему месту порта

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
Dreygon
Posts: 39
Joined: 2006-03-29 09:35:57

Хелп вставьте телепорт по рунбуке и к следующему месту порта

Post by Dreygon »

Плиз вставьте в скрипт если не влом???? оч буду благодарен))))
Scripts Writer
Posts: 2259
Joined: 2005-04-19 18:00:29
Location: Московская область
Contact:

Post by Scripts Writer »

ТЕЛЕПАТЫ офф
Dreygon
Posts: 39
Joined: 2006-03-29 09:35:57

Post by Dreygon »

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('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.findtype('0x0DCA','0x07D5','ground') ;Fishing net
UO.grab ('1','finditem')
wait (200)
UO.UnSetReceivingContainer()
end if
wend
wend
UO.DeleteJournal()
next
next
end sub
Dreygon
Posts: 39
Joined: 2006-03-29 09:35:57

Post by Dreygon »

типа шоб када скрипт закончится относил домой усё наловленое и дальше по рунбуке)))
Dreygon
Posts: 39
Joined: 2006-03-29 09:35:57

Post by Dreygon »

ой забыл шард ДРВ))))0 если кто сможет помогить плиз))
Post Reply