Скрипты

[Kassik]

Кенга, спасибо, все работает =)

Для окна дополнительного контроля скрипт на хайд будет выглядеть так:

while hidden = 0
pause_script 0
send f5 // юз скилл хайдинг
wait 3000
end_while
resume_script 0

[Overlooked]

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

For #y y, y // указываем координаты по оси у первый в левой верхней части угла бэка, второй в нижней правой
For #x x, x //аналогично с х
move #x, #y //без этого ни как иначе проверки на цвет не будет
if #x, #y xxxxx // под ххххх ставите цвет который нужно найти
wait 2s // на пролаговку
drag #x, #y // переносим предмет по найденным координатам
wait 2s
end_if
continue
end_for
end_for

правда не помню, одно continue должно быть или два.
У меня по крайней мере переносит без проблем.
и без ласт мессаг, они сбивают всё.

[Overlooked]

да для полного кайфа можно сделать проверку на вес после drag и поставить после координать 2-3 For #y y, y 3 для того что бы не каждый пиксель искал. для икса аналогично. и время на обработку строки поставить 10-20 меньше глючит. больше долго. и в принцыпе за 1 - 1,5 минуты он найдёт и перетащит то что надо =)

[Niameddin Karam-Oglu]

Ребят, у меня всеравно не копает в пещере, даже при замене строчки на lastmsg "CB. Может кто-нибудь кинуть полный скрипт с поставленными заменами? Версия пилота 207

[Kassik]

Поставь пилот 2.10, он понимает русский
И тогда строчка if lastmasg there is no ore будет выглядеть так:
set $t Тут не осталось руды.
set $lm lastmsg
if $lm = $t

[Niameddin Karam-Oglu]

Я его найти нигде не могу, кинте ссылку, если есть у кого

[Kassik]

http://uopilot.ultimasoft.ru/index_rus.html

[Niameddin Karam-Oglu]

Если не затруднит, кинь весь скрипт еще раз, в моем он вокруг себя копает, там вообще таких строк нету )

[Niameddin Karam-Oglu]

Ошибку пишет по той строке, где написано по-русски, скачал 2.10 по той ссылке, которуюб ты кидал

[Kassik]

Перед запуском дабл лефт на лопату

:begin
repeat 15
:right
send f4 // ласт обж-вфт-таргет селф
wait 500
set $t Тут не осталось руды.
set $lm lastmsg
if $lm = $t
send right
goto enda
else
wait 7000
goto right
end_if
:enda
end_repeat

send down
send down

repeat 15
:left
send f4
wait 500
set $t Тут не осталось руды.
set $lm lastmsg
if $lm = $t
send left
goto endb
else
wait 7000
goto left
end_if
:endb
end_repeat

send down
send down

goto begin

[Niameddin Karam-Oglu]

А вот как переделать такой вот скрипт, а то тот совершенно непригодный помоему, если только постоянно сидеть за компом. Спасибо конечно, но всетаки
for #y -2 2 1
for #x -2 2 1
:mining
set lasttargetx charposx + #x
set lasttargety charposy + #y
set lasttargetkind 2
send F11 2000
set timer 0
while (lastmsg do you want) and (timer < 10000)
wait 10
end_while
if_not (что тут писать?)or (А тут что?) or (и тут вот тоже что?)
wait 500
goto mining
end_if
end_for
end_for
alarm
end_script

[Niameddin Karam-Oglu]

Пробую поразному, но либо выдает ошибку, либо вообще не пашет

[Kassik]

Можно написать скрипт на БС, что б делать предмет и сразу плавить его?

[kenga]

Можно написать скрипт на БС, что б делать предмет и сразу плавить его?

Да, при помощи ассиста - в нем делаешь все, а пилотом только повторы.

[toskana1]

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

[-Mihail]

скупка регов..
не плюсите если было

//1024x768
say buy all
say bye
wait 300
left 172, 16
repeat 20
if 211, 81 23295 or 203, 80 8661289 or 192, 82 13565951 or 211, 80 2712460 or 204, 84 2177395 or 202, 89 549673 or 198, 86 2185860 or 202, 81 16768718 // координаты и цвет регов (могут не совпасть с вашим декстопом)
double_left 285, 91
left 394, 204
else
left 394, 204 
end_if
wait 100
end_repeat
repeat 45
double_left 510, 303 
end_repeat
repeat 45
double_left 512, 331
end_repeat
:click
repeat 45
double_left 513, 360
end_repeat
if 387, 360 2177379
left 561, 382
goto click
else
goto end
end_if
:end
wait 100
double_left 363, 428  
end_script

[levanikoki]

Дайте скрипт на переплавку айрона по одному.

просб бил, без ответ : (..

я тоже xочу етот скрипт )

[Gevorg]

...

drag 111 111 222 222 1 // 111 111 координаты кучки, 222 222 координаты куда тягать айрон, 1 количество штук
wait 1000
send insert // LO форжа
waitfortarget 5000 // ждем таргет
left 222 222 // таргетом на 1 айрон
wait 500

Не пробовал, но должно работать, подбирайте паузы под свой конект. Не исключено прыгание пака.

[Kassik]

Вот скрипт на ламбер

set $lm lastmsg
set $s1 you put
set $s2 Подолбив дерево инструментом вы извлекли только бесполезные опилки...Неудача!
set $s3 Тут не осталось пригодной древесины. Нечего рубить.
set $s4 you can't
set $s5 changed
set $s6 Это слишком далеко отсюда.
set $s7 you can carry
set #endless 0
send F6
waitfortarget 5000
send f10
while #endless = 0
if ($lm = $s1) or ($lm = $s2) or ($lm = $s5) or ($lm = $s7) or (timer > 6000)
send F6
waitfortarget 5000
send f10
wait 10
set timer 0
end_if
if ($lm = $s3) or ($lm = $s4) or ($lm = $s6)
send F6
wait 10
set timer 0
end_if
end_while

Не работают ластмесаги (что русские, что англицкие). Но, если после какой-нить мессаги скрипт перезапустить, то срабатывает. Как такое может быть? Посоветуйте че-нить от этого.

[levanikoki]

почему мучить

скил на ламбер на одном дереве

send F3 // lastobject, waitfortarget, lasttarget 
wait 2000 
while_not (lastmsg you put) or (lastmsg you hack) or (lastmsg Your skill in)
wait 100
end_while
if ( lastmsg "CB) or (lastmsg You See Reaper)
alarm
alarm
flash
flash
end_if
end_script