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

Помогите плз
http://forum.yoko.com.ua/viewtopic.php?f=20&t=13592		 Page 1 of 1
Author:  Kukus [ 2008-05-14 10:15:15 ]
Post subject:  Помогите плз
Вот этот скриптик у меня почему-то не берет бинты =(

sub Train_Heal()
; Attacking bees until hp=20, and then heal yourself.
; Get clean bandages from Sunduk, and move bloody
; bandage to Sunduk

var Bee=0x401AEC4B
var Sunduk=0x4001EFCD
var Bandage=0x0E21
var BBandage=0x0E20
var life, k
while not uo.Dead()
while uo.life > 20
uo.UseObject(Bee)
wait(450)
repeat
wait(100)
until uo.InJournal('backpack')
wend
if uo.Count(Bandage) then
while uo.life < uo.str && uo.Count(Bandage)>0
k=0
uo.Bandageself()
uo.DeleteJournal()
life=uo.life
repeat
wait(100)
k=k+1
until uo.life <> life || uo.InJournal('помогли|кладете') || k>100
wend
uo.FindType(BBandage,'-1','backpack')
if uo.FindCount() then
uo.moveitem('finditem','all',Sunduk)
wait(750)
end if
else
uo.FindType(Bandage,'-1',Sunduk)
if uo.FindCount() then
uo.moveitem('finditem','250')
wait(750)
end if
end if
wend
end sub

заранее спс!=)
Author:  Scripts Writer [ 2008-05-14 18:02:59 ]
Post subject: 
Открой сундук перед использованием скрипта и укажи его ID
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/