▶ 书中第七章的程序，使用各种位移运算，加深了对内存、寄存器中整数类型变量存储的认识
● 代码，双字数组右移 4 位
INCLUDE Irvine32.inc COUNT = ; 右移位数 .data
array DWORD 148B2165h, 8C943A29h, 6DFA4B86h, 91F76C04h, 8BAF9857h .code
main PROC
mov esi, OFFSET array ; 移之前的情况
mov ecx, LENGTHOF array
mov ebx, TYPE array
call DumpMem mov bl, COUNT
call ShiftDoublewords mov esi, OFFSET array ; 移之后的情况
mov ecx, LENGTHOF array
mov ebx, TYPE array
call DumpMem call WaitMsg
exit
main ENDP ShiftDoublewords PROC
mov esi, OFFSET array
mov ecx, (LENGTHOF array) - ; 循环次数等于数组长度减一，最后一个数单独处理 L1:
push ecx ; 需要使用 cl 移动数
mov cl, COUNT
mov eax, [esi + TYPE DWORD] ; 下一个数字 DWORD 移入 eax
shrd [esi], eax, cl ; eax 逐渐移入当前数字 push esi ; 移了 4 位，显示一下
push ecx
push ebx
mov esi, OFFSET array
mov ecx, LENGTHOF array
mov ebx, TYPE array
call DumpMem
pop ebx
pop ecx
pop esi add esi, TYPE DWORD ; 移完了，esi 指向下一个数字
pop ecx ; 恢复 ecx
loop L1 shr DWORD PTR [esi], COUNT ; 最后一个数，直接右移，偷偷使用 cf 中的值 ret
ShiftDoublewords ENDP END main
● 输出结果
Dump of offset // 移之前
-------------------------------
148B2165 8C943A29 6DFA4B86 91F76C04 8BAF9857 Dump of offset // 移第 1 个 DWORD，"9" 来自第二个数的最低 4 位
-------------------------------
9148B216 8C943A29 6DFA4B86 91F76C04 8BAF9857 Dump of offset // 移第 2 个 DWORD
-------------------------------
9148B216 68C943A2 6DFA4B86 91F76C04 8BAF9857 Dump of offset // 移第 3 个 DWORD
-------------------------------
9148B216 68C943A2 46DFA4B8 91F76C04 8BAF9857 Dump of offset // 移第 4 个 DWORD
-------------------------------
9148B216 68C943A2 46DFA4B8 791F76C0 8BAF9857 Dump of offset // 移第 5 个 DWORD，完成移动
-------------------------------
9148B216 68C943A2 46DFA4B8 791F76C0 08BAF985
● 代码，内存右移 1 位
INCLUDE Irvine32.inc .data
array BYTE 45h, 67h, 89h .code
main PROC
call DisplayArray mov esi,
mov eax, OFFSET array
shr array[esi+], ; 最高字节（第一个元素/字节）右移
rcr array[esi+], ; 中间元素循环右移，偷偷使用 CF
rcr array[esi], ; 最低字节循环右移 call DisplayArray call WaitMsg
exit
main ENDP DisplayArray PROC
pushad mov esi, OFFSET array ; 先用 DumpMem 显示内存情况（注意元素/字节是倒着存的）
mov ecx, LENGTHOF array
mov ebx, TYPE array
call DumpMem mov esi, LENGTHOF array ; esi 循环变量
dec esi
L1:
mov al, array[esi]
mov ebx,
call WriteBinB ; display binary bits
mov al, ' '
call WriteChar
dec esi
Loop L1 call Crlf
popad
ret
DisplayArray ENDP END main
● 输出结果
Dump of offset 00F66000 // 右移前，注意元素/字节是顺着存的
------------------------------- // 用 DumpMem 显示反而会翻转过来 Dump of offset 00F66000 // 右移后
-------------------------------
A2 B3
● 代码，二进制数转 ASCII 显示（逐字节打印），结果输出 00010010001101001010101111001101
INCLUDE Irvine32.inc .data
binVal DWORD 1234ABCDh ; 需要输出的数字
buffer BYTE dup(), .code
main PROC
mov eax, binVal
mov esi, OFFSET buffer
call BinToAsc mov edx,OFFSET buffer
call WriteString call Crlf
call WaitMsg
exit
main ENDP BinToAsc PROC uses ecx esi mov ecx, L1:
shl eax, ; eax 中的二进制串左移一位，最高位放入 cf 用于下面的跳转
; binVal 在内存中存成了 cd ab 34 12（4 字节整数模式下可以看到 1234abcd）
; 但对寄存器进行左移的时候还是按照 1234ABCDh 来左移
; 例如第一次左移后得到 2469579Ah
mov BYTE PTR [esi],'' ; 内存先写上 '0' 再说
jnc L2 ; 如果 cf 中是 1，把内存改写成 '1'，否则跳过改写
mov BYTE PTR [esi],'' L2:
inc esi
loop L1 ret
BinToAsc ENDP END main
● 代码，用 adc 指令实现长整数加法
INCLUDE Irvine32.inc .data
op1 BYTE 34h,12h,98h,74h,06h,0A4h,0B2h,0A2h
op2 BYTE 02h,45h,23h,00h,00h, 87h,10h, 80h sum BYTE dup() ; = 0122C32B0674BB5736h .code
main PROC mov esi, OFFSET op1
mov edi, OFFSET op2
mov ebx, OFFSET sum
mov ecx, LENGTHOF op1 call Extended_Add mov esi, OFFSET sum
mov ecx, LENGTHOF sum add esi, ecx ; 找到数组结尾，从高位逐字节输出
sub esi, TYPE BYTE
mov ebx, TYPE BYTE L1:
mov al,[esi]
call WriteHexB
sub esi, TYPE BYTE
loop L1 call Crlf
call WaitMsg
exit
main ENDP Extended_Add PROC
pushad
clc ; 清除 CF mov edx,
L1:
mov al, [esi]
adc al, [edi]
pushfd ; CF（进位标志）压栈
mov [ebx], al
add esi, ; 更新指针
add edi,
add ebx,
popfd ; CF 出栈，准备进行下一次加法
loop L1 mov byte ptr [ebx], ; 最后一次加法，最高字节加上剩余的进位标志
adc byte ptr [ebx], popad
ret
Extended_Add ENDP END main
● ASCII 长整数加法，结果输出 1000525533291780
INCLUDE Irvine32.inc DECIMAL_OFFSET = ; 小数点位于位 5 的右边（没用到）
.data
decimal_one BYTE "" ; == 1001234567.89765
decimal_two BYTE "" ; == 9004020765.02015
sum BYTE (SIZEOF decimal_one + ) DUP(), ; 预留进位 .code
main PROC
mov esi, SIZEOF decimal_one - ; 从最低位开始
mov edi, SIZEOF decimal_one
mov ecx, SIZEOF decimal_one
mov bh, ; 旧进位标志，初始化为 0 L1:
mov ah,
mov al, decimal_one[esi]
add al, bh ; 加旧进位
aaa ; 调整和
mov bh, ah ; ah 存储了进位，将其放进 bh
or bh, 30h ; 转成 ASCII
add al, decimal_two[esi] ; 加一个数字，过程同上
aaa
or bh, ah ; 9 + 1 + 9 = 19 < 20，加了两次但最多进位 1
or bh, 30h ; 进位和结果都转成 ASCII
or al, 30h
mov sum[edi], al ; 当前位结果放入内存
dec esi ; 指向下一对计算的数字
dec edi
loop L1
mov sum[edi], bh ; 最后的进位放在预留的最高位上 mov edx, OFFSET sum
call WriteString
call Crlf
call WaitMsg
exit
main ENDP
END main
● 压缩十进制加法，输出结果 00011743。逻辑简单，但是不能理解 daa 的实现方法
INCLUDE Irvine32.inc .data
packed_1 WORD 4536h
packed_2 WORD 7207h
sum DWORD ? .code
main PROC
mov sum,
mov esi,
mov eax, mov al,BYTE PTR packed_1[esi] ; 低字节，daa 将 al 中的和转化为十进制和的低两位，放入内存
add al,BYTE PTR packed_2[esi]
daa
mov BYTE PTR sum[esi],al inc esi ; 中字节，包含进位
mov al,BYTE PTR packed_1[esi]
adc al,BYTE PTR packed_2[esi]
daa
mov BYTE PTR sum[esi],al inc esi ; 高字节，只考虑进位
mov al,
adc al,
mov BYTE PTR sum[esi],al mov eax,sum
call WriteHex
call Crlf
call WaitMsg
exit
main ENDP
END main