Yoko
http://forum.yoko.com.ua/

НА хелинг
http://forum.yoko.com.ua/viewtopic.php?f=20&t=619
Page 1 of 1

Author:  Ex-Brodyaga [ 2004-06-21 19:39:44 ]
Post subject:  НА хелинг

Дайте плиз скрипт + с спиритом для ДРВ

Author:  M0ke [ 2004-06-22 01:17:52 ]
Post subject:  Re: НА хелинг

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

Author:  Bloodmoon [ 2004-06-23 09:00:07 ]
Post subject: 

Че-то у меня не пашет:(.
Говорит,что:"Не найден объект"!:(

Author:  BETEPAH [ 2004-06-23 21:31:58 ]
Post subject: 

Перед началом скрипта надо одеть "курсанутую вещь" и написать в консоле ,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

Author:  Bloodmoon [ 2004-06-24 09:33:29 ]
Post subject: 

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

В Ультиме есть консоль?

Author:  Ex-Brodyaga [ 2004-06-24 15:25:16 ]
Post subject: 

Имеется ввиду просто в игре написать

Author:  Bloodmoon [ 2004-06-24 15:43:32 ]
Post subject: 

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

Ааа....спасибо за объяснение:).

Author:  Bloodmoon [ 2004-06-24 15:46:38 ]
Post subject: 

А этот скрипт можно просто оставлять,чтоб качался хилинг?:)

Author:  BETEPAH [ 2004-06-24 17:59:40 ]
Post subject: 

да конечно

Author:  Bloodmoon [ 2004-06-25 20:28:37 ]
Post subject: 

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

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

Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/