Ньюби Таун Вопросы и помощь новым игрокам Шарда Forgotten World.
Запрещен Мат и Оскoрбления игроков, обсуждение действий Стаффа, флуд. Наказание -БАН |
|
МАКРОСЫ |
|
18.01.2010, 12:42
|
#1
|
Mystical Hero
Регистрация: 09.10.2009
Сообщений: 1,103
Репутация: 25 на правильном пути (от 16 до 25)
Чар: Sokol
|
МАКРОСЫ
Народ честно устал в игре объяснять мелким игрокам про макросы. Желательно проверенные лично могу и сам проверить по просьбе. Решил создать тему. Выкладывайте кто что может. И по возможности описывайте децствия. А то попадаются такие люди что все разжовывать надо. И попрошу не флудить и не выражатся. типо тема была и все в таком духе. Еще одна просьба есть к администрации сделать эту тему как важная. Если получится и тема пойдет.
__________________
Для того, чтобы быть другом, не обязательно быть собакой.
|
|
|
|
Re: МАКРОСЫ |
|
18.01.2010, 13:54
|
#2
|
The Hero
Регистрация: 17.10.2009
Адрес: [M5]
Сообщений: 603
Репутация: 24 на правильном пути (от 16 до 25)
Чар: Слишком Много!!
Гильдия: [M5]
|
Re: МАКРОСЫ
PHP код:
//----Хелинг,Магия,Медитация:---- //if hits < 150 // Проверка хитов //send f6 // В ассисте биндим макрос Дабл клик на бинты, клик на себя //wait 3000 // Задержка в три секунды //end_if if mana < 100 // Ваше количество манны send f7 // В Ультиме биндим Юз скилл медитация wait 3000 // Задержка в три секунды else // Иначе repeat 10 // Если надо то повторяем каст магии 10 раз если нет то блокируем репит send f5 // в Ультиме биндим Castspell>>Poison>>wait for target>>target self wait 3000 end_repeat end_if
Добавлено через 3 минуты
PHP код:
//----Копаем на месте 25 таилов:---- // Копает на одном месте все тайлы до которых может дотянутся // потом выдает сообщение об остановке скрипта //send F3 4000 // Стелс или хайд for #y -2 2 1 for #x -2 2 1 :mining set lasttargetx charposx + #x set lasttargety charposy + #y set lasttargetkind 2 send F2 1200 // ЛастОбжект-ВаитФорТаргет-ЛастТаргет set timer 0 while (lastmsg do you want) and (timer < 10000) wait 100 end_while if_not (lastmsg no ore) or (lastmsg mining in) or (lastmsg have no line) wait 500 if (lastmsg you see) or (lastmsg targeting) or (lastmsg you have)// дает сигнал о том что появился гард руды или игрок и остонавливает скрип или антимакрос alarm flash alarm flash alarm flash end_script end_if goto mining end_if end_for end_for alarm flash end_script
Добавлено через 20 минут
PHP код:
//----Картография---- //... Биндим //... F11 - LastSkill //... F9 - LastObject //... Перед запуском скрипта затариться //... хавкой и поесть до сыта. set #level 1 // - установка типа //... создаваемой карты от 1 до 4 //... 1 - Detail Map //... 2 - Regional Map //... 3 - Sea Chart //... 4 - Full World set #havka lastobjectid set lastskill 12 //...---------------- set #s 1 :map send F11 2300 if #level = 1 double_left 63, 63 // -- Detail Map end_if if #level = 2 double_left 109, 64 // -- Regional Map end_if if #level = 3 double_left 152, 64 // -- Sea Chart end_if if #level = 4 double_left 194, 64 // -- Full World end_if //...---- // if #level = 4 // set #level 3 // else // set #level #level + 1 // end_if //...---- if #s = 10 set lastobjectid #havka send F9 1000 set #s 1 end_if wait 2000 set #s #s + 1 if lastmsg have no blank parchment flash uo end_script end_if gosub map end_script
Добавлено через 24 минуты
PHP код:
//----Локпикинг---- //скрипт на кач лукпикинга, в пак кидаем ключ от Locked Chest'а и отмычки send 5 //кнопка в ассисте взламываем сундук отмычками, обязательно выставить Use Item Type wait 3s if lastmsg Container doesn't locked. //проверка взламали ли сундук send 4 //кнопка в ассисте закрываем сундук ключем wait 1s end_if
Добавлено через 30 минут
PHP код:
//----Поизон---- //срипт на кач пойзонинга, используем лессер пойзон и жареное мясо (или рыбные стейки) drag 429,319 677,617 1 //берем 1 кусок мяса и кидаем в пак wait 1s drag 449,304 960,272 1 //берем 1 лессер пойзон и кидаем в пак wait 1s send 4 //кнопка в ассисте травить мясо, обязательно выставить Use Item Type и Target Item Type wait 3s repeat 2 move 675,585 //двигаем курсор на травленное мясо в паке drag 675,585 429,369 //перетаскиваем из пака травленый кусок мяса wait 1s end_repeat //координаты move должны быть такимиже как и первые координаты drag, //чтобы во время сейва пак не перемещался вслед за курсором используется move, //повтор (repeat 2) нужен чтобы во время сейва в паке не остался кусок мяса.
Добавлено через 33 минуты
PHP код:
//----БоВКрафт---- //скрипт на кач боукрафта, делаем шафты drag 432,316 959,256 7 //берем 7 логов и кидаем в пак wait 1s send 4 //кнопка в ассисте делать шафты, обязательно выставить Target Item Type wait 4s if wght > 550 //проверка на вес в паке move 676,583 drag 676,583 428,368 all //перетаскиваем из пака все шафты wait 1s drag 456,343 663,617 2 //берем 2 шафта и кидаем в пак end_if //при весе пака больше 550, скрипт выкладывает все изготовленные шафты, //координаты move должны быть такимиже как и первые координаты drag, //2 шафта кидаем в пак в то место откуда потом будем их выкладывать, когда вес будет больше 550. //делаем стрелы или болты drag 433,319 958,258 5 //берем 5 шафтов и кидаем в пак wait 1s drag 451,296 958,258 5 //берем 5 перьев и кидаем в пак wait 1s send 4 //кнопка в асссисте делать стрелы, обязательно выставить Use Item Type wait 2s if wght > 550 //проверка на вес в паке move 680,587 drag 680,587 429,368 all //перетаскиваем из пака все стрелы wait 1s drag 453,343 666,615 2 //берем 2 стрелы и кидаем в пак end_if //при весе пака больше 550, скрипт выкладывает все изготовленные стрелы, //координаты move должны быть такимиже как и первые координаты drag, //2 стрелы кидаем в пак в то место откуда потом будем их выкладывать, когда вес будет больше 550.
|
|
|
|
Re: МАКРОСЫ |
|
18.01.2010, 14:28
|
#3
|
The Hero
Регистрация: 17.10.2009
Адрес: [M5]
Сообщений: 603
Репутация: 24 на правильном пути (от 16 до 25)
Чар: Слишком Много!!
Гильдия: [M5]
|
Re: МАКРОСЫ
PHP код:
//----Кукенг---- drag 466,283 424,329 1 //1 бревно из кучи перетащить на место костра wait 500 for #i 0 5 1 //пытаемся разжечь double_left 424,329 wait 500 end_for if wght < 400 drag 442,248 399,264 120 //120 мяса на себя если не перевес wait 500 end_if while_not (lastmsg must cook) or (lastmsg can cook) double_left 95,113 //мясо в паке wait 500 left 422, 327 //таргет на костер wait 2000 double_left 39,115 //поесть end_while
Добавлено через 57 секунд
PHP код:
//----Тинкер---- //скрипт на кач тинкира, делаем бутылки drag 382,318 837,484 2 //берем 2 бутылки и кидаем в пак wait 1s drag 424,319 959,256 2700 //берем 2700 айрона и кидаем в пак wait 1s repeat 900 //повтор крафта, 1 бутылка = 3 айрона send 4 //кнопка в ассисте делать бутылки, обязательно выставить Target Item Type wait 6s end_repeat move 849,457 drag 849,457 432,368 all //перетаскиваем из пака все бутылки wait 1s //2 бутылки кидаем в пак в то место откуда потом будем их выкладывать, //координаты move должны быть такимиже как и первые координаты drag.
Добавлено через 3 минуты
PHP код:
//----Таилоринг---- //скрипт на кач тейлора, делаем паттерны drag 382, 318 837,484 2 //берем 2 паттерна и кидаем в пак wait 1s drag 424,319 959,256 500 //берем 500 ткани и кидаем в пак wait 1s repeat 250 //повтор крафта, 1 паттерн = 2 ткани send 4 //кнопка в ассисте делать паттерны, обязательно выставить Target Item Type wait 4s //задержка на крафт end_repeat move 849,457 drag 849,457 432,368 all //перетаскиваем из пака все паттерны wait 1s //2 паттерна кидаем в пак в то место откуда потом будем их выкладывать, //координаты move должны быть такимиже как и первые координаты drag, //чтобы скрипт не сбивался все что кидаем в пак лучше брать с пола, //скрипт можно переделать под крафт бланк скролов, для этого надо, //поменять количество повторов, переписать макрос в ассисте, изменить задержку крафта.
Добавлено через 4 минуты
PHP код:
//----Алхимия---- //скрипт на кач алхимии, делаем лессер хилы drag 691,91 956,264 790 //берем 790 ГС'а из кучи и кидаем на себя wait 1s repeat 790 //ставим число повторов равное количесту ГС'а send 5 //кнопка в ассисте делать лессер хилы, обязательно выставить Use Item Type wait 8s end_repeat send 4 //кнопка в ассисте перелива зелий в кегу, обязательно выставить Target Item Type wait 1s //скрипт можно переделать под крафт других зелий, //необходимо поменять количество регов которое кидаем в пак, //число повторов и задержку после кнопки на крафт зелья.
Добавлено через 7 минут
PHP код:
//----Таминг---- double_left 350, 220 -Кординаты палки на картинке игрока! for #i 1 13 1 send F11 //target next wait 500 send F12 //last object wait for target last target wait 500 say end_for wait 10 min
Добавлено через 11 минут
PHP код:
//----Аварийныи Реколл---- //////////////////////// by Crimson /////////////////////////// // Занимать скрипт будет два окна в пилоте //Окно № 1 if lastmsg You see: stop_script 0 // номер окна где запущен макрос (например рубка или копка и тд) start_script 2 // номер окна где будет скрипет самого рекола (приведу ниже) alarm alarm alarm alarm alarm alarm alarm msg Замечен ПК, запущен скрипт аварийной эвакуации !!! stop_script end_if // Окно № 2 if charposx = 1236 //проверка координат места рекола msg Мои поздравления!! мы соскачили от ПК :)) stop_script else send f3 // забинденый рекол wait 3000 end_if ///////////////////////////////////////////////////////////////////////////////////////////////// //Скриптом не пользовался! попробуите если Что Чем С могу тем помогу =) тежеловатыи В пониманий =)
|
|
|
|
Re: МАКРОСЫ |
|
18.01.2010, 14:43
|
#4
|
The Hero
Регистрация: 02.02.2007
Адрес: KIDs
Возраст: 36
Сообщений: 969
Репутация: 52 имеет хорошую репутацию (от 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 кучи
Если есть возможность использовать ассист, то заменить кусок
Код:
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 раз пикнет и поставит скрипт на паузу. // во время хилинга и медитации чел спелы не кастует. // Во время работы скрипта необходимо чтобы был открыт статбар.
__________________
May the Force be with you..
|
|
|
|
Re: МАКРОСЫ |
|
18.01.2010, 14:43
|
#5
|
The Hero
Регистрация: 17.10.2009
Адрес: [M5]
Сообщений: 603
Репутация: 24 на правильном пути (от 16 до 25)
Чар: Слишком Много!!
Гильдия: [M5]
|
Re: МАКРОСЫ
PHP код:
//----Ручная Рубка---- //помогает не много таргет появляется и сам до рубливает дерево =) set #rtimer 0 set #msg 99 while #msg <> 0 if #msg = 2 send F2 1000 //lastobject, waitfortarget, lasttarget else send F1 //lastobject while target = 1 wait 1000 end_while //waitfortarget 5000 end_if gosub 1 end_while end_script :1 set #timer timer while #rtimer < 30000 //время проверки результатов 1й рубки set #msg 99 if lastmsg you put the logs in set #msg 2 break end_if if lastmsg your skill in lumberjacking set #msg 2 break end_if if lastmsg you hack at the tree for a while set #msg 2 break end_if if lastmsg there are no logs break end_if if lastmsg you can't think of a way break end_if
Добавлено через 50 секунд
PHP код:
//----Простенький Ламбер ---- //Макрос на ламбер пишется под определённую местность //Если найдёшь делянку с деревьями в ряд, то можешь качать на примитивном макросе: Цитата:repeat <длинна> Send F7 wait 200 Send F8 wait 100 double_left point1 wait <задержка на 1 сруб> end_repeat repeat <длинна> Send F9 wait 200 Send F8 wait 100 double_left point1 wait <задержка на 1 сруб> end_repeat <длина> - количество шагов point1 - дерево <задержка на 1 сруб> - задержка на 1 удар топором F8 - использовать топор F7 & F9 - шагать в направлении
|
|
|
|
Re: МАКРОСЫ |
|
18.01.2010, 14:45
|
#6
|
The Hero
Регистрация: 02.02.2007
Адрес: KIDs
Возраст: 36
Сообщений: 969
Репутация: 52 имеет хорошую репутацию (от 26 до 75)
Чар: Sindoatan
Гильдия: KIDs
|
Re: МАКРОСЫ
Вариант 1 (качает только стелс)
send F1 // бинд на юз скилла
wait 300 // задержку в милисекундах сам подбери
Вариант 2 (качает одновременно хайд и стелс)
send F1 // бинд на юз хайда
repeat 3
send Left 200
end_repeat
send F1
repeat 3
send Right 200
end_repeat
PHP код:
// Poisoning by Sindo (Не требует для использования ***ssist) (beta)
set $fizl CCCCCCCCCC // сообщение возникающее при физле set $alrpois CCCCCCCC // сообщение возникающее при попытке отравить уже отравленный кусок мяса set #amount N // колличество банок и мяса (не в сумме), которые вы собираетесь использовать за одну загрузку (подбирать по весу) set $msf XXX, YYY // координаты кучи свежего мяса (№1) на полу set $mp XXX, YYY // координаты мяса в паке set $pf XXX, YYY // координаты пойзон банок на полу set $pp XXX, YYY // координаты пойзон банок в паке set $mpc XXX, YYY // координаты сундука для отравленного мяса set #wdr KKK // задержки, стоящие после драгов. кооректировать по пингу set #wwp KKK // задержка на отравление мяса set #pt BBB // итемтайп пойзон банок set $actbtn S // кнопка с биндом на LastObject в клиенте
set #amountm #amount // для коррекции кол-ва мяса при физлах set #amountp #amount // для коррекции кол-ва банок при ошибке с отсутствием мяса set #ft 0 // для информирования о процессе прокачки set #iii 0 // счетчик фэйлов таргета мяса
:start
set #f 0 // для информирования о процессе прокачки set #a 0 // для определения ласттаргета/обжекта set #fizl 0 // индикатор и счетчик физлов set #ft #ft + 1
repeat #amountm drag $msf $mp 1 // берет 1 кусок неотравленного мяса из кучи №1 на земле и кладет в пак wait #wdr end_repeat drag $pf $pp #amountp // берет N банок лезер пойзона из кучи №2 с пола и кладет в пак wait #wdr set #a LastLiftedID set LastObjecttID #a set LastObjectType #pt // итемтайп пойзон банок set #amountp #amount
REPEAT #amount // столько раз, на сколько отравлений набрали ресов set #f #f + 1 set #ii 0 // счетчик фэйлов таргета мяса :repoison set #i 0 // счетчик фэйлов таргета мяса send $actbtn // LastObject в клиенте WaitForTarget :retarget left $mp // координаты кучи неотравленного мяса в паке wait #wwp // задержка на отравление мяса if (target = 1) // проверки на наличие мяса в паке set #i #i + 1 if (#i > 3) send Escape set #ii #ii + 1 if (#ii > 2) set #iii #iii + 1 if (#iii > 10) gosub zopa end_if set #amountp #amount - #f goto start end_if goto repoison end_if wait 500 goto retarget end_if if (lastmsg = $fizl) set #fizl #fizl + 1 goto fizl end_if if (lastmsg = $alrpois) drag $mp $mpc 1 // утаскивает из пака в сундук отравленный кусок мяса goto repoison end_if drag $mp $mpc 1 // утаскивает из пака в сундук отравленный кусок мяса wait #wdr :fizl say Юз #f из #amount ( подход № #ft ) end_repeat
set #amountm #amount - #fizl
goto start
:zopa say Зопа repeat 5 flash flash Sindo alarm wait 2s end_repeat pause_script return
// в куче №1 долно быть не больше 1к итемов, иначе он не смогет оттуда взять 1(!) кусок мяса. именно по этой причине следует разделять мясо на нескольколько кучек (положить из ондну на другую, нестакуя) // в строках [set $* XXX, YYY] и заменяем XXX, YYY на относительные координаты в соответствии с комментариями // в строках [set #w* KKK] заменяем KKK на задержку в милисекундах в соответствии с комментариями и вашим пингом // в строке [set #pt BBB] заменяем BBB на итемтайп банок лезер пойзона // в строке [set $actbtn S] заменяем S на кнопку с указанным в комменте биндом // в строках [set {$fizl/$alrpois} CCCCCCCCCC] заменяем СССССС в соответствии с комментариzvb // если не требуется проговаривать шаг цикла, удалить/закомментарить строку [say Юз #f из #amount ( подход № #ft )] // в строке [set #amount N] заменяем N в соответствии с комментарием
__________________
May the Force be with you..
|
|
|
|
Re: МАКРОСЫ |
|
18.01.2010, 14:45
|
#7
|
The Hero
Регистрация: 17.10.2009
Адрес: [M5]
Сообщений: 603
Репутация: 24 на правильном пути (от 16 до 25)
Чар: Слишком Много!!
Гильдия: [M5]
|
Re: МАКРОСЫ
PHP код:
Резист И хелинг :main //repeat 2 // сдесь ставиш скока стен кастовать под себя если хилинг ГМ можно 4 стены. set #r 0 send F9 3500 // CastSpel >> waitfortarget >> target selfl //End_repeat :heal if hits < str send End //хилим себя, можно заменить на макрос set #r 0 wait 3600 goto heal end_if set #r #r + 1 wait 1000 if #r = 5 // переменная отвечает за ожидание 5 //секунд, если в течение этого времени дамаг не был //нанесен, то считается, что действие филда //прекратилось goto medit else goto heal end_if :medit if hits < str //вдруг все таки лагануло и филд все еще //наносит дамаг, лишняя проверочка не помешает goto heal end_if if mana < int send Backspace //макрос медитации wait 2500 goto medit end_if goto main end_script
|
|
|
|
Re: МАКРОСЫ |
|
18.01.2010, 14:47
|
#8
|
The Hero
Регистрация: 02.02.2007
Адрес: KIDs
Возраст: 36
Сообщений: 969
Репутация: 52 имеет хорошую репутацию (от 26 до 75)
Чар: Sindoatan
Гильдия: KIDs
|
Re: МАКРОСЫ
PHP код:
// Tailoring (с) Sindo (Не требует для использования ***ssist)
:start
set #f 0 set #a 0
drag 298, 266 298, 266 1 // берет 1 паттерн из кучи №1 на земле и кладет в пак (для определения координат) wait 400 drag 665, 604 834, 557 N // берет N (подобрать по весу) кусков ткани с пола и кладет в пак wait 400
set #a lastliftedID set lasttargetID #a
REPEAT N // столько раз, сколько вы взяли ткани set #f #f + 1 send F11 // LastObject/WFT/LastTarget в клиенте wait 2000 // пауза на появления менюшки выбора изделия крафта double_left 242, 67 // подменю крафта (картинка паттерна) wait 5000 // пауза пока крафтит паттерн say #f end_repeat
drag 911, 560 680, 566 all // выкладывает все готовые паттерны в кучу №2 на полу
goto start
// перед запуском скрипта 1 раз использовать сьюинг кит на что угодно. // задержки необходимо пересмотреть в зависимости от пинга ( у меня он ну ООООЧЕНЬ большой =( ) // в куче №1 долно быть не больше 1к итемов, иначе он не смогет оттуда взять 1(!) паттерн. именно по этой причине я разделил паттерны на 2 кучи
Срипты с припиской Beta требует теста и, возможно, правки.
PHP код:
// Taming by Sindoatan. Based on Taming (c) by diss set $btnRel F6 // кнопка с say+all_release в клиенте set $btnUse F12 // кнопка с Object/LastTarget в ассисте с UseItemType посоха set #k 10 // кол-во обтамливаемых скотинок set #korm 0 // если надо запускать скрипт подкормки зверья ставим 1. если нет 0. set #kb 5 // номер потока со скриптом подкормки зверья set #blEda 0 // если надо себя кормить, то ставим 1, иначе 0 set $btnEat M // кнопка с LastObject в клиенте set #eda 123456789 // ИД еды для себя set #lag 2000000 // время на забывание зверем хозяина
set %arr[1] 1273244 // ID'шники скотинок set %arr[2] 1325790 set %arr[3] 1237673 set %arr[4] 1138080 set %arr[5] 1226926 set %arr[6] 1278290 set %arr[7] 1267169 set %arr[8] 1311898 set %arr[9] 29713 set %arr[10] 1088780 //-------------------------------- set #zh #k +1 set $remember remembers set $success accept set $tamed already tame set $failed fail set $hungry hungry set $far far away set $skill changed set $wait you must wait set $cant see the target
:loop set #a 1 while #a < #zh if #blEda = 1 set lastobjectid #eda send $btnEat end_if send $btnRel //say all release set lasttargetid %arr[#a] set #q 0 :repeat set #q #q +1 if #q > 100 // Тамим до последнего, но это на всякий случай goto next end_if set #i 0 send $btnUse wait 1000 if lastmsg already goto next end_if say zЗверушка #a, попытка #q, время timer while_not lastmsg $success if (lastmsg $failed) or (#i > 3) goto repeat end_if repeat 10 if (lastmsg old) or (lastmsg Loved) or (lastmsg again) or (lastmsg return) send {Tab} say Ждемс wait 25s goto repeat end_if wait 200 end_repeat if (lastmsg = $wait) or (lastmsg = $cant) or (lastmsg = $hungry) or (lastmsg = $skill) or (lastmsg = $remember) or (lastmsg = $tamed) or (lastmsg = $far) goto next end_if set #i #i +1 end_while :next set #a #a +1 if #a = 2 set timer end_if end_while while timer < #lag wait 20s set #k #lag - timer say Обождите #k end_while if #korm = 1 start_script #kb wait 10s end_if goto loop
// Меняем кнопки/задержи/идшники в верхней части скрипта. В основной части копаться не //обязательно. Обязательно ставим галку в опциях клиента в правой верхней вкладке у //строки про TAB. Скрипт может тамить, менять палки, есть, кормить и ждать столько //сколько нужно (и не более необходимого).
__________________
May the Force be with you..
Последний раз редактировалось Sindo; 24.03.2011 в 06:10..
|
|
|
|
Re: МАКРОСЫ |
|
19.01.2010, 12:52
|
#9
|
Mystical Hero
Регистрация: 09.10.2009
Сообщений: 1,103
Репутация: 25 на правильном пути (от 16 до 25)
Чар: Sokol
|
Re: МАКРОСЫ
Здравствуйте молодые игроки нашего шарда. Я постараюсь вам объяснить как можно встать на прокачку и качать свой скил до ГМ. - Что нужно сделать. Скачать УО пилот ссылка на него находится на главной страниче сайта нашего замечательного сайта. Видите там наверху серенькую сточечку там вам надо нажать на слоао ФАЙЛЫ. затем когда страничка обновится вы увидите несколько строк там вам нужна строчка ВСПОМОГАТЕЛЬНЫЕ ПРОГРАММЫ. о них далее все расскажу.Пол=сле очеродного обновления страницы вам опять на выбор дадут несколько програм. Вам нужна строчка где написанно UO Pilot. в мое время (в дольнецшем может изменится) она находится в самом низу и версия 2.14.
- Поздравляю вас вы скачали пилот. запускайте программу. Ярлычок у нее ввиде смайла. после ее запуска вам надо нийти слово СКРИПТ. Вот туда мы с вами и будем писать макросы.
- Дальше я бы посоветовал вам скопировать ту часть текста (того скила) который вы хотите поставить на прокачку в скажем какой то текстовый редактор(WORD или обычный стандартный ВИНДОВСКИЙ БЛОКНОТ) просто чтобы 10 раз не искать а то вдруг потеряете.
- После всего выше приведенного вам надо выделить текст и вставить его(текст) в окошко СКРИПТ.
- Начнем с самого первоко скрипта (просьба к администрации выделите название скрипта други текстом) он называется ХИЛ МАГИЯ МЕДИТАЦИЯ. Вставили молодцы. Но я прошу заметить у вас параметры силы ловкости и магии должны быть 150 100 100. Если что то не прокачано пишите в личку помогу. ИЛИ в игре спросите АКА он обещал помочь.
- Перейдем непосредственно к самому скрипт. Первая строчка проверяет наличие жизней (ХЕЛОВ) а вот далее вам надо сделать еще кое что.
- Когда вы скачивали игру и вместе с УО АСИСТОМ вот он то нам и нуже если вы следовали инструкции(которая тоже находится на главной страничке) и сделали все правильно то при запускании игры у вас запускаются две программы. первая УО вторая АСИСТ. Нашли нажмите на нее и найдите вкладку со словом МАКРОС. Далее вам надо написать сам макрос. Он пишется таким образом.
- Нажмите кнопочку RECORD(запись) теперь нажмите на бинты они додлжны находится в вашем паке(СУМКЕ) изображенной в правом нижнем углу экрана где изображен ваш игрок(чар). Нажали на бинтики теперь целью укажите непосредственно на чара или на его статус. Он тоже выводится на этой же картинке с вашим чаром только называется СТАТУС(STATUS). После того как вы все сделали вам надо опять переключится на окошко АСИСТА. Там вам надо нажать кнопочку стоп (STOP) поздравляю вас мы записали первый с вами МАКРОС. Но это еще не все далее вам надо нажать на вкладку КЛЮЧИ(KEYS) ну или кнопки. Там спомощю скрола вам надо найти строчку PLAY MAKROS 1. Это значит проиграть макрос но тут опять будте внимательны. В то время когда вы записывали с вами макрос внизу этого окошка показаны цифорки эти цифорки и означают порядковый номер макроса. Если вы записывали 15 макрос значит и проигрывать надо 15 макрос. Так вот вы нашли такую строчку теперь вам надо установить клавишу воспроизведения вашего макроса. Ну в данном случае стоит кнопка F6 но это можно и изменить на ваше усмотрение. Вот теперь у нас готов наш макрос идем далее.
- А вот далее ва столкнетесь с другой преградой но ничего непроходимого нет. Вам надо на окошке вашего чара нажать кнопочку ХЕЛП (HELP) не бойтесь ГМа звать не будем. Вам нужно изображений выглядещее как полумесяц (ЛУНА) но помоему круговая стрелка(извените пишу с работы могу ошибится) там вам надо в кнопочках нажать ADD(добавить) в первой строчке ставим кнопку на которой будет у нас медитация в данном случае F7 после того у нас появляется следующая строчка в ней ищем USE SKILL(использовать скилл) тогда у нас дальше появляется еще одна строчка чуть ниже. И вот в ней мы ищем слово MEDITATION (медетация). после того как мы сделали надо нажать кнопочку APLY(применить) и потом ОК.
- Но и на этом работа в данном окне не заканчивается все выше приведенное надо сделать еще и на кнопочку F5 но только с небольшими изменениями. вам надо будет поставить не использовать скилл а найти строчку CAST SPEL(сделать заклинание) соответственно во второй строче ищем слово поизон (POISON) яд чуть ниже стави словосочетание wait for target и спуститесь еще чуточку ниже и вы найдете еще одну строчку там вам надо поставить target self цельна себя и на этом пожалуй все незабудте применить изменения APLY.
Всегда ваш - SOKOL.
__________________
Для того, чтобы быть другом, не обязательно быть собакой.
|
|
|
|
Re: МАКРОСЫ |
|
20.01.2010, 13:25
|
#10
|
Junior Player
Регистрация: 10.11.2008
Адрес: Vendetta
Возраст: 37
Сообщений: 179
Репутация: 10 на правильном пути, пока что (от 5 до 15)
Чар: maximus
Гильдия: Vendetta
|
Re: МАКРОСЫ
Благодарб Ака за помощь в макрах!
PHP код:
//----Выкладываю макр на фишинг---- repeat 40 //цикл на 40 повторов goto 1 :1 send 7 //Кнопка удочки по типу в асисте и таргет по релатив локации wait 2000 if lastmsg You see repeat 3 alarm double_right 624, 81 //координаты противоположного края плота(куда перс будет отходить) желательно плот 9х9 double_right 624, 81 end_repeat double_right 624, 81 double_right 624, 81 send tab //снимает непринужденность перса(посли хила бинтами не отвечает на атаку например) send f1 //лук в руки pause_script all //остановка скрипта на паузу, перс ждет атаки моба и убивает ответной стрельбой, после чего лутаете, встает на прежнее место и жмете на кнопку снятия с паузы а не на кнопку "play" иначе скрипт пойдет с начала end_if wait 2000 if lastmsg You see repeat 3 alarm double_right 624, 81 double_right 624, 81 end_repeat double_right 624, 81 double_right 624, 81 send tab send f1 pause_script all end_if if lastmsg you fish a while goto 1 end_if say Come on, Fish =) //у тех, у кого макры забиты на f# могут эту строчку убрать say right wait 2000 say stop end_repeat say Come on, Fish =) say back wait 2500 say stop repeat 40 //цикл на 40 повторов (едем обратно, но уже на тейл ниже) goto 2 :2 send 7 135, 128 ait 2000 if lastmsg You see repeat 3 alarm double_right 624, 81 double_right 624, 81 end_repeat double_right 624, 81 double_right 624, 81 send tab send f1 pause_script all end_if wait 2000 if lastmsg You see repeat 3 alarm double_right 624, 81 double_right 624, 81 end_repeat double_right 624, 81 double_right 624, 81 send tab send f1 pause_script all end_if if lastmsg you fish a while goto 2 end_if say Come on, Fish =) say left wait 2000 say stop end_repeat say Come on, Fish =) say back wait 2500 say stop
Добавлено через 31 секунду
PHP код:
//----макрос на пойзон---- repeat 900 drag 384, 317 703, 668 1 wait 1700 while_not lastmsg = $pois send f12 wait 1700 drag 707, 658 421, 324 1 wait 500 end_repeat end_while alarm alarm //на пол перед собой кучу жареной рыбы в паке лесирпойзоны //F12-в асисте записываем макр травить рыбу и меняем на use item type и target item type //drag1 - это откуда и куда и сколько перетаскивать жареной рыбы //drag2- это откуда и куда перетаскивать пойзоненую рыбу //Скрипт будет перетаскивать с пола 1 рыбу в пак травить ее и ложить в пак на полу. //Скрипт работает нормально , сбиваеться только при сейвах и будет постоянно сбиваться при сейвах так как присутствует перетаскивание.
Добавлено через 2 минуты
PHP код:
//---- макрос на таминг ---- set $remember The Sheep remembers you set $master It seems to accept you as master set $player Вы не можете приручать игроков. set $alredy This creature already tame repeat 6 say all release wait 600 end_repeat :1 send 8 // F12 LastObject+wait for target+TargetLast set timer while_not lastmsg $remember or $master or $player or $alredy if lastmsg The Sheep remembers you goto NeXT end_if if lastmsg It seems to accept you as master goto NeXT end_if if lastmsg Вы не можете приручать игроков. goto NeXT end_if if lastmsg This creature already tame goto Neploxo end_if if lastmsg You fail to tame the creature. goto 1 end_if if lastmsg Animal Taming changed now goto NeXT end_if if timer > 40000 gosub next end_if end_while if timer > 5000 goto next end_if :NeXT say all release send 9 wait 500 goto 1 :neploxo repeat 4 say all release wait 1s end_repeat goto 1
__________________
Чужие слабости нужно уважать, а не осуждать!
|
|
|
|
Re: МАКРОСЫ |
|
20.01.2010, 17:38
|
#11
|
Wizard of words
Регистрация: 29.11.2007
Адрес: нетути давно
Сообщений: 2,411
Репутация: 85 - вас уважают другие (от 76 до 125)
Чар: Fluke
Гильдия: нетути давно
|
Re: МАКРОСЫ
Самый главный скрипт при прокачке забыли
PHP код:
//Гвардилка, когда убить хотят
if hits < str
say guards //2 пробела после say
send f1 //кнопка лечения в асисте
wait 1000
say guards
wait 1500
end_if
Настройка UOPilot
В меню "Настройки", устанавливаем галочку на "Отображать запущенные скрипты"(синеньким выделятся будут) и на "сохранять настройки при выходе".
Снимаем галочку на "Отображать ход выполнения скрипта"(проц меньше загружен будет).
Закладка "Скрипт"
Внизу + и -, + добавляет еще одно окно скрипта, сверху есть W, в ней нужно выбрать активное окно УО, это важно для работы скриптов, если запущено несколько окон УО.
После добавления скрипта, сохраните его, тогда после запуска пилота они будут открываться.
Закладка "Еще", "Пауза между строк" ставим 0
Нажимаем "Edit HotKeys"
Назначаем там кнопку на принтскрин, можно еще на автомув
Справа внизу, можно назначить горячие клавиши на скрипты.
|
|
|
|
Re: МАКРОСЫ |
|
27.01.2010, 00:40
|
#12
|
The Hero
Регистрация: 02.02.2007
Адрес: KIDs
Возраст: 36
Сообщений: 969
Репутация: 52 имеет хорошую репутацию (от 26 до 75)
Чар: Sindoatan
Гильдия: KIDs
|
Re: МАКРОСЫ
Поправил и доработал резист, сейчас сам им качаю. Вот результат:
PHP код:
////////////////////////////////Resist by Sindo //каст стенки и лечение во время ходьбы (1/3) (c ассистом) ///////////////////////////////// set $westbtn j// walk+west set $eastbtn l// walk+east set $southbtn k // walk+south set $ffcastbtn f9// CastSpell+FireField/WFT/TargetSelf set $healbtn F11 // лечение бинтами через ассист set #healwait 2900// задержка на отхиливание с бинта set #ffcastwait 2000// задержка на каст фаерфилда set #2scr 4// номер потока со скриптом ходьбы по стенке
set #worky charposy set timer
:f
if hits < 150 send $healbtn end_if
set #h 150 - hits wait #healwait
if (hits = 150) and (#h = 0) or (timer >= 100000) stop_script #2scr repeat 10 // начало выравнивания (выравнивается упираясь в западную стену дома, ходя паралельно южной) send $westbtn wait 200 end_repeat repeat 4 send $eastbtn wait 200 end_repeat // конец выравнивания :recast if charposy = #worky set timer send $ffcastbtn wait #ffcastwait if (lastmsg fiz) goto recast end_if start_script #2scr else repeat 3 send $southbtn end_repeat goto recast end_if end_if
goto f
PHP код:
///////////////////////////////////Resist by Sindo //ходьба по стенке (2/3) /////////////////////////////////// // межстрочная задержка 100 set $westbtn j // walk+west set $eastbtn l // walk+east
repeat 4 send $westbtn wait 50 end_repeat
:rep
repeat 7 send $eastbtn end_repeat
repeat 7 send $westbtn end_repeat
goto rep
PHP код:
//////////////////////////////////Resist by Sindo //отход если мало хп (3/3) ////////////////////////////////// // межстрочная задержка 20 set #2scr 4 // номер потока со скриптом ходьбы по стенке set $northbtn i // walk+north set $southbtn k // walk+south
set #a 0
:start
if (hits < 60) and (hits >= 1) pause_script #2scr repeat 3 send $northbtn wait 200 end_repeat while hits < 120 wait 500 end_while repeat 3 send $southbtn wait 200 end_repeat resume_script #2scr end_if
if hits < 1 repeat 5 alarm wait 2s end_repeat set #a #a + 1 if #a > 20 stop_script all end_if end_if
goto start
Настройка и запуск:
1) вставить скрипты в 3 разных окна пилота
2) проверить бинды в верхних частях скриптов на соответствие действиям описанным в комментариях
3) загрузить в пак чару как можно больше бинтов и реги для каста фаер филда
4) поставить чара вплотную к южной стене базы на 4-й тейл от западной
5) проверить стоит ли чар за ам зоной дома, если нет то передвинуть южный забор на 1 тейл на юг и вновь выставить чара (п. 4)
6) запустить скрипты №1 №3
7) переодически проверять наличие у чара реагентов и бинтов, и не умер ли чар ( если умрет он будет громко кричать (в разработке))
Советы:
1) когда вы начнете юзать этот скрипт у вашего питомца должно быть не менее 60 магери и 80 хилинга, иначе будет много физлов и простоя на отхиливание
2) чтобы засунуть побольше итемов в пак чару убейте его, положите туда все что нужно и ресните. (? ибо могли пофиксить)
3) качаться надо в арморе который не дает плюсов к скилу резиста или без армора
4) качаться в полиморфе глюпо ибо в полиморфе нельзя хиляться
5) при хилинге 90 и гм магери на 1к бинтов приходится ~40 кастов фаерфилда.
Принцип работы скрипта:
1) чар выравнивается об западную стену дома бегая паралельно южной
2) кастует на себя фаерфилд
3) бегает вдоль южного забора по фаерфилду при этом хилясь и невыходя за пределы фаерфилда
4) если хп меньше 60 чар отходит в сторону и хилится, восстановив хп до 120 возвращается и продолжает бегать
5) если стенка почти погасла или у чара 150 хп все повторяется с 1-го пункта
6) при этом если чар умер он будет долго кричать ( аларм пилота), а потом заткнется и остановит все скрипты (в разработке)
7) медитация не требуется, т.к. для восстановления более чем достаточно пассивного регена.
__________________
May the Force be with you..
|
|
|
|
Re: МАКРОСЫ |
|
27.01.2010, 10:20
|
#13
|
The Hero
Регистрация: 02.02.2007
Адрес: KIDs
Возраст: 36
Сообщений: 969
Репутация: 52 имеет хорошую репутацию (от 26 до 75)
Чар: Sindoatan
Гильдия: KIDs
|
Re: МАКРОСЫ
PHP код:
// Бродилка Sindo Edition //Используется как дополнительная процедурка внутри основного скрипта // и требует соответствующей изоляции. Пример использования: set #kudax 1067 // Перед вызовом бродилки указываем координаты цели set #kuday 2670 // gosub gogogo // вызов бродилки repeat 5 // сообщим что переход к цели выполнен alarm end_repeat stop_script
:gogogo set #try 0 // счетчик шагов set #flip 0 // счетчик/индикатор разворотов на месте set #ston 0 // индикатор застревания :nextstep set #try #try + 1 :nextfixstep
if (charposx = #prevx ) and ( charposy = #prevy ) // если еще не перешли на новый тайл if (#flip >= 1) // если мы уже разворачивались на этом тайле подождем, может лагаем set #ston #ston + 1 wait 500 set #flip #flip + 1 if (#flip >= 5) // если не дождались попробуем шагнуть еще раз set #flip 0 end_if goto nextfixstep end_if set #flip #flip + 1 end_if
if (charposx <> #prevx ) and ( charposy <> #prevy ) // перешли на новый тайл set #ston 0 set #flip 0 end_if
if #ston > 10 // если долго не можем сдвинуться с одного тайла отойдем в сторону (рандомный выбор) set #walk random 8 if #walk = 0 repeat 5 send PageUp 200 end_repeat end_if if #walk = 1 repeat 5 send PageDown 200 end_repeat end_if if #walk = 2 repeat 5 send Home 200 end_repeat end_if if #walk = 3 repeat 5 send End 200 end_repeat end_if if #walk = 4 repeat 5 send Up 200 end_repeat end_if if #walk = 5 repeat 5 send Down 200 end_repeat end_if if #walk = 6 repeat 5 send Left 200 end_repeat end_if if #walk = 7 repeat 5 send Right 200 end_repeat end_if set #ston 0 end_if
if #try > 50 // если наш путь к цели слишком долог, пробуем привлечь внимание хозяина чара repeat 5 flash flash Sindo wait 2s end_repeat set #try 0 end_if
if (charposx = #kudax ) and ( charposy = #kuday ) // цель достигнута goto yes end_if
// Корректировка, если уже стоим на оси Х с целью if charposx = #kudax if charposy > #kuday gosub savepos send pageup goto nextstep end_if if charposy < #kuday gosub savepos send end goto nextstep end_if end_if
// Корректировка, если уже стоим на оси У с целью if charposy = #kuday if charposx > #kudax gosub savepos send home goto nextstep end_if if charposx < #kudax gosub savepos send pagedown goto nextstep end_if end_if
// Корректировка, если нет пересечений с целью по осям координат if charposy < #kuday if charposx < #kudax gosub savepos send down goto nextstep else gosub savepos send left goto nextstep end_if else if charposx < #kudax gosub savepos send right goto nextstep else gosub savepos send up goto nextstep end_if end_if
:yes return
:savepos set #prevx charposx set #prevy charposy return // Биндить ничего не нужно, стоит лишь передать координаты цели и убедиться, что в "строке речи чара(вобщем где текст пишем в уо)" нет никаких символов и кнопки end, home, pageup и pagedown свободны от биндов.
Добавлено через 12 минут
PHP код:
// AutoMeditation by Sindo set #a 0 // счетчик сбросов вар мода set #b 0 // для проверки используется ли скрипт в данный момент set $war with thoughts // сообщение о нахождении чара в вар моде set $medbtn 6 // UseSkill+Meditation :try while mana < int if #b = 0 say *Meditation Started* set #b 1 end_if send $medbtn send Backspace // убрать лишний символ с экрана (если не требуется, убрать) if (lastmsg = $war) if #a > 0 // кол-во снятий вара корректировать по желанию say *Nakilon is under attack! No more time for meditation!* stop_script end_if set #a #a + 1 send Tab // снять вар мод goto try end_if wait 3s end_while say *Nakilon's magic energy succesfully refreshed* alarm // set #b 0 // возможно потом придумаю систему для безостановочной работы stop_script
__________________
May the Force be with you..
|
|
|
|
Re: МАКРОСЫ |
|
27.01.2010, 10:41
|
#14
|
The Hero
Регистрация: 02.02.2007
Адрес: KIDs
Возраст: 36
Сообщений: 969
Репутация: 52 имеет хорошую репутацию (от 26 до 75)
Чар: Sindoatan
Гильдия: KIDs
|
Re: МАКРОСЫ
Раньше копал этим на базе, теперь, вероятно, пригодится лишь в Т2А
PHP код:
// Mining near wall by Sindo // Интервал между строк 20 set #napravl 3 // направление на обкапываемую скалу (0=N,1=E,2=S,3=W) set $miningbtn01 F10 // кнопка с биндом LastObject/WFT в клиенте set $miningbtn2 F11 // кнопка с биндом LastTarget в клиенте set #wstep 1500 // задержка до перехода чара на новый тайл после подачи команды к этому set #wmine 4300 // задержка до окончания вскапывания чаром указанного тэйла после вызова $miningbtn2 set #pich 1 // индикатор необходимости поддержки замены кирки при поломке (0=нужно, 1=не нужно) set %pickaxe[1] 0 // ID первой запасной кирки set %pickaxe[2] 0 // ID второй запасной кирки set %pickaxe[3] 0 // ID третьей запасной кирки set #pickaxetype 0 // итемтайп кирок
set $s1 is no ore here set $s2 have no line set $s3 try mining set $s4 too far away set $s5 has changed set $s6 loosen some rocks set $s7 has increased set $s8 put the set $broke broke // сообщение при поломке кирки set $loose reach that // собщение при потере кирки (в том числе при поломке) set #broke 0 // счетчик поломок кирки set #a 0 // индикатор необходимости разворота set #ston 0 // индикатор застоя на месте set #superston 0 // индикатор капитального застоя на месте
if (#napravl = 0) set $correctx + 0 set $correcty - 1 set $nexttilebtn Home set $otskalibtn End set $kskalebtn PageUp end_if if (#napravl = 1) set $correctx + 1 set $correcty + 0 set $nexttilebtn PageUp set $otskalibtn Home set $kskalebtn PageDown end_if if (#napravl = 2) set $correctx + 0 set $correcty + 1 set $nexttilebtn Home set $otskalibtn PageUp set $kskalebtn End end_if if (#napravl = 3) set $correctx - 1 set $correcty + 0 set $nexttilebtn PageUp set $otskalibtn PageDown set $kskalebtn Home end_if
:start
set lasttargetx charposx $correctx set lasttargety charposy $correcty set lasttargetkind 2 send $miningbtn01 300 set $prevmsg lastmsg if (lastmsg = $broke) or (lastmsg = $loose) if (#pich = 0) set #broke #broke + 1 if (#broke <= 3) set LastObjectID %pickaxe[#broke] set LastObjectType #pickaxetype goto start else msg У вас закончились запасные кирки! end_if else msg У вас сломалась кирка! end_if end_if send $miningbtn2 #wmine if (lastmsg = $prevmsg) alarm say Ping troubles! Либо вы лагаете, либо неправильно выставлена "#wmine", либо вылез антимакрос. end_if set timer while_not (lastmsg = $s1) or (lastmsg = $s2) or (lastmsg = $s4) // or (timer > 800) while_not (lastmsg = $s5) or (lastmsg = $s6) or (lastmsg = $s7) or (lastmsg = $s8) or (timer > 7000) if (lastmsg = $s3) // подход к скале, если линия вскапывания отдалилась от нас (срабатывает на отсутствие скалы) repeat 2 send $kskalebtn #wstep end_repeat goto start end_if set #a 1 end_while goto start end_while
:nextstep set #prevx charposx set #prevy charposy if (#a >< 0) send $nexttilebtn #wstep set #a 0 end_if send $nexttilebtn #wstep
if (charposx = #prevx) and (charposy = #prevy) // обход припятствия от скалы в сторону чара (срабатывает на застой на месте (в том числе при упирании в скалу)) set #ston #ston + 1 set #superston #superston + 1 if (#ston > 2) repeat 2 send $otskalibtn #wstep end_repeat set #ston 0 set #superston 0 set #a 1 goto nextstep else goto nextstep end_if else set #ston 0 set #superston 0 end_if
goto start
// Перед использованием скрипта необходимо: // Проверить чтобы не было препятствий для перпендикулярного отхода от скалы на всем ее протяжении // Учесть что копать следует с ~юга на ~север, а не наоборот (позволяет обойти большинство багов текстур) // не забываем юзать кирку ручками перед каждым новым стартом скрипта
__________________
May the Force be with you..
|
|
|
|
Re: МАКРОСЫ |
|
27.01.2010, 11:28
|
#15
|
The Hero
Регистрация: 02.02.2007
Адрес: KIDs
Возраст: 36
Сообщений: 969
Репутация: 52 имеет хорошую репутацию (от 26 до 75)
Чар: Sindoatan
Гильдия: KIDs
|
Re: МАКРОСЫ
PHP код:
//деление руды с переплавкой //общая задержка при GPRS 150 drag 848, 562 903, 559 1 wait 300 move 903, 559 double_left 898, 546 wait 200
PHP код:
// 1) в левый верхний угол пака кладешь свою кучку руды (желательно до 500 единиц за раз) // 2) в окне "Скрипт" пилота ставишь галочку в квадратике справа от "Точка (Ctrl+A)" // 3) вставляешь в скрипт вот это: // //деление руды без переплавки // drag 848, 562 903, 559 1 // wait 300 // 4) выделяешь в скрипте 848, 562 // 5) в окне уо наводишь курсор на кучку руды в паке и жмешь Ctrl+A. у тя должны вместо 848, 562 появица другие цифры в таком же формате // 6) выделяешь в скрипте 903, 559 // 7) в окне уо наводишь примерно на центр пака и жмешь Ctrl+A. Терь у тя должны изменица цыфры вместо 903, 559 // 8) запускаешь скрипт и ждешь пока он по 1 кусочку разделит всю кучку // 9) потом через вкладку "Общее" ставишь даблклик на координаты руды, лежащей у тя в паке по 1 ( или пишешь в скриптах double_left 898, 546 меняя координаты на координаты твоей кучки)
PHP код:
//Camping by Sindoatan set #dl 40 //Кратчайшее расстояние между центрами соседних тайлов в пикселях (40для 640*480) set #mbasex 319 //X координата пикселя кучки щепок под чаром set #mbasey 245 //Y координата пикселя кучки щепок под чаром //goto test //////////////////////////////////////// set #basex #mbasex set #basey #mbasey for #x -#dl #dl #dl for #y -#dl #dl #dl set #Targx #basex +#x set #Targy #basey +#y set #a #basex -#dl set #b #basey +#dl set #c #basey -#dl if ((#Targx = #a) and (#Targy = #b)) or ((#Targx = #mbasex) and (#Targy = #mbasey)) or ((#Targx = #mbasex) and (#Targy = #c)) goto next1 end_if repeat 19 drag #mbasex, #mbasey #Targx, #Targy 1 wait 50 set #a LastLiftedID set LastObjectID #a repeat 4 send F11 // LastObject в клиенте end_repeat end_repeat :next1 end_for end_for //:test set #a #dl / 2 set #b #dl / 2 set #basex #mbasex + #a set #basey #mbasey - #b for #x -#dl #dl #dl for #y -#dl #dl #dl set #Targx #basex +#x set #Targy #basey +#y set #a #basex +#dl set #b #basey -#dl if (#Targx = #a) and (#Targy = #b) goto next2 end_if repeat 19 drag #mbasex, #mbasey #Targx, #Targy 1 wait 50 set #a LastLiftedID set LastObjectID #a repeat 4 send F11 // LastObject в клиенте end_repeat end_repeat :next2 end_for end_for //repeat 5 alarm // wait 2s //end_repeat //stop_script //Не забываем биндить кнопку с LastObject
__________________
May the Force be with you..
Последний раз редактировалось Sindo; 09.12.2012 в 22:51..
|
|
|
|
Re: МАКРОСЫ |
|
29.01.2010, 00:13
|
#16
|
The Hero
Регистрация: 28.02.2009
Адрес: никто не приютил :(
Возраст: 15
Сообщений: 536
Репутация: 7 на правильном пути, пока что (от 5 до 15)
Чар: fd2.
Гильдия: никто не приютил :(
|
Re: МАКРОСЫ
PHP код:
//by #m#i#c#a# ламбер вспомогательный ДЛЯ ЗОНЫ //uopilot 2.14, client v. 1.26.4b, 0 ms пауза между строк //f9 - LastObject //f11 - LastObject+Waitfortarget+LastTarget :start send f11 500// f11 LastObject+Waitfortarget+TargetLast :asd set timer while_not (lastmsg You can't) or (lastmsg There are no logs) or (lastmsg far away) or (lastmsg chopping) if (lastmsg You put) or (timer > 5000) goto start end_if if (lastmsg You hack) wait 1500 end_if end_while send f9 250 while target = 1 end_while goto asd
таргет появляеться сам вырубает как вырубит появляеться новый таргет и так далее
__________________
На земле нет ничего такого хорошего, что в своем первоисточнике не имело бы гадости.
|
|
|
|
СКРИПТ НА ФИШИНГ |
|
06.02.2010, 13:43
|
#17
|
Newbie
Регистрация: 04.09.2009
Сообщений: 52
Репутация: 1 имеет нулевую репутацию
Чар: IYDA
|
СКРИПТ НА ФИШИНГ
PHP код:
//-----------FISHING------------- gosub fishingsub //вылов рыбы //13 тайлов по мосту repeat 13 send PageDown 200 //направление движения. Изменить на нужное end_repeat end_repeat //идем по берегу на исходную точку 7 тайл. repeat 27 //один тайл на разворот. send home 200 end_repeat send PageDown 200 //разворот. // сколько циклов сделали за ночь (для оптимистов и статистиков) set #counter #counter +1 :fishingsub //fishing sub // энта часть заимствована у кого-то, но оптимизирована и доработана до слабой узнаваемости. for #y -6 6 1 // !!!воот тут, если копаете с берега, а не с моста, for #x -6 6 1 // !!!надо подправить макс координаты по X и Y. :fishing //подпрограмма вылова рыбы set lasttargetx charposx + #x set lasttargety charposy + #y set lasttargetkind 2 send F1 1000 // LastObject, WaitForTarget, LastTarget set timer 0 while_not (lastmsg pull) or (lastmsg fail) or (lastmsg Try) or (lastmsg quick) or (lastmsg no fish) or (timer > 6000) end_while if (lastmsg Try) or (lastmsg quick) or (lastmsg no fish) or (lastmsg fail) wait 1500 // задержка после неудачного использования на удочке. end_if if (lastmsg pull) and (wght < 620) //!!! если цель просто прокачка, это можно отключить для экономии времени. drag 406, 298 404, 254 all // перетаскивание рыбы на себя. drag 406, 298 404, 254 all // перетаскивание рыбы на себя. wait 500 end_if if lastmsg destroer //сломалась удочка send f3 500 //!!! в ассисте - target type на удочку double_left 810, 68 //!!! координаты удочки в руке. Надежнее, чем брать из пака. wait 500 send f2 1000 end_if if_not (lastmsg are no fish) or (lastmsg Try) or (lastmsg pull) //!!! последний or - ловля будет продолжаться только один раз вместо ловли до no fish //если длина берега достаточная, это ускоряет процесс ловли и прокачки. //Если скилл меньше 60, то имеет смысл поставить // перед or (lastmsg pull) goto fishing // процедура вылова рыбы. end_if end_for end_for return //fishing + дополнение к скрипту //паузы скрипта фишинга чтобы скрипт не прервался в какой-нибудь неудобный момент if lastmsg world pause_script 3 //!!!номер останавливаемого скрипта прописать надо! wait 10000 say Save the Power of Macros! //эт чтобы сбросить Lastmsg resume_script 3 //!!!номер останавливаемого скрипта прописать надо! end_if // проверка - не убивают ли вас, пока вы спокойно удите.. if (lastmsg hit) or (lastmsg attacking you) or (hits < str) repeat 3 say guards wait 1000 end_repeat end_if
|
|
|
|
Re: МАКРОСЫ |
|
11.02.2010, 02:47
|
#18
|
Newbie
Регистрация: 04.12.2008
Сообщений: 3
Репутация: 1 имеет нулевую репутацию
|
Re: МАКРОСЫ
ребят, киданите мак на паринг, чтобы бинтами хилиться и щит из рук не выпускать...
|
|
|
|
Re: МАКРОСЫ |
|
11.02.2010, 02:51
|
#19
|
Newbie
Регистрация: 31.01.2010
Возраст: 37
Сообщений: 7
Репутация: 1 имеет нулевую репутацию
Чар: Неизвестен
|
Re: МАКРОСЫ
в ассисте запиши макрос на хил бинтами и одевание шилда
и на уопилот на кнопочку поставь
|
|
|
|
Re: МАКРОСЫ |
|
11.02.2010, 08:20
|
#20
|
The Hero
Регистрация: 02.02.2007
Адрес: KIDs
Возраст: 36
Сообщений: 969
Репутация: 52 имеет хорошую репутацию (от 26 до 75)
Чар: Sindoatan
Гильдия: KIDs
|
Re: МАКРОСЫ
PHP код:
// Parrying с отходом-подходом by Sindo set $hb f11 //heal button in assist set #hw 3000 //heal wait set $othodbtn End // walk+куда отходить set $podhodbtn PageUp // walk+куда подходить set #minhp 80 //уровень hp, при котором отходим в сторону
:start
if hits < str // ограничение нормы хп ставить по своему усмотрению while hits < str gosub saver send $hb wait #hw// задержка на хилл end_while end_if
goto start
:saver if hits < #minhp repeat 10 send $othodbtn end_repeat set timer while_not (hits = str) or (timer > 200000) send $hb wait #hw end_while if timer > 200000 repeat 10 say bandage trouble alarm wait 1s end_repeat stop_script end_if repeat 10 send $podhodbtn end_repeat end_if return
Сам хилится, если хп меньше указанного (80) отходит в сторону, полностью отхилившись возвращается. Бинты удобно ложить на пол на пол пути отхода. При прокачке арчери удобно отходить за угол дома. Макр не проверяет живы ли вы, умрете - будете бегать туда-сюда (но за время прокачки всех варов это было лишь дважды и оба раза из-за конлостов избиваемого).
Если надо без ассиста, то заменяем
на
Код:
set lastobjecttype 1234567890 // ИД бинтов в паке
send F1 // LastObject/WaitForTareget/TargetSelf в клиенте
set lastobjectid 1234567899 // ИД щита в паке
send F2 // LastObject в клиенте
с соответсвующей правкой.
__________________
May the Force be with you..
Последний раз редактировалось Sindo; 24.03.2011 в 06:05..
|
|
|
|
Re: МАКРОСЫ |
|
11.02.2010, 08:26
|
#21
|
Mystical Hero
Регистрация: 09.10.2009
Сообщений: 1,103
Репутация: 25 на правильном пути (от 16 до 25)
Чар: Sokol
|
Re: МАКРОСЫ
Впринципе ничего сложного нет в теме ИНСТРУКЦИЯ ДЛЯ НОВИЧКОВ про хил бинтами написанно. А когда тя бить будут просто в пилоте ставь ту кнопку которую забил на хилл. Но тебе скинули макрос с подходом так что удачного кача.
__________________
Для того, чтобы быть другом, не обязательно быть собакой.
|
|
|
|
Re: МАКРОСЫ |
|
16.02.2010, 14:30
|
#22
|
Expert Player
Регистрация: 15.02.2010
Адрес: [M5] SWO
Возраст: 38
Сообщений: 440
Репутация: 2 имеет нулевую репутацию
Чар: Mighty
Гильдия: [M5] SWO
|
Re: МАКРОСЫ
Ребят скиньте норм макрос на лембер для пилота а то я чет нормального не нашол
|
|
|
|
Re: МАКРОСЫ |
|
16.02.2010, 14:37
|
#23
|
Mystical Hero
Регистрация: 09.10.2009
Сообщений: 1,103
Репутация: 25 на правильном пути (от 16 до 25)
Чар: Sokol
|
Re: МАКРОСЫ
16 страница все работает если не получается напиши помогу.
__________________
Для того, чтобы быть другом, не обязательно быть собакой.
|
|
|
|
Re: МАКРОСЫ |
|
16.02.2010, 14:51
|
#24
|
Expert Player
Регистрация: 15.02.2010
Адрес: [M5] SWO
Возраст: 38
Сообщений: 440
Репутация: 2 имеет нулевую репутацию
Чар: Mighty
Гильдия: [M5] SWO
|
Re: МАКРОСЫ
да этим макрасом я щас рублю, но хотелось бы макрос чтоб топоры менял и ходил по определенной территории рубил если что там сам подправлю
|
|
|
|
Re: МАКРОСЫ |
|
16.02.2010, 15:00
|
#25
|
Mystical Hero
Регистрация: 09.10.2009
Сообщений: 1,103
Репутация: 25 на правильном пути (от 16 до 25)
Чар: Sokol
|
Re: МАКРОСЫ
Топоры он и так меняет только добавить строчку когда ломается кардинаты в паке такие то. А вот чоб сам ходил тут извини никто не даст тут запрещено все на автомате. Сори. Так если будут вопросы пиши.
__________________
Для того, чтобы быть другом, не обязательно быть собакой.
|
|
|
|
Re: МАКРОСЫ |
|
16.02.2010, 15:02
|
#26
|
Expert Player
Регистрация: 15.02.2010
Адрес: [M5] SWO
Возраст: 38
Сообщений: 440
Репутация: 2 имеет нулевую репутацию
Чар: Mighty
Гильдия: [M5] SWO
|
Re: МАКРОСЫ
хорошо учту, тогда щас переделаю
|
|
|
|
Re: МАКРОСЫ |
|
16.02.2010, 17:33
|
#27
|
Banned
Регистрация: 05.01.2010
Сообщений: 331
Репутация: 3 имеет нулевую репутацию
Чар: Timberlake
|
Re: МАКРОСЫ
Цитата:
Сообщение от Andrey
Топоры он и так меняет только добавить строчку когда ломается кардинаты в паке такие то. А вот чоб сам ходил тут извини никто не даст тут запрещено все на автомате. Сори. Так если будут вопросы пиши.
|
а если следить сидеть и он на автомате ходит,можно?
|
|
|
|
Re: МАКРОСЫ |
|
16.02.2010, 18:55
|
#28
|
Mystical Hero
Регистрация: 09.10.2009
Сообщений: 1,103
Репутация: 25 на правильном пути (от 16 до 25)
Чар: Sokol
|
Re: МАКРОСЫ
ну я по крайне мере так рубил но если появится ГМ в хайде и начнет тебе писать а ты неответишь то дорога на лесоповал.
__________________
Для того, чтобы быть другом, не обязательно быть собакой.
|
|
|
|
Re: МАКРОСЫ |
|
19.02.2010, 21:43
|
#29
|
Expert Player
Регистрация: 15.02.2010
Адрес: [M5] SWO
Возраст: 38
Сообщений: 440
Репутация: 2 имеет нулевую репутацию
Чар: Mighty
Гильдия: [M5] SWO
|
Re: МАКРОСЫ
Кто может поделиться макрасом на паринг и хилинг с помывкой бинтов
|
|
|
|
Re: МАКРОСЫ |
|
24.02.2010, 13:41
|
#30
|
Newbie
Регистрация: 04.12.2008
Сообщений: 3
Репутация: 1 имеет нулевую репутацию
|
Re: МАКРОСЫ
ребята, вот вы кинули макры на паринг(хиляца бинтами не вынимая щит из руки), распишите плз поподробней ) прям чето не получается....
|
|
|
|
Re: МАКРОСЫ |
|
24.02.2010, 13:48
|
#31
|
Expert Player
Регистрация: 15.02.2010
Адрес: [M5] SWO
Возраст: 38
Сообщений: 440
Репутация: 2 имеет нулевую репутацию
Чар: Mighty
Гильдия: [M5] SWO
|
Re: МАКРОСЫ
макрос на хил бинтами можно сделать и в УОасисте,
берешь открываешь вкладку keys в ней находишь Play macro 1-16 нажимаешь на 1 макрос и ставишь кнопку например f6, потом заходишь в Macros и снизу идут кнопки с 1 по 16 нажимаешь ту на которой забиндил кнопку, появляется у тебя левее и выше record нажимаешь на него потом открываешь УО нажимаешь на бинты и на себя и одеваешь щит в макросе нажимаешь стоп. Открываешь пилот заходишь в общие и ставишь там свою кнопку на которую забиндил и интервал 2500 и нажимаешь старт.
Вот и все собственно
|
|
|
|
Re: МАКРОСЫ |
|
24.02.2010, 15:23
|
#32
|
Newbie
Регистрация: 29.11.2009
Возраст: 36
Сообщений: 38
Репутация: 1 имеет нулевую репутацию
Чар: Osvald
|
Re: МАКРОСЫ
Цитата:
Сообщение от Andrey
- А вот далее ва столкнетесь с другой преградой но ничего непроходимого нет. Вам надо на окошке вашего чара нажать кнопочку ХЕЛП (HELP) не бойтесь ГМа звать не будем. Вам нужно изображений выглядещее как полумесяц (ЛУНА) но помоему круговая стрелка(извените пишу с работы могу ошибится) там вам надо в кнопочках нажать ADD(добавить) в первой строчке ставим кнопку на которой будет у нас медитация в данном случае F7 после того у нас появляется следующая строчка в ней ищем USE SKILL(использовать скилл) тогда у нас дальше появляется еще одна строчка чуть ниже. И вот в ней мы ищем слово MEDITATION (медетация). после того как мы сделали надо нажать кнопочку APLY(применить) и потом ОК.
|
Эээээ... Options а не Help. Кстати, классная тема . Давно мечтал разобраться с Пилотом, но все не решалсо, боюсь любого программирования, как огня
|
|
|
|
Re: МАКРОСЫ |
|
24.02.2010, 15:29
|
#33
|
Mystical Hero
Регистрация: 09.10.2009
Сообщений: 1,103
Репутация: 25 на правильном пути (от 16 до 25)
Чар: Sokol
|
Re: МАКРОСЫ
А ты не бойся пробуй если что то поможем))))
__________________
Для того, чтобы быть другом, не обязательно быть собакой.
|
|
|
|
Re: МАКРОСЫ |
|
28.02.2010, 16:02
|
#34
|
Newbie
Регистрация: 29.11.2009
Возраст: 36
Сообщений: 38
Репутация: 1 имеет нулевую репутацию
Чар: Osvald
|
Re: МАКРОСЫ
Насчет макроса в посте №16... Чето не работает у меня... Просто крутится по кругу, а таргет не появляется... Я в самом клиенте забиндил кнопки, как в макре написано, но... Можно немного подробней, последовательность подготовки макра к работе, а то может я что-нибудь упустил из виду.
Ээээ... прошу прошения, как-то получилось... Жалко только, что я не понял, как:-)
|
|
|
|
Re: МАКРОСЫ |
|
28.02.2010, 16:10
|
#35
|
Mystical Hero
Регистрация: 09.10.2009
Сообщений: 1,103
Репутация: 25 на правильном пути (от 16 до 25)
Чар: Sokol
|
Re: МАКРОСЫ
Обясню. Все работает только надо 1 раз рубануть дерево и все. Дальше сам пойдет рубить а ты тольк будеш тыкать таргертом на деревья.
__________________
Для того, чтобы быть другом, не обязательно быть собакой.
|
|
|
Опции темы |
|
Опции просмотра |
Линейный вид
|
Ваши права в разделе
|
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения
HTML код Выкл.
|
|
|
Похожие темы
|
Тема |
Автор |
Раздел |
Ответов |
Последнее сообщение |
ПВП макросы
|
MDEA |
Ньюби Таун |
35 |
08.07.2007 17:23 |
Про макросы!
|
Dvalin |
Ньюби Таун |
3 |
21.02.2007 20:51 |
|
|
|