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]
Ветер а ты что скажешь ?
или ты в этом топике редкий гость