Тема: МАКРОСЫ
Показать сообщение отдельно
Re: МАКРОСЫ
Старый 28.10.2011, 13:34   #246
nkn
Newbie
 
Регистрация: 16.10.2011
Возраст: 37
Сообщений: 11
Репутация: 1 [+/-]
имеет нулевую репутацию
nkn имеет нулевую репутацию
Чар: Scaremounger
По умолчанию Re: МАКРОСЫ

Мининг, ламбер, таминг на ручной добыче
Отсюда видно как условие на обкопку вокруг сделать со статой (если требуется
Код:
set $s1 wood.
set $s2 skill in
set $s3 str
set $s4 dex
set $s5 int
set $s6 pack
set $s7 destroer!
set $s8 You have no line of sight
set $s9 Try mining in rock
set $s10 useable ore.
set $s11 fail to tame

set $s12 chop.
set $s13 away
set $s14 mine
set $s15 location
set $s16 can't
set $s17 master.
set $s18 skill to tame


set $sw world save
:1
if (lastmsg $s1) or (lastmsg $s2) or (lastmsg $s3) or (lastmsg $s4) or  (lastmsg $s5) or (lastmsg $s6) or (lastmsg $s7) or (lastmsg $s8) or  (lastmsg $s9) or (lastmsg $s10) or (lastmsg $s11)
send z  //ЛОбджект->ВТаргет->ЛТаргет
wait 1000
goto 1
end_if

if (lastmsg $s12) or (lastmsg $s13) or (lastmsg $s14) or (lastmsg $s15) or (lastmsg $s16) or (lastmsg $s17) or (lastmsg $s18)
send x  //ЛОбджект
wait 1000
end_if

if (lastmsg $sw) 
wait 10000
end_if
Фишинг с моста по рункам
Код:
set $s1 there are no fish here
set $s2 have no line
set $s3 try fishing
set $s4 that is too far away
set $s5 has changed
set $s6 you fish a while, but fail to catch anything
set $s7 has increased
set $s8 you pull out
set $s9 slaider: you are too quick
set $s10 your fishing pole may have been destroer!
set #a 0

:start
for #x -6 6 1
for #y -6 6 1
set lasttargetx charposx +#x
set lasttargety charposy +#y
set lasttargetkind 2
:repeat
send f2  //ЛОбджект->ВТаргет->ЛТаргет
WAIT 800
if (lastmsg = $s10)
send y  //ЮзТайп на удку (с отменой таргета)
wait 250
double_left 870, 139  //2Клик на удку в руке персонада
end_if
set timer 
while_not (lastmsg = $s1) or (lastmsg = $s2) or (lastmsg = $s3) or (lastmsg = $s4) or (timer > 800) 
wait 570
while_not (lastmsg = $s5) or (lastmsg = $s6) or (lastmsg = $s7) or (lastmsg = $s8) or (lastmsg = $s9) or (timer > 3500) 
end_while
if hits < str
goto recall
end_if
drag 395, 298 398, 260 all  //Пылесосим рыбу с пола
wait 200
if wght >= 600  //Максимальный вес персонажа
alarm  //Гавкнуть Пилотом
goto dom
pause_script
goto recall
end_if
goto repeat
end_while
end_for
end_for
if #a = 1
set #a #a + 1
goto metka1
end_if
set #a #a + 1
if #a >= 2
goto dom
end_if
:metka
send 1  //Рунка на причал №1
if lastmsg you lack
:mana1
if mana < 20
send f7  //Медитируем
wait 2s
goto mana1
end_if
goto metka
end_if
wait 4s
if lastmsg the spell fizzles
goto metka
end_if
goto start
:metka1
send 2  //Рунка на причал №2
if lastmsg you lack
:mana2
if mana < 20
send f7  //Медитируем
wait 2s
goto mana2
end_if
goto metka1
end_if
wait 4s
if lastmsg the spell fizzles
goto metka1
end_if
goto start

:dom
send f5  //Рекол домой или куда вы привыкли...
if lastmsg you lack
:mana0
if mana < 20
send f7  //Медитируем
wait 2s
goto mana0
end_if
goto dom
end_if
wait 4s
if lastmsg the spell fizzles
goto dom
end_if
pause_script 

:recall
repeat 3
alarm  //Гавкает пилот
say guards   //Зовём дядю на помощь х3
wait 1000
end_repeat
goto dom
goto start
Добавлено через 10 минут
Магери на яде с подкормкой
Код:
set $sw save
:1
if mana > 20
send p  //ЮСпелл->Втаргет->LTarget (перед запуском прицелом обозначаем куда будем кастовать яд)
set timer 
wait 2450
send f1  //Покушать
wait 50
goto 1
end_if
:2
if mana < int
send f7  //ЮСкилл->Медитеция
wait 2450
send f1  //ЛОбджект на мясо
wait 50
goto 2
end_if
if (lastmsg $sw)
wait 17000
end_if
goto 1
Добавлено через 24 минуты
При прокачке боевых (как атакующий) оружие быстро ломается. Вбиваем в ассист ЮзИтемТайп (скажем на Ф2), кидаем ласт таргет на жертву избиения, в опциях игры ставим АттакЛаст на туже треклятую Ф2->Луупим на wait 1000\ wait 1s.
Также если у куклы мало ХП/Хилинга или оно вообще ватное-можно подстраховаться:
Открываем новую вкладку пилота, пишем макр (у надписи Точка Ctrl+A должна стоять галка для получения координат на курсив в илоте)
Код:
:1
If 478, 448 14658  //вытаскиваем ХП бар куклы, наводим скажем на середину полоски и жамкаем Ctrl+A (задали координаты), потом жмём на получение цвета точки (цыет: (нам тамашняя кнопка с цмфорками нужна))
send f2  //условились, что тут у нас макр на одевание оружия по типу и аттак ласт по ласт таргету
wait 1500
goto 1
end_if
:2
send tab
wait 1500
goto 1
end_if
поидее, а точнее на 99% повыситься выживаемость куклы.

Последний раз редактировалось nkn; 28.10.2011 в 14:00.. Причина: Добавлено сообщение
nkn вне форума   Ответить с цитированием