Защита для онлайн игры Lineage 2 [DELPHI]

[Denever]

Всем привет. Нужна очень срочно ваша помощь.
Имееться код написанный на Delphi [SPS] Защита для онлайн игры Lineage 2.
В процедуре procedure doHandle(aKey: Integer; blackList: Pchar); методом St.Add('.'); идёт определение запрещённых программ по процессу,титулу,и классу.
Помогите разобратся как добавить свои процессы,титулы, и классы на запрещённые программы.
Какая цифра за что отвечает и если можно примером. Спасибо.

Код: http://pastebin.com/nT67J54v

[SeregaZ]

тебе на другой форум надо :) тут форум типа "как бы защиту обойти", а не "как бы защиту написать".
попробуй на mmocom.ru - там сообщество горе-админов серверов L2, которые сообща решают, каких проблем еще, нам читорам, подкинуть.

[Denever]

тебе на другой форум надо :) тут форум типа "как бы защиту обойти", а не "как бы защиту написать".
попробуй на mmocom.ru - там сообщество горе-админов серверов L2, которые сообща решают, каких проблем еще, нам читорам, подкинуть.
Да я думаю тут помогут все равно есть люди знающие Delphi. :)

[xkor]

Denever, 1 - имя класса окна, 2 - заголовок окна, 3 - имя файла

[Denever]

Denever, 1 - имя класса окна, 2 - заголовок окна, 3 - имя файла
Их можно добавлять в любом расположении?
Т.е примерно:

St.Add('2 l2Fish ');
St.Add('2 la2rc ');
St.Add('3 teste.exe')
St.Add('2 L2Shkey ');
St.Add('2 Clickermann ');
St.Add('1 doKillCharacter');

Или же есть какой-то определённый распорядок?

[Fertis]

Их можно добавлять в любом расположении?
Т.е примерно:

St.Add('2 l2Fish ');
St.Add('2 la2rc ');
St.Add('3 teste.exe')
St.Add('2 L2Shkey ');
St.Add('2 Clickermann ');
St.Add('1 doKillCharacter');

Или же есть какой-то определённый распорядок?
без разницы

[Denever]

При добавлении методом определение титула St.Add('2 okno '); всё работает но с определением имён программ не хочет St.Add('3 file.exe'); в чём проблемка?

[xkor]

Denever, у имён файлов должен быть нижний регистр

fn := LowerCase(ExtractFileName(Pe.szExeFile));
for i := 0 to PEList.Count-1 do
if pos(PEList[i],fn) = 1 then exit;

[Denever]

Нижний регистр - маленькие буквы как я понял?)
Добавлял St.Add('3 cmd.exe'); не хочет..

На данный момент лист такого рода:
St.Add('2 hide');
St.Add('2 hide');
St.Add('2 hide');
St.Add('2 hide');
St.Add('2 hide');
St.Add('2 hide');
St.Add('2 hide ');
St.Add('3 cmd.exe');

xkor, приведи мне пример пожалуйста а то я тугадум..:o

[mira]

Расширение точно нужно писать?

[destructor]

тут форум типа "как бы защиту обойти", а не "как бы защиту написать".это одно и тоже

[supernewbie]

ну ломать проще, чем строить
так что хз

[mira]

ну ломать проще, чем строить
так что хз

хз

[Denever]

up