Ссset $s1 is no ore here
set $s2 have no line
set $s3 try mining
set $s4 too far away
set $s5 has changed
set $s6 loosen some rocks
set $s7 has increased
set $s8 put the
for #x -2 2 1
for #y -2 2 1
set lasttargetx charposx +#x
set lasttargety charposy +#y
set lasttargetkind 2
:repeat
send F12 400
set timer
while_not (lastmsg = $s1) or (lastmsg = $s2) or (lastmsg = $s3) or (lastmsg = $s4) or (timer > 800)
while_not (lastmsg = $s5) or (lastmsg = $s6) or (lastmsg = $s7) or (lastmsg = $s8) or (timer > 2000)
end_while
if wght >= 620
repeat 5
alarm
end_repeat
pause_script
end_if
goto repeat
end_while
end_for
end_for
set #walk random 5
if #walk = 0
repeat 5
send PageUp 200
end_repeat
end_if
if #walk = 1
repeat 5
send PageDown 200
end_repeat
end_if
if #walk = 2
repeat 5
send Home 200
end_repeat
end_if
if #walk = 3
repeat 5
send End 200
end_repeat
end_if
if #walk = 4
repeat 5
send Up 200
end_repeat
end_if
if #walk = 5
repeat 5
send Down 200
end_repeat
end_if
if #walk = 6
repeat 5
send Left 200
end_repeat
end_if
if #walk = 7
repeat 5
send Right 200
end_repeat
end_if Значит дальше так:
запускаешь пилот. Открываешь владку "Скрипт", в поле для скрипта забиваешь то что написано выше. Дальше идешь в Ультиму. Слезаешь с животного, если сидишь на нем, и два раза кликаешь на чара. Появится окно е его изображение и кнопочками слева. Кликаешь на Options, и выбираешь вкладку Macro Options - она находится слева в самом низу, нарисована на ней стрелка круговая... Там нажимаешь Add - у тя добавится новая кнопка для бинда. В поле Key кликаешь и нажимаешь F12 (или другую кнопку, на которую у тебя еще нет бинда - но тогда надо будет вставить эту кнопку в скрипт вместо F12 - в строчке send F12 400). Дальше чуть ниже поля Key есть надпись Actions. под ней раскрывающийся список. В нем выбираешь LastObject. У тебя ниже появится еще один раскрывающийся список - в нем выбираешь WaitForTarget. Появится еще один список - в нем выбираешь LastTarget. С этим все - ниже нажимаешь желтую кнопку Apply и зеленую OKAY. Все - ты готов копать. Идешь в шахту, берешь кирку, даблклик на нее - попросят ввести код. Вводишь этот код. Даблклик на кирку еще раз и таргетом на землю - чар копнет один раз. После этого идешь в пилот (где у тебя уже забит скрипт) и нажимаешь Play (кнопка в нижнем правом углу, на которой нарисована стрелочка, такая же кнопочка плей у тебя есть на музыкальном центре, видике, пульте от видика, в WinAMP`е и т.п.). Дальше происходит долгожданное чудо - чар будет копать сам. Когда в данном тэйле он все выкопает, он повернется на 45 градусов и будет копать там. Когда он выкопает всю руду вокруг себя, он сам (Оо!) перейдет в другое место и цикл копки вокруг себя повторится. От тебя тр***ется:
1) стоит ограничение на вес в 620, если у вас не докачена сила, то поправьте значение в этой строке:
if wght >= 620 или следите чтобы не было перевеса, а то руда будет вываливаться из вас как из рога изобилия на радость копающих рядом коллег
2) периодически вводить код защиты анти-скрипта
3) следить чтобы тебя не уронили ПК | 
