Hiding+Stealth Forest Wars

[shinma]

Code: Select all

program hide_test;
{$Include 'all.inc'}

procedure check_war;
begin
if IsWarMode(self) then
 begin
  setWarMode(false);
 end;
end;

procedure check_hide;
var
 ctime: TDateTime;
begin
   check_war;
   UseSkill('hiding');
    check_war;
    checksave;
    wait(4000);
end;


begin
While Not dead do
begin
check_hide ;
Step(0,False);
check_hide ;
Step(0,False);
check_hide ;
Step(0,False);
check_hide ;
Step(4,False);
check_hide ;
Step(4,False);
check_hide 
Step(4,False);  
ClearBadObjectList;
ClearBadLocationList; 
end;
end.

[chernysh]

Объясни, зачем делать целую процедуру чека WarMode, если можно сделать сразу так:

Code: Select all

procedure check_hide;
var
 ctime: TDateTime;
begin
   SetWarMode(false); // В этой строке сразу задать WarMode
   UseSkill('hiding');
    check_war;
    checksave;
    wait(4000);
end;

Можно ведь сразу переопределить режим, или я не прав? Темболее, ты проверяешь WarMode для self...

[Fenix]

Это как-бэ правило хорошего тона - не менять переменную, если она уже имеет необходимое значение.

[chernysh]

Правило хорошего тона только в другом случае.
Здесь переменная принимает либо true либо false. Если бы было больше значений, то да. Скриптер создает лишние движения для интерпретатора

Я не придираюсь, просто интересуюсь почему именно так

[shinma]

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

[MeLFiS]

чую скоро на форесте будет война скриптеров ??

[shinma]

за чо воевать то? место в шахте всем хватит. надо бы общий инклуд иметь на проверку ПК и чоб всей толпой шахтерсокй пк этого валить общими ботами.

[chernysh]

чую скоро на форесте будет война скриптеров ??

Воевать никто не будет. Мне было интересно просто. Получил ответ. А сделать так, чтобы отправляло сообщение в чат, когда бот видит мюрдера, можно

[Fenix]

Вы ещё GM'ов общаком валите А то ещё придёт кто-нить проверять бот или не бот.