Вход

Просмотр полной версии : обход защиты сервера


g1oom08
15.02.2011, 03:16
прошу помочь с проблемой,серв l2rx.com
работоспособность ботов была на 100%
1.Бот точки скилов
2.бот енчант
3.бот на закупку
l2.exe не работает l2.bin пресутсвует,клиент перед запуском проверяет все
через апдейтер
НО в послед обновление все перестало работать...Боты не реагируют на запуск
что это можт быть шифровка пакетов7 как обойти?
думаю это шифровка в клиенте,поскольку админ говорил что "сложно поставить фикс
на клиентской часте"...но в послед раз,бот не
смог даж закупится и точить
(писало что нету итема в наличии,даже при правельном ид)
как обойти эту защиту от ботов? прав ли я на счет шифр пакетов или ошибаюсь?

lordoftherea1m
15.02.2011, 04:14
какой бот? скрипт?
заскринь лог пакетов. если шифрация, то вообще забей.

Nickers
15.02.2011, 20:10
1.Бот точки скилов
2.бот енчант
3.бот на закупку
4. Бот-сантехник
5. Бот-нянька
6. Бот-бот

Боты не реагируют на запуск
бот несмог даж закупится и точить (писало что нету итема в наличии,даже при правельном ид)
Ты сам себе противоречишь...

Не ясно в чем пилять у тебя проблема, Создал новую тему хотя есть уже у нас такая тема (в самом верху раздела этого), назвал в стиле "ПАМАГИТЕ"

g1oom08
16.02.2011, 04:23
версия paketHacka 3.4.1.61
Бот-скрипт заточка скилов,работа на ХБ и после перехода на ГФ
ща хроники ГФ
скрин Лог пакетов имено при входе в игру?
сам paketHack входит и бот работал отлично,после послед обновлений Бот-скрипты
не реагирует когда запускаешь.....действий 0
ПРОБЛЕМа в том,можно ли как то обойти/убрать шифр.пакетов и отключить
проверку через апдейтер
потому что все боты до послед.обновлений работали а щяс не производят
не каких дейтсвий
ПРОСТИТЕ ЗА НЕКОРЕКТНОСЬ создания темы

lordoftherea1m
16.02.2011, 10:30
ПРОБЛЕМа в том,можно ли как то обойти/убрать шифр.пакетов и отключить
проверку через апдейтер
нет
скрин Лог пакетов имено при входе в игру?
да

mira
16.02.2011, 10:54
как ранше то работал)
леймгвард что древний стоял, щас везде почти он по своему шифрует траффик. Пх под норм лг вроде еще никто не сделал.
Мб ктото делал какуюнеть закрытую сборку

g1oom08
18.02.2011, 04:05
после перехода работал на ура
возможно
а разве л2.бин отключить не реально?оО
Лог пакетов > http://s57.radikal.ru/i157/1102/b5/a6adb7028711.png

Nickers
18.02.2011, 09:15
Дайпервый лог пакетов сразу после захода в игру где много народу и НПЦ

mira
18.02.2011, 11:57
как отключиш бин если это сам клиент) шифрацию нельзя обойти оог если она есть. Сервер воспимет тока зашифрованые 'поновому' пакеты

lordoftherea1m
18.02.2011, 13:02
Может быть тут не лейм, а первый байт перебивается просто.

AHTOWKA
18.02.2011, 15:03
во первых подумайте хорошо конкретно сами почему неможите зайти с l2.bin во вторых боты невлияют на шифровку и дешифровку пакетов в третих ето не сайт читеров

ps:кому помог спасибку =)

g1oom08
01.03.2011, 21:40
Log packetov pri vxode http://s57.radikal.ru/i158/1103/7c/91d9318519fa.png (giran centr, mnogo NPC + trade botu)
взял за основу Бота Точки Скилов
ефектов 0....не реагирует....в чем можт быть проблема? как обойти?

Добавлено через 5 минут
во первых подумайте хорошо конкретно сами почему неможите зайти с l2.bin во вторых боты невлияют на шифровку и дешифровку пакетов в третих ето не сайт читеров

ps:кому помог спасибку =)
1.Тогда почему перестали работать боты? не 1 БОТ даж на точку не работает
2.защита сервера относится к ботам,я не прошу баги читы и тд...

lordoftherea1m
02.03.2011, 04:06
Внезапно, это не бот. А скрипт, автоматизирующий определенные действия.
Тебе уже ответили. 95%, что там стоит леймгвард, а чтобы разобраться в шифровке трафика на нем надо обладать определенными навыками, которых, судя по твоему вопросу у тебя нет.
5% что там какая-нибудь самопальная защита подменяющая первый байт, но даже так, ты не разберешься, если такой топик создал.

EmL
21.07.2011, 12:25
раньше конечно все юзали такое но сейчас новые хроники,новая защита ну я тебе дам скрипт на точку вчера сам проверял)

const
myname=''; //<<== пишем свой НИК
max=80; //<<== колличество ячеек в рюкзаке
enchantResult=16; //<<== на сколько точить
encSafe=3; //<<== на сколько безопасно точить
var
BaseItems:array[1..max,1..10] of integer;
EncItems:array[1..10] of integer;
Timer01,Timer02: TTimer;
mytext:string;
x,textID,vsego:integer;
enchantID,enchantObjectID:integer;
ItemOID,objectOID,selectObjectID,itemID:integer;
skrolObjectID,bskrolObjectID,skrolAmount,bskrolAmo unt,skrolID,bskrolID,skrolOID,bskrolOID:integer;
enchantLevel:word;
start,startenchant:Boolean;
//---
procedure SendMsg2(msg:string);
begin
buf:=#$4A;
WriteD(0);
WriteD(10);
WriteS('');
WriteS(msg);
SendToClientEx(myname);
end;
//...
procedure ItemList;
var
i, j, k: integer;
ListSize: integer;
begin
j:=4; //пропускаем дo ListSize
ListSize:=ReadH(j);
for i:=1 to ListSize do
if (i<=ListSize) then begin
BaseItems[i,1]:=ReadH(j); //ItemType1- 1:одето броня. 0:бижа. 4:в рюкзаке
BaseItems[i,2]:=ReadD(j); //ObjectID
BaseItems[i,3]:=ReadD(j); //ItemID
BaseItems[i,4]:=ReadD(j); //LocationSlot
BaseItems[i,5]:=ReadD(j); // q Amount:
j:=j+4; // q Amount:
BaseItems[i,6]:=ReadH(j); //ItemType2
BaseItems[i,7]:=ReadH(j); // CustomType1
BaseItems[i,8]:=ReadH(j); //isEquipped:
BaseItems[i,9]:=ReadD(j); //BodyPart
BaseItems[i,10]:=ReadH(j); //EnchantLevel
//SendMsg2( ' List; ItemID------- : '+IntToStr(BaseItems[i,3])+'' );
inc(j,30);// ФИНАЛ
end else for k:=1 to 10 do BaseItems[i,k]:=0; // забиваем нулями
if (0<ItemID) then objectOID:=GetObjectID(ItemID);//находим по ItemID предмет с ObjectID
end;
//===
//находим ItemID по ObjectID предмета
function GetItemID(enchantObjectID:integer) : integer;
var
i : integer;
begin
for i:=1 to max do
if (BaseItems[i,2]=selectObjectID) then begin
itemID:=BaseItems[i,3];
SendMsg2 ('- ID предмета для Заточки:'+IntToStr(itemID)+' ');
start:=true;
exit;
end;
end;
//===
//находим enchantID предмета по ItemID для заточки
function GetObjectID(itemID:integer) : integer;
var
i :integer;

begin
enchantLevel:=0;
vsego:=0;
for i:=1 to max do
if (BaseItems[i,3]=itemID) and (BaseItems[i,10]< enchantResult) then begin
vsego:=vsego+1;
EncItems[vsego]:=i;
if (vsego = 1) then begin
enchantLevel:=BaseItems[i,10];
enchantID:=BaseItems[i,2];
end;
if (vsego > 1) and (BaseItems[i,10] < enchantLevel) then begin
enchantLevel:=BaseItems[i,10];
enchantID:=BaseItems[i,2];
end;
end;
//SendMsg2( '- В Ы Б Р А Н предмет для Заточки');
//SendMsg2( '- ObjID предмета='+IntToStr(enchantID)+' ');
//SendMsg2( '- точим предмет до: '+IntToStr(enchantResult)+' ' );
SendMsg2( '- предметов для заточки: '+IntToStr(vsego)+' ' );
SendMsg2( '- минимально заточен на: '+IntToStr(enchantLevel)+' ' );
x:=1;
if startenchant then begin
Timer01.enabled:=true;
end else begin
SendMsg2( '- cоцдействие ДА для старта' );
end;
end;
//===
procedure OnTimer01(Sender: TObject);
begin
case x of
1:begin
buf:=#$19;
if enchantLevel < encSafe then begin
WriteD(skrolObjectID); //простая заточка
end else begin
WriteD(bskrolObjectID);//блессед заточка
end;
WriteD(0);
SendToServerEx(myname);
inc(x);
end;
2:begin
buf:=hstr('D04C00');
WriteD(enchantID);
SendToServerEx(myname);
Timer02.enabled:=true;
x:=0;
Timer01.enabled:=false;
end;
end;
end;
//---
procedure OnTimer02(Sender: TObject);
begin
buf:=#$5F;
WriteD(enchantID);
WriteD(0);
SendToServerEx(myname);
Timer02.enabled:=false;
SendMsg2( '- Т О Ч И М предмет: '+IntToStr(enchantID)+' ' );
end;
//----------------------------------------------------------------------------------- start
procedure Init;
begin
itemID:=0;
enchantID:=0;
enchantLevel:=0;
start:=false;
startenchant:=false;
skrolObjectID:=0;
bskrolObjectID:=0;
enchantObjectID:=0;

Timer01:=TTimer.Create(nil);
Timer01.OnTimer:=@OnTimer01;
Timer01.enabled:=false;
Timer01.interval:=500; //<<== время выбора свитка и предмета

Timer02:=TTimer.Create(nil);
Timer02.OnTimer:=@OnTimer02;
Timer02.enabled:=false;
Timer02.interval:=2800; //<<== время между заточкой
SendMsg2( '- ***** скрипт включился *****' );
SendMsg2( '- ник: '+myname+', ячеек инвентаря: '+IntToStr(max)+' ' );
SendMsg2( '- будем точить до '+IntToStr(enchantResult)+' ' );
SendMsg2( '- выберите обычную заточку ' );
x:=0;
end;
procedure Free;
begin
Timer01.free;
Timer02.free;
end;
//=========================
procedure RequestActionUse;
begin
case ReadD(2) of
24:begin
startenchant:=true;
x:=1;
Timer01.enabled:=true;
SendMsg2( '- П О Е Х А Л И -' );
SendMsg2( '- соцдействие НЕТ для остановки' );
buf:=hstr('14');
SendToServerEx(myname);
pck:='';
exit;
end;
25:begin
start:=false;
startenchant:=false;
Timer01.enabled:=false;
Timer02.enabled:=false;
SendMsg2( '- С Т О П -' );
SendMsg2( '- cоцдействие ДА для старта' );
pck:='';
exit;
end;
end;
end;
//=========
begin
if FromServer and (pck[1]=#$11) then ItemList;
if FromClient then
case pck[1] of
#$56:RequestActionUse;
#$19:if skrolObjectID = 0 then begin
skrolObjectID:=ReadD(2);
SendMsg2( '- ObjID обычного свитка: '+IntToStr(skrolObjectID)+'' );
SendMsg2( '- выберите блессед заточку' );
buf:=hstr('14');
SendToServerEx(myname);
end else if bskrolObjectID = 0 then begin
bskrolObjectID:=ReadD(2);
SendMsg2( '- ObjID блессед свитка: '+IntToStr(bskrolObjectID)+'' );
SendMsg2( '- заточите нужный предмет' );
buf:=hstr('14');
SendToServerEx(myname);
end;
#$D0:if ReadH(2)=76 then begin
selectObjectID:=ReadD(4);
end;
#$5F:begin
enchantObjectID:=ReadD(2);
ItemOID:=GetItemID(enchantObjectID);//находим по ObjectID предмет с ItemID
end;
end;
end.


p.s скрипт тамбика ему отдельное спасибо =)