Кружок нубов(Вопрос-Ответ)

[DeVolf]

//QaK:отдельная тема по подкючению пакетхака к серверу >>>>>>>>тут
любые вопросы по данной тематике в этом топе будут удаляться без предупреждения.

const
mp='8A 1B 15 01 10';
hp='8A 1A 15 01 10';
begin
if fromclient and (pck[1]=#$38#$F5#$00#$EF#$00#$00#$00#$03#$00#$00#$00) then
begin
buf:=hstr(hp);
SendToServer;
end;
if fromclient and (pck[2]=#$33#$F5#$00#$EF#$00#$40#$00#$03#$00#$00#$00) then
begin
buf:=hstr(mp);
SendToServer;
end;
end.

где я ошибся?

[nordx]

Подскажите, как можно сделать время ожидания в скрипте.

Вот сам скрипт:

PHP код:


const 
   nik='Ник'; 
   Enchant=15; 

var 
   SubID, SkillID, SkillLvl, CurrEnch, Type1: integer; 

//основная часть скрипта 
//вызывается при приходе каждого пакета если скрипт включен 
begin 
    if FromServer and ((pck[1]=#$62) and (pck[3]=#$05)) then case pck[2] of 
        #$A0:   //точнулся 
                if CurrEnch<Enchant then 
                   begin               
                     CurrEnch:=CurrEnch+1; 
                     Buf:=#$D0; 
                     WriteH(SubID); 
                     WriteD(SkillID); 
                     WriteD(SkillLvl+CurrEnch); 
                     SendToServerEx(nik);  
                   end; 
        #$A1:   //не точнулся 
             begin 
                     CurrEnch:=1; 
                     Buf:=#$D0; 
                     WriteH(SubID); 
                     WriteD(SkillID); 
                     WriteD(SkillLvl+CurrEnch); 
                     SendToServerEx(nik); 
             end; 
    end; 

    if FromClient and ((pck[1]=#$D0) and (pck[2]=#$0F)) then 
        begin 
           SubID:=ReadH(2); 
           SkillID:=ReadD(4); 
           SkillLvl:=ReadD(8)-1;  
           CurrEnch:=1; 
        end; 
end. 


//J-Fobos: уточните что такое "время ожидания".

[Pinko]

nordx,
http://coderx.ru/showthread.php?t=9181

[BlackMetal]

Windows 7 Ultimate x32
L2phx 3.5.33.166

Юзаю LSP

При коннекте видит пакеты, некоторые паки от клиента "Unknown", от сервера - нормальные.

Хроники интерлюд

При отправке любого пакета на сервер - дисконит.



Что за защита?

Если нужны скрины настроек - скину по возможности.

//J-Fobos: есть отдельная тема, где пакетхак настраивают под конкретные сервера. Обратитесь туда, или прочтите что там пишут, скорее ваш вариант защиты уже поднимался там раз 50

[semiromid]

Ув.Знатоки . Реально ли подключить пакетхак к руооффу , что бы была возможность просматривать пакеты ?
Я хочу сделать такое - перехватить трафик игры , написать простенький скрипт для срабатывания звукового сигнала , когда в таргет береться рб . Таким образом я узнаю что оно живое .
Спасибо за внимание.

[Zergatul]

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

Ув.Знатоки . Реально ли подключить пакетхак к руооффу , что бы была возможность просматривать пакеты ?
Я хочу сделать такое - перехватить трафик игры , написать простенький скрипт для срабатывания звукового сигнала , когда в таргет береться рб . Таким образом я узнаю что оно живое .
Спасибо за внимание.

Нереально

//J-Fobos: реально. По факту так уже сделано. Ничего конкретного по данному вопросу не скажу.

[Imitator]

Доброго времени суток! Борюсь с довольно распространенным сейчас баном по HWID. Несколько дней гугления привели меня к Вам . Благо мануалы тут пишут хорошие - обошел "умную защиту". Теперь стал вопрос - по средством этого же обхода отловить пакеты с HWID шниками и скормить их серверу в измененном виде ...
Судя по тому, что прочитано - задача не тривиальная и ей мало кто занимался (ну или просто не говорят про это). Нашел у "ЖУКА" темку от Клавр со скриптиком по Aion:

//Script by CLAVR and Usilok
var
 i,temp,size:integer;
 mac:string;
 
Procedure casual;
Begin
 randomize; 
 temp:=RounD(Random*90+1);
end;


Procedure MacAddress;
Begin
   mac:='';
   for i := 1 to 17 do  
     if (i mod 3=0) then 
          buf:=buf+HStr('2D 00')
       else
          begin
             repeat
                casual;
             until temp in [48..57,65..70];
             WriteH(temp);
             mac:=mac+Chr(temp);
          end;
   buf:=buf+HStr('00 00');
end;

Procedure HWID;
Begin
   for i := 1 to 8 do  
         begin
             repeat
                casual;
             until temp in [48..57,65..90];
             WriteH(temp);
         end;
    buf:=buf+HStr('00 00');     
end;


begin         
     if FromClient and (ReadC(1)=$14)  then 
            begin                  
               size:=Length(pck);
               For i := 1 to (size-58) do 
                  buf:=buf+pck[i]; 
               MacAddress;                      
               HWID;
               WriteS(ReadS(size-3));                        
               sendtoServer;
               pck:=''; 
            end; 
      
      if FromClient and (ReadC(1)=$45)  then 
            begin                
               buf:='';
               For i := 1 to 9 do 
                  buf:=buf+pck[i];   
               buf:=buf+HStr(mac);          
               sendtoServer;
               pck:=''; 
            end; 
end.

Понимая, что делаю глупость, запустил его для L2 клиента. НО каково было удивление ... бана не поймал ....
Не скажу, что я все понял в данном скрипте. Но больше всего меня заинтересовали строки

if FromClient and (ReadC(1)=$14)  then
и
if FromClient and (ReadC(1)=$45)  then

Насколько я понял, именно в них происходит отлов нужных пакетов с последующей инициализацией подмены содержимого.
Уважаемые корифеи, "не подталкивая к выходу", прокоментируйте мои догадки. Конечно же не отказался от наглядного примерчика, дабы проще было вникнуть.
Заранее благодарю.

[J-Fobos]

Imitator, в линейке HWID может передаваться в соединении с логин сервером. Пакетхак с логин сервером не работает. Также HWID может передаться отдельным соединением во время входа в игру, пакетхак такое соединение конечно отобразит, но не поймет его структуру(даже минимальная шифрация этого соединения поставит пакетхак в тупик).

В скрипте с аион HWID передается во время подключения к гейм серверу. Такой метод используют в ла2, информацию передают в пакете ProtocolVersion или GameGuardReply.

[Imitator]

Благодарю за емкий и лаконичный ответ. GameGuardReply у меня не видно, а вот ProtocolVersion и KeyInit постоянно первые. Буду их изучать, не подскажите ссылочку или раздельчик, где можно почитать про разбор и дешифровку пакетов?

[J-Fobos]

Одно замечание. После ProtocolVersion и KeyInit пакеты всегда разные и не имеют никакого смысла? Если да, то вам в этот раздел.

[Imitator]

Сообщение от J-Fobos

Одно замечание. После ProtocolVersion и KeyInit пакеты всегда разные и не имеют никакого смысла? Если да, то вам в этот раздел.

Совершенно точно. Пошел читать