НА хелинг

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
Ex-Brodyaga
Junior Expert
Posts: 150
Joined: 2004-04-12 20:26:41

НА хелинг

Post by Ex-Brodyaga »

Дайте плиз скрипт + с спиритом для ДРВ
M0ke
Posts: 42
Joined: 2004-06-02 21:35:27
Contact:

Re: НА хелинг

Post by M0ke »

Ex-Brodyaga wrote:Дайте плиз скрипт + с спиритом для ДРВ

;Скрипт на Healing + SpiritSpeak

sub Healing()
var exit, LastTimer, live
uo.disarm()
wait(2000)
exit = 0
while exit <> 1
live = UO.STR
CheckLag()
uo.waittargettype ('0x1008')
uo.usetype ('0x0E20')
wait(500)
uo.usetype('0x0E85') ;Курсанутая кирка

uo.useskill('Spirit Speak')

repeat
wait(500)
until UO.Life < live
CheckLag()

LastTimer=UO.Timer()

repeat
UO.BandageSelf()
wait(4000)
until UO.Life==UO.STR OR LastTimer+300<UO.Timer()
wend
end sub

sub CheckLag()
UO.DeleteJournal()
UO.Click('backpack')

repeat
wait(50)
until UO.InJournal('backpack')
end sub
Bloodmoon
Posts: 128
Joined: 2004-06-23 08:55:32

Post by Bloodmoon »

Че-то у меня не пашет:(.
Говорит,что:"Не найден объект"!:(
Last edited by Bloodmoon on 2004-06-24 15:44:03, edited 1 time in total.
BETEPAH
Expert!
Posts: 838
Joined: 2004-05-31 09:31:51
Contact:

Post by BETEPAH »

Перед началом скрипта надо одеть "курсанутую вещь" и написать в консоле ,setdress cursa

;Сделать снимаемую курсу (1 шмот) одеть ее и в консоли:
;,setdress cursa
;Кинуть в пак бандажек сколько может держать чар и вперед
sub HealTrain()
VAR CharHP=160, LastTimer
uo.useskill('Spirit Speak')
repeat
wait(500)
While UO.GetHP()>CharHP-5
wait(500)
Wend
UO.UnDress()
UO.BandageSelf()
UO.DeleteJournal()
LastTimer=UO.Timer()
Repeat
wait(500)
Until UO.InJournal('You don') OR UO.InJournal('You put') OR UO.InJournal('You applay the') OR UO.Timer()>LastTimer+100
Wend
end sub
Bloodmoon
Posts: 128
Joined: 2004-06-23 08:55:32

Post by Bloodmoon »

BETEPAH wrote:Перед началом скрипта надо одеть "курсанутую вещь" и написать в консоле ,setdress cursa

;Сделать снимаемую курсу (1 шмот) одеть ее и в консоли:
;,setdress cursa
;Кинуть в пак бандажек сколько может держать чар и вперед
sub HealTrain()
VAR CharHP=160, LastTimer
uo.useskill('Spirit Speak')
repeat
wait(500)
While UO.GetHP()>CharHP-5
wait(500)
Wend
UO.UnDress()
UO.BandageSelf()
UO.DeleteJournal()
LastTimer=UO.Timer()
Repeat
wait(500)
Until UO.InJournal('You don') OR UO.InJournal('You put') OR UO.InJournal('You applay the') OR UO.Timer()>LastTimer+100
Wend
end sub

В Ультиме есть консоль?
Ex-Brodyaga
Junior Expert
Posts: 150
Joined: 2004-04-12 20:26:41

Post by Ex-Brodyaga »

Имеется ввиду просто в игре написать
Bloodmoon
Posts: 128
Joined: 2004-06-23 08:55:32

Post by Bloodmoon »

Ex-Brodyaga wrote:Имеется ввиду просто в игре написать

Ааа....спасибо за объяснение:).
Bloodmoon
Posts: 128
Joined: 2004-06-23 08:55:32

Post by Bloodmoon »

А этот скрипт можно просто оставлять,чтоб качался хилинг?:)
BETEPAH
Expert!
Posts: 838
Joined: 2004-05-31 09:31:51
Contact:

Post by BETEPAH »

да конечно
Bloodmoon
Posts: 128
Joined: 2004-06-23 08:55:32

Post by Bloodmoon »

BETEPAH wrote:да конечно

Выдает ошибку.
Post Reply