L2PacketHack 3.5.x

[Breadfan]

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

новая версея пх на фрэе неработает! испробывал на 9джава серваках - гэйм гуард сразу её выпасает и отключает клиент- защиты внутри некакой клиент нс софтовский базовый патч я урезал так что внутри некакой хрени недолжно быть

"- Вранье!
- И интереснее всего в этом вранье то, что он - вранье от первого до последнее слова." (М.Булгаков)
Все там работает, я именно новой версией и подключался и делал инишки с итемами\скилами.

[unknowned]

skiner4119 и
Breadfan, вы бы написали какие сервера, а то не понятно где у вас работает, а где не работает. Короч бред

[alexteam]

для фреи над чуть чуть модифицировать обуфускатор айдишникоф пакетов..

Добавлено через 1 минуту

procedure _init_tables(seed: integer; _2_byte_size: integer);
  var
    i : integer;
    x : Char;
    x2: Word;
    rand_pos : integer;
    cur_pos : integer;
  begin
    with CorrectorData^ do begin
      _1_byte_table := '';
      _2_byte_table := '';

      _2_byte_table_size := _2_byte_size;

      for i := 0 to $D0 do begin
        _1_byte_table := _1_byte_table + chr(i);
      end;
      for i := 0 to _2_byte_size do begin
        _2_byte_table := _2_byte_table + chr(i) + #$0;
      end;
      _pseudo_srand(seed);
      for i := 2 to $D1 do begin
        rand_pos := (_pseudo_rand mod i) + 1;
        x := _1_byte_table[rand_pos];
        _1_byte_table[rand_pos] := _1_byte_table[i];
        _1_byte_table[i] := x;
      end;

      cur_pos := 3;
      for i := 2 to _2_byte_size+1 do begin
        rand_pos := _pseudo_rand mod i;
        x2 := PWord(@_2_byte_table[rand_pos * 2 + 1])^;
        PWord(@_2_byte_table[rand_pos * 2 + 1])^:=PWord(@_2_byte_table[cur_pos])^;
        PWord(@_2_byte_table[cur_pos])^:=x2;
        cur_pos := cur_pos + 2;
      end;

      {$ifdef FREYA}
      cur_pos := Pos(#$11, _1_byte_table);
      x := _1_byte_table[$12];
      _1_byte_table[$12] := #$11;
      _1_byte_table[cur_pos]:=x;
      {$endif}

      cur_pos := Pos(#$12, _1_byte_table);
      x := _1_byte_table[$13];
      _1_byte_table[$13] := #$12;
      _1_byte_table[cur_pos]:=x;

      cur_pos := Pos(#$B1, _1_byte_table);
      x := _1_byte_table[$B2];
      _1_byte_table[$B2] := #$B1;
      _1_byte_table[cur_pos]:=x;

      {$ifdef FREYA}
      cur_pos := Pos(#$D0, _1_byte_table);
      x := _1_byte_table[$D1];
      _1_byte_table[$D1] := #$D0;
      _1_byte_table[cur_pos]:=x;
      _id_mix := true;
      {$endif}
    end;
  end;

думаю понятно.

[unknowned]

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

для фреи над чуть чуть модифицировать обуфускатор айдишникоф пакетов..

Добавлено через 1 минуту

procedure _init_tables(seed: integer; _2_byte_size: integer);
  var
    i : integer;
    x : Char;
    x2: Word;
    rand_pos : integer;
    cur_pos : integer;
  begin
    with CorrectorData^ do begin
      _1_byte_table := '';
      _2_byte_table := '';

      _2_byte_table_size := _2_byte_size;

      for i := 0 to $D0 do begin
        _1_byte_table := _1_byte_table + chr(i);
      end;
      for i := 0 to _2_byte_size do begin
        _2_byte_table := _2_byte_table + chr(i) + #$0;
      end;
      _pseudo_srand(seed);
      for i := 2 to $D1 do begin
        rand_pos := (_pseudo_rand mod i) + 1;
        x := _1_byte_table[rand_pos];
        _1_byte_table[rand_pos] := _1_byte_table[i];
        _1_byte_table[i] := x;
      end;

      cur_pos := 3;
      for i := 2 to _2_byte_size+1 do begin
        rand_pos := _pseudo_rand mod i;
        x2 := PWord(@_2_byte_table[rand_pos * 2 + 1])^;
        PWord(@_2_byte_table[rand_pos * 2 + 1])^:=PWord(@_2_byte_table[cur_pos])^;
        PWord(@_2_byte_table[cur_pos])^:=x2;
        cur_pos := cur_pos + 2;
      end;

      {$ifdef FREYA}
      cur_pos := Pos(#$11, _1_byte_table);
      x := _1_byte_table[$12];
      _1_byte_table[$12] := #$11;
      _1_byte_table[cur_pos]:=x;
      {$endif}

      cur_pos := Pos(#$12, _1_byte_table);
      x := _1_byte_table[$13];
      _1_byte_table[$13] := #$12;
      _1_byte_table[cur_pos]:=x;

      cur_pos := Pos(#$B1, _1_byte_table);
      x := _1_byte_table[$B2];
      _1_byte_table[$B2] := #$B1;
      _1_byte_table[cur_pos]:=x;

      {$ifdef FREYA}
      cur_pos := Pos(#$D0, _1_byte_table);
      x := _1_byte_table[$D1];
      _1_byte_table[$D1] := #$D0;
      _1_byte_table[cur_pos]:=x;
      _id_mix := true;
      {$endif}
    end;
  end;

думаю понятно.

На каком конкретней сервере это нужно ? пока обходился ваще без обфускации.

[Breadfan]

что писать то? на сервере без защит - буит работать, на сервере с защитой - не будет...Или тяжело понять данный принцип?

[alexteam]

На каком конкретней сервере это нужно ?

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

[meikis]

Какой пароль на последний архив?

//nlobp: вот здесь, здесь упоминается пароль к архиву

[BioDread]

При выделении любого пакеты вылазит ошибка уже в двух версиях и если не обновить инфу из *.ini она не перестаёт появлятся планируется ли её убрать?

[NLObP]

BioDread, у меня нет такого. Только что закончил скрипт писать. И приходилось пакеты смотреть.

ЗЫЖ больше информации давай.

[BioDread]

У нас на жуке все жалуются...на эту ошибку...
Так вот: http://i.zhyk.ru/?v=2612.png
в 164 небыло а в 165 и 166 есть
Я наверное забыл сказать что такая проблема в Айоне=)
П.С. А если нажать "Обновить инфу из *.ini" то выделять пакеты в списке можно сколько угодно и ошибка не вылазит=)
Во добавил этот файл=)