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 искать в файловом архиве.

[Emocean]

Я в своём скрипте убиваю пакет от сервера, но он всё равно приходит клиенту. От клиента к серверу тоже доходят убиваемые мной команды в чат, к примеру.

[AlexS]

В том то все и дело что на сервер после "обнуления" отправляется нормальный пакет а не нулевой, а в скрипте он является нулевым.

pck:='';
if (pck='') then exit;

по if выйду из скрипта но не обнуленный пакет будет отправлен на сервер.

Добавлено через 6 минут
В версиях 3.1.8-3.2.0 с данной проблемой не сталкивался.

[Emocean]

В 3.3.0 вроде тоже норм было.

[Grinch]

NLObP, проверь 3.3.0 чёта снова троян говорит на 3.3.1 не ругается

[NLObP]

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

Я в своём скрипте убиваю пакет от сервера, но он всё равно приходит клиенту. От клиента к серверу тоже доходят убиваемые мной команды в чат, к примеру.

Нашёл ошибку. Сейчас выложу.

3.3.2 от 23.08.2008
[+] исправил - В скрипте убиваю пакет от сервера, но он всё равно приходит клиенту;
Выложил исходники для сомневающихся.

Файл l2phx332_by_NLObP.rar получен 2008.08.22 23:03:24 (CET)
Текущий статус:   закончено 
Результат: 7/35 (20%) 
 Форматированные 
Печать результатов  Антивирус	Версия	Обновление	Результат
AhnLab-V3	2008.8.21.0	2008.08.22	-
AntiVir	7.8.1.23	2008.08.22	TR/ATRAPS.Gen
Authentium	5.1.0.4	2008.08.22	-
Avast	4.8.1195.0	2008.08.22	-
AVG	8.0.0.161	2008.08.22	PSW.OnlineGames.AYSO
BitDefender	7.2	2008.08.22	-
CAT-QuickHeal	9.50	2008.08.22	TrojanPSW.OnLineGames.rymz
ClamAV	0.93.1	2008.08.22	-
DrWeb	4.44.0.09170	2008.08.22	-
eSafe	7.0.17.0	2008.08.21	-
eTrust-Vet	31.6.6040	2008.08.22	-
Ewido	4.0	2008.08.22	-
F-Prot	4.4.4.56	2008.08.21	-
F-Secure	7.60.13501.0	2008.08.22	-
Fortinet	3.14.0.0	2008.08.22	-
GData	2.0.7306.1023	2008.08.20	-
Ikarus	T3.1.1.34.0	2008.08.22	-
K7AntiVirus	7.10.425	2008.08.22	Trojan-PSW.Win32.OnLineGames.rymz
Kaspersky	7.0.0.125	2008.08.22	-
McAfee	5368	2008.08.22	-
Microsoft	1.3807	2008.08.22	-
NOD32v2	3381	2008.08.22	-
Norman	5.80.02	2008.08.22	-
Panda	9.0.0.4	2008.08.22	Suspicious file
PCTools	4.4.2.0	2008.08.22	-
Prevx1	V2	2008.08.22	-
Rising	20.58.42.00	2008.08.22	-
Sophos	4.32.0	2008.08.22	Mal/Behav-053
Sunbelt	3.1.1571.1	2008.08.22	-
Symantec	10	2008.08.22	-
TheHacker	6.3.0.6.058	2008.08.22	-
TrendMicro	8.700.0.1004	2008.08.22	-
ViRobot	2008.8.22.1346	2008.08.22	-
VirusBuster	4.5.11.0	2008.08.22	-
Webwasher-Gateway	6.6.2	2008.08.22	Trojan.ATRAPS.Gen
Дополнительная информация
File size: 755566 bytes
MD5...: 590274aaf8ad38ca15e6501fde5ea564
SHA1..: d859ca82d6d07904c87a1739df2ca797a5b82187
SHA256: d15c266c59dd4e191f2cf88be20c2296a0314fce507c2231af28c7314208b259
SHA512: 7b0dc57b0566c8e4351067d795a1c2624d345e28b9d64944f747fb0c2a3c89c2
93d34d9abbf4d519396447426552b4575a3f9f6131cb2f49a6db4b297e1cc467

Добавлено через 22 минуты

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

А для чего так? Разве не удобнее было подставлять в Read и Write значения смещения в десятичной системе? Как теперь правильно надо писать? 0x02, 0x06, 0x0A?..

Это чтобы не делать выравнивание. В Hex все время 4 символа. А писать наверно надо $02, $06, $0A или в калькуляторе(уме) в десятичное перевести.

[Breadfan]

Заметил одну особенность: некоторые сервера не следят за количеством предметов в сумке и после покупки\обмена можно получить ситуацию когда инвентарь полон на (например) 154 ячейки из 150 )). Естественно если в этот момент сработает процедура CreateItemBase то возникает ошибка переполнения массива. В предыдущих версиях пакетхака достаточно было подтвердить сообщение об ошибке и выключить выполняемый скрипт, после чего можно было продолжить работу. Сейчас же программа продолжает блокировать входящие пакеты даже после отмены выполнения ошибочного скрипта.

[NLObP]

Завершать работу с пакетхак надо так:
- Останавливаем скрипты.
- Закрываем все клиенты.
- Закрываем пакетхак.
Иначе можно увидеть разнообразные сообщения об ошибках.
Еще. Если закрыть пакетхак, соединение рвется. Клиент остается на запросе логин/пароль. Второй раз запустив пакетхак пропатчить клиент не получиться, клиент падает с критической ошибкой. Связано стем, что инжект не убирается при выходе из пакетхака.

Добавлено через 10 часов 36 минут
3.3.3 от 23.08.2008
[+] в редакторе скриптов горячие клавиши:
ctrl-S - сохранение,
ctrl-F - поиск,
ctrl-R - поиск с заменой,
ctrl+F9 проверка скрипта;
[!] после поиска с заменой undo невозможна;

[PanAm]

Кстати, стало неудобно - при разрыве соединения лог пакетов отчищается, и теперь невозможно отследить с какого пакета крит.

[NLObP]

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

Кстати, стало неудобно - при разрыве соединения лог пакетов отчищается, и теперь невозможно отследить с какого пакета крит.

Можно исправить как было.

[xkor]

NLObP, лучше думаю сделать опционально автологирование пакетов в файл, только вот как файл обзывать...