L2PacketHack 3.5.x

[NLObP]

Исходники здесь
Вот такие скомпилированные версии есть у меня.

Ниже данные устарели.
Репозиторий находится тут (открывать через SVN клиент)
Удобный просмотр репозитория через браузер тут
Скомпилированные версии тут Пароль к архиву: coderx.ru

Есть ли предложения по модернизации существующего кода с описанием как должно и что хотелось бы заменить/добавить?

Программа пишется в среде Delphi 2007 и Delphi 7 с использованием следующих дополнительных библиотек компонентов:
- FastScript (http://fast-report.com/ru/products/fast-script.html)
- JCL (http://sourceforge.net/projects/jcl/)
- JVCL (http://sourceforge.net/projects/jvcl/)

Дополнительные компоненты брать тут. (<-- TPerlRegEx есть только там)

/upd:
для компиляции последних ревизий понадобятся JCL, JVCL (ссылки выше) а так же:
jwapi2.2a, SyntEdit, TRichView.v11.0+ScaleRichView.v2.0, TsiLang (letitbit / upload.com.ua)
Немного подправленный FastScript искать в файловом архиве.

[xkor]

Сообщение от QaK

которая у хкора пока не получается

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

Добавлено через 6 минут
wanick, пакетхак не определяет что надо разрывать, покрайней мере мой, он просто читает из сокетов данные пока один из двух сокетов соединения не вернёт ошибку и если произошла ошибка разрывает второй сокет и уничтожает соединение.

[wanick]

в том и дело когда выход жмешь, значит сокет не закрывается ни с одной стороны,
пакеты продолжают идти

[xkor]

wanick, клиент рвёт соединение при получении пакета LogOutOk

[Argot]

советаю почитать о Select ))

и подумать о применении функции ))

function WaitForData(Socket:TSocket,Timeout: Longint): Boolean;
var
  FDSet: TFDSet;
  TimeVal: TTimeVal;
begin
  TimeVal.tv_sec := Timeout div 1000;
  TimeVal.tv_usec := (Timeout mod 1000) * 1000;
  FD_ZERO(FDSet);
  FD_SET(Socket, FDSet);
  Result := select(0, @FDSet, nil, nil, @TimeVal) > 0;
end;

[RoZ]

Сообщение от xkor

блин, придётся сервак другой ставить - anonymous access is not supported by VisualSVN Server...

http://subversion.tigris.org/ этот смотрел ? У меня под никсой работает вполне стабильно, да и конфиги там простенькие.

[wanick]

Сообщение от Argot

советаю почитать о Select ))

и подумать о применении функции ))

function WaitForData(Socket:TSocket,Timeout: Longint): Boolean;
var
  FDSet: TFDSet;
  TimeVal: TTimeVal;
begin
  TimeVal.tv_sec := Timeout div 1000;
  TimeVal.tv_usec := (Timeout mod 1000) * 1000;
  FD_ZERO(FDSet);
  FD_SET(Socket, FDSet);
  Result := select(0, @FDSet, nil, nil, @TimeVal) > 0;
end;

мм занятно, надо подробнее почитать еще раз, пока времени не густо

[PanAm]

а можно сделать настройку для кооффициента вычитания для NPCID в просмотре пакетов?

[NLObP]

Сообщение от PanAm

а можно сделать настройку для кооффициента вычитания для NPCID в просмотре пакетов?

kid в optios.ini ставь тот,который нужен для просмотра пакетов для NPCID.

[Name4Me]

Есть предложение добавить в ПКХ возможность записи пакетов(или даних из пакетов) в базу даних (например в мускул) имхо етим можно уменьшить время обработки пакета и увеличить гибкость виборки даних...

[xkor]

Name4Me, надо просто оптимизировать способ хранения пакетов, будет намного быстрее мускула ибо не так универсально...