首页 / 软件开发 / Delphi / 初学Delphi嵌入汇编[18] - SHL 与 SHR

初学Delphi嵌入汇编[18] - SHL 与 SHR2012-04-14 cnblogs 万一汇编中的SHL（左移）、SHR（右移）命令也是和 Delphi 一样的.var
ByteNum: Byte;
begin //右移 shr asm
mov al, 10000000B {128}
shr al, 1 {shr 10000000 一次会得到 01000000}
mov ByteNum, al
end;
ShowMessage（IntToStr（ByteNum））; {64; shr 相当于 ÷2} //左移 shl asm
mov al, 00000001B {1}
shl al, 1 {shl 一次会得到 00000010}
shl al, 1 {shl 两次会得到 00000100}
mov ByteNum, al
end;
ShowMessage（IntToStr（ByteNum））; {4; shl 相当于 ×2}
end;