Page 1 of 1

помогите со скриптом ( Ветер плиз хэлп)

Posted: 2005-03-12 00:35:25
by Stranger[BV]

Code: Select all

sub launch()
      uo.deletejournal()
      stopbattle2()
      stopbattle1()
end sub

sub stopwar()
   uo.warmode(0)
   wait(200)
   uo.warmode(0)
   wait(200)
   uo.warmode(0)
   wait(200)
   uo.warmode(0)
   wait(200)
   uo.warmode(0)
   wait(200)
end sub

sub stopbattle1()
   while not uo.injournal('ALL STOP')
      wait(100)
   wend
   stopwar()
   heal()
   waitingforbattlethenstart()
end sub

sub stopbattle2()
      repeat
      if uo.life<60 then
         uo.msg('ALL STOP')
         wait(1000)
      endif
      until uo.injournal('ALL STOP')
end sub

sub heal()
   repeat
      UO.SetArm('CWeapon')
      UO.Exec("bandageself")
      wait(500)
      UO.Arm('CWeapon')
      wait(4000)
   until uo.life==uo.str
end sub

sub waitingforbattlethenstart()
   while not uo.injournal('FIRST CHAR OK')
      wait(100)
   wend
   while uo.life<uo.str
      wait(100)
   wend
   uo.msg('SECOND CHAR OK')
   uo.deletejournal()
   uo.msg('LETS THE FIGHT BEGIN')
   uo.warmode(1)
   UO.Attack('lastattack')
   launch()
end sub


вот скрипт но помойму он не законченный просто когда чары останавливаються чтоб похиляться то потом скрипт не стартует заного
почему понять не могу

Смысал скрипта таков запускаешь его и по достижению 60 или 70 хитов атака прекращаеться и чары начинают лечиться как вылечелись продолжают бой помогите плиз

Re: помогите со скриптом ( Ветер плиз хэлп)

Posted: 2005-03-12 19:42:08
by kuviCk
Stranger[BV] wrote:

Code: Select all

sub launch()
      uo.deletejournal()
      stopbattle2()
      stopbattle1()
end sub

sub stopwar()
   uo.warmode(0)
   wait(200)
   uo.warmode(0)
   wait(200)
   uo.warmode(0)
   wait(200)
   uo.warmode(0)
   wait(200)
   uo.warmode(0)
   wait(200)
end sub

sub stopbattle1()
   while not uo.injournal('ALL STOP')
      wait(100)
   wend
   stopwar()
   heal()
   waitingforbattlethenstart()
end sub

sub stopbattle2()
      repeat
      if uo.life<60 then
         uo.msg('ALL STOP')
         wait(1000)
      endif
      until uo.injournal('ALL STOP')
end sub

sub heal()
   repeat
      UO.SetArm('CWeapon')
      UO.Exec("bandageself")
      wait(500)
      UO.Arm('CWeapon')
      wait(4000)
   until uo.life==uo.str
end sub

sub waitingforbattlethenstart()
   while not uo.injournal('FIRST CHAR OK')
      wait(100)
   wend
   while uo.life<uo.str
      wait(100)
   wend
   uo.msg('SECOND CHAR OK')
   uo.deletejournal()
   uo.msg('LETS THE FIGHT BEGIN')
   uo.warmode(1)
   UO.Attack('lastattack')
   launch()
end sub


вот скрипт но помойму он не законченный просто когда чары останавливаються чтоб похиляться то потом скрипт не стартует заного
почему понять не могу

Смысал скрипта таков запускаешь его и по достижению 60 или 70 хитов атака прекращаеться и чары начинают лечиться как вылечелись продолжают бой помогите плиз


Code: Select all

##Попробуй так .. нетестил!

sub launch()
      uo.deletejournal()
      stopbattle2()
      stopbattle1()
end sub

sub stopwar()
   uo.warmode(0)
   wait(200)
   uo.warmode(0)
   wait(200)
   uo.warmode(0)
   wait(200)
   uo.warmode(0)
   wait(200)
   uo.warmode(0)
   wait(200)
end sub

sub stopbattle1()
   while not uo.injournal('ALL STOP')
      wait(100)
   wend
   stopwar()
   heal()
   waitingforbattlethenstart()
end sub

sub stopbattle2()
      repeat
      if uo.life<60 then
         uo.msg('ALL STOP')
         wait(1000)
      endif
      until uo.injournal('ALL STOP')
end sub

sub heal()
   repeat
      UO.SetArm('CWeapon')
      UO.Exec("bandageself")
      wait(500)
      UO.Arm('CWeapon')
      wait(4000)
   until uo.life==uo.str
waitingforbattlethenstart()
end sub

sub waitingforbattlethenstart()
   while not uo.injournal('FIRST CHAR OK')
      wait(100)
   wend
   while uo.life<uo.str
      wait(100)
   wend
   uo.msg('SECOND CHAR OK')
   uo.deletejournal()
   uo.msg('LETS THE FIGHT BEGIN')
   uo.warmode(1)
   UO.Attack('lastattack')
   launch()
end sub

Posted: 2005-03-13 00:55:37
by Stranger[BV]
слетает после 3-го запуска скрипта (автоматического)
чары перестают говорить all stop & lets fight begin

Posted: 2005-03-13 23:21:20
by Stranger[BV]
Ветер а ты что скажешь ?
или ты в этом топике редкий гость