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

[/PHP]
__________________
May the Force be with you..

Последний раз редактировалось Sindo; 24.03.2011 в 06:10..
Sindo вне форума   Ответить с цитированием