МАКРОСЫ

[pako]

^Dead^
Да я уже понял что гемор, поковырялся пару дней и забил)

Тут у меня новый вопрос на этот раз по минингу.
Есть вот такой замечательный скрипт, который меня полностью устраивает.
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 targeting) or (lastmsg you have)
alarm
flash
end_script
end_if
goto mining
end_if
end_for
alarm
flash
end_script

Но захотелось мне определённую руду копать, ну то есть если у меня купер попёр,
макрос не выкапывал бы его до упора а переходил на следующею точку.
Я не супер скриптер, потыкался, потыкался, но так ничего не получилось(
Может кто подсобит и скажет что и где в этом скрипте дописать.
Заранее благодарен!)

[^Dead^]

Сообщение от pako

^Dead^
Да я уже понял что гемор, поковырялся пару дней и забил)

Тут у меня новый вопрос на этот раз по минингу.
Есть вот такой замечательный скрипт, который меня полностью устраивает.
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 targeting) or (lastmsg you have)
alarm
flash
end_script
end_if
goto mining
end_if
end_for
alarm
flash
end_script

Но захотелось мне определённую руду копать, ну то есть если у меня купер попёр,
макрос не выкапывал бы его до упора а переходил на следующею точку.
Я не супер скриптер, потыкался, потыкался, но так ничего не получилось(
Может кто подсобит и скажет что и где в этом скрипте дописать.
Заранее благодарен!)

Хм, честно говоря за все годы игры такого не встречал) Точечно копать проще по камням конечно, но по типу выставить можно попробовать(либо по цвету),чтобы следующую тейлу тыкал как ненужная выкапывается.

[pako]

Ну я пробовал задавать условие
if lastmsg (тут та фраза когда выкапываешь напимер купер) or (другая руда)
Только не понятно что вписывать дальше, рипит? тогда он повторит заново по тем точкам что я уже копал.
Вот мне и не понятно что и где вписать)

[MrDron]

Сообщение от HEKTO

В чем проблема? Качаю ветеринарию
send f2 // в асисте бинты на лошадь, даггер на лошадь (бинты и даггер на итем тайп)
wait 2700
if lastmsg Do you wanna make a mummy?
send f1 // атакласт
wait 2000
send enter
wait 250
say all stop
end_if

Скрипт не видит сообщение "Do you wanna make a mummy?"

Конечно он его не видит потому как у тебя написано "if lastmsg Do you wanna make a mummy" а не юз дагера, он является ласт месенджером дагер!!!

[CooL02]

есть укого таминг скрипт

[FeZaRuM]

В ассисте на j - next target NPC
на K - usetype посох таминга и lasttarget.
Еще, рекомендовал бы на K в начало выставить warmode off, чтобы если кто-то на тебя paralyze field закинет, пока ты стоишь на макре, то продолжал тамить, а не ругался, что стоишь в режиме войны.
С табуляцией тут проблемы, поэтому так криво выкладываю.

set $f1 You fail to tame the creature
set $a1 accept
set $f7 tame hungry
set $f6 приручать
set $f5 Taming
set $f4 Loved
set $f2 You see
set $a2 Your skill
set $f3 too far away
set $ot This creature already tame
if lastmsg $ot
send j
wait 100
send k
say all release
end_if
if lastmsg $f1
send k
end_if
if lastmsg $a1
say all release
send j
wait 100
send k
end_if
if lastmsg $f7
say all release
wait 1000
send j
wait 100
send j
end_if
if lastmsg $f6
say all release
wait 100
send j
wait 100
send k
end_if
if lastmsg $f5
say all release
send j
wait 100
send k
end_if
if lastmsg $f4
say all release
wait 700000
send k
end_if
if lastmsg $f2
send k
end_if
if lastmsg $a2
send k
end_if
if lastmsg $f3
send j
wait 100
send k
end_if
if timer > 800000
say all release
send j
wait 100
send k
set timer
end_if
if lastmsg World save
wait 10s
send k
end_if

[Sanchoz]

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

[n0thing]

Сообщение от Sanchoz

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

ЛОВИ! Макрос позволяет ходить , рубить , любить! (ОСТОРОЖНО , ВОЗМОЖНА ВЫЛАЗКА ЗА ГЗ , где ты можешь вырубить гвардов)
F8 у меня Last object, wait for target, last target
На топор два клика и на дерево , потом запускаешь макрос.
В чате должно быть пусто (!!!)


set #tau 0
set #squareside 18
gosub getxy
set #startx #x
set #starty #y
:start
for #ddy 0 #squareside 2
for #ddx 0 #squareside 2
set #rr (#ddy / 4) * 4
if #rr = #ddy
set #targetx #startx + #ddx
else
set #targetx #startx + #squareside - #ddx
end_if
set #targety #starty + #ddy
gosub goxy
gosub lumber
end_for
end_for
goto start

:goxy
gosub getxy
if #x < #targetx
set #dir 2
set #steps #targetx - #x
set #steps #steps * 4
gosub walkdir
end_if
if #x > #targetx
set #dir 6
set #steps #x - #targetx
set #steps #steps * 4
gosub walkdir
end_if
if #y < #targety
set #dir 4
set #steps #targety - #y
set #steps #steps * 3
gosub walkdir
end_if
if #y > #targety
set #dir 0
set #steps #y - #targety
set #steps #steps * 3
gosub walkdir
end_if
gosub getxy
if (#x = #targetx) and (#y = #targety)
return
else
set #dir random (8)
set #steps 1
gosub walkdir
end_if
goto goxy

:getxy
set #x charposx
set #y charposy
set #x (#x / 4)
set #y (#y / 3)
return

:walkdir
set #tau 25
if #dir <> chardir
set #steps #steps + 1
end_if
if #dir = 0
repeat #steps
send PageUp #tau
end_repeat
end_if
if #dir = 1
repeat #steps
send Right #tau
end_repeat
end_if
if #dir = 2
repeat #steps
send PageDown #tau
end_repeat
end_if
if #dir = 3
repeat #steps
send Down #tau
end_repeat
end_if
if #dir = 4
repeat #steps
send End #tau
end_repeat
end_if
if #dir = 5
repeat #steps
send Left #tau
end_repeat
end_if
if #dir = 6
repeat #steps
send Home #tau
end_repeat
end_if
if #dir = 7
repeat #steps
send Up #tau
end_repeat
end_if
return

:lumber
//set #cnt 0
//send F8 3000
for #dx 0 4 4
for #dy 0 3 3
set #x charposx
set #y charposy
set #x (#x / 4) * 4 + #dx
set #y (#y / 3) * 3 + #dy
set lasttargetx #x
set lasttargety #y
gosub work
end_for
end_for
return

:work
set #tau 230
send F8 #tau
set timer 0
:loop
if (lastmsg you put) or (lastmsg you can) or (lastmsg changed) or (lastmsg you hack) or (lastmsg increased) or (lastmsg yourself well)
send F8 #tau
set timer 0
end_if
if (lastmsg no logs left here) or (lastmsg try chopping a tree) or (lastmsg too far) or (timer > 5000)
wait #tau
return
end_if
goto loop

[Maxim]

и не забудь в УоПилоте в последней вкладке выставить версию Ассиста, ибо может не рубить, если версия не совпадет

[Sanchoz]

Спасибо сейчас попробую, а какую версию ассиста нужно ставить?

Добавлено через 9 минут
Сделал все как написано, вырубывает полностью дерево которое я начал рубить руками а потом просто идет в низ останавливается постоит и снова идет. версия ассиста 1.26.4b

Добавлено через 18 минут
перепробовал все версии ассиста что есть все делает как описано выше, можешь сделать чтоб я сам ходил а он только вырубывал все логи автоматически.

[Maxim]

перед запуском макроса выставь задержку по-меньше, я ставил 10 мс и в игре нажми энтер, чтобы не было никаких символов в чате, может из-за этого тупить.

[n0thing]

Сообщение от Sanchoz

Спасибо сейчас попробую, а какую версию ассиста нужно ставить?

Добавлено через 9 минут
Сделал все как написано, вырубывает полностью дерево которое я начал рубить руками а потом просто идет в низ останавливается постоит и снова идет. версия ассиста 1.26.4b

Добавлено через 18 минут
перепробовал все версии ассиста что есть все делает как описано выше, можешь сделать чтоб я сам ходил а он только вырубывал все логи автоматически.

Ещё нужно , чтобы ты даблклик на топор и на дерево.
после этого запускать макрос.
В чате должно быть пусто. и F8 - Last object , wait for target , last target

[illusory]

Сообщение от Sanchoz

Добавлено через 18 минут
можешь сделать чтоб я сам ходил а он только вырубывал все логи автоматически.

:start
if (lastmsg you put) or (lastmsg you loosen) or (lastmsg there are no logs) or (lastmsg that's too far) or (lastmsg you hack at the) or (lastmsg you can't think)
if (lastmsg you put) or (lastmsg you loosen) or (lastmsg you hack at the)
wait 500
send f11 1500
send f8
gosub start
end_if
wait 500
send f11 2500
send f7
:wait
if target = 0
gosub wait
end_if
end_if

Простенький без заморочек, но работает
Ф7 ласт общект Ф8 обжект вейт фо таргет ласт таргет Ф11 трекинг

[Sanchoz]

попробовал, макрос бегает по первым 2-ум строкам и все,чар стоит на месте и не рубит, все кнопки забил как написано сначала начал рубить руками потом включил макрос...
:start
if (lastmsg you put) or (lastmsg you loosen) or (lastmsg there are no logs) or (lastmsg that's too far) or (lastmsg you hack at the) or (lastmsg you can't think)
Дальше не идет где ошибка или че-то я не так делаю???

[illusory]

Сообщение от Sanchoz

попробовал, макрос бегает по первым 2-ум строкам и все,чар стоит на месте и не рубит, все кнопки забил как написано сначала начал рубить руками потом включил макрос...
:start
if (lastmsg you put) or (lastmsg you loosen) or (lastmsg there are no logs) or (lastmsg that's too far) or (lastmsg you hack at the) or (lastmsg you can't think)
Дальше не идет где ошибка или че-то я не так делаю???

Пилот не видит сообщений! Нужно в настройках пилота выставить тот клиент через который запускаешь игру.

[Sanchoz]

В настройках пилота нажал W выбрал FW Assist macros management... происходит то же самое ((

[illusory]

Сообщение от Sanchoz

В настройках пилота нажал W выбрал FW Assist macros management... происходит то же самое ((

вкладка <Еще> есть окошечко Cl.v. - там поставить версию клиента через которую запускаешь игру (обычно это 1.26.4b но лично я играю на 2.0.3)
Чуть ниже есть окошко там можно выбрать операционку поставь Висту

[Sanchoz]

Спасибо,друг, поставил версию 2.0.3 и заработало!!! СПАСИБО за терпение))

[illusory]

Сообщение от Sanchoz

Спасибо,друг, поставил версию 2.0.3 и заработало!!! СПАСИБО за терпение))

[Sanchoz]

Ребята, подскажите пожалуйсто актуальный скрипт на таминг!!! Хочу купить овечек штук 5 и тамить их в загоне, заранее благодарю.

[n0thing]

Сообщение от Sanchoz

Ребята, подскажите пожалуйсто актуальный скрипт на таминг!!! Хочу купить овечек штук 5 и тамить их в загоне, заранее благодарю.

введи в поиске на форуме taming, сразу получишь кучу макросов
надо 10 овец , так быстрей. ибо качается долго)
дня 3-4 качал , до 60

[Sanchoz]

вот мне нравится как во всех темах пишут одно и то же-пользуйтесь поиском и все найдете... я вот сделал так как написано постом выше- ввел в поиск taming, нажал энтер выдало результат [Только зарегистрированные пользователи могут видеть ссылки. Регистрация!] и толку от поиска???? все равно нужно брать шерстить все темы в ручную, находить кучу не рабочих или написанных с ошибками скриптов и тд, скажите не легче просто взять и выложить рабочий, актуальный скрипт если он у вас есть и получить кучу благодарности в замен чем писать пользуйтесь поиском который тупо кидает на форум.

Добавлено через 1 час 5 минут
Ребят, вопрос такой, я нашел рабочий скрипт на таминг, зачем нужно 10 овец если после того как чар затамливает 1ну овцу он ее тут же отпускает, я могу качаться на 1ой овце или нет? Вот скрипт
set $f1 You fail to tame the creature

set $a1 accept

set $f7 tame hungry

set $f6 приручать

set $f5 Taming

set $f4 remembers

set $f2 You see

set $a2 Your skill

set $f3 too far away

if lastmsg $f1

send f2

end_if

if lastmsg $a1

say all release

send f3

wait 100

send f2

end_if

if lastmsg $f7

say all release

wait 1000

send f3

wait 100

send f2

end_if

if lastmsg $f6

say all release

wait 100

send f3

wait 100

send f2

end_if

if lastmsg $f5

say all release

send f3

wait 100

send f2

end_if

if lastmsg $f4

say all release

wait 700000

send f2

end_if

if lastmsg $f2

send f2

end_if

if lastmsg $a2

send f2

end_if

if lastmsg $f3

send f3

wait 100

send f2

end_if

if timer > 800000

say all release

send f3

wait 100

send f2

set timer

end_if

[illusory]

Сообщение от Sanchoz

я могу качаться на 1ой овце или нет?

нет нужно минимум 10 штук, так как живка когда она одна или две и т.п. как бы тебя помнит и при приручении ее скилл не растет

[Sanchoz]

понял, спасибо.

Добавлено через 11 часов 0 минут
Подскажите пожалуйсто, начал я тамить вот этим скриптом [Только зарегистрированные пользователи могут видеть ссылки. Регистрация!] сделал все как написано... запустил макрос дабл клик на посох и на себя-чар стоит и ни чего не делает, делаю дабл клик на посох и на овцу чар тамит как мне кажется всех овец по очереди и останавливается, просто стоит ,а макрос во всю работает, вопрос-почему так происходит (макрос устарел или у меня какие то ошибки)?

[Sanchoz]

удалил

[SUSLIK_BOMBA]

У кого есть скрипт на прокачку Некромансии со свитка игнишн?

Добавлено через 27 минут
Или подскажите как записать макрос так что бы свиток кастовался на следующего элемента земли

[Sanchoz]

Ребят, помогите скриптом на Camping чтоб брал из кучи по 1ой щепке раскладывал вокруг себя и поджигал, заранее благодарю!!!

[illusory]

Сообщение от SUSLIK_BOMBA

Или подскажите как записать макрос так что бы свиток кастовался на следующего элемента земли

Use item type //Юзаешь свитки меняешь по типу
Next Target NPC //Правой клавишей в окне макроса
Target on Last Target //Там же

[SUSLIK_BOMBA]

Подскажите че за фигня, стоял на скрипте, кастовал элементалов и сжигал их. Теперь после обновы. скрипт не пашет. Пишет "You are at peace". Стою не в Гз, за Гз. Не в зоне дома.

Добавлено через 30 минут
if mana < 100 // Ваше количество манны
send f10 // В Ультиме биндим Юз скилл медитация
wait 100 // Задержка в три секунды
else // Иначе
repeat 2 // Если надо то повторяем каст магии 10 раз если нет то блокируем репит
send f9 // в Ультиме биндим Castspell>>Poison>>wait for target>>target self
wait 3000
end_repeat
end_if
Почему скрипты такого плана не работают? После восполения маны, скпирт не работает дальше?

[Sanchoz]

Ребят, что на кемпинг ни у кого нет рабочего скрипта, чтоб на ночь поставить?

[pipka]

берешь плот, ставишь чтобы он плыл куданить на W, ставишь в пилоте чтоб кидал по координатам в одну точку и по этим же координатам дабл клик ставишь в том же самом пилоте. УСЕ

Добавлено через 5 минут
будет чтото типо этого

drag (координаты хвороста в рюкзаке)(координаты куда кидать)
wait 200 (задержка)
repeat 3 (сколько хвороста кидать)
double_left (координаты хвороста на полу плота)
end_repeat
wait 200 (задержка)

[illusory]

Сообщение от Sanchoz

Ребят, что на кемпинг ни у кого нет рабочего скрипта, чтоб на ночь поставить?

Я брал с этой темы рабочий скрипт на кампинг
единственное что менял это координаты какие то точно не помню

[Sanchoz]

Всем спасибо, но плота у меня нет, буду пытаться сам писать скрипт...

[illusory]

При чем тут плот?
Он просто раскладывал вокруг себя. К тому моменту как клал последнюю первая уже догорала. И так по кругу.

[Sanchoz]

Сообщение от pipka

берешь плот, ставишь чтобы он плыл куданить на W, ставишь в пилоте чтоб кидал по координатам в одну точку и по этим же координатам дабл клик ставишь в том же самом пилоте. УСЕ

Добавлено через 5 минут
будет чтото типо этого

drag (координаты хвороста в рюкзаке)(координаты куда кидать)
wait 200 (задержка)
repeat 3 (сколько хвороста кидать)
double_left (координаты хвороста на полу плота)
end_repeat
wait 200 (задержка)

вот при чем ))