Delphi嵌入循环汇编
var
Int:Integer;
begin
asm
xor ebx,ebx  //ebx
xor eax,eax  //eax
@for: add ebx,eax  //设置循环点 ebx+eax
inc eax  //eax+1
cmp eax,$0b  //if eax <> 11
jnz @for  //跳回add
mov Int,ebx;
end;
//这个时候Int 的值是55
end;