[Помогите!] Помогите со скриптом для WPF

[Kozalo]

Так как не имею возможности поставить Windows 7 x64, стал искать обход, изложенный в этой теме.

При заходе на общий сервер, от клиента на сервер отправляется такой пакет:
[Ссылки могут видеть только зарегистрированные пользователи. ]

Если изменить логин (на картинке "cool2013") хотя бы на 1 символ, возможно, получится переадресовать бан.

Мне нужна помощь со скриптом. Вот написал что-то:

var
  Packet: string;

BEGIN
Packet := Copy(_gBuff,12,66);
 if (not _gFromServ) and (StrCmp(_gBuff,HStr('42 00 03 63 6F 6F 6C 32 30 31 33' + Packet))) then
     begin
        _gOutBuff := HStr('42 00 03 63 6F 6F 6C 32 30 31 30' + Packet);
        WriteLogln('OK');
     end;
END.

Но он не работает. Выдаёт ошибку:

ERROR:  EXCEPT: HSTR: '$??' is not a valid integer value at [6:2]

Подскажите, пожалуйста, в чём проблема?

[Kozalo]

Ответ дал Leo_ня в Школе Читера. Эту темку можно удалить.

[meloman766]

Мы прям туда заходим..
Процетируй его чтоле.
Токо копирайты поставь

[Kozalo]

Цитата: Сообщение от Leo_ня Я в этом не силён... но: Как я понимаю, HStr принимает параметр - строку. Packet - массив байт, копируемый из буфера _gBuff (соответственно, определение Packet как string неверно, нужен массив). Ты пытаешься преобразовать строку+массив байт в массив байт. Packet нужно вынести за функцию HStr. т.е. так: Но меня вообще очень настораживает сравнение массивов байт функцией для сравнения строк.

Цитата: Сообщение от Leo_ня По твоей картинке вроде так: BEGIN if (not _gFromServ) and (gInt(_gBuff,0,2)=$0042) //Если пакет не от сервера и его ID (первые два байта) = 0x4200, то then begin _gOutBuff[4]:=HStr('21'); //Заменить первый символ логина на восклицательный знак =) end; END.

http://zhyk.ru/forum/showthread.php?p=241407&page=8

[meloman766]

Ничо не понял чо он сказал)
Но спасибо что откликнулся на просьбу процетировать