1:
2:
3:

IF A < 10 then
Break;
IF A < 10 then goto...;					

1:
2:
3:
4:
5:
6:
7:

MOV EAX,[EBP+4] //oder was auch immer in EAX berechnet wurde
CMP EAX,10
JNZ LabelX
ADD EAX,5
//mache noch was
LabelX: ADD EAX,1
//Rest der Anweisungen					

1:
2:
3:
4:
5:
6:

if(EAX=$10) then begin//Vergleiche EAX mit $10 und überspringe Code bei UNGLEICH!
EAX:=EAX+5;
//mache noch was
end;
EAX:=EAX+1;
//rest					

1:
2:
3:
4:
5:
6:

CMP EAX,10
JE @x1
ADD EAX,2
JMP @x2
@x1:Sub EAX,1
@x2://...					

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:

MOV ESI,12
MOV EAX,0
TEST ESI,ESI
JE @l2
@l1: ADD EAX,EAX
CMP EAX,$FFFF
JB @l2
SUB ESI
JNZ @l1
@l2://....					

1:
2:
3:
4:
5:

If (eax=$10) then begin
eax := eax+2;
end;
dec(eax);
//@x2:restmachen					

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:

MOV ESI,12
MOV EAX,0
TEST ESI,ESI
JE @l2
@l1: ADD EAX,EAX
CMP EAX,$FFFF
JB @l2
SUB ESI
JNZ @l1
@l2://....					

1:

[Fehler]example2.pas(8): Invalid Opcode					

1:

EAX := 0;					

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:

        MOV EDX,$016
@Project1_0045101D:
        CMP EAX,$012
        JNZ @Project1_00451027
        ADD EAX,5
        JMP @Project1_00451032
@Project1_00451027:
        CMP EAX,$014
        JNZ @Project1_0045102F
        INC EAX
        JMP @Project1_00451032
@Project1_0045102F:
        ADD EAX,$016
@Project1_00451032:
        DEC EDX
        JNZ @Project1_0045101D
        RETN					

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:

var
a,i : Integer;
begin
for i := 1 to 22 do
begin
if(a=$12) then begin
a:=a+5;
end else
if(a=$14) then begin
a:=a+1;
end else
a := a + 22;
end;
end;					

1:
2:
3:
4:

function Foo: pointer;
asm
    MOV EAX, [EBP+4]
end;					

1:
2:
3:
4:

PUSH EBP
MOV EBP,ESP
SUB ESP,x
//...					

1:
2:
3:
4:
5:

function Test(b:Cardinal):Cardinal;stdcall;
var c:Cardinal;
begin
  Result:=Cardinal(foo())-PCardinal(Cardinal(@c)+12)^;//Immer 0 ;-)
end;					

1:
2:
3:
4:
5:
6:
7:
8:

{$R-}
function Foo: Pointer;
var 
    S:array[0..0] of Integer;
Begin
    S[0] := 2;
    Result := Pointer(S[S[0]]);
end;					

1:
2:
3:
4:
5:
6:
7:
8:

{$R-}
function Foo: Pointer;
var 
    S:array[0..0] of record case Boolean of false: (I: Integer;); true: (P: Pointer;); end;
Begin
    S[0].I := 2;
    Result := S[S[0].I].P;
end;