Вернуться   Forgotten World Ultima Online Forums > Общие форумы/Common forums > Ньюби Таун
Ньюби Таун Вопросы и помощь новым игрокам Шарда Forgotten World. Запрещен Мат и Оскoрбления игроков, обсуждение действий Стаффа, флуд. Наказание -БАН

Ответ
 
Опции темы Опции просмотра
Re: МАКРОСЫ
Старый 24.04.2017, 05:35   #981
Silvestrs
Player
 
Регистрация: 11.02.2010
Возраст: 36
Сообщений: 246
Репутация: 1 [+/-]
имеет нулевую репутацию
Silvestrs имеет нулевую репутацию
Чар: silvestrs
По умолчанию Re: МАКРОСЫ

че за руна у тебя в паке??
__________________
Глаза боятся, руки делают!
Silvestrs вне форума   Ответить с цитированием
Re: МАКРОСЫ
Старый 12.05.2017, 09:52   #982
tw1nky
Newbie
 
Регистрация: 07.02.2014
Сообщений: 8
Репутация: 1 [+/-]
имеет нулевую репутацию
tw1nky имеет нулевую репутацию
Чар: toxic steel
По умолчанию Re: МАКРОСЫ

всем привет!
не пойму, что не так со скриптом:
Цитата:
//----Копаем на месте 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 F12 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) or (lastmsg you put)
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
выкапывает с одного тайла всю руду и тупо в него же долбится.
перебрал версии пилота - 2.17/2.14/2.12/2.07 - эффекта ноль...


отбой, разобрался

Последний раз редактировалось tw1nky; 12.05.2017 в 10:10..
tw1nky вне форума   Ответить с цитированием
Re: МАКРОСЫ
Старый 17.05.2017, 22:37   #983
KDbled
Newbie
 
Регистрация: 03.04.2012
Возраст: 39
Сообщений: 25
Репутация: 1 [+/-]
имеет нулевую репутацию
KDbled имеет нулевую репутацию
Чар: KDbled
По умолчанию Re: МАКРОСЫ

Трекинг на ходу. Запоминает, где уже искал на карте живку и не ищет в этом месте:

Код:
//set $m Macro halted.
set #si 60 // Шаг проверки внутри поля step inside
set #so 60 // Шаг проверки вне поля step outside
set #n 1
set #n1 #n + 1
send f5 200
wait 1s
set #x charposx
set #y charposy
set %Track [#n 1] #x
set %Track [#n 2] #y
set %Track [#n1 1] 0
//while lastmsg = $m
//wait 1s
//send f5 200
//wait 1s
//end_while

:begin
set #cx charposx - #x
set #xc #x - charposx
set #cy charposy - #y
set #yc #y - charposy
if  #cx > #si or #xc > #si or #cy > #si or #yc > #si
set #cp 1
set #ms 1
Set #tx 1
While #tx > 0
set #mx %Track [#ms 1] 
set #my %Track [#ms 2]
set #cx charposx - #mx
set #xc #mx - charposx
set #cy charposy - #my
set #yc #my - charposy
set #ms #ms + 1
set #tx %Track [#ms 1]
if  #cx > #so or #xc > #so or #cy > #so or #yc > #so
set #cp #cp +1
end_if
end_while
if #cp = #ms
send f5 200
set #x charposx
set #y charposy
//while lastmsg = $m
//wait 1s
//send f5 200
//end_while
set #n #n + 1
set #n1 #n + 1
set %Track [#n 1] #x
set %Track [#n 2] #y
set %Track [#n1 1] 0
set $Track D:\TrackK.txt
Save_array %Track $Track
//exec D:\KD\Distr\uo\Pilot\ftp.bat
end_if
end_if
goto begin
Добавлено через 4 минуты
Качаем кемпинг:

Скрипт разбрасывает вокруг себя киндлы и поджигает их:
Код:
wait 3s
set #x 187        //First Kindle X
set #y 247       //First Kindle Y
set #bx 1360    // Kindling in Backpack X
set #by 151     // Kindling in Backpack Y
set #s 22
set #m 7
repeat #m
set #x1 #x
set #y1 #y
repeat #m
move #bx #by
drag #bx #by #x1 #y1 1
set #x1 #x1 + #s
set #y1 #y1 - #s
end_repeat
set #x #x + #s
set #y #y + #s
end_repeat

set #x 187        //First Kindle X
set #y 247       //First Kindle Y
set #bx 1360    // Kindling in Backpack X
set #by 151     // Kindling in Backpack Y
set #m 7
repeat #m
set #x1 #x
set #y1 #y
repeat #m
move #x1 #y1
double_left #x1 #y1
set #x1 #x1 + #s
set #y1 #y1 - #s
end_repeat
set #x #x + #s
set #y #y + #s
end_repeat
if wght < 60
pause_script
end_if

Последний раз редактировалось KDbled; 17.05.2017 в 22:42.. Причина: Добавлено сообщение
KDbled вне форума   Ответить с цитированием
Re: МАКРОСЫ
Старый 17.05.2017, 22:55   #984
The Egoist
Newbie
 
Регистрация: 17.05.2017
Сообщений: 1
Репутация: 1 [+/-]
имеет нулевую репутацию
The Egoist имеет нулевую репутацию
Чар: The Egoist
По умолчанию Re: МАКРОСЫ

Цитата:
Сообщение от AKA Посмотреть сообщение
[PHP]
//----Хелинг,Магия,Медитация:----
//if hits < 150 // Проверка хитов
.................
[/PHP]
Почему-то не работает проверка хп. Просто постоянно хилиться пытается. Не знает кто, что не так?
The Egoist вне форума   Ответить с цитированием
Re: МАКРОСЫ
Старый 17.05.2017, 22:57   #985
KDbled
Newbie
 
Регистрация: 03.04.2012
Возраст: 39
Сообщений: 25
Репутация: 1 [+/-]
имеет нулевую репутацию
KDbled имеет нулевую репутацию
Чар: KDbled
По умолчанию Re: МАКРОСЫ

Сложный скрипт на ламбер из двух частей.


Часть 1-я. Создаем массив деревьев.

Запуск скрипта пишет координату ласттаргета и координату чара в массив.
Бежать от дерева до дерева в первый раз самостоятельно. Бежать нужно как можно прямее.
Чтобы замарчить дерево рядом, отбегать не надо, нулевое смещение чара учитывается.
Обязательно закруглите свой путь. Первое и последнее дерево должны быть рядом или в зоне досягаемости при почти прямом беге. Не бегайте на краю гвардзоны, Вас легко подстрелят ПК.
Чем больше деревьев в массиве, тем меньше нужно стоять и ждать респа логов. Не советую делать массив меньше чем из 200 деревьев, стоять придется по 15 минут.

Скрипт:
Код:
//      Write  Targets  Coords

set #n #n + 1
set #n1 #n + 1
set %AllCoords [#n 1] #n
set %AllCoords [#n 2] charposx
set %AllCoords [#n 3] charposy
set %AllCoords [#n 4] lasttargetx
set %AllCoords [#n 5] lasttargety
set %AllCoords [#n1 1] #n1
set %AllCoords [#n1 2] 0
set $AllCoords C:\AllCoords.txt
Save_array %AllCoords $AllCoords
set lasttargetx 0
set lasttargety 0
pause_script

Часть 2. Сам лабмер.
Сделав круг, запускаем второй скрипт стоя недалеко от первого дерева из массива.
Скрипт оповещает о нападении, перевесе, отсутствии логов и подобном. Можете прикрутить реколл по руне для безопасности.
У меня в скрипте для ламбера используется F12 (LO WFT LT).

Первые пару кругов отслеживайте движения героя, он может застревать. Если застрял, перепишите координату в файле куда пишется массив. По первости можете кинуть при беге кричалку координат и номера дерева, чтоб легче было искать. Также для теста можно временно вырубить в скрипте полную вырубку дерева, а оставить один удар и бежать дальше.

Скрипт:
Код:
set #ms 0
set #x 0
Set #tx 37
set $AllCoords C:\AllCoords.txt
Load_array %AllCoords $AllCoords
wait 3s

While #tx > 0
set #ms #ms + 1
set #tx %AllCoords [#ms 2] 
end_while
set #ms #ms - 1

:repeat
if #x = #ms
set #x 0
msg Круг!
pause_script
end_if
set #x #x + 1
set #TargetX %AllCoords [#x 2]
set #TargetY %AllCoords [#x 3]
set #TreeX %AllCoords [#x 4]
set #TreeY %AllCoords [#x 5]
Gosub Char_go
if_not (#TreeX = 0) and (#TreeY = 0)
Gosub LumberJack
end_if
goto repeat

:Char_Go
set #dx 1
set #dy 1
while_not ( #dX = 0 ) and ( #dY = 0 )
set #dx #TargetX - charposx
set #dy #TargetY - charposy
if #dx > 0
if #dy > 0
send Down
end_if
if #dy < 0
send Right
end_if
if #dy = 0
send PageDown
end_if
end_if
if #dx = 0
if #dy > 0
send End
end_if
if #dy < 0
send PageUp
end_if
end_if
if #dx < 0
if #dy > 0
send Left
end_if
if #dy = 0
send Home
end_if
if #dy < 0
send Up
end_if
end_if
end_while
return

:LumberJack
set $l1 There are no logs left here to chop.
set $s5 Targeting Cancelled
set lasttargetkind 3
set lasttargetx #TreeX
set lasttargety #TreeY
set timer
:Lumber
send f12 200  /lo wft lt
if wght > 500
msg Перевес!
pause_script
end_if
if lastmsg = $s5
msg Капча
pause_script
end_if
if hits < str
say guards
msg Бьют!
pause_script all
end_if
while_not (lastmsg = $l1) or (timer > 50000)
goto Lumber
end_while
return
Скрипт сложный, но кому надо вникнете.

Добавлено через 1 минуту
Цитата:
Сообщение от The Egoist Посмотреть сообщение
Почему-то не работает проверка хп. Просто постоянно хилиться пытается. Не знает кто, что не так?
Так строка провки закомментена. Уберите // перед строкой.

Последний раз редактировалось KDbled; 17.05.2017 в 22:59.. Причина: Добавлено сообщение
KDbled вне форума   Ответить с цитированием
Re: МАКРОСЫ
Старый 10.11.2017, 00:13   #986
Mitridat
Newbie
 
Регистрация: 10.11.2017
Сообщений: 2
Репутация: 1 [+/-]
имеет нулевую репутацию
Mitridat имеет нулевую репутацию
Чар: Mitridat
По умолчанию Re: МАКРОСЫ

Цитата:
Сообщение от tw1nky Посмотреть сообщение
всем привет!
не пойму, что не так со скриптом:

выкапывает с одного тайла всю руду и тупо в него же долбится.
перебрал версии пилота - 2.17/2.14/2.12/2.07 - эффекта ноль...


отбой, разобрался
Как разобрался? Подскажи, у меня пилот так и не читает УО
Mitridat вне форума   Ответить с цитированием
Re: МАКРОСЫ
Старый 21.11.2017, 16:05   #987
SUSLIK_BOMBA
Expert Player
 
Регистрация: 06.10.2010
Сообщений: 359
Репутация: 16 [+/-]
на правильном пути (от 16 до 25)
SUSLIK_BOMBA на правильном пути (от 16 до 25)
Чар: SUSLIK BOMBA
По умолчанию Re: МАКРОСЫ

Кто качал Таминг этим скриптом
[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. Скрипт может тамить, менять палки, есть, кормить и ждать столько
//сколько нужно (и не более необходимого).
\
Подскажите он у меня тамит всю указанную живку, а потом ничего не делает. Подскажите что подправить чтоб он начал заново прогонять данный макрос
SUSLIK_BOMBA вне форума   Ответить с цитированием
Re: МАКРОСЫ
Старый 21.11.2017, 16:10   #988
MODO
Wizard of words
 
Аватар для MODO
 
Регистрация: 17.09.2009
Сообщений: 1,711
Репутация: 47 [+/-]
имеет хорошую репутацию (от 26 до 75)
MODO имеет хорошую репутацию (от 26 до 75)
Чар: Ignore
По умолчанию Re: МАКРОСЫ

set #lag 2000000 // время на забывание зверем хозяина
__________________
Связь через личные сообщения или Skype live:50e65e71d3c88f7a
MODO вне форума   Ответить с цитированием
Re: МАКРОСЫ
Старый 21.11.2017, 16:46   #989
SUSLIK_BOMBA
Expert Player
 
Регистрация: 06.10.2010
Сообщений: 359
Репутация: 16 [+/-]
на правильном пути (от 16 до 25)
SUSLIK_BOMBA на правильном пути (от 16 до 25)
Чар: SUSLIK BOMBA
По умолчанию Re: МАКРОСЫ

спс за подсказку, а за какой временной период животное забывает хозяина?
SUSLIK_BOMBA вне форума   Ответить с цитированием
Re: МАКРОСЫ
Старый 21.11.2017, 16:47   #990
MODO
Wizard of words
 
Аватар для MODO
 
Регистрация: 17.09.2009
Сообщений: 1,711
Репутация: 47 [+/-]
имеет хорошую репутацию (от 26 до 75)
MODO имеет хорошую репутацию (от 26 до 75)
Чар: Ignore
По умолчанию Re: МАКРОСЫ

2000000 - это примерно пол часа.
__________________
Связь через личные сообщения или Skype live:50e65e71d3c88f7a
MODO вне форума   Ответить с цитированием
Re: МАКРОСЫ
Старый 22.11.2017, 09:27   #991
SUSLIK_BOMBA
Expert Player
 
Регистрация: 06.10.2010
Сообщений: 359
Репутация: 16 [+/-]
на правильном пути (от 16 до 25)
SUSLIK_BOMBA на правильном пути (от 16 до 25)
Чар: SUSLIK BOMBA
По умолчанию Re: МАКРОСЫ

Подскажите. Когда я тамлю лам за Гз, за каждую дают проценты кача таминга. А те которые стоят у меня в доме, на которых я качаю таминг. Из 12 только дают за 3-4 повешение таминга. Может необходимо вынести их всех за Ам зону дома. Тогда может прокачка пойдет быстрее?
SUSLIK_BOMBA вне форума   Ответить с цитированием
Re: МАКРОСЫ
Старый 22.11.2017, 11:09   #992
MODO
Wizard of words
 
Аватар для MODO
 
Регистрация: 17.09.2009
Сообщений: 1,711
Репутация: 47 [+/-]
имеет хорошую репутацию (от 26 до 75)
MODO имеет хорошую репутацию (от 26 до 75)
Чар: Ignore
По умолчанию Re: МАКРОСЫ

Суть не ам, а в том что неоднократно прирученные животные привыкают к хозяину и на них умение растет хуже чем на новых животных по миру. Как с этим бороться? Достаточно взять всего одну ламу и после приручения сесть и слезть, либо свернуть и развернуть животное. После этой операции животное обновляется, у него меняется серийный номер, обнуляется связь с хозяином, и на таком звере умение растет как положено. Только нужно запастись едой, так как после каждого цкла сел/слез у животного уменьшается сытость на единицу. В последующем с лам переходить на лошадей смысла нет, скорость не увеличится.
__________________
Связь через личные сообщения или Skype live:50e65e71d3c88f7a
MODO вне форума   Ответить с цитированием
Re: МАКРОСЫ
Старый 22.11.2017, 12:32   #993
SUSLIK_BOMBA
Expert Player
 
Регистрация: 06.10.2010
Сообщений: 359
Репутация: 16 [+/-]
на правильном пути (от 16 до 25)
SUSLIK_BOMBA на правильном пути (от 16 до 25)
Чар: SUSLIK BOMBA
По умолчанию Re: МАКРОСЫ

Спс за информацию, проще бегать по загонам и тамить там.
SUSLIK_BOMBA вне форума   Ответить с цитированием
Re: МАКРОСЫ
Старый 26.12.2017, 23:33   #994
Keyser Soze
Player
 
Регистрация: 15.11.2015
Сообщений: 293
Репутация: 11 [+/-]
на правильном пути, пока что (от 5 до 15)
Keyser Soze на правильном пути, пока что (от 5 до 15)
Чар: Keyser Soze
По умолчанию Re: МАКРОСЫ

Нет ли у кого скрипта на перекладывание вещей из мешка в мешок ? Есть 100+ мешков с регами, нужно все сложить в один. Например, указал таргетом мешок для last target id, оттуда по item type id вытаскивается содержимое (оно как правило одинаковое) и кладется в общий мешок с постоянным id. Как-то так.
------------------------------------
Уже не надо - сам написал.

Последний раз редактировалось Keyser Soze; 07.01.2018 в 01:14.. Причина: update
Keyser Soze вне форума   Ответить с цитированием
Re: МАКРОСЫ
Старый 12.01.2018, 05:52   #995
SavE
Junior Player
 
Регистрация: 23.07.2015
Адрес: FW RIP
Сообщений: 184
Репутация: 2 [+/-]
имеет нулевую репутацию
SavE имеет нулевую репутацию
Чар: ONLY MVP PLAYER
Гильдия: FW RIP
По умолчанию Re: МАКРОСЫ

как качать боукрафт с 90 на ассисте через вкладку крафтер
SavE вне форума   Ответить с цитированием
Re: МАКРОСЫ
Старый 12.01.2018, 07:07   #996
Silvestrs
Player
 
Регистрация: 11.02.2010
Возраст: 36
Сообщений: 246
Репутация: 1 [+/-]
имеет нулевую репутацию
Silvestrs имеет нулевую репутацию
Чар: silvestrs
По умолчанию Re: МАКРОСЫ

выбираешь бовкрафт, указываешь один мешок где лежат шафты и перья, далее второй мешок куда перекладывать и в строке количество сколько брать укажи "7"
__________________
Глаза боятся, руки делают!
Silvestrs вне форума   Ответить с цитированием
Re: МАКРОСЫ
Старый 02.02.2018, 20:17   #997
SavE
Junior Player
 
Регистрация: 23.07.2015
Адрес: FW RIP
Сообщений: 184
Репутация: 2 [+/-]
имеет нулевую репутацию
SavE имеет нулевую репутацию
Чар: ONLY MVP PLAYER
Гильдия: FW RIP
По умолчанию Re: МАКРОСЫ

пацаны,как карпу качать?сколько логов вообще надо ?
SavE вне форума   Ответить с цитированием
Re: МАКРОСЫ
Старый 02.02.2018, 20:39   #998
MODO
Wizard of words
 
Аватар для MODO
 
Регистрация: 17.09.2009
Сообщений: 1,711
Репутация: 47 [+/-]
имеет хорошую репутацию (от 26 до 75)
MODO имеет хорошую репутацию (от 26 до 75)
Чар: Ignore
По умолчанию Re: МАКРОСЫ

Логи в пак перевесом, и делаешь рубанки.
__________________
Связь через личные сообщения или Skype live:50e65e71d3c88f7a
MODO вне форума   Ответить с цитированием
Re: МАКРОСЫ
Старый 02.02.2018, 21:04   #999
Boriska
The Hero
 
Аватар для Boriska
 
Регистрация: 30.11.2006
Адрес: no guild
Возраст: 36
Сообщений: 673
Репутация: 9 [+/-]
на правильном пути, пока что (от 5 до 15)
Boriska на правильном пути, пока что (от 5 до 15)
Чар: Boriska
Гильдия: no guild
По умолчанию Re: МАКРОСЫ

Цитата:
Сообщение от SavE Посмотреть сообщение
пацаны,как карпу качать?сколько логов вообще надо ?
На фв ассисте вкладку Crafter открываешь , там выбираешь скилл карпентри и там 1 строчка делать рубанки , чуть правее resourse bag (указываешь мешок где лежат логи , bag for craft result (указываешь мешок куда рубанки складывать будет) ну и количество логов (вроде 4 на рубанок ) указываешь в строке Grab res count .ну и пилу в пак , будет сам логи брать при перевесе скидывать в мешок , и так пока не закончатся логи . А вот сколько чтот не засекал 40-50к логов наверн , но не точно , вроде немного !
__________________
aka Boriska
"главное чтоб войны небыло!"(с)
Boriska вне форума   Ответить с цитированием
Re: МАКРОСЫ
Старый 02.02.2018, 23:04   #1000
SavE
Junior Player
 
Регистрация: 23.07.2015
Адрес: FW RIP
Сообщений: 184
Репутация: 2 [+/-]
имеет нулевую репутацию
SavE имеет нулевую репутацию
Чар: ONLY MVP PLAYER
Гильдия: FW RIP
По умолчанию Re: МАКРОСЫ

Цитата:
Сообщение от Boriska Посмотреть сообщение
На фв ассисте вкладку Crafter открываешь , там выбираешь скилл карпентри и там 1 строчка делать рубанки , чуть правее resourse bag (указываешь мешок где лежат логи , bag for craft result (указываешь мешок куда рубанки складывать будет) ну и количество логов (вроде 4 на рубанок ) указываешь в строке Grab res count .ну и пилу в пак , будет сам логи брать при перевесе скидывать в мешок , и так пока не закончатся логи . А вот сколько чтот не засекал 40-50к логов наверн , но не точно , вроде немного !
За***сь обьяснил,благодарю
SavE вне форума   Ответить с цитированием
Re: МАКРОСЫ
Старый 03.02.2018, 10:56   #1001
illusory
The Hero
 
Аватар для illusory
 
Регистрация: 24.01.2010
Сообщений: 877
Репутация: 20 [+/-]
на правильном пути (от 16 до 25)
illusory на правильном пути (от 16 до 25)
Чар: illusory
По умолчанию Re: МАКРОСЫ

Цитата:
Сообщение от SavE Посмотреть сообщение
пацаны,как карпу качать?сколько логов вообще надо ?
[Только зарегистрированные пользователи могут видеть ссылки. Регистрация!] тут есть конкретные цифры
У меня ушло 144к
__________________
Толковый выбор приходит с опытом, а его мы получаем делая выбор бестолковый.
illusory вне форума   Ответить с цитированием
Re: МАКРОСЫ
Старый 03.02.2018, 20:42   #1002
SavE
Junior Player
 
Регистрация: 23.07.2015
Адрес: FW RIP
Сообщений: 184
Репутация: 2 [+/-]
имеет нулевую репутацию
SavE имеет нулевую репутацию
Чар: ONLY MVP PLAYER
Гильдия: FW RIP
По умолчанию Re: МАКРОСЫ

Цитата:
Сообщение от illusory Посмотреть сообщение
[Только зарегистрированные пользователи могут видеть ссылки. Регистрация!] тут есть конкретные цифры
У меня ушло 144к
жесть,у меня 30к на 95.4 с 30)
SavE вне форума   Ответить с цитированием
Re: МАКРОСЫ
Старый 04.02.2018, 06:12   #1003
illusory
The Hero
 
Аватар для illusory
 
Регистрация: 24.01.2010
Сообщений: 877
Репутация: 20 [+/-]
на правильном пути (от 16 до 25)
illusory на правильном пути (от 16 до 25)
Чар: illusory
По умолчанию Re: МАКРОСЫ

Скоро наверное прокачка до 100% будет с 1к ресов.
__________________
Толковый выбор приходит с опытом, а его мы получаем делая выбор бестолковый.
illusory вне форума   Ответить с цитированием
Re: МАКРОСЫ
Старый 11.02.2018, 22:28   #1004
Brrrra
Newbie
 
Регистрация: 14.12.2017
Сообщений: 3
Репутация: 1 [+/-]
имеет нулевую репутацию
Brrrra имеет нулевую репутацию
Чар: Bra
По умолчанию Re: МАКРОСЫ

Поделитесь пожалуйста рабочим макросом на таминг, и подскажите как качать с 30 % . То что в поиске находил - не работает. Может что-то не так делаю. Подскажите. Спасибо заранее .
Brrrra вне форума   Ответить с цитированием
Re: МАКРОСЫ
Старый 12.02.2018, 02:30   #1005
Chert
Junior Player
 
Регистрация: 29.09.2007
Возраст: 34
Сообщений: 181
Репутация: 2 [+/-]
имеет нулевую репутацию
Chert имеет нулевую репутацию
Чар: Polosatiy
По умолчанию Re: МАКРОСЫ

Помнится давным давно качался этим скриптом выше же он есть, чем смотришь?
качай с 30 на овцах, потом ламы после 40 и потом коней, но слышал, что разницы особой не наблюдается, что коней тамишь, что лам...
// 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
__________________
Решил вернуться

Последний раз редактировалось Chert; 12.02.2018 в 02:33..
Chert вне форума   Ответить с цитированием
Re: МАКРОСЫ
Старый 12.02.2018, 08:03   #1006
Brrrra
Newbie
 
Регистрация: 14.12.2017
Сообщений: 3
Репутация: 1 [+/-]
имеет нулевую репутацию
Brrrra имеет нулевую репутацию
Чар: Bra
По умолчанию Re: МАКРОСЫ

спасибо,попробую
а какой версии пилот нужно использовать?
Brrrra вне форума   Ответить с цитированием
Re: МАКРОСЫ
Старый 12.02.2018, 13:13   #1007
Chert
Junior Player
 
Регистрация: 29.09.2007
Возраст: 34
Сообщений: 181
Репутация: 2 [+/-]
имеет нулевую репутацию
Chert имеет нулевую репутацию
Чар: Polosatiy
По умолчанию Re: МАКРОСЫ

любой, как по мне самый стабильный 2,0,7
но иногда приходится подбирать...
__________________
Решил вернуться
Chert вне форума   Ответить с цитированием
Re: МАКРОСЫ
Старый 26.02.2018, 15:23   #1008
SavE
Junior Player
 
Регистрация: 23.07.2015
Адрес: FW RIP
Сообщений: 184
Репутация: 2 [+/-]
имеет нулевую репутацию
SavE имеет нулевую репутацию
Чар: ONLY MVP PLAYER
Гильдия: FW RIP
По умолчанию Re: МАКРОСЫ

Расскажите плс,как бс через ассист качать через вкладку крафтер???
SavE вне форума   Ответить с цитированием
Re: МАКРОСЫ
Старый 26.02.2018, 16:41   #1009
gostik
Junior Player
 
Регистрация: 13.03.2015
Сообщений: 103
Репутация: 1 [+/-]
имеет нулевую репутацию
gostik имеет нулевую репутацию
Чар: gostik
По умолчанию Re: МАКРОСЫ

а что там подсказывать? кинул руды, молоток в руки а нажал старт... при желании - откуда взять и куда ложить поставил и все...
gostik вне форума   Ответить с цитированием
Re: МАКРОСЫ
Старый 26.02.2018, 16:41   #1010
MODO
Wizard of words
 
Аватар для MODO
 
Регистрация: 17.09.2009
Сообщений: 1,711
Репутация: 47 [+/-]
имеет хорошую репутацию (от 26 до 75)
MODO имеет хорошую репутацию (от 26 до 75)
Чар: Ignore
По умолчанию Re: МАКРОСЫ

Зачем тебе крафтер? Закинул на чара весь айрон что есть, и включил макрос на тонги. Экономишь время на перемещение туда-сюда всего.
__________________
Связь через личные сообщения или Skype live:50e65e71d3c88f7a
MODO вне форума   Ответить с цитированием
Re: МАКРОСЫ
Старый 14.08.2018, 11:08   #1011
eterrr
Player
 
Регистрация: 18.01.2010
Возраст: 45
Сообщений: 249
Репутация: 1 [+/-]
имеет нулевую репутацию
eterrr имеет нулевую репутацию
Чар: eTerNal
По умолчанию Re: МАКРОСЫ

Цитата:
Сообщение от zedkinus Посмотреть сообщение
самый простейший макр на таминг

//F2 - last object, lasttarget - в клиенте
//F5 - TargetNext также в клиенте
//строки сообщений
set $f1 You fail to tame the creature
set $f2 too far away
set $f3 cant see
set $f4 too far away
set $f5 Taming
set $f6 приручать
set $f7 tame hungry
set $a1 accept
set $a2 Your skill
set $a3 already
set $a4 You see
set $a5 broken



//не смог приручить, пробуем еще раз.
if lastmsg $f1
send f2
end_if

//эту зверушку приручать нельзя, пробуем следующую
if lastmsg $f2
send f3
send f2
end_if

if lastmsg $f3
send f3
send f2
end_if

if lastmsg $f4
send f3
send f2
end_if

if lastmsg $f5
send f3
send f2
end_if

if lastmsg $f6
send f3
send f2
end_if

if lastmsg $f7
send f3
send f2
end_if

//приручили, отлично, отпускаем, берем следующую
if lastmsg $a1
say
say all release
send f3
send f2
end_if

if lastmsg $a2
say
say all release
send f3
send f2
end_if

if lastmsg $a3
say
say all release
send f3
send f2
end_if

if lastmsg $a4
send f3
send f2
end_if

if lastmsg $a5
send f3
send f2
end_if

//эта сволочь нас уже знает, дальше тамить бессмысленно, переходим в вар мод и из него чтобы сбросить процесс таминга и начинаем тамить следующую.
if lastmsg friend
send {tab}
wait 100
send {tab}
wait 100
say
say Damn!!!
send f3
send f2
end_if

//из-за лага остались в вармоде.
if lastmsg peace
send {tab}
wait 100
send f2
end_if

//это на случай если скрипт собьется почему-то. Если вокруг дома бродит куча животных, это можно доработать, или хотя бы уменьшить задержку до 5000.
if timer > 30000
say
say all release
send f3
send f2
set timer
end_if
Подскажите пожалуйста, почему пилот и клиент никак не реагируют на макр?
eterrr вне форума   Ответить с цитированием
Re: МАКРОСЫ
Старый 14.08.2018, 18:25   #1012
Boriska
The Hero
 
Аватар для Boriska
 
Регистрация: 30.11.2006
Адрес: no guild
Возраст: 36
Сообщений: 673
Репутация: 9 [+/-]
на правильном пути, пока что (от 5 до 15)
Boriska на правильном пути, пока что (от 5 до 15)
Чар: Boriska
Гильдия: no guild
По умолчанию Re: МАКРОСЫ

Цитата:
Сообщение от eterrr Посмотреть сообщение
Подскажите пожалуйста, почему пилот и клиент никак не реагируют на макр?
мб в пилоте версия клиента не та по умолчанию , у меня 1,26,4b стоит когда запускаю , меняю на 2,0,3 и макры начинают работать . (это во вкладке Ещё )
__________________
aka Boriska
"главное чтоб войны небыло!"(с)
Boriska вне форума   Ответить с цитированием
Re: МАКРОСЫ
Старый 14.08.2018, 19:11   #1013
Tugarin
The Hero
 
Регистрация: 20.06.2013
Сообщений: 568
Репутация: 16 [+/-]
на правильном пути (от 16 до 25)
Tugarin на правильном пути (от 16 до 25)
Чар: Tugarin
По умолчанию Re: МАКРОСЫ

Цитата:
Сообщение от eterrr Посмотреть сообщение
Подскажите пожалуйста, почему пилот и клиент никак не реагируют на макр?
Лично у меня не определяет кирилицу...
Повторю свое сообщение отсюда ([Только зарегистрированные пользователи могут видеть ссылки. Регистрация!])

Цитата:
Сообщение от Tugarin Посмотреть сообщение
У меня кирилица не работает. И я не вижу смысла проверять сообщения так, как в приведенном скрипте.

Вариант 1 (простой)

say all release
send f9 //таргет некст
wait 100
send f8 //использование палки по ласттаргету
if lastmsg tame hungry
say ЖРАТЬ ДАВАЙ
end_if
if lastmsg remembers
goto Pause
end_if
wait 20000
:Pause
wait 700000 // подбирается время полного забывания
При первом варианте, если ты попадаешь на себя, просто подождешь 20 секунд и скрипт пойдет дальше.

Вариант 2 (продвинутый)

set #k 15 //количество животных
// Формирование массива
set %m[1] 111111 // ИД животного (через УО пилот)
set %m[2] 222222
....
set %m[15] 151515
:TamingNext
while #k > 0
say all release
set lasttargetid %m [#k]
send f9 //использование палки по последней цели
wait 20000 // подбирается время таминга. Можно и по последнему сообщению, если ждать не хочется
set #k #k - 1
if tame hungry
say Кушать хочется
end_if
end_while
set #k 15
wait 700000 // подбирается время полного забывания
go to TamingNext
end_script
Но тут придется помучаться немного и записать ИД каждого животного. Но зато будет работать на ура
Tugarin вне форума   Ответить с цитированием
Re: МАКРОСЫ
Старый 16.08.2018, 12:30   #1014
KDbled
Newbie
 
Регистрация: 03.04.2012
Возраст: 39
Сообщений: 25
Репутация: 1 [+/-]
имеет нулевую репутацию
KDbled имеет нулевую репутацию
Чар: KDbled
По умолчанию Re: МАКРОСЫ

Поломка антимакроса.
Экран должен быть открыт. Версия пилота посвежее.
Применяется как модуль к другим скриптам.


set $Path C:\
set $exp .bmp
set #acc 80
set #step 300
set #p 0
:begin
set #n 0
set $name ams
set #startX 0
set #startY 0
set #endX 640
set #endY 480
return
:find
wait #step
set $c findimage (#startX #startY #endX #endY ($Path$name$exp) %crds 2 #acc 1 0 abs)
if $c > 0
pause_script 0
set #x %crds[1 1]
set #y %crds[1 2]
set $name c
:findfor
if #p = 1 and #startX = 0
set #p 0
set #startX #x
set #startY #y + 34
set #endX #x + 128
set #endY #y + 88
end_if
if #p = 0 and #startX = 0
set #p 1
set #startX #x - 63
set #startY #y + 34
set #endX #x + 3
set #endY #y + 86
end_if
return
For #n 1 8 1
wait #step
set $c findimage (#startX #startY #endX #endY ($Path$name#n$exp) %crds 2 #acc 1 0 abs)
if $c > 0
set #startX #x - 63
set #startY #y + 105
set #endX #x + 132
set #endY #y + 210
wait #step
set $c findimage (#startX #startY #endX #endY ($Path$name#n$exp) %crds 2 #acc 1 0 abs)
set #x %crds[1 1]
set #y %crds[1 2]
wait #step
move #x #y
wait #step
left #x #y
if #p = 0
goto findfor
else
goto begin
end_if
end_if
end_for
else
goto find
end_if
resume_script 0
goto begin



Ссылка на картинки, надо распаковывать на диск C: [Только зарегистрированные пользователи могут видеть ссылки. Регистрация!]
KDbled вне форума   Ответить с цитированием
Re: МАКРОСЫ
Старый 18.09.2018, 19:32   #1015
Bocxoq
The Hero
 
Аватар для Bocxoq
 
Регистрация: 27.03.2010
Возраст: 37
Сообщений: 510
Репутация: -3 [+/-]
плохо соблюдает правила форума (от -5 до -15)
Bocxoq плохо соблюдает правила форума (от -5 до -15)
Чар: Bocxoq
По умолчанию Re: МАКРОСЫ

И рабочая? Что-то не выходит её настроить

Прокачивал себе кампинг и написал простенький скрипт, может кому пригодиться.

6к хвороста и 2 часа времени с 30 до 100
качаем его с плота, почему-то костры разводятся на воде и вместе с плотом не передвигаются, так что можно этим воспользоваться.

drag 507, 384 583, 370 1 // откуда куда перекладывать по 1 хвороста
double_kleft 576, 366 // координаты одинарной кучки хвороста
if lastmsg the ground
say forward right
wait 1000
say stop
end_if

Последний раз редактировалось Bocxoq; 18.09.2018 в 20:11..
Bocxoq вне форума   Ответить с цитированием
Ответ


Опции темы
Опции просмотра

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Выкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
ПВП макросы MDEA Ньюби Таун 35 08.07.2007 17:23
Про макросы! Dvalin Ньюби Таун 3 21.02.2007 20:51





Powered by: vBulletin® Version 3.8.7
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
© 2004-2019 Forgotten World