Shard Promotion.

[Shard Promotion.]

http://ultimasoft.ru/

ребят, давайте напряжемся, осталось всего 50 голосов до 5-го места

[Скрипты / просьбы скриптов]

со старого форума:

в инжекте создаешь объект с именем например jjj в закладке Object жмакаешь кнопку FromTarget и таргетом на буку с нужной руной потом в инжекте на Save дальше в уо пишеш

 

,set norbcheck 1

,set norbcalc 1

 

и биндуеш на кнопку

say ,recall jjj 601 (601-если нужна 1-я руна, 602 - если 2-я и т.д.)

[Грёбаный Fonts.mul и его друг UOREG]

А еще можно найти дистрибутив алтимы и нормально установить

самый лучший вариант, что-то я не додумался...)

[Грёбаный Fonts.mul и его друг UOREG]

сегодня схожую проблему решали знакомому.

проблема в том, что папка или файл, созданный на другом компе, и там закрытый тока для чтения, на другом компе не открывается (хз почему)

попробуй так - если атрибут стоит тока на папке - перекидываешь из нее все в только что созданную папку, эту делит, а новую обзываешь так же

аналогично с файлом, новый файл с таким же именем и инфой из старого файла

 

напиши, если помогло

[Скрипты / просьбы скриптов]

ЭЭЭ типо мне надо скрипт на тейлор ! на шитё чеголибо из кожи ! подкиньте плз

sub main()

While UO.Life>0

UO.Exec("waitmenu 'Choose' 'leather' 'What' 'Leather Cap'")

UO.Exec("waittargetobject '^0x1078'")

UO.Exec("useobject '^0x0F9D'")

wait(10000)

EndIf

wend

end sub

вот на шапки, тока таргет не сбивает, когда шапка эксепт

[Скрипты / просьбы скриптов]

можно запускать одновременно скока хошь скриптов

а на гвардов можно еще так (по-идее будет звать, когда тебя атакуют):

 

sub GuardMacros()

while not uo.dead()

if (UO.InJournal("attacking you")) then

uo.deletejournal()

uo.say(".guards")

endif

wait(3000)

wend

end sub

[Скрипты / просьбы скриптов]

на бс

 

sub main()

while uo.count('0x1BF2')>9 # тут проставить кол-во ингов, необходимое для выковываемой вещи

UO.Exec("waitmenu 'What do you wish to make?' 'Armor' 'Select armor' 'Chainmail' 'Select item' 'Gnomish Chainmail Coif'") # здесь вписывается, что куем

UO.Exec("waittargetobject '^0x1BF2'")

UO.Exec("useobject '^0x13E3'")

wait(2000)

UO.Exec("waittargetobject '^0x13C0'") # здесь вписываем тип вещи, определяется командой ",info"

Wait (300)

UO.Exec("useobject '^0x0FBB'")

Wait (3000)

UO.Exec("useobject '^0x097b'") # еда, жареная рыба, или заменяем на свое

wend

end sub

 

вокруг себя расставляем наковальни, в пак кладем чем будем ковать и много тонгов

наковальни и тонги постепенно ломаются

 

а по-поводу гвардов на майнинге - проще запустить отдельный скрипт, где он зовет гвардов, например, каждые 3 секунды

[Скрипты / просьбы скриптов]

на хаммер

 

фразы на майнинг

 

[strings to continue]

You cannot

You are

The patient

What you

Who would

What you

Previous

There is no guardzone here

Targetting

You begin

[strings to end]

There is

That is too far away

Cancelled.

 

фразы на ламбер

 

[strings to continue]

You have found some deadwood

You have angered a Wood Spirit

An Ent appears to defend his forest!

Ouch! Forest guardians are angry on you!

[strings to end]

You cannot

There's not

Cancelled

 

скрипт на хилинг - автохил сделать не получилось, пока допер только использование бинтов с задержкой времени, может, кто сможет его и улучшить

 

void ataka()

{

start:

{

Sleep(10000);

}

HR.Talk(".bandage self");

goto start;

}

 

это все со старого форума, срипт там был на автовызов гвардов, я сделал замену на использование бандаг

[Скрипты / просьбы скриптов]

скрипт на прокачку магии и меджик резиста, без проверок на наличие бинтов (бинты должны быть в паке)

качается на чтении свитков (т.к. мне проще наделать свитков, чем реги собирать/покупать)

в руках ничего быть не должно, иначе свитки читаться не будут

если вот эти две строчки

UO.WaitTargetObject('self')

UO.Exec("useobject '^0x1F5F'")

заменить на

UO.Cast('вписать нужное заклинание','self')

то можно качать как обычно, на регах

если вы качаете не на чистой магии, а на цветной, где заклинания надо говорить, то меняете на

UO.WaitTargetObject('self')

uo.serverprint(".cast вписать нужное заклинание")

 

Sub main()

aaa:

UO.Exec("useobject '^0x097b'") # прописана жареная рыба, чтобы кушал

Wait(300)

UO.WaitTargetObject('self')

UO.Exec("useobject '^0x1F5F'") # прописан свиток флеймстрайка

Wait(5000)

UO.UseSkill('Meditation')

Wait(300)

bbb:

If UO.STR==UO.Life Then

goto ccc

Else

UO.BandageSelf()

Wait(5000)

goto bbb

Endif

ccc:

If UO.INT==UO.Mana Then

goto aaa

Else

Wait(3000)

goto ccc

Endif

goto aaa

Endsub