题目要求:
现在有一个数组,内容为34h,78h,0afh,8ah,要求主程序安排并存放其结果,并由子程序来完成求数组元素的效验和。请编写一段程序,采用段内调用子程序实现。
题目分析:
本题主要属于子程序设计,只需按照要求在设计一个求一段内存数据的效验和的子程序即可。
代码实现:
1.寄存器传参实现:
data segment
ARRAY db 34h,78h,0afh,8ah ;数据准备,及需要进行校验和的数组
COUNT equ $-ARRAY ;保存数组中的数据个数
RESULT db ? ;定义一个RESULT的结果变量,用于储存校验和结果
data ends
code segment
assume cs:code,ds:data
start:
mov ax,data
mov ds,ax
mov bx,offset ARRAY ;数组的起始偏移地址赋给bx
mov cx,COUNT ;将数组数字的个数赋值给cx,确定循环的次数
call CHECKSUM ;段内调用子程序,实现计算校验和
mov RESULT,al ;并将结果存在RESULT变量中
mov ax,4c00h
int 21h
;子程序CHECKSUM
;功能:求数组元素的校验和
;入口:bx->数组的入口偏移地址;cx->数组元素个数
;出口:al->校验和
CHECKSUM proc
xor al,al
SUM:
add al,[bx]
inc bx
loop SUM
ret
CHECKSUM endp
code ends
end start
---------------------------------------------------------------------------------快乐分隔线----------------------------------------------------------------------------
2.变量传叁实现:
data segment
ARRAY db 34h,78h,0afh,8ah ;数据准备,及需要进行校验和的数组
COUNT equ $-ARRAY ;保存数组中的数据个数
RESULT db ? ;定义一个RESULT的结果变量,用于储存校验和结果
data ends
code segment
assume cs:code,ds:data
start:
mov ax,data
mov ds,ax
call CHECKSUM ;段内调用子程序,实现计算校验和
mov ax,4c00h
int 21h
;子程序CHECKSUM
;功能:求数组元素的校验和
;入口:数组的偏移地址,以及数组元素个数
;出口:校验和结果存储在RESULT变量中
CHECKSUM proc
push ax ;寄存器的保护
push bx
push cx
xor al,al
mov bx,offset ARRAY ;数组的起始偏移地址赋给bx
mov cx,COUNT ;将数组数字的个数赋值给cx,确定循环的次数
SUM:
add al,[bx]
inc bx
loop SUM
mov RESULT,al ;并将结果存在RESULT变量中
pop cx ;寄存器的恢复
pop bx
pop ax
ret
CHECKSUM endp
code ends
end start
---------------------------------------------------------------------------------快乐分隔线----------------------------------------------------------------------------
3.堆栈传参实现:
data segment
ARRAY db 34h,78h,0afh,8ah ;数据准备,及需要进行校验和的数组
COUNT equ $-ARRAY ;保存数组中的数据个数
RESULT db ? ;定义一个RESULT的结果变量,用于储存校验和结果
data ends
code segment
assume cs:code,ds:data
start:
mov ax,data
mov ds,ax
mov ax,offset ARRAY ;数组的起始偏移地址赋给ax
push ax ;将数组的偏移地址压入堆栈
mov ax,COUNT ;将数组数字的个数赋值给ax
push ax ;将数组元素个数压入堆栈
call CHECKSUM ;段内调用子程序,实现计算校验和
mov ax,4c00h
int 21h
;子程序CHECKSUM
;功能:求数组元素的校验和
;入口:将数组首地址和数组元素个数压入堆栈
;出口:校验和结果存储在RESULT变量中
CHECKSUM proc
push bp ;寄存器保护
push bx
push cx
mov bp,sp
mov bx,[bp+10]
mov cx,[bp+8]
xor al,al
SUM:
add al,[bx]
inc bx
loop SUM
mov RESULT,al ;并将结果存在RESULT变量中
pop cx
pop bx
pop bp
ret+4 ;注意因为一开始就向堆栈中压入了两个值,所以此处应该平衡堆栈
CHECKSUM endp
code ends
end start
ps:注意,通过实验发现,函数通过堆栈实现函数的参数传递的时候,堆栈中只保存了调用函数指令的下条指令的偏移地址,并没有连同段地址保存。我也不太清楚是什么原因。一开始由于不知道这个原因,所以在通过堆栈给bx,cx寄存器赋值的时候,总是出错。
---------------------------------------------------------------------------------快乐分隔线----------------------------------------------------------------------------
4.利用call后续区
data segment
ARRAY db 34h,78h,0afh,8ah ;数据准备,及需要进行校验和的数组
COUNT equ $-ARRAY ;保存数组中的数据个数
RESULT db ? ;定义一个RESULT的结果变量,用于储存校验和结果
data ends
code segment
assume cs:code,ds:data
start:
mov ax,data
mov ds,ax
call CHECKSUM ;段内调用子程序,实现计算校验和
dw offset ARRAY ;call函数后面的数据区
mov ax,4c00h
int 21h
;子程序CHECKSUM
;功能:求数组元素的校验和
;入口:将数组首地址和数组元素个数压入堆栈
;出口:校验和结果存储在RESULT变量中
CHECKSUM proc
push bp
push bx
push cx
mov bp,sp
mov si,[bp+6]
mov bx,cs:[si] ;通过压入的下一条指令取得后继区的数据
mov cx,COUNT
xor al,al
SUM:
add al,[bx]
inc bx
loop SUM
mov RESULT,al ;并将结果存在RESULT变量中
pop cx
pop bx
pop bp
ret
CHECKSUM endp
code ends
end start
ps:关于此种通过call后续区传递参数不是很常用,所以在这里就简单的通过传递数组的偏移地址简单演示其过程。