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

помогите буду блогодарен
http://forum.yoko.com.ua/viewtopic.php?f=17&t=14885		 Page 1 of 1
Author:  kapatuct [ 2009-06-23 08:43:57 ]
Post subject:  помогите буду блогодарен
уроки скриптинга я читал.сам зделать пробывал но без резултатно. нужен скрипт такой
1.waitmenu polymorph , cast deamon
2. bandageself
3. meditation
4. как только uo.mana=mana uo.life=hp снова кастил поликорф
Author:  Everix [ 2009-06-23 20:17:05 ]
Post subject: 
Code:
sub POLy()
while not uo.dead()
if uo.mana==uo.int and uo.life==uo.str then
uo.waitmenu('Polymorph','deamon')
uo.cast('Polymorph')
wait(5000)
uo.bandageself()
while not uo.injournal('bloody')
wait(100)
wend
while not uo.mana==uo.int
uo.useskill('Meditation')
wait(900)
wend
wend
end sub

Syntax maybe wrong!
Author:  kapatuct [ 2009-06-24 15:43:05 ]
Post subject: 
всеравно неработает. пишет что в 17 строчке ошибка. хоть строчяк всего только 16. в чем может быть проблема.и как ее исправить
Author:  GAUHAR [ 2009-06-24 19:05:08 ]
Post subject: 
Code:
sub PolymorphInDaemon()
   VAR NeedManaToPolymorph = 24
   VAR LastMana
   UO.DeleteJournal()
   while not uo.dead()
      if UO.Mana >= NeedManaToPolymorph then
         UO.WaitMenu('What do you want to polymorph','Daemon')
         UO.Cast('Polymorph')
         LastMana = UO.Mana
         while (UO.Mana >= LastMana) and not UO.InJournal("You lack")
            wait(100)
         wend
         wait(500)
      endif
      while UO.Life < UO.STR
         UO.DeleteJournal()
         UO.BandageSelf()
         repeat
            wait(100)
         until UO.InJournal("You put the bloody|barely help|need healing")
      wend
      while UO.Mana < UO.INT
         UO.UseSkill('Meditation')
         wait(5000)
      wend
      if UO.InJournal("You lack") then
         UO.Print("Нет реагентов для полиморфа")
         UO.Print("Скрипт выключен")
         return
      endif
   wend
endsub
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/