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;