for supernewbie (логово извращенцев)

[destructor]

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

лучше скажи, что делать,

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

пропиши его и все извращения со стеком компилятор сделает сам

ау

Добавлено через 1 минуту
еще вызов так сделай

push param;
mov ecx, tmpPointer
call [AddNetworkQueue_origAddr]

[supernewbie]

тоже самое, крит идет в гиране при прогрузе

[destructor]

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

AddNetworkQueue_hook

показывай что получилось

[supernewbie]

procedure AddNetworkQueue_hook(np:PNetworkPacket); stdcall;
begin
asm
mov tmpPointer, ecx
end;
ParsingFromServer(np);
asm
push np;
mov ecx, tmpPointer
call [AddNetworkQueue_origAddr]
end;
end;

[destructor]

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

ParsingFromServer(np);

зачем эта хрень, если ты имееш полный доступ к пакету?

[supernewbie]

всмысле? если делать парсинг прямо в хук процедуре то стек загадится же

[destructor]

нафига тебе тут нужен стек?

Добавлено через 1 минуту
np:PNetworkPacket тут все есть, в стек лазить не надо

[supernewbie]

тут это где? ну тут впринципе да, тут всего один поинтер... но криты не из-за этого, наверное... думаешь надо перенести?

[destructor]

у тебя маниакальная привычка все усложнять.

Добавлено через 1 минуту
потренеруйся на любой __stdcall функции с одним параметром
тут отличие только сохранить регистр ecx

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

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

procedure

функция!!! возвращает integer

[supernewbie]

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

у тебя маниакальная привычка все усложнять.

Добавлено через 1 минуту
потренеруйся на любой __stdcall функции с одним параметром
тут отличие только сохранить регистр ecx
потренироватся в чём?
Добавлено через 1 минуту
функция!!! возвращает integer

так всё ок:

function AddNetworkQueue_hook(np:PNetworkPacket): integer; stdcall;
begin
asm
mov tmpPointer, ecx
end;
ParsingFromServer(np);
asm
push np;
mov ecx, tmpPointer
call [AddNetworkQueue_origAddr]
end;
end;

так всё не ок:

function AddNetworkQueue_hook(np:PNetworkPacket): integer; stdcall;
var
  s:string;
  p:pointer;
  b:byte;
begin
asm
mov tmpPointer, ecx
end;
try
  s:=IntToHex(np.id,2)+' ';
  if (np.size>0) and (np.size<6000) then
  for i:=0 to np.size-1 do
  begin
  p:=Pointer(cardinal(np.data)+i);
  b:=Byte(p^);
  s:=s+IntToHex(b,2)+' ';
  end;
  writeLn('FromServer:'+s);
except
end;
asm
push np;
mov ecx, tmpPointer
call [AddNetworkQueue_origAddr]
end;
end;

но при этом проблема с критами всё равно осталась!