[nkn]

Всех категорически приветствую.
Пользую UOPilot 107. (у меня всё работает+вроде всё расписал).
Что-то чужое, что-то подредактированно, что-то лично мое. Ползуйтесь на своё усмотрение, Я за макросы никакой ответственности не несу.
Вроде всё.


Фаст buy
Пилот->Ещё->Эдит хот->Старт скрипт.
Для одарённых: Скрипт пашет lastmsg

set $s buy
set $a lastmsg $s
say $a
end_script

Копка вокруг

set lasttargetkind 2
set $a1 You loosen some rocks
set $a2 You put
set $a3 That is too far away
set $a4 There is no ore here to mine
set $a5 skill // Скилл повысился..При необходимости дописываем по аналогии стат
set $a6 Try mining in rock
set $a7 You have no line of sight

  for #j -2 2
    set lasttargety charposy + #j
    for #i -2 2
      set lasttargetx charposx + #i
      send z
      waitfortarget 2000
      set #time timer + 6000
      while_not (timer > #time) or (lastmsg $a1) or (lastmsg $a2) or (lastmsg $a3) or (lastmsg $a4) or (lastmsg $a5) or (lastmsg $a6) or (lastmsg $a7)
        wait
      end_while
      if (lastmsg $a1) or (lastmsg $a2) or (lastmsg $a5)
        while_not (lastmsg $a3) or (lastmsg $a4) or (lastmsg $a6) or (lastmsg $a7)
          if wght > 620  //максимальный вес
            stop_script
          end_if
          send z  //ЛОбджект->ВТаргет->Лтаргет
          waitfortarget 2000
          set #time timer + 6000
          while_not timer > #time or (lastmsg $a1) or (lastmsg $a2) or (lastmsg $a3) or (lastmsg $a4) or (lastmsg $a5) or (lastmsg $a6) or (lastmsg $a7)
            wait
          end_while
          wait 200
        end_while
      end_if
      wait 200
    end_for
  end_for
  say !  //Ненужная ерись, которую можно заменить Алармом, Флешем или убрать.
stop_script

Хилокукла с отходом.
N стенка дома. (атакуемый арчер закрыт сундуками от прострела кроме как по Y)

set $s1 Use Type Failed -- type not found

:0
if hits < str
send F1  //Хил с бандажек
if lastmsg = $s1
repeat 4
send end  //Отойти (Walk->S)
end_repeat
end_script
end_if
wait 2570
end_if
if hits < 90  //Количество ХП при котором отбегаем (для постоянного скана лучше пихнуть в отдельный скрипт, но мне лень и так устраивает)
goto 1
end_if
goto 0
:1
repeat 4
send end  //Отбегалка на тотже S
end_repeat
:2
send F1  //Хилимся баджами
wait 2470
if hits = str
goto 3
end_if
goto 2
:3
repeat 100  //если окно игры сворачивал-не всегда возвращался-поэтому 100, и потом дальше стенки не убежит....
send pageup  //Бежим на место (Walk->N)
end_repeat
goto 0

Крафт с подкормкой

set $s1 put
set $s2 skill
set $s3 crash
set $s4 fail
set $s5 failed
set $sw world save

:1
send m   //Крафт
set timer 
wait 570
send f1  //Питание (пожно заменить любой фигнёй. скажем рудой без наличия плавилки (так надо))
wait 200
:2
if (lastmsg $s1) or (lastmsg $s2) or (lastmsg $s3) or (lastmsg $s4) or (lastmsg $s5) or (timer > 6570) 
send f1  //Опять кормим или ещё что
wait 250
goto 1
end_if
if (lastmsg $sw)
wait 17000
end_if
goto 2