Привет
Вот взял 2 скрипта и сделал 1
Скрипт должен брать из сундука SS и SA, потом кастовать Night Sight на себя, когда мана кончилась - Meditation и после медитаций один раз използовать Spirit Speak.
Всё работает до того , когда мана фулл и използовал спирит спик. Потом он нечево болше неделает
Помогите пожалуста, што там надо переписать , менять итд.. ?
Сам скрипт.
Code:
sub NightSight()
VAR m, h
VAR bag = '0x4012C297' ; Lade ar SS un SA
While UO.SkillVal( 'Magery' ) < 1000
uo.findtype('0x0F8D', -1 ,'backpack')
if uo.findcount() < 10 then
uo.useobject( bag )
uo.findtype('0x0F8D', -1 , bag )
if uo.findcount() then
uo.moveitem('finditem','100','backpack')
checklag()
else
return
end if
end if
uo.findtype('0x0F8C', -1 ,'backpack')
if uo.findcount() < 10 then
uo.useobject( bag )
uo.findtype('0x0F8C', -1 , bag )
if uo.findcount() then
uo.moveitem('finditem','100','backpack')
checklag()
else
return
end if
end if
While UO.Mana>=9
UO.DeleteJournal()
UO.Cast('Night Sight', 'self')
wait(3000)
wend
If UO.Mana<9 Then ;*
While UO.Mana<UO.Int
UO.DeleteJournal()
wait(1000)
UO.Useskill('Meditation')
Repeat
wait(100)
until UO.InJournal("You are") OR UO.InJournal("You lose") # ЗДЕСБ ЕСЛИ ИГРАЕТЕ НЕ НА ДРВ - ИСПРАВЬТЕ СООБЩЕНИЯ СЕРВА
uo.useskill('Spirit Speak')
Wait(6000)
Wend
Endif
end sub
Sub checklag()
del('backpack')
uo.click('backpack')
repeat
wait(50)
until uo.injournal('backpack')
del('backpack')
wend
end sub
Sub del(msg)
while uo.injournal(msg)
uo.setJournalLine(uo.injournal(msg)-1,"Is Empty!")
wend
end sub
Болшое спасибо!
