Цитата:
Сообщение от Stasrus
Подскажите как можно изменить пакет,
например клиент посылает изменяемый пакет 2E 00 00 00 79 34 15 00 22 05 11 48
нужно допустим заменить неизменные части 79 на 99 и 22 05 11 48 на 11 11 11 11 не трогая при этом остальной изменяемой части и отправить его серверу.
Если пакет неизменный трудностей с переделкой и отправкой нет, но немогу додуматься как переделать изменяемый пакет.
|
delphi Код:
Tип: 0x2E (RequestMagicSkillList)
Pазмер: 12+2
0002 c c: 0 (0x00)
0003 c c: 0 (0x00)
0004 c c: 0 (0x00)
0005 d CharID: 1389689 (0x00153479)
0009 d ObjectID: 1209074978 (0x48110522)
delphi Код:
if (pck[1]=#$2E) and FromClient then
begin
buf:=pck; //копируем пришедший пакет 2E 00 00 00 79 34 15 00 22 05 11 48
pck:=''; //удаляем
//формат команды вставки данных WriteD(data, index: integer), по умолчанию index=0, index увеличивается на длину данных
WriteC($99, 5); //заменяем 79 на 99
WriteD($11111111, 9); //заменяем 22051148 на 11111111
SendToServer;
end;
PS: вроде так