CoderX :: Forums - Показать сообщение отдельно

Breadfan · 08.07.2008, 03:26

Для изменения получения первого ключа на исходящий трафик нужно править эту часть? :

PHP код:


			
procedure TXorCodingOut.InitKey(const XorKey; Interlude: Boolean);

var key2:array[0..15] of Byte;

begin

  keyLen:=7;

  Move(XorKey,key2,4);

  key2[0]:=key2[0]xor $82;

  key2[1]:=key2[1]xor $93;

  key2[4]:=key2[2]xor $1a;

  key2[5]:=key2[3]xor $41;

  key2[2]:=0;

  key2[3]:=0;

  key2[6]:=0;

  key2[7]:=0;

  Move(key2,GKeyS,16);

  Move(key2,GKeyR,16);

end;

08.07.2008, 03:26	#172
Breadfan Местный Регистрация: 29.04.2008 Сообщений: 830 Сказал Спасибо: 80 Имеет 230 спасибок в 169 сообщенях	Для изменения получения первого ключа на исходящий трафик нужно править эту часть? : PHP код: `procedure TXorCodingOut.InitKey(const XorKey; Interlude: Boolean); var key2:array[0..15] of Byte; begin keyLen:=7; Move(XorKey,key2,4); key2[0]:=key2[0]xor $82; key2[1]:=key2[1]xor $93; key2[4]:=key2[2]xor $1a; key2[5]:=key2[3]xor $41; key2[2]:=0; key2[3]:=0; key2[6]:=0; key2[7]:=0; Move(key2,GKeyS,16); Move(key2,GKeyR,16); end;` Последний раз редактировалось Breadfan, 08.07.2008 в 03:29.