Search found 48 matches

by totus
2004-05-18 13:58:36
Forum: Scripting Ore
Topic: Проверка на скилл
Replies: 11
Views: 4689

Code: Select all

If UO.Count('0x1034')==15 then 
recall_to_carp()
else
goto Gra
endif


вот так должно
by totus
2004-05-17 21:30:21
Forum: Scripting Ore
Topic: Проверка на скилл
Replies: 11
Views: 4689

Code: Select all

UO.TextPrint(STR(UO.SkillVal('Tinkering')/10)+'%')


Пробуй :)

Соответственно, ясно, что и как...
by totus
2004-05-15 21:57:44
Forum: Help
Topic: Macro for Heal Friend
Replies: 7
Views: 5046

Of course...
Cuz UO.GetHP() doesn't return exact information about Hit Points of the object...

If u wanna heal urself, use UO.Life instead of UO.GetHP()...

U may use UO.GetHP() with UO.GetMaxHP() and in that case it's gonna be fine...
by totus
2004-05-15 20:56:35
Forum: Help
Topic: Macro for Heal Friend
Replies: 7
Views: 5046

Try this...


Life(0x000040ea)


sub Life(Friend)
While (UO.Life > 0)
if &#40;UO&#46;GetHP&#40;Friend&#41; < 20&#41; then #it doesn't work fine, cuz UO&#46;GetHP&#40;&#41; doesn't give EXACT information about HP
While &#40;UO&#46;GetHP&#40;Friend&#41; < UO&#46 ...
by totus
2004-05-12 00:52:09
Forum: Scripting Ore
Topic: Сработка чего либо На инфо в журнале ????
Replies: 14
Views: 5266

Тогда уж типа того:
sub Alarm&#40;&#41;
repeat
if UO&#46;InJournal&#40;"is attacking you"&#41; Then
UO&#46;DeleteJournal&#40;&#41;
UO&#46;Cast&#40;'Recall','^0x1F14'&#41;
endif
Wait&#40;1000&#41;
until false
end sub

А насчёт убегания...
Я в данный момент работаю над модулем ...
by totus
2004-05-11 22:45:21
Forum: Scripting Ore
Topic: Сработка чего либо На инфо в журнале ????
Replies: 14
Views: 5266

Нужно ли, чтобы он бежал в произвольную сторону или непосредственно ОТ своего атакующего?
Ему в это время ничего не надо делать, а только лишь делать Save() (подозреваю, что реколл по рунабуке)?

Подробно алгоритм давай, напишу :)
by totus
2004-05-11 21:23:46
Forum: Scripting Ore
Topic: Сработка чего либо На инфо в журнале ????
Replies: 14
Views: 5266

Конечно!

Не вопрос


sub Alarm&#40;&#41;
var Enemy = 0x00000000
repeat
if UO&#46;InJournal&#40;"is attacking you"&#41; Then
Enemy = UO&#46;JournalSerial&#40;UO&#46;InJournal&#40;"is attacking you"&#41;-1&#41;
UO&#46;Cast&#40;'Magic Arrow',Enemy&#41;
Wait&#40;500&#41;
UO&#46;DeleteJournal&#40 ...
by totus
2004-05-11 16:12:07
Forum: General
Topic: Recconector
Replies: 13
Views: 5960

Да.
Что и реализовано в моём скрипте на таминг.

Можешь проверить :)
by totus
2004-05-11 05:20:38
Forum: General
Topic: Recconector
Replies: 13
Views: 5960

Use UO.ServerPrint. And NO UO.Say...
by totus
2004-05-10 18:14:54
Forum: Scripting Ore
Topic: Сработка чего либо На инфо в журнале ????
Replies: 14
Views: 5266

Просто

Чтобы висел постоянно в памяти сделаешь
UO&#46;Exec&#40;'exec Alarm'&#41;
А ниже - код этого саба:
sub Alarm&#40;&#41;
repeat
if UO&#46;InJournal&#40;"is attacking you"&#41; Then
UO&#46;DeleteJournal&#40;&#41;
Save&#40;&#41;
endif
Wait&#40;1000&#41;
until false
end sub

Искренне ...
by totus
2004-05-10 15:06:04
Forum: General
Topic: why?
Replies: 7
Views: 3548

Don't forget...

to set the CatchBag or ReceivingContainer (by default - ur backpack)


Sincerely Yours...
by totus
2004-05-10 00:55:00
Forum: General
Topic: why?
Replies: 7
Views: 3548

Simple

if u wanna empty ur backpack, use this:

Code: Select all

While UO.count('0x1BF2')>0 #0x1BF2 = ID LINGOTTI 
    UO.EmptyContainer(1,UO.ObjAtLayer('Bpack))
    wait(5000)
WEND
by totus
2004-05-09 20:12:44
Forum: Scripting Ore
Topic: Antibleed script
Replies: 3
Views: 2414

maybe this could help

maybe this could help
sub AntiBleed&#40;&#41;
var LastBangaged = 0
var CurrentBandage = 0
repeat
if UO&#46;InJournal&#40;'bleeding'&#41; then
UO&#46;DeleteJournal&#40;&#41;
CurrentBandage = UO&#46;Timer&#40;&#41;
If &#40;CurrentBandage - LastBandaged&#41; >= 100&#41; then
LastBandage ...
by totus
2004-05-09 12:52:33
Forum: General
Topic: ИЗЯ
Replies: 4
Views: 2750

Пробуй так:

Содержимое *.reg файла.

REGEDIT4

&#91;HKEY_CURRENT_USER\Software\EasyUO&#93;
"Variables&#46;Show"=dword&#58;00000001
"Variables&#46;Standard"=dword&#58;00000001
"Variables&#46;User"=dword&#58;00000000
"Variables&#46;Defined"=""

Искренне Ваш, Тотус Маньяковски.
by totus
2004-05-09 11:37:48
Forum: General
Topic: ИЗЯ
Replies: 4
Views: 2750

RTFM

by totus
2004-05-08 00:01:47
Forum: Help
Topic: Перестал работать рекол по рунбуке
Replies: 8
Views: 3682

Но всё же...

Попробуй сделать следующее: открой рунабуку.
Среколься по руне. Потом напиши в клиенте ,infogump, то, что появится в текстовом окошечке отошли мне личным сообщением.
Постараюсь помочь.
by totus
2004-05-07 16:40:59
Forum: General
Topic: Recconector
Replies: 13
Views: 5960

I've seen the one'n'only reconnector written in injection.

[c] totus

This is the reconnector code:
sub Reconnector&#40;&#41;
var ReconnectTime, RFlag
ReconnectTime = '0'
RFlag = 1
Repeat
While &#40;UO&#46;ObjAtLayer&#40;'Bpack'&#41; == ''&#41;
if RFlag Then
ReconnectTime = MakeTime&#40;&#41;
RFlag = 0
endif
Wait&#40;20000&#41; # WorldSave ...
by totus
2004-05-07 15:26:23
Forum: Help
Topic: Перестал работать рекол по рунбуке
Replies: 8
Views: 3682

Будь проще.

UO.Set('norbcheck','1')
UO.Set('norbcalc','1')
UO.Recall('0x400C1673','602')

пробуй.
by totus
2004-05-06 11:12:00
Forum: Scripting Ore
Topic: Как сделать такое?
Replies: 7
Views: 3662

-||-

UO.Attack('lastattack')