Тема: МАКРОСЫ
Показать сообщение отдельно
Re: МАКРОСЫ
Старый 22.10.2012, 04:30   #435
shmelek
Newbie
 
Аватар для shmelek
 
Регистрация: 17.10.2012
Адрес: [KiDs]
Возраст: 32
Сообщений: 21
Репутация: 1 [+/-]
имеет нулевую репутацию
shmelek имеет нулевую репутацию
Чар: shmelek
Гильдия: [KiDs]
По умолчанию Re: МАКРОСЫ

Цитата:
Сообщение от MODO Посмотреть сообщение
Скрипт на магию. Расчитан на прокачивание кастом Poison на предмет. Сначала кастует пока мана не упадет до 0 или менее 9, потом поднимает ману до 100. Если вас атачат чар начнет гвардить, пару раз подаст звуковой сигнал чтобы вас уведомить, потом отхилится до 150 и продолжить качать магию. Кидаете в пак реги НС и бинты. Сейчас кнопки стоят F4 - Каст Poison, F9 - Хил себя F11 - Медитация.

:magery
if mana >= 9
set #1 mana
send f4
wait 500
set timer 0
while_not (lastmsg fizzles) or (lastmsg lack) or (lastmsg skill) or (mana < #1) or (timer > 6000)
if lastmsg world
wait 20000
say
say xD
wait 500
end_if
if hits < 150
alarm
call guards
call heal
end_if
end_while
goto magery
else
goto meditation
end_if

:meditation
if mana < 100
set #2 mana + 2
send f11
wait 500
set timer 0
while_not (lastmsg lose) or (lastmsg skill) or (mana > #2) or (timer > 6000)
if lastmsg world
wait 20000
say
say xD
wait 500
end_if
if hits < 150
call guards
call heal
end_if
end_while
goto meditation
else
goto magery
end_if

proc guards
repeat 10
say
say GuardS
wait 600
end_repeat
alarm
wait 500
alarm
end_proc

proc heal
:life
if hits < 150
send f9
wait 500
set timer 0
while_not (lastmsg skill) or (lastmsg bloody) or (lastmsg apply) or (lastmsg mummy) or (timer > 4000)
if lastmsg world
wait 20000
say
say xD
wait 500
end_if
end_while
goto life
end_if
end_proc
Слешка подправил код, ибо хилить грейтами при нехватки 2-3хп - неразумно и скрипт зачемто моргает и орёт следовательно урезонил) гвардов больше не зовёт, ибо в миноке все качают а там всё равно )

//F4 -> Cast spell -> GreaterHeal -> WFT -> TargetSelf
//F5 -> Cast spell -> poison\magic arrow(для parrying,но требует Black Pearl дополнительно) -> WFT -> Targetself
//F7 -> Use Skill -> Meditation -> WFT

:magery
if mana >= 14
set #1 mana
send f5
wait 500
set timer 0
while_not (lastmsg fizzles) or (lastmsg lack) or (lastmsg skill) or (mana < #1) or (timer > 6000)
if lastmsg world
wait 20000
say
say xD
wait 500
end_if
if hits < 125
call heal
end_if
end_while
goto magery
else
goto meditation
end_if

:meditation
if mana < 100
set #2 mana + 2
send f7
wait 500
set timer 0
while_not (lastmsg lose) or (lastmsg skill) or (mana > #2) or (timer > 6000)
if lastmsg world
wait 20000
say xD
wait 500
end_if
if hits < 125
call heal
end_if
end_while
goto meditation
else
goto magery
end_if

proc heal
:life
if hits < 125
send f4
wait 500
set timer 0
while_not (lastmsg skill) or (lastmsg bloody) or (lastmsg apply) or (lastmsg mummy) or (timer > 4000)
if lastmsg world
wait 20000
say
say xD
wait 500
end_if
end_while
goto life
end_if
end_proc

также увеличил количество маны для входа в цикл медитации ибо лишние секунды когда маны на грейт хил не хватает он тупит и ждёт маны
__________________
Если ктото громко плачет - довыёживался значит!

Последний раз редактировалось shmelek; 22.10.2012 в 04:34..
shmelek вне форума   Ответить с цитированием