Page 1 of 1
НА хелинг
Posted: 2004-06-21 19:39:44
by Ex-Brodyaga
Дайте плиз скрипт + с спиритом для ДРВ
Re: НА хелинг
Posted: 2004-06-22 01:17:52
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
Posted: 2004-06-23 09:00:07
by Bloodmoon
Че-то у меня не пашет:(.
Говорит,что:"Не найден объект"!:(
Posted: 2004-06-23 21:31:58
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
Posted: 2004-06-24 09:33:29
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
В Ультиме есть консоль?
Posted: 2004-06-24 15:25:16
by Ex-Brodyaga
Имеется ввиду просто в игре написать
Posted: 2004-06-24 15:43:32
by Bloodmoon
Ex-Brodyaga wrote:Имеется ввиду просто в игре написать
Ааа....спасибо за объяснение:).
Posted: 2004-06-24 15:46:38
by Bloodmoon
А этот скрипт можно просто оставлять,чтоб качался хилинг?:)
Posted: 2004-06-24 17:59:40
by BETEPAH
да конечно
Posted: 2004-06-25 20:28:37
by Bloodmoon
BETEPAH wrote:да конечно
Выдает ошибку.