Page 1 of 1

Помогите разобратся

Posted: 22.09.2005 23:34
by lol-man
напешите пожалуйсто скрипт в цикле, чтобы если ты мёртвый говорил слово какоето, если живой то ждал пока умрёш..... плиз :)

Posted: 23.09.2005 9:39
by Mouse
Так "помогите разобраться" или "сделайте все за меня"?
Поможем, но делать будеш сам!

Posted: 23.09.2005 17:41
by lol-man
Ну это понятно, что сам... правельно?

Code: Select all

Begin
 Repeat 
  If((Dead) and Connected) Then
	Begin
	UOSay('Vendor Ress');
		Repeat
		Until (Not Dead);
	End;
 Until 1<>1
End.

Posted: 24.09.2005 1:00
by Miralex
Лучше так:

Code: Select all

Begin 
 Repeat 
  If((Dead) and Connected) Then 
   Begin 
   UOSay('Vendor Ress'); 
      Repeat 
      wait(1000);
      Until (Not Dead); 
   End;
 wait(1000);
 Until 1<>1 
End.

Posted: 24.09.2005 12:49
by lol-man
А если надо чтобы он быстро ресался? без пауз...

Posted: 26.09.2005 7:42
by Miralex
Уменьши задержки.