бот для Русоффа

[murc]

Ога, можно посмотреть исходник ?

[xkor]

хех, хватит с вас этого куска:

const
  fKey: array[0..3] of Byte = ($00,$f0,$ff,$01); //начальный ключ

procedure TCrypt.EncData(pData: PByte; size: Integer);
var
  b: Byte;
  i: Cardinal;
begin
  for i:=encPos to encPos+size-1 do begin
    pData^:=pData^ xor encKey[i and 3];
    Inc(pData);
    if(i and 7 = 7)then begin
      b:=encKey[2];
      if((encKey[1]and $f)=0)and(encKey[0]=0)then Inc(PCardinal(@encKey)^,$2000);
      Dec(PCardinal(@encKey)^,$00020001);
      if(b<2)and(encKey[2]>$fa)and(encKey[3]and $01=1)then Inc(encKey[3],4);
    end;
  end;
  encPos:=i;
end;

procedure TCrypt.DecData(pData: PByte; size: Integer);
var
  b: Byte;
  i: Cardinal;
begin
  for i:=decPos to decPos+size-1 do begin
    pData^:=pData^ xor decKey[i and 3];
    Inc(pData);
    if(i and 7 = 7)then begin
      b:=decKey[2];
      if((decKey[1]and $f)=0)and(decKey[0]=0)then Inc(PCardinal(@decKey)^,$2000);
      Dec(PCardinal(@decKey)^,$00020001);
      if(b<2)and(decKey[2]>$fa)and(decKey[3]and $01=1)then Inc(decKey[3],4);
    end;
  end;
  decPos:=i;
end;

[Aniks]

Красиво реализовано. Я по-другому делал. Ключ(32бита) разбивался на 4 части. Два числа уменьшались на единицу каждые 8 байт и два счетчика увеличивались, когда первые числа были равны 0.

(K=33, биты от 1-32, т.е. Первый бит = K-32, последний К-1)

1 Число (уменьшается каждые 8 байт):
      Bit [k - 13] 
      Bit [k - 14] 
      Bit [k - 15] 
      Bit [k - 16]
      Bit [k - 1] 
      Bit [k - 2] 
      Bit [k - 3] 
      Bit [k - 4] 
      Bit [k - 5] 
      Bit [k - 6] 
      Bit [k - 7] 
      Bit [k - 8] 

2 Число (уменьшается каждые 8 байт):
      Bit [k - 31] 
      Bit [k - 32] 
      Bit [k - 17] 
      Bit [k - 18]
      Bit [k - 19] 
      Bit [k - 20]
      Bit [k - 21] 
      Bit [k - 22] 
      Bit [k - 23] 

3 Число (увеличивается, когда первое равно 0):
      Bit [k - 32] 
      Bit [k - 17] 
      Bit [k - 18]  
      Bit [k - 19]  
      Bit [k - 20] 
      Bit [k - 21] 
      Bit [k - 22] 
      Bit [k - 23] 
      Bit [k - 24] 
      Bit [k - 9]  
      Bit [k - 10] 
      Bit [k - 11] 
      Bit [k - 12] 

4 Число (увеличивается когда 2-ое равно 0):
      Bit [k - 25] 
      Bit [k - 26] 
      Bit [k - 27] 
      Bit [k - 28] 
      Bit [k - 29] 
      Bit [k - 30] 
      Bit [k - 31]

В С++ можно реализовать с помощью битовых массивов.

[xkor]

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

два счетчика увеличивались, когда первые числа были равны 0

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

[Krona]

В первую очередь если у вас в папке с Л2 лежит fuckConsole, обязательно сотрите её.

Ну а дальше делам вот что:

1) В папку "system" кидаем бота ( eL2Walker2.09b.zip )

2) В реестре прописываем инжект бота:

HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Windows\AppInit_DLLs
Затем двойной клик на AppInit_DLLs и вписываем в строку: l2walker.dll

3)Чтобы ваш клиент молча не выбрасывало идем в: Мой компьютер\Свойства\Дополнительно\Отчет об ошибках (Включить отчет об ошибках (Всех программ))

4) Запускаем клиент через Апдейтер и заходим в игру

5) Как только чар загрузится, в Диспетчере задач (ctrl+alt+del) завершаем процесс shieldConsole.exe и где то через 1 мин будет отчет об ошибке L2.exe, который мы НЕ ЗАКРЫВАЕМ, а просто убераем в дальний угол (чтоб глаза не мазолил )

[fragus]

Каким образом l2walker.dll перехватывает трафик l2.exe?

[xkor]

fragus, перехватывает функции которыми l2 пакеты гоняет

[Aniks]

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

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

ага, так и было. Ток позже, на 1 мБ. Там был критический момент когда оба счетчика в переполнение уходят (т.е. обнуляться должны). Я кстати сравнивал ради интереса после того как ты выложил свою функцию - расхождений нету.

Мне кажется в следующей версии, когда они усложнили шифрацию с динамическим ключом, они там скорее всего принцип оставили тот же: т.е. несколько чисел-счётчиков с произвольными битами.

[fragus]

Что-то я с новым алгоритмом шифрования разобраться не могу. Ни кто ничего не смог придумать в этом направлении?

[murc]

я застрял на аутенфикации на 17534 порту