Авторизация  
machette

Детект хайд

В теме 2 сообщения

Цитата

program detect;

{$Include 'all.inc'}

BEGIN
   while (not Dead) do
   begin
      Hungry(1,Ground);
      if (HP < MaxHP) then
      begin
         repeat
         wait(1000);
         until (HP = MaxHP);
      end;
      if (HP = MaxHP) then
      begin 
         UseSkill('Detect Hidden');
         Wait(10000);
      end;
   end;
END.

 

Поделиться сообщением


Ссылка на сообщение
Поделиться на другие сайты

выше указанный скрипт на 1 чара

для второго вот... знаю что есть лишнее но работоспособность 100%

Program Healinghero;

Var
bandages:cardinal; 
Hero:cardinal;

{$Include 'all.inc'} 

Begin
bandages:=FindType($0E21,backpack);
While not dead do
Begin
if not Hidden THEN
Begin
While not Hidden do 
Begin
useskill('Hiding');
wait(8000);
end;
end;
wait(1000);


end;

End.

Поделиться сообщением


Ссылка на сообщение
Поделиться на другие сайты

Для публикации сообщений создайте учётную запись или авторизуйтесь

Вы должны быть пользователем, чтобы оставить комментарий

Создать учетную запись

Зарегистрируйте новую учётную запись в нашем сообществе. Это очень просто!

Регистрация нового пользователя

Войти

Уже есть аккаунт? Войти в систему.

Войти
Авторизация