Тема: МАКРОСЫ
Показать сообщение отдельно
Re: МАКРОСЫ
Старый 18.01.2010, 14:45   #6
Sindo
The Hero
 
Регистрация: 02.02.2007
Адрес: KIDs
Возраст: 35
Сообщений: 969
Репутация: 52 [+/-]
имеет хорошую репутацию (от 26 до 75)
Sindo имеет хорошую репутацию (от 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 в соответствии с комментарием [/php]
__________________
May the Force be with you..
Sindo вне форума   Ответить с цитированием