Page 1 of 1

Скрипт на медитацию

Posted: 2004-07-09 18:26:50
by BornToReign
Кто нить может написать скрипт чтобы чар одевал курсануюу вещь ждял пока интелект упадет на единицу а потом мидитировал и так повторял много раз.Заранее благодарен!

Posted: 2004-07-10 15:51:11
by D:2
sub CheckLag()
UO.DeleteJournal()
UO.Click('backpack')

repeat
wait(50)
until UO.InJournal('backpack')
end sub

sub meditate()
var exit, LastTimer, manka
uo.disarm()
wait(2000)
exit = 0
while exit <> 1
manka = UO.INT
CheckLag()
uo.waittargettype ('0x1008')
uo.usetype('0x13F9') // Тут пропишы курснутую вешь, я использовал Тейминг стафф на ДРВ, работает.
uo.canceltarget()

repeat
wait(500)
until UO.Mana < manka
CheckLag()

LastTimer=UO.Timer()

repeat
uo.disarm()
uo.useskill('Meditation')
wait(4000)
until UO.Mana==UO.INT OR LastTimer+300<UO.Timer()
wend
end sub