Народ помогите,скиньте скрипт на Маджери,чтоб кастовал Инлор на себя пока мана не кончится,потом хавал и медетировал до полной маны и потом все снова
заранее спасибо
Magery
Moderators: Murderator+, Murderator
Re: Magery
CANNABIS wrote:Народ помогите,скиньте скрипт на Маджери,чтоб кастовал Инлор на себя пока мана не кончится,потом хавал и медетировал до полной маны и потом все снова
заранее спасибо
На!
Code: Select all
sub Magery()
var LastTimer
while not uo.Dead()
uo.DeleteJournal()
CheckLag()
while uo.Mana>=10
uo.Cast('Night Sight','self')
wait(3000)
wend
while uo.Mana<uo.INT
LastTimer=uo.Timer()
uo.UseSkill('Meditation')
repeat
wait(100)
until uo.InJournal("You are") or uo.InJournal("You lose") or uo.Timer()>LastTimer+200
uo.DeleteJournal()
wait(2000)
wend
wend
end sub
sub CheckLag()
uo.DeleteJournal()
uo.Click('backpack')
repeat
wait(500)
until uo.InJournal('backpack')
end sub
Code: Select all
sub Magery()
var LastTimer
while not uo.Dead()
uo.DeleteJournal()
CheckLag()
while uo.Mana>=10
uo.waittargetself()
wait(500)
uo.Cast('Night Sight')
wait(3000)
wend
while uo.Mana<uo.INT
LastTimer=uo.Timer()
uo.UseSkill('Meditation')
repeat
wait(100)
until uo.InJournal("You are") or uo.InJournal("You lose") or uo.Timer()>LastTimer+200
uo.DeleteJournal()
wait(2000)
wend
wend
end sub
sub CheckLag()
uo.DeleteJournal()
uo.Click('backpack')
repeat
wait(500)
until uo.InJournal('backpack')
end sub
там была небольшая ошибка...
Можно усовершенствовать использование скила Медитации. Я предлагаю сделать так:
sub Harm()
var exit=0
repeat
repeat
uo.cast('Harm')
uo.waittargetself()
wait(3500)
until uo.mana<6
exit=0
repeat
uo.DeleteJournal()
uo.useskill('Meditation')
repeat
wait(100)
until uo.InJournal("You must wait") or uo.InJournal("You lose your concentration")
if uo.InJournal("You must wait") then
exit=1;
end if
until exit==1
repeat
wait(500)
until uo.mana==uo.int
until False
end sub
p.s. Кстати, посмотрите, почему-то у меня не начинает заново кастовать после пополнения маны
sub Harm()
var exit=0
repeat
repeat
uo.cast('Harm')
uo.waittargetself()
wait(3500)
until uo.mana<6
exit=0
repeat
uo.DeleteJournal()
uo.useskill('Meditation')
repeat
wait(100)
until uo.InJournal("You must wait") or uo.InJournal("You lose your concentration")
if uo.InJournal("You must wait") then
exit=1;
end if
until exit==1
repeat
wait(500)
until uo.mana==uo.int
until False
end sub
p.s. Кстати, посмотрите, почему-то у меня не начинает заново кастовать после пополнения маны
