Скрипт на мининг!

[LEX II]

Люди выложите кто-нибудь макрос на мининг плиз
Тока говорите под что выкладываете, под пилот или под уоскрипт

[Pinki]

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 F9 2000 // ЛастОбжект-ВаитФорТаргет-ЛастТаргет
set timer 0
while (lastmsg do you want) and (timer < 10000)
wait 10
end_while
if_not (lastmsg no ore) or (lastmsg mining in) or (lastmsg have no line)
wait 500
goto mining
end_if
end_for
end_for
alarm
end_script