Тема: Скрипт
Показать сообщение отдельно
Старый 26.10.2011, 03:13   #3
Новичок
 
Аватар для Pocuk
 
Регистрация: 25.10.2011
Сообщений: 17
Сказал Спасибо: 7
Имеет 0 спасибок в 0 сообщенях
Pocuk пока неопределено
Печаль

Большое спасибо! потестирую и отпишусь.

UPD: скрипт зависает на:
Код:
    begin
      Timer01.enabled:=true;
вибывает ошибку сам л2пх - Access violation at address 132A61E9 in module 'l2ph.exe'. Read of address 00000000.
(игра не зависает) но л2пх не реагирует ни на что, спасает быстрое нажатие ОК и выключение скрипта.
Может проблема в том что Procedure Free; не задействовали?

Добавлено через 12 часов 15 минут
сильно упростил скрипт ради интереса и он перестал выдавать ошибку, но и функцию свою не исполняет:

Код:
...
Procedure OnTimer01; //Тело Timer01 (Запускается раз в Timer01.interval)
begin //Выполняется каждые 2секунды вне зависимости от пакета запуска таймера.
         //отправляем пакет 'EE FF' (На сервер)
         buf:=HStr('EE FF');
         SendToServer;
         pck:='';
end;
begin
    //Если приходит пакет 'AA BB' то запускает таймер. (От клиента)
    if FromClient and (pck=HStr('AA BB')) then Timer01.enabled:=true;
    //Если приходит пакет 'CC DD' то вырубаем таймер. (От клиента)
    if FromClient and (pck=HStr('CC DD')) then Timer01.enabled:=false; 
end.
я думаю после прихода АА ВВ от клиента должен отправляться на сервер EE FF каждие 2 сек. но ето не работает.

Последний раз редактировалось Pocuk, 26.10.2011 в 03:16. Причина: Добавлено сообщение
Pocuk вне форума   Ответить с цитированием