Ultima Online Antares

Решил создать тему для тех, кто решился играть в ультиме с телефона.
Тут буду выкладывать скрипты, которыми пользуюсь и работают у меня.

Начнём с простого:
Скрипт на изготовление кольца или серег при прокачке джевелкрафт.
Так как автоменю почему то не работает, пришлось обойти эту проблему путем поиска координат и нажатия пунктов меню этим способом.

usetype 0x0FC1
clickscreen 160 160 'double' 'left'
pause 4200

Это скрипт на изготовление серег, когда в меню появляется второй пункт.
Это встречается при изготовлении руин колец и серег при скиле больше 5%. Начиная с гранат колец и серег пользоваться первым скриптом, имея в паке только кольца, либо только серьги.

usetype 0x0FC1
clickscreen 200 160 'double' 'left'
pause 100
clickscreen 150 160 'double' 'left'
pause 4200

На примере первого скрипты можно делать любые итемы, которые в меню имеют только один пункт.

Атакуем ближайшего красного врага или криминала (в том числе мобов)

getenemy 'closest' 'murderer' 'criminal'
if @findobject 'enemy'
autotargetobject! 'enemy'
if murderer 'enemy'
attack! 'enemy'
@clearusequeue
@cancelautotarget
stop
endif
endif

Пьём хил банку

if @findtype 0x0E24 1094 'backpack'
@setalias 'heal' 'found'
useobject! 'heal'
sysmsg 'Heal potion completed'
else
sysmsg 'net healki'
clearjournal
clearlist any
endif

Инвиз - рекол
И берет перед этим спелбуку в руки.
Сериал коды само собой менять под ваши

warmode 'off'
equipitem 0x40441C12 1
usetype 0x0E24 96
endif
cast 'recall'
waitfortarget 300
target 0x400E705B

Бросаем костёр под себя и зажигаем его.
Костры должны быть в паке или сумке, которая в паке, но разложены по 1 штуке, иначе бросит все костры сразу кучей и зажжет. Не понял, почему не получилось сделать бросание одного из стопки.

movetypeoffset '0x0DE1' 'backpack' 'ground' '3715 1281 0' '1' '1'
clearjournal
clearlist 'any'
pause 1000
if not @findtype '0x0DE1' 'any' 'ground' '1' '2'
sysmsg ' ******Net kostrov na zemle******' '28'
stop
else
@setalias! 'o' 'found'
endif
useobject 'o'

//резка трупа с автолутом. В конце скрипта автоатака на ближайшем красном враге или криминала.
Что лутить надо добавлять вручную во вкладке программы автолут.
0х2006 - нож

if not @findtype '0x2006' 'any' 'ground' '1' '2'
sysmsg ' ******No Corpse Found******' '28'
stop
else
@setalias! 'o' 'found'
endif
//Тут ищем ножичек
if not @findtype '0x0EC2' 'any' 'backpack'
sysmsg '===Нет ножа===' '25'
stop
else
@usetype! '0x0EC2' 'any' 'backpack'
waitfortarget '1000'
target! 'o'
pause 800
endif
@autoloot
if @injournal 'You cannot pick that up.' 'system'
useobject 'o'
pause 1000
endif
waitfortarget '1000'
target! 'o'
@warmode 'on'
getenemy 'closest' 'murderer' 'criminal'
if @findobject 'enemy'
autotargetobject! 'enemy'
if murderer 'enemy'
attack! 'enemy'
@clearusequeue
@cancelautotarget
stop
endif
endif

Трекинг игроков

@warmode 'off'
@useskill "Tracking"
pause 4200
clickscreen 280 150 'double' 'left'
@warmode 'on'

Скрипт на резку кожи и автолут, версия 2.


if not @findtype '0x2006' 'any' 'ground' '1' '2'
sysmsg ' ******Трупа не вижу!!!!!******' '28'
stop
else
@setalias! 'o' 'found'
useobject 'o'
endif
if not @findtype '0x0EC2' 'any' 'backpack'
sysmsg '===Где ты забыл нож для резки???===' '25'
stop
else
@usetype! '0x0EC2' 'any' 'backpack'
waitfortarget '200'
target! 'o'
endif
@autoloot
waitfortarget '200'
target! 'o'
if @injournal 'You cannot pick that' 'any'
sysmsg 'Труп сам не открылся, за попробую открыть' '25'
pause 200
useobject 'o'
endif
@warmode 'on'
getenemy 'closest' 'murderer' 'criminal'
if @findobject 'enemy'
autotargetobject! 'enemy'
if murderer 'enemy'
attack! 'enemy'
@clearusequeue
@cancelautotarget
stop
endif
endif

Если кому-то нужно, пишите в этой теме. Выложу последние подкорректированные скрипты. Потихоньку подправляю по мере нахождения каких-то неудобств.

Много поправок сделано в скриптах, если кто играет с телефона, пишите, какие именно скрипты нужны.

Норм развернулся

Mick Blue,
Жаль некоторые команды не работают, как в инже, но тоже норм играть можно)