Тема: МАКРОСЫ
Показать сообщение отдельно
Re: МАКРОСЫ
Старый 18.01.2010, 14:43   #4
Sindo
The Hero
 
Регистрация: 02.02.2007
Адрес: KIDs
Возраст: 35
Сообщений: 969
Репутация: 52 [+/-]
имеет хорошую репутацию (от 26 до 75)
Sindo имеет хорошую репутацию (от 26 до 75)
Чар: Sindoatan
Гильдия: KIDs
По умолчанию Re: МАКРОСЫ

Вот накопал тут на форуме из своих постов. Найду архив со скриптами еще накидаю.
[php]// Bowcraft by Sindo (Не http://forum.fwuo.ru/design/new/editor/justifycenter.gifтребует для использования ***ssist)
:start
set #f 0
drag 299, 271 846, 529 1 // берет 1 киндлинг из кучи №1 на земле и кладет в пак (для определения координат)
wait 400
REPEAT 85 // максимальное число повторов 85 обосновано весом выпадения итемов при 150 силы
set #f #f + 1
drag 283, 232 810, 514 7 // берет 7 логов с пола и кладет в пак
wait 400
set #a lastliftedID
set lasttargetID #a
set LastTargetKind 1
send F11 // LastObject/WFT/LastTarget в клиенте (даггер на логи в паке)
wait 500 // задержка на появление/обновление меню крафта
double_left 62, 66 // 1-е подменю крафта
wait 500 // задержка на появление/обновление меню крафта
double_left 63, 66 // 2-е подменю крафта
wait 5000 // пауза пока крафтит киндлинг
say #f
end_repeat
drag 847, 528 296, 268 all // выкладывает все готовые киндлинги в кучу №2 на полу
goto start

// перед запуском скрипта 1 раз использовать даггер на что угодно.
// задержки необходимо пересмотреть в зависимости от пинга ( у меня он ООООЧЕНЬ большой =( )
// в куче №1 долно быть не больше 1к итемов, иначе он не смогет оттуда взять 1(!) киндлинг. именно по этой причине я разделил киндлинги на 2 кучи[/php]
Если есть возможность использовать ассист, то заменить кусок
Код:
send F11 // LastObject/WFT/LastTarget в клиенте (даггер на логи в паке)
wait 500 // задержка на появление/обновление меню крафта
double_left 62, 66   // 1-е подменю крафта 
wait 500 // задержка на появление/обновление меню крафта
double_left 63, 66   // 2-е подменю крафта
на
Код:
 send F11 // макр в ассисте на крафт киндлингов

[php]// прокачка магери, медитации и хилинга без ассиста by Sindo
set $lackreg lack reagents //сообщение о нехватке ресурсов для каста
set $war with thoughts // сообщение о нахождении чара в вар моде
set timer
:rep
// Каст спелла на себя
send F9 // в клиенте: CastSpell+Poison(Nightsight)/WFT/TargetSelf
if (lastmsg =$lackreg) // проверка на наличие регов для каста спелла
Repeat 5
alarm
say Нет ресов
wait 2000
end_repeat
pause_script
end_if
wait 2600 // задержка на каст спела
gosub PreventDeath
// Медитация при сильной потере маны
if mana < 10 // ограничение нормы маны ставить по своему усмотрению
while mana < int
send 5 // в клиенте: UseSkill+Meditaiton
if (lastmsg = $war)
send Tab // снять вар мод
end_if
gosub PreventDeath
wait 3000 // задержка на одну медитацию
end_while
end_if
// Подкормка
if (timer > 600000) // ест раз в 10 мин
set lastobjecttype XXXXXXXXXXX // ИД мяса в паке
send F2 // в клиенте: lastobject
set timer
end_if
goto rep
// Отхиливание при ранении
:PreventDeath
if hits < 100 // ограничение нормы хп ставить по своему усмотрение
while hits < str
if hits = 0 // Оповещение о смерти
Repeat 5
alarm
say Рес
wait 2000
end_repeat
pause_script
end_if
set lastobjecttype NNNNNNNNNN // ИД бинтов в паке
send F1 // в клиенте: lastObject/WFT/TargeSelf
say Guards
wait 4000 // задержка на хилл
end_while
end_if
return

// перед запуском необходимо: 1) проставить итемтайп бинтов и мяса в паке ( юзнуть 1 раз бинты и,
// посмотрев в пилоте в разделе ЧарПараметрс, вставить соответствующий набор цифр вместо NNNNNNN (мясо аналогично (ХХХХХХ)))
// 2) забиндить в клиенте кнопки в соответствии с указаниями напротив них
// (кнопки можно забиндить другие, тогда в скрипте их соответственно следует изменить)
// 3) откорректировать задержки под свой пинг
// Принцип работы: Чар кастует на себя спелл через заданные промежутки времени,
// при этом проверяя колличество хп, маны и жив ли еще чел. если хп меньше 100,
// то он будет хилить себя пока значение хп не станет = значению силы. если мана станет меньше 10,
// то он будет медитировать пока она не сравняется по значению с интелектом.
// если чел умер (хп = 0), то пилот 5 раз пикнет и поставит скрипт на паузу.
// во время хилинга и медитации чел спелы не кастует.
// Во время работы скрипта необходимо чтобы был открыт статбар. [/php]
__________________
May the Force be with you..
Sindo вне форума   Ответить с цитированием