#pas
function sum(x,y:integer):integer;assembler
 asm
   mov eax,x
   add eax,y
   mov result,eax
 end;