procedure nothing(x,y: longint);assembler; asm mov eax,x mov ebx,y end; {procedure nothing(x,y: longint); begin asm mov eax,x mov ebx,y end; end; } Begin end.