МАКРОСЫ

[shmelek]

//f10 - бинты на себя в асисте.
//скрипт просто выхиливает себя до 125, если раскоментировать else и далее то будет бить по координатам если вы стоите в вармоде.

if hits < 125 // можно поставить str вместо цифры если не паритесь о количестве бинтов и будет выхиливать даже когда не хватает 1 хп, я занизил эту цифры т.к. хилинг качается быстрее чем парри а еще потом можно будет на спел резисте хилинг довести.
send f10
wait 2100
//else
//double_left 447, 253 // ctrl+a для вычета координат.
//wait 2500
end_if

[MODO]

Для того чтобы бить кого нужно есть Atack last

[Wartik]

Может кто то мне помочь. Можно было в спирте прописать что бы он координаты персонажа проверял с прошлыми местом нахождения. Что то типа set charposX ili Y a потом их можно было проверить суть в том когда ты ходишь на макросе что бы он проверял и если уперся перенимал другие действия.

[Sindo]

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

Может кто то мне помочь. Можно было в спирте прописать что бы он координаты персонажа проверял с прошлыми местом нахождения. Что то типа set charposX ili Y a потом их можно было проверить суть в том когда ты ходишь на макросе что бы он проверял и если уперся перенимал другие действия.

Будучи во спирту и не такое прописать можно.)
А по теме - 13е сообщение в этой же теме Вам в помощь.

P.S. Поправил слово в 15м посте, слетело форматирование кода. Т_Т

[MODO]

Когда делаешь шаг
set #myx charposx
set #myy charposy
send "кнопка ходьбы"
wait 100
if charposx = #myx and charposy = #myy
//действие когда уперся
end_if

[Juggernaut]

Есть у кого скрипт на ламбер, что бы ходил рубил по лесу? Тут были такие что по линии или вокруг себя - это все не очень. Можно без рекалов и.т.д Просто чтоб ходил по лесу и рубил +)

[Wartik]

Не работает пишет мол не известная команда

[Георгий]

Привет народ. У меня вопрос не скромный. Я вот все ни как не могу начать прокачку хилинга и паринга, макрос нашел чтобы лилися бинтами, но вот как сделать, чтобы он не атачил оппонентов)))???

[MODO]

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

Не работает пишет мол не известная команда

На какой строке?

[sskrd]

Сообщение от Георгий

Привет народ. У меня вопрос не скромный. Я вот все ни как не могу начать прокачку хилинга и паринга, макрос нашел чтобы лилися бинтами, но вот как сделать, чтобы он не атачил оппонентов)))???

Во время лечения и так не будет атачить, а так можно таб клацать.

if hits < 100
send f2

wait 2000
end_if

send tab
wait 300

f2 - бинты на себя, щит в руки

[MODO]

Сообщение от Георгий

но вот как сделать, чтобы он не атачил оппонентов)))???

Когда начнет лечится сам по себе перестанет бить.

[Георгий]

спасибо за ответы
ЗЫ
Вот по этому макросу

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

Во время лечения и так не будет атачить, а так можно таб клацать.

if hits < 100
send f2

wait 2000
end_if

send tab
wait 300

f2 - бинты на себя, щит в руки

когда стояло wait 2000, он делал вид что лечится, израсходовал в минуту 50+ бинтов и ни 1го хп не востановил. Установил Wait 4000, все стало оки

[Funeral]

а скрипт на реконектор можно? а то инет плохой.. а лоры качать надо

[Maniak]

Народ помогите, что делаю не так? Ниже макрос из 20 поста, через ассист все работает отлично, но там Sindo пишет, что нужно заменить, чтобы можно было без ассиста запустить, так вот заменил вроде как Sindo пишет, но чет не работает скрипт, что в нем не так я заменяю, что сделать надо чтобы заработал без ассиста поправьте плиз!?

// Parrying с отходом-подходом by Sindo
set lastobjecttype 1234567890 // ИД бинтов в паке
send F1 // LastObject/WaitForTareget/TargetSelf в клиенте
set lastobjectid 1234567899 // ИД щита в паке
send F2 // LastObject в клиенте
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

[VeroSsa]

В чем имено ошибка? какой пункт несрабатывает?

[MODO]

set lastobjecttype 1234567890 // ИД бинтов в паке Сделай даблклик на бинты и вставь туда lastobjecttype(не путать с lastobjectid) из пилота. и в строку set lastobjectid 1234567899 // ИД щита Сделай дабл клик на щит и скопируй из пилота lastobjectid не путать с lastobjecttype

[Maniak]

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

В чем имено ошибка? какой пункт несрабатывает?

кнопки забиндил в клиенте, кнопки работают, выставляю ид бинтов в паке и ид щита, жму старт скрипт...

на этом месте дальше не работает!

if hits < str // ограничение нормы хп ставить по своему усмотрению
while hits < str
gosub saver
set lastobjecttype
wait #hw// задержка на хилл
end_while
end_if

goto start

Добавлено через 10 минут

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

set lastobjecttype 1234567890 // ИД бинтов в паке Сделай даблклик на бинты и вставь туда lastobjecttype(не путать с lastobjectid) из пилота. и в строку set lastobjectid 1234567899 // ИД щита Сделай дабл клик на щит и скопируй из пилота lastobjectid не путать с lastobjecttype

Сделал все как ты сказал, пишет (15): Ошибка! Проверьте правильность скрипта! EConvertError

Че не так?

[MODO]

скопируй новый вариант уже с введенными ИД

[Maniak]

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

скопируй новый вариант уже с введенными ИД

// Parrying с отходом-подходом by Sindo
set lastobjecttype 3617 // ИД бинтов в паке
send F1 // LastObject/WaitForTareget/TargetSelf в клиенте
set lastobjectid 1074686449 // ИД щита в паке
send F2 // LastObject в клиенте
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
et lastobjecttype
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)
set lastobjecttype
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

[MODO]

На какой строке останавливается?

[Maniak]

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

На какой строке останавливается?

if hits < str // ограничение нормы хп ставить по своему усмотрению
while hits < str
gosub saver
set lastobjecttype
wait #hw// задержка на хилл
end_while
end_if

goto start

этот участок! ниже не идет...

[MODO]

Он и не долежн идти ниже, только когда ХП будет меньше чем максимум

[Maniak]

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

Он и не долежн идти ниже, только когда ХП будет меньше чем максимум

Когда хп не максимум, выдает это, на том же месте...
пишет (15): Ошибка! Проверьте правильность скрипта! EConvertError

[MODO]

// Parrying с отходом-подходом by Sindo
set lastobjecttype 3617 // ИД бинтов в паке
send F1 // LastObject/WaitForTareget/TargetSelf в клиенте
set lastobjectid 1074686449 // ИД щита в паке
send F2 // LastObject в клиенте
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
set lastobjecttype 3617
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)
set lastobjecttype 3617
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

[Maniak]

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

// Parrying с отходом-подходом by Sindo
set lastobjecttype 3617 // ИД бинтов в паке
send F1 // LastObject/WaitForTareget/TargetSelf в клиенте
set lastobjectid 1074686449 // ИД щита в паке
send F2 // LastObject в клиенте
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
set lastobjecttype 3617
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)
set lastobjecttype 3617
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

1 раз хилит после включения скрипта, щит сам не берет почему то, после 1 хила бинтами, скрипт работает, но ничего вообще не происходит, не хилится, щит не берет... Отходить, отходит как положено, просто почему то не работает хил бинтами и щит не берет! (((
В чем же дело, всю голову сломал, вторые сутки мучаюсь блин! ((( Ид все правельные, 100 тысяч раз уже проверил!



Добавлено через 1 час 40 минут

[Джелу]

Сделайте макрос в асисте на лечение бинтами и одевание щита, на свойство бинтов поставьте итем_тайп_айди, и потом в пилоте вызывается заданную кнопку и будет все работать

[Maniak]

Сообщение от Джелу

Сделайте макрос в асисте на лечение бинтами и одевание щита, на свойство бинтов поставьте итем_тайп_айди, и потом в пилоте вызывается заданную кнопку и будет все работать

Мне нужно сделать это без ассиста...
Я писал выше с Ассистом все работает, но мне нужно без ассиста... Sindo написал, что все может работать и без ассиста, я сделал все как сказал Sindo, но не работает, Modo очень помогает, он приблизил меня к рабочему варианту, но все равно в чем то загвостка в скрипте, кто знает может исправить ошибку и подсказать в чем ошибка? Скрипт вроде маленький и легкий, кто понимает я думаю не составит труда выявить ошибку!
Кто нибудь может мне помочь?

[PuPs]

Вот так должно работать.

// Parrying с отходом-подходом by Sindo
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
set lastobjecttype 3617 // ИД бинтов в паке
send F1 // LastObject/WaitForTareget/TargetSelf в клиенте
set lastobjectid 1074686449 // ИД щита в паке
send F2 // LastObject в клиенте
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)
set lastobjecttype 3617 // ИД бинтов в паке
send F1 // LastObject/WaitForTareget/TargetSelf в клиенте
set lastobjectid 1074686449 // ИД щита в паке
send F2 // LastObject в клиенте
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

[Funeral]

а нащет рекконекта ничего нет?

[Maniak]

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

Вот так должно работать.

// Parrying с отходом-подходом by Sindo
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
set lastobjecttype 3617 // ИД бинтов в паке
send F1 // LastObject/WaitForTareget/TargetSelf в клиенте
set lastobjectid 1074686449 // ИД щита в паке
send F2 // LastObject в клиенте
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)
set lastobjecttype 3617 // ИД бинтов в паке
send F1 // LastObject/WaitForTareget/TargetSelf в клиенте
set lastobjectid 1074686449 // ИД щита в паке
send F2 // LastObject в клиенте
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

Теперь он 1 раз хилит себя, после 1 раза берет щит и больше не юзает бинты... (((
И после этого скрипт подвисает на этом участке:

while hits < str
gosub saver
set lastobjecttype 3617 // ИД бинтов в паке
send F1 // LastObject/WaitForTareget/TargetSelf в клиенте
set lastobjectid 1074686449 // ИД щита в паке
send F2 // LastObject в клиенте
wait #hw// задержка на хилл

мы близки к разгадке люди )
Ну все же почему не хочет хилится?

[MODO]

Не стал дальше копаться, сделал по своему, скачай пилот версии 2.31 и паузу между строк установи 2

while_not hits < 80
set lastobjecttype 3617 // Type бинтов
send F1
set lastobjectid 1074686449 // ID щита
send F2
wait 2500 // Задержка на хилинг
end_while
set #po charposy - 1
while_not charposy = #po
set #go charposy - 1
set #di chardir
send217 pageup
set timer 0
while_not (charposy = #go) or (chardir <> #di) or (timer > 1000)
end_while
set #di chardir
end_while

while_not hits = str
set lastobjecttype 3617 // Type бинтов
send F1
set lastobjectid 1074686449 // ID щита
send F2
wait 2500 // Задержка на хилинг
end_while
set #po charposy + 1
while_not charposy = #po
set #go charposy + 1
set #di chardir
send217 end
set timer 0
while_not (charposy = #go) or (chardir <> #di) or (timer > 1000)
end_while
set #di chardir
end_while
end_if

[Maniak]

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

Не стал дальше копаться, сделал по своему, скачай пилот версии 2.31 и паузу между строк установи 2

while_not hits < 80
set lastobjecttype 3617 // Type бинтов
send F1
set lastobjectid 1074686449 // ID щита
send F2
wait 2500 // Задержка на хилинг
end_while
set #po charposy - 1
while_not charposy = #po
set #go charposy - 1
set #di chardir
send217 pageup
set timer 0
while_not (charposy = #go) or (chardir <> #di) or (timer > 1000)
end_while
set #di chardir
end_while

while_not hits = str
set lastobjecttype 3617 // Type бинтов
send F1
set lastobjectid 1074686449 // ID щита
send F2
wait 2500 // Задержка на хилинг
end_while
set #po charposy + 1
while_not charposy = #po
set #go charposy + 1
set #di chardir
send217 end
set timer 0
while_not (charposy = #go) or (chardir <> #di) or (timer > 1000)
end_while
set #di chardir
end_while
end_if

Сделал все как сказал! Не работает! Не хилится бинтами, я сам хилю 1 раз, скрипт только берет щит и все! ((( И еще он отходит на 1 шаг почему то, на 1 тайл, хотя должен идти пока не упрется в препятствие... ((
Почему не хилит бинтами? Modo, он должен отходить на 1 тайл?

Подвисает после этого скрипт на этом участке:
while_not hits = str
set lastobjecttype 3617 // Type бинтов
send F1
set lastobjectid 1074686449 // ID щита
send F2
wait 2500 // Задержка на хилинг

ПОМОГИТЕЕЕЕ ПОЖАЛУЙСТА
Нервы на пределе

[MODO]

Да, тут на 1 тайл отходит чтобы вернуться потом на то же место где и был. Сделаю на 2 шага, и возвращаться будет туда же где и стоял. Прийдется указывать не тип бинтов а их ID а это значит что каздый раз когда ты добавляешь еще бинтов или просто ложишь новые нунжо будет вписывать новый ID так как вещь новая и ID свой собственный? Поэтому если нужно много хилиться накидай бинтов побольше заранее



while_not hits < 80
set lastobjectid 1075143463 // ID бинтов
send217 f1
wait 300
set lastobjectid 1075154605 // ID щита
send217 f2
wait 2500 // Задержка на хилинг
end_while
set #po charposy - 2
while_not charposy = #po
set #go charposy - 1
set #di chardir
send217 pageup
set timer 0
while_not (charposy = #go) or (chardir <> #di) or (timer > 1000)
end_while
set #di chardir
end_while

while_not hits = str
set lastobjectid 1075143463 // ID бинтов
send217 f1
wait 300
set lastobjectid 1075154605 // ID щита
send217 f2
wait 2500 // Задержка на хилинг
end_while
set #po charposy + 2
while_not charposy = #po
set #go charposy + 1
set #di chardir
send217 end
set timer 0
while_not (charposy = #go) or (chardir <> #di) or (timer > 1000)
end_while
set #di chardir
end_while
end_if

[Maniak]

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

Да, тут на 1 тайл отходит чтобы вернуться потом на то же место где и был. Сделаю на 2 шага, и возвращаться будет туда же где и стоял. Прийдется указывать не тип бинтов а их ID а это значит что каздый раз когда ты добавляешь еще бинтов или просто ложишь новые нунжо будет вписывать новый ID так как вещь новая и ID свой собственный? Поэтому если нужно много хилиться накидай бинтов побольше заранее



while_not hits < 80
set lastobjectid 1075143463 // ID бинтов
send217 f1
wait 300
set lastobjectid 1075154605 // ID щита
send217 f2
wait 2500 // Задержка на хилинг
end_while
set #po charposy - 2
while_not charposy = #po
set #go charposy - 1
set #di chardir
send217 pageup
set timer 0
while_not (charposy = #go) or (chardir <> #di) or (timer > 1000)
end_while
set #di chardir
end_while

while_not hits = str
set lastobjectid 1075143463 // ID бинтов
send217 f1
wait 300
set lastobjectid 1075154605 // ID щита
send217 f2
wait 2500 // Задержка на хилинг
end_while
set #po charposy + 2
while_not charposy = #po
set #go charposy + 1
set #di chardir
send217 end
set timer 0
while_not (charposy = #go) or (chardir <> #di) or (timer > 1000)
end_while
set #di chardir
end_while
end_if

Modo, а ты можешь сделать чтобы отходил пока не упрется в что то? и возвращается когда полностью отхилился, тоже пока не упрется, ну или хотябы не на 2 шага, а на 4. При прокачке арчери, это очень принципиально!
По поводу каждый раз писать новый Ид гона нет вообще, пусть так и будет!

[MODO]

А зачем столько? И чтобы вернулся именно на то место это нужно считать сколько прошел и тд, заморочек много. Я когда качался 2 тайла отходил и все, меня мульт бил. А при прокачке арчери вообще 1 шаг делал, он заходит за сундук или любую другую подобную вешь и отхиливается и делает шаг назад И не нужно столько ходить 2 шага максимум.