Еще один ламбер. Чар идет в направлении с
S на
N, рубит 4(или меньше, сколько есть) дерева вокруг себя, и идет по ряду к следующим четырем. И так пока во что то не упрется, обход препятствий не делал, пока лень, может сделаю позже. И так когда чар уперся, переводим его на новый ряд, или обходим препятствие если дальше есть деревья и все заново.
Чар должен быть в таком положении по отношению к деревьям:
[Только зарегистрированные пользователи могут видеть ссылки. Регистрация!]
И вот скрипт:
:num
set #num 0
:set
set #log 0
set lasttargetkind 3
set laststatictype 3280
if #num = 0
set lasttargetx charposx - 2
set lasttargety charposy + 1
end_if
if #num = 1
set lasttargetx charposx - 2
set lasttargety charposy - 2
end_if
if #num = 2
set lasttargetx charposx + 2
set lasttargety charposy - 2
end_if
if #num = 3
set lasttargetx charposx + 2
set lasttargety charposy + 1
end_if
if #num = 4
goto next
end_if
:lumber
set target 0
send f9 // Макрос в Ассисте на юз топора по типу
wait 500
if lastmsg cancelled
alarm
msg Антимакрос!
stop_script
end_if
if target = 0
goto lumber
end_if
send f3 // Кнопка Ласттаргет
wait 500
set timer
while_not (lastmsg skill) or (lastmsg put) or (lastmsg can't see) or (lastmsg can't think) or (lastmsg hack at) or (lastmsg no logs) or (lastmsg too far) or (lastmsg try) or (lastmsg destroer) or (timer > 6000)
if lastmsg world
wait 20000
say
say xD
wait 300
end_if
end_while
if wght > 620
alarm
msg Перевес!
stop_script
end_if
if (lastmsg put) or (lastmsg skill)
set #log #log + 1
end_if
if (lastmsg no logs) or (lastmsg try) or (lastmsg can't see) or (lastmsg can't think) or (lastmsg too far) or (#log = 2)
set #num #num + 1
goto set
else
goto lumber
end_if
:next
set #posy1 charposy - 5
set #posy2 charposy
send pageup
wait 100
:step
set timer
send pageup
while_not (charposy < #posy2) or (timer > 5000)
if lastmsg world
wait 20000
say
say xD
wait 300
end_if
end_while
if timer > 5000
alarm
msg Застрял!
stop_script
end_if
if #posy1 = #posy2
goto num
else
set #posy2 charposy
goto step
end_if
Добавлено через 17 минут
Да, рекомендую использовать УО пилот вресию
2.15. И здержка между строк во всех скриптах
10