Разработка Раздел для совместной разработки/доработки программы
01.08.2008, 06:48
#1
Рыцарь
Регистрация: 25.02.2008
Адрес: г.Волгоград
Сообщений: 2,009
Сказал Спасибо: 1,285
Имеет 1,458 спасибок в 793 сообщенях
L2PacketHack 3.5.x
Исходники
здесь
Вот
такие скомпилированные версии есть у меня.
Ниже данные устарели.
Репозиторий находится
тут (открывать через 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 искать в файловом архиве.
Последний раз редактировалось NLObP, 17.10.2016 в 00:02 .
За это сообщение NLObP нажился 111 спасибками от:
-=Ma}{imuS=- ,
4erteg ,
Agat ,
ak47 ,
Alan ,
alexsl ,
alexteam ,
AoWpwnz ,
APXAHGEJI ,
Asmalaa Asrety ,
Benefit ,
BISMARCK_555 ,
boy200007 ,
boypush ,
Breadfan ,
BuKbI4 ,
CCCP ,
Crypto ,
Curious ,
cutter ,
DashKAaa ,
Denis63RUS ,
dyh9l ,
Elecktron ,
Emocean ,
Evgeniy ,
FatalHistori ,
Fer123 ,
Ferrari3200 ,
FFALL777 ,
Fim ,
freeworld ,
GameCoder ,
gavr1l0 ,
gexiss ,
goodvin1709 ,
Green ,
Grinch ,
HacPaTyc ,
INFERION ,
isya ,
Johnson ,
Keeper ,
Keisei ,
Kotyara2014 ,
lomoWAR ,
lordka) ,
LostQ ,
Lotar ,
Ma3aXakA ,
march ,
marslem ,
mat1s ,
MHz ,
micoach ,
MiRoN ,
mirt ,
MoD_Hanes ,
MrIICUX ,
Mulder ,
Murdoc ,
neonv1 ,
nezabudkin ,
Nigga ,
Niros ,
NoFear ,
OleSha ,
OMOH8787 ,
PanAm ,
pascalpwnz ,
PerioH ,
PIONER ,
QaK ,
rastaman_228 ,
ratvier ,
RockTeam ,
RoZ ,
Rubicosha ,
Rysis ,
Ryth ,
saxa24111 ,
shunder ,
skaner ,
skiner4119 ,
Snowbars ,
StekloReZ ,
stopicot ,
TAMBIK ,
Tchep ,
Therapyst ,
TryLaw ,
vahes ,
Velizarx ,
victor_rvm ,
Vilson ,
Vklu4atel^^ ,
vlad00777 ,
vovanchik ,
vul-test ,
wanick ,
wasabi_100 ,
WhiteDevil ,
Xelat ,
xkor ,
Yegor ,
Yellowboy ,
zDiablik ,
АлисаХочетСекс ,
Арти ,
женька
15.09.2008, 08:50
#161
Пользователь
Регистрация: 10.10.2007
Сообщений: 39
Сказал Спасибо: 0
Имеет 7 спасибок в 5 сообщенях
FastMM4 рулит )) под фул дебагом
Да и Fast`a не обезательна чтоб найти где классы создають но не разрушаются, тоже самое с веделеной памятью. +кое где нехватает проверок на то существует ли класс чтоб его юзать.
ЗЫ по правил немного ошибо попозже выложу ))
Последний раз редактировалось Argot, 15.09.2008 в 08:53 .
За это сообщение Argot нажился спасибкой от:
15.09.2008, 20:24
#162
Заблокирован
Регистрация: 10.03.2008
Адрес: Тула
Сообщений: 1,098
Сказал Спасибо: 188
Имеет 108 спасибок в 60 сообщенях
Жесть, модернизированный пакет хак при 4 окнах комп в даун уводит... 100% загрузки процессора без перерыва...
16.09.2008, 03:30
#163
Рыцарь
Регистрация: 25.02.2008
Адрес: г.Волгоград
Сообщений: 2,009
Сказал Спасибо: 1,285
Имеет 1,458 спасибок в 793 сообщенях
Выложил свежую версию. Тестируйте.
3.3.8 от 16.09.2008
[+] устранил утечки памяти, спс. Argot;
Добавлено через 6 минут
Цитата:
Сообщение от
Argot
ЗЫ по правил немного ошибо попозже выложу ))
Выкладывай, я посмотрю. что можно ещё сделать.
PS: так и не понял, что тут можно сделать:
delphi Код:
tmp:='На ' +IntToStr ( ntohs( LPortConst) ) +' зарегистрирован локальный сервер' ;
LogMsg:=PChar ( tmp) ;
SendMessage( L2PacketHackMain.Handle , WM_ListBox3_Log, 0 , integer ( @LogMsg) ) ;
Без IntToStr(ntohs(LPortConst)) утечки нет.
Последний раз редактировалось NLObP, 16.09.2008 в 03:30 .
Причина: Добавлено сообщение
За это сообщение NLObP нажился спасибкой от:
16.09.2008, 04:11
#164
Гость
Цитата:
Сообщение от
NLObP
Выложил свежую версию. Тестируйте.
3.3.8 от 16.09.2008
[+] устранил утечки памяти, спс. Argot;
Добавлено через 6 минут
Выкладывай, я посмотрю. что можно ещё сделать.
PS: так и не понял, что тут можно сделать:
delphi Код:
tmp:='На ' +IntToStr ( ntohs( LPortConst) ) +' зарегистрирован локальный сервер' ;
LogMsg:=PChar ( tmp) ;
SendMessage( L2PacketHackMain.Handle , WM_ListBox3_Log, 0 , integer ( @LogMsg) ) ;
Без IntToStr(ntohs(LPortConst)) утечки нет.
попробуй так:
tmp := format('На %d зарегистрирован локальный сервер',[ntohs(LPortConst)]);
SendMessage(L2PacketHackMain.Handle, WM_ListBox3_Log, 0, integer(@tmp[1]));
16.09.2008, 13:02
#165
Пользователь
Регистрация: 10.10.2007
Сообщений: 39
Сказал Спасибо: 0
Имеет 7 спасибок в 5 сообщенях
Цитата:
Сообщение от
NLObP
Выложил свежую версию. Тестируйте.
3.3.8 от 16.09.2008
[+] устранил утечки памяти, спс. Argot;
Добавлено через 6 минут
Выкладывай, я посмотрю. что можно ещё сделать.
PS: так и не понял, что тут можно сделать:
delphi Код:
tmp:='На ' +IntToStr ( ntohs( LPortConst) ) +' зарегистрирован локальный сервер' ;
LogMsg:=PChar ( tmp) ;
SendMessage( L2PacketHackMain.Handle , WM_ListBox3_Log, 0 , integer ( @LogMsg) ) ;
Без IntToStr(ntohs(LPortConst)) утечки нет.
Вообще для красоты кода все сообщения надо вынести в шаблоны и забить в константы Вида.
const
StartServ= 'На %d зарегистрирован локальный сервер';
юзать
format(StartServ,[ntohs(LPortConst)]);
16.09.2008, 15:56
#166
Местный
Регистрация: 18.01.2008
Сообщений: 286
Сказал Спасибо: 24
Имеет 133 спасибок в 80 сообщенях
так не долеко до мульти-языковости
и скоро тут будут форумы для греков
16.09.2008, 18:30
#167
Пользователь
Регистрация: 08.03.2008
Сообщений: 77
Сказал Спасибо: 31
Имеет 19 спасибок в 15 сообщенях
Все равно нагружает клиент по самые нехочу, играть не реал, такого в 3.3.6 нет.
16.09.2008, 20:16
#168
Пользователь
Регистрация: 10.10.2007
Сообщений: 39
Сказал Спасибо: 0
Имеет 7 спасибок в 5 сообщенях
Цитата:
Сообщение от
APXAHGEJI
Все равно нагружает клиент по самые нехочу, играть не реал, такого в 3.3.6 нет.
Нагружается не клиент, а процессор.
ЗЫ. по теме Кто будет удалять хендлы отработаных Фредов ?
ЗЫЫ Думаю есть смысл вместо SendMessage юзать Events
Последний раз редактировалось Argot, 16.09.2008 в 20:59 .
16.09.2008, 22:06
#169
Пользователь
Регистрация: 08.03.2008
Сообщений: 77
Сказал Спасибо: 31
Имеет 19 спасибок в 15 сообщенях
Если чесн мне пох кто кого. Хотя с какой стороны посмотреть.
Не пакетхак нагружает проц, а клиент. То есть коим то образом
пакетхак нагружает клиент, а клиент в свою очередь уже нагружает процессор.
17.09.2008, 00:37
#170
Рыцарь
Регистрация: 25.02.2008
Адрес: г.Волгоград
Сообщений: 2,009
Сказал Спасибо: 1,285
Имеет 1,458 спасибок в 793 сообщенях
Мне кажется я inject.dll кривой выложил, замените из 3.3.6
За это сообщение NLObP нажился спасибкой от:
Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения
HTML код Выкл.
Часовой пояс GMT +4, время: 12:10 .
vBulletin style designed by
MSC Team .
Powered by vBulletin® Version 3.6.11
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd. Перевод:
zCarot
Вы хотите чувствовать себя в безопасности? чоп Белган обеспечит её!