Сообщения без ответов | Активные темы Текущее время: Вт сен 25, 2018 9:56 pm



Ответить на тему  [ Сообщений: 3 ] 
Какие условия ещё можно задать GPS бег ??? 
Автор Сообщение
Аватар пользователя

Зарегистрирован: Ср апр 27, 2016 5:45 pm
Сообщений: 18
 Какие условия ещё можно задать GPS бег ???
Народ проблема такая скрипт сделан на фарм после того как он приходит в зону подрубает интерфейс всё как бы начинает фармить но пастоянно циклится на том что бы

procedure GoToGK();
var
MyGPS:TMYGPS;
begin
Gps.LoadBase(ExePath+'\Interlude.db3');
if not User.Dead then begin
MyGPS.gps_moveto('procedure GoToGK();
var
MyGPS:TMYGPS;
begin
Gps.LoadBase(ExePath+'\Interlude.db3');
if not User.Dead then begin
MyGPS.gps_moveto('Schuttgart_GK');
end;
end;
end;
end;

бежать в точку procedure Schuttgart_GK,люди подсказали из-за данного условия if not User.Dead then begin - Если я жив то бежим. Какое адекватное условие поставить голову ломал но что-то в голову не идет мысля буду очень благодарен. да и из-за этого он просто тушит скрипт
Изображение


Сб июн 02, 2018 8:10 am
Профиль
Куда я попал

Зарегистрирован: Чт мар 29, 2018 8:12 am
Сообщений: 46
Сообщение Re: Какие условия ещё можно задать GPS бег ???
Вы точно ничего не попутали? Структура процедуры бредовая.

Код:
procedure GoToGK();
var
  MyGPS:TMYGPS;
begin
  Gps.LoadBase(ExePath+'\Interlude.db3');
  if not User.Dead then
  begin
    MyGPS.gps_moveto('procedure GoToGK();
    var
      MyGPS:TMYGPS;
    begin
      Gps.LoadBase(ExePath+'\Interlude.db3');
      if not User.Dead then
      begin
        MyGPS.gps_moveto('Schuttgart_GK');
      end;
    end;
  end;
end;

_________________
Оказываю помощь бесплатно только публично на форуме, цените свои и мое время.
AdrenalineScript.com - премиум плагины и скрипты


Сб июн 02, 2018 2:25 pm
Профиль WWW
Аватар пользователя

Зарегистрирован: Ср апр 27, 2016 5:45 pm
Сообщений: 18
Сообщение Re: Какие условия ещё можно задать GPS бег ???
Krickt01 писал(а):
Вы точно ничего не попутали? Структура процедуры бредовая.

Код:
procedure GoToGK();
var
  MyGPS:TMYGPS;
begin
  Gps.LoadBase(ExePath+'\Interlude.db3');
  if not User.Dead then
  begin
    MyGPS.gps_moveto('procedure GoToGK();
    var
      MyGPS:TMYGPS;
    begin
      Gps.LoadBase(ExePath+'\Interlude.db3');
      if not User.Dead then
      begin
        MyGPS.gps_moveto('Schuttgart_GK');
      end;
    end;
  end;
end;




Извиняюсь тут просто 2 процедуры сразу несколько кусков в одно скопировал,а так уже решил всё что надо было всем спасибо.


Чт июн 07, 2018 9:55 am
Профиль
Показать сообщения за:  Сортировать по:  
Ответить на тему   [ Сообщений: 3 ] 

Кто сейчас на форуме

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 3


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Найти:
Перейти:  
cron
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group.
Разработано: g-yar.
Русская поддержка phpBB