《汇编语言 基于x86处理器》第七章整数运算部分的代码

▶ 书中第七章的程序，使用各种位移运算，加深了对内存、寄存器中整数类型变量存储的认识

● 代码，双字数组右移 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