Page 1 of 1
Задержка на каст
Posted: 2010-11-14 13:44:19
by Thundestorm
Code: Select all
sub ct()
VAR MyMana = UO.Mana
VAR k = 0
UO.Cast( 'Bless', 'self')
While UO.Mana == MyMana
Wait(100)
k = k + 1
Wend
UO.Print( 'Casting time : '+ STR(k)+ ' ms' )
end sub
У нас на сервер при касте спелов, один за другим мана регениться, не всегда точное время каста.Как это исправить?
И еще, как сделать что бы этот макрос пахал на любой каст который я кастую и зациклить его.
Re: Задержка на каст
Posted: 2011-01-15 01:30:35
by Makarov
А время зачем засекать?
Если я тебя правильно понял:
перед запуском кастуй нужное заклинание, и скрипт будет его повторять (сам не проверял , должно пахать).
Code: Select all
sub CastLastSpell()
var ManaForSpell=10 ; выставь сколько должно быть минимум маны для заклинания
repeat
If UO.mana>=ManaForSpell Then
sendex @R ; Alt+R это в клиенте клавиши повторить последнее заклинание, проверь у себя Options - вкладка Macro Options
sendex @T ; из клавиш клиента - Last Target
wait(3500) ; или сколько нужно
Else
while uo.mana<(ManaForSpell) ; если маны меньше чем надо - медитируешь
UO.useskill('Meditation')
wait(3000)
wend
EndIf
until false ; повторяет бесконечно
end sub