Совершенно не к месту, но.. - Stealth ^)

[Alex]

Кушает с пака, при желании можно поменять.
Скрипт качает стелс, а не хайд со стелсом.

Code: Select all

program gg;
var t: Integer;

{$Include 'all.inc'}

begin
 SetARStatus(true); {Включаем реконектор}
 Hungry(1,backpack);
 clearjournal;
 while not dead do
  begin
  if connected then
   begin
   for t := 0 to 30 do
   begin
    CheckSave;
    if not hidden then
    begin
     Useskill('Hiding');
     wait(11000);
    end;
    Useskill('Stealth');
    Wait(11000);
   end;
  hungry(1,backpack);
  end;
  wait(1000);
 end;
End.

[ParadoX]

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

Code: Select all

begin 
SetARStatus(true); {Включаем реконектор} 
while true do 
begin 
   for t := 0 to 30 do 
   begin 
   save(); 
   if not hidden then  Useskill('Hiding')
   else Useskill('Stealth'); 
   wait(11000); 
   end; 
  hungry(1); 
 end; 
End.

это при условии что я вором отрадясь не бегал..

[Cyn]

Code: Select all

begin 
SetARStatus(true); {Включаем реконектор} 
while true do 
begin 
   for t := 0 to 30 do 
   begin 
   save(); 
   if not hidden then  Useskill('Hiding')
   else Useskill('Stealth'); 
   wait(11000); 
   end; 
  hungry(1); 
 end; 
End.

это при условии что я вором отрадясь не бегал..

не объявил "t", что такое "save()" - "компилятор на них ругается? & "hungry(1)"??

[Edred]

не объявил "t", что такое "save()" - "компилятор на них ругается? & "hungry(1)"??

Ты кого спрашиваешь? Парадокса я здесь давно не видел, да и скрипт он писал прямо на форуме, это видно. Save - наверное надо заменить на checksave, а hungry - где-то здесь в соседних топиках, есть тема про инклюды, там поройся.