Пятница, 24.01.2025, 20:35 Приветствую Вас Гость


Ultima-Online (AoP)

Главная | Регистрация | Вход | RSS
[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 1
  • 1
Переплавка руды по 1 штуке
imbaqДата: Суббота, 08.11.2008, 16:32 | Сообщение # 1
Admin
Группа: Администраторы
Сообщений: 52
Репутация: 1
Статус: Offline
Становитесь возле плавильни: вносите айди плавильни в макрос, ложыте руду под ноги на пол, после запуска макроса юзаете курсор на плавильню.

Initevents
IgnoreItem #CHARID

Event Macro 8 7
Event Macro 8 1
Event Macro 8 2

Finditem ZJF C_ , #CHARID
Set %backpack #FINDID

Set #LOBJECTID 79F42CD3
EVENT MACRO 17 0
Wait 3s

pr:
FindItem DWJ G_2
If #FINDKIND <> -1
{
Msg ,moveitem #FINDID 1 %backpack $
Wait 1s
}

FindItem DWJ C_ , %backpack
If #FINDKIND <> -1
{
Set #LOBJECTID #FINDID
Set #LTARGETID LWUQLXF ;MRBPPTG \\\ вставить айди плавильни
Set #LTARGETKIND 1
Event Macro 17 0
Target 1s
Event Macro 22 0
}

Wait 3s
GoTo pr

 
  • Страница 1 из 1
  • 1
Поиск: