Asm/de

asm// Hier steht der Assemblercode
  // Hier steht der Assemblercode
END;

var
  intWert: Integer;
  intErgebnis : Integer;

begin
  intWert := ...;
  // Wird von Lazarus / Free Pascal bei Intel x86 Prozessoren benötigt:
  {$ASMMODE intel}
  asm// weist dem Register EAX den Wert der Variablen intWert zu// addiere den Binärwert 110 (der entsprechende Dezimalwert ist 6)// subtrahiere den Dezimalwert 2// weist der Variablen intErgebnis den Inhalt des Registers EAX zu
    MOV EAX, intWert      // weist dem Register EAX den Wert der Variablen intWert zu
    ADD EAX, 110B         // addiere den Binärwert 110 (der entsprechende Dezimalwert ist 6)
    SUB EAX, 2            // subtrahiere den Dezimalwert 2
    MOV intErgebnis, EAX  // weist der Variablen intErgebnis den Inhalt des Registers EAX zu
  END;
  ... := IntToStr(intErgebnis);
end;

{$ASMMODE intel}
procedure nop; assembler;
asm
  nop
END;