有时候，汇编比高级语言更易懂

检查某一位是否为1，如果用高级语言就麻烦得多
function checkbit(abyte:byte; pos: byte): boolean; assembler;
//76543210
asm
  mov cl, dl; //pos in dl
  shr al, cl; //abyte in al
  and al, 1;  //result in al
end;