Page 1 of 1

медитация

Posted: 2006-03-28 09:17:16
by Sp
нужен скриптик на медитацию..для шарда дрв...помогите плз..

Re: медитация

Posted: 2006-03-28 11:31:46
by Kynep
Sp wrote:нужен скриптик на медитацию..для шарда дрв...помогите плз..
вот посмотри:

Code: Select all

sub Medit() 
VAR CharHP=UO.STR
VAR cursa= #Тут тип курсы поставь (вида 0x0000)
UO.UnDress()
wait(200)
While not UO.dead()
UO.UseType(cursa) 
While UO.GetHP()>CharHP-1 
wait(500) 
Wend 
UO.UnDress() 
wait(200)
UO.UseSkill('Meditation')
UO.DeleteJournal() 
wait(5000)
Wend 
end sub

Posted: 2006-03-28 11:31:58
by Sp
ну народ...помогите

Posted: 2006-03-28 11:32:58
by Kynep
Sp wrote:ну народ...помогите
вот посмотри:

Code: Select all

sub Medit() 
VAR CharHP=UO.STR
VAR cursa= #Тут тип курсы поставь (вида 0x0000)
UO.UnDress()
wait(200)
While not UO.dead()
UO.UseType(cursa) 
While UO.GetHP()>CharHP-1 
wait(500) 
Wend 
UO.UnDress() 
wait(200)
UO.UseSkill('Meditation')
UO.DeleteJournal() 
wait(3000)
Wend 
end sub