Page 1 of 1

Помогите Зациклить Новичку

Posted: 03.08.2008 23:08
by m0nya

Code: Select all

program gen;

{$Include 'all.inc'}


begin
Wait(1000);
UseSkill('Meditation');
Wait(1000);
hungry(1, ground);

if Dead then
begin
 SetWarMode(true);
end;



End.

Как сделать чтобы после смерти макрос не вырубался а начинал заного фунциклировать

Posted: 04.08.2008 0:33
by Scripts Writer
По поводу фунциклировать незнаю как, а зациклить можно проверкой на условие "мёртвости" персонажа. Смотри в других скриптах как это делается

Posted: 04.08.2008 9:06
by scf
или:

Code: Select all

 while true do
 begin
 ....
  end;

Posted: 04.08.2008 13:23
by m0nya
Ребята, нечего не выходит, видимо я с синтаксисом чтото не так делаю ...

Цель скрипта когда живой замедетировать
когда мёртвый встать в вар.

Помогите пожалуйста реализовать ...

я вот все что мог сделал но он сволочь когда стоиш мертвый и врубаеш скрипт он становиться в вар ресаеться но не медетирует, а когда чара очередной рас убивают макрос выключаеться. :( help please

Posted: 04.08.2008 22:14
by Scripts Writer
Результат трудов своих покажи

Posted: 05.08.2008 1:42
by -=JoKeR=-

Code: Select all

program gen; 

{$Include 'all.inc'} 


Begin
while Connected do
  begin 
    If not Dead then
      begin 
        UseSkill('Meditation'); 
        Wait(1000); 
        hungry(1, ground); 
      end
    Else
      begin 
        SetWarMode(true); 
        wait(500);
      end; 
  end;
End.

Posted: 05.08.2008 10:02
by Scripts Writer
-=JoKeR=- wrote:

Code: Select all

program gen; 

{$Include 'all.inc'} 


Begin
while Connected do
  begin 
    If not Dead then
      begin 
        UseSkill('Meditation'); 
        Wait(1000); 
        hungry(1, ground); 
      end
    Else
      begin 
        SetWarMode(true); 
        wait(500);
      end; 
  end;
End.
Завтра он спросит ещё что-то примитивнее, а послезавтра ещё- не проще было бы немного помогать человеку в освоении, а не делать всё за него?

Posted: 05.08.2008 10:21
by -=JoKeR=-
Ну примитивней уже некуда.
Пусть на наглядном примере учится, мне было проще именно на наглядных примерах учиться имхо.

Posted: 05.08.2008 11:17
by Scripts Writer
Пока сам не сделаешь 10 ошибок, не научится. Тем более самому надо и скрипты большие разбирать, и видеть там всевозможные конструкции. А когда копи/паст- это без пользы