Пробелма с формирвоанием пакета CMKey

[Envy12]

Немогу правильно составить 0x02 CMKey пакет... Вот код:

$recv = TCPRecv($connect, 16384) ;;;;; 0x02 SMKey

$RC4H = StringMid($recv, 9, 32)

$code = StringTrimLeft(hmac($hash & $RC4H, StringTrimLeft(StringToBinary($login), 2)), 2) ;;;;;;;; ключ
$len = Hex(Number(StringLen($code)/2,2), 2)
$code1 = '0x03' & $len + 2 & $len & StringTrimLeft(hmac($hash & $RC4H, StringTrimLeft(StringToBinary($login), 2)), 2) & '00'



$data = RC4($code1, $key)


TCPSend($connect, $data)

Sleep(100)

$recv = TCPRecv($connect, 16384)

Функции hmac и rc4 100% рабочие. На посланный пакет сервер не отвечает. Убедительная просьба, не писать мне примеры на C#, надеюсь на ваше понимание!

[Nek1t]

$DecHash = RandomBytes(16)
$forsend = "10" & $DecHash & "01"
$packet = "02"
$packet &= StringMid(Binary(Int(StringLen($forsend) / 2)), 3, 2) & $forsend
$packet = "0x" & RC4_Enc($packet)
TCPSend($MainSocket, $packet)

Как-то так.

[Envy12]

For $i = 1 To 16
$decHash &= Hex(Round(Random(1,255)),2)
Next
$code1 = "02" & "12" & "10" & $decHash & "01"

$data = RC4($code1, $key)

TCPSend($connect, $data)

Не катит. Хотелось бы уточнить, в качестве ключа, используется 0x02 SMKey?

@@ Debug(70) : пакет до шифровки = 021210972BF98307C729A4704663752658428E01
>Error code: 0
@@ Debug(74) : 0x02 CMKey rc4 = F8D5F10F0D3E5B72CE42BDCB79D6415D90187BAF

[Nek1t]

Цитата: Сообщение от Envy12 в качестве ключа, используется 0x02 SMKey

Да.

$EncHash = StringMid($data, 9, 32)
Shuffle_Enc(GetKey($EncHash))

[Envy12]

Будут у кого еще нибудь варианты? Мне говорят что где-то ошибка, но я в упор её невижу.

[Desmond Hume]

Envy12, вероятно, в формировании ключа RC4.