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

Подскажите по медитации
http://forum.yoko.com.ua/viewtopic.php?f=20&t=7311		 Page 1 of 1
Author:  uisran [ 2006-04-09 13:25:27 ]
Post subject:  Подскажите по медитации
Почему чар не снимает курсу?
Code:
sub Medit() 

VAR CharM=UO.Mana 
VAR cursa = 0x1F03  
UO.UnDress() 
wait(200) 
While not UO.dead() 
UO.UseType(cursa) 
wait(200)
If CharM < 100 Then
   UO.UnDress()
   Else
   wait (50)
Endif
While UO.Mana < 100
UO.UseSkill('Meditation') 
UO.DeleteJournal() 
wait(5000)
Wend 
UO.DeleteJournal()
Wend 
end sub
 


З.Ы. Мне нужно не готовый скрипт, а обьяснение почему так...
Author:  Kynep [ 2006-04-09 13:37:28 ]
Post subject:  Re: Подскажите по медитации
uisran wrote:
Почему чар не снимает курсу?

З.Ы. Мне нужно не готовый скрипт, а обьяснение почему так...


Code:
sub Medit() 

VAR CharM=UO.Mana 
VAR cursa = 0x1F03  
UO.UnDress() 
wait(200) 
While not UO.dead() 
UO.UseType(cursa) 
wait(200)
repeat
wait(100)
until  CharM < 100
UO.UnDress()
While UO.Mana < 100
UO.UseSkill('Meditation') 
UO.DeleteJournal() 
wait(5000)
Wend 
UO.DeleteJournal()
Wend 
end sub
 
[/code]
Author:  uisran [ 2006-04-09 14:56:12 ]
Post subject: 
Лучше вот так ))
Code:
sub Medit() 

VAR CharM=UO.Mana 
VAR cursa = 0x400F31C7  ; ID курсы
UO.UnDress() 
wait(200) 
While not UO.dead() 
UO.UseType(cursa) 
wait(200) 
repeat 
wait(100) 
until  UO.Mana < 97 
UO.UnDress() 
While UO.Mana < 100 
UO.UseSkill('Meditation') 
UO.DeleteJournal() 
wait(5000) 
Wend 
UO.DeleteJournal() 
Wend 
end sub
Author:  Kynep [ 2006-04-09 15:26:35 ]
Post subject: 
uisran wrote:
Лучше вот так ))
Code:
sub Medit() 

VAR CharM=UO.Mana 
VAR cursa = 0x400F31C7  ; ID курсы
UO.UnDress() 
wait(200) 
While not UO.dead() 
UO.UseType(cursa) 
wait(200) 
repeat 
wait(100) 
until  UO.Mana < 97 
UO.UnDress() 
While UO.Mana < 100 
UO.UseSkill('Meditation') 
UO.DeleteJournal() 
wait(5000) 
Wend 
UO.DeleteJournal() 
Wend 
end sub



Это не надо, оставь тип:
Code:
VAR cursa = 0x400F31C7  ; тип поставь 0х0000


Потому что дальше у тебя идет
Code:
UO.UseType(cursa)


Если хочешь все таки оставить ID, то поменяй на:
Code:
UO.UseObject(cursa)
Author:  uisran [ 2006-04-09 16:12:43 ]
Post subject: 
Cooper wrote:
Это не надо, оставь тип:
Code:
VAR cursa = 0x400F31C7  ; тип поставь 0х0000


Потому что дальше у тебя идет
Code:
UO.UseType(cursa)



точно.. забыл :oops:
Author:  Kynep [ 2006-04-09 16:22:41 ]
Post subject: 
uisran wrote:

точно.. забыл :oops:


Бывает ))) :wink: :roll:
Author:  uisran [ 2006-04-09 22:55:54 ]
Post subject: 
Добавил спирит
Code:
sub Medit() 

VAR CharM=UO.Mana 
VAR cursa = 0x400F31C7  ; ID ъєЁё√
VAR LastTimer=UO.Timer()
UO.UnDress() 
wait(200) 
While not UO.dead() 
wait(3000)
UO.UseObject(cursa) 
wait(200) 
uo.print("Spirit Speak") 
uo.useskill ("Spirit Speak") 
repeat 
wait(10) 
until UO.Mana < 99
repeat 
wait(100) 
until  UO.Mana < 99 
UO.UnDress()
While UO.Mana < 100 
UO.UseSkill('Meditation') 
UO.DeleteJournal() 
wait(5000) 
Wend 
UO.DeleteJournal() 
Wend 
end sub
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/