Макрос Для Прокачки Скилла Enticement - Stealth Macross - UO - Файлы - Multimedia, Games Site

Файлы

Главная » Файлы » UO » Stealth Macross

Макрос Для Прокачки Скилла Enticement
[ Скачать с сервера (1.2Kb) · Скриншот ] 20.Январь.2009, 16.24.35





Program Ent;

//***************************************************************
//ОЖИДАНИЕ КОНЕКТА
//***************************************************************
procedure WaitConnection;
begin
  if Connected then exit;
  while not Connected do wait(100);
  wait(3000);
end;

//***************************************************************
// РЕСЕНД
//***************************************************************
procedure Resend;
begin
  Wait(1000);
  UOSay(Chr(39)+'resend');
  Wait(5000);
end;

//***************************************************************
//Provocation
//***************************************************************
Procedure Provocation;
begin
AddToSystemJournal('Запускаю макрос Provocation...');
WaitConnection;
Resend;
while GetSkillValue('Enticement') < 100.0 do
begin
WaitConnection;
If FindType($0124, ground) = 0 then UOSay('Объект Привлечения Не найден');
if targetPresent then canceltarget;
   UseSkill('Enticement');
   wait(500);
   WaitTargetObject(FindType($0124, ground));
   wait(500);
   WaitTargetObject(self);  
   wait (2500);
end;
end;


BEGIN
WaitConnection;
Provocation;
  wait(500);
END.
Категория: Stealth Macross | Добавил: adrail
Просмотров: 601 | Загрузок: 129 | Комментарии: 1 | Рейтинг: 0.0/0 |
Всего комментариев: 1
1  
файл взят с сайта наших друзей biggrin

Имя *:
Email *:
Код *:
html counterсчетчик посетителей сайта
МЕТА - Украина. Рейтинг сайтов ProfiSmart TOP счетчик посещений статистика Участник Премии Рунета 2009