汇编语言子程序程序设计

汇编语言程序设计实验报告
学院：计算机科学与技术专业：计算机科学与技术班级：计科131
MOV AX,4C00H
INT 21H
MAIN ENDP
PROADD PROC NEAR
PUSH AX
PUSH CX
PUSH SI
PUSH DI
MOV SI,[BX]
MOV DI,[BX+2]
MOV CX,[DI]
MOV DI,[BX+4]
XOR AX,AX
NEXT:ADD AX,[SI]
ADD SI,2
LOOP NEXT
MOV [DI],AX
POP DI
POP SI
POP CX
POP AX
RET
PROADD ENDP
ARY DW 1,2,3,4,5,6,7,8,9,10
COUNT DW 10
SUM DW ?
TABLE DW 3 DUP(?)
CODE ENDS
END MAIN
使用相应的文本编辑器建立文件LAB5.asm，内容如上所示。

二. 生成可执行文件：
1.汇编：
C:\masm> masm lab5;
2.连接：
C:\masm> link lab5;
三. 请写出此程序中的变量ary,count,sum 的EA，并判断此程序的功能：
四. 用debug 调试此程序时,第一条指令的段内EA 是多少?此程序数据段内偏移地址为
0 的字单
元数据为多少?其对应的机器指令是什么?
－L ；加载程序文件lab5.exe
－R ；查看IP 与CS 寄存器的内容
－D DS：0 ；查看当前数据段内偏移地址为0 的字单元数据
－U ；查看机器指令
实验二：编写一个子程序，实现在屏幕的指定位置，用指定颜色，显示一个用0 结尾的字符串
源程序如下
data segment
str db 'display string',0
data ends
code segment
assume cs:code,ds:data
start:
mov ax,data
mov ds,ax
mov dh,8
mov dl,21
mov cl,3
mov si,offset str
call show_str
mov ax,4c00h
int 21h
;----------------------------
show_str proc near
push ax
push cx
push dx
push es
push si
mov es:[bx], cl
jcxz ok
mov es:[bx+1], dl
inc si
add bx, 2
jmp short s
ok:
pop si
pop es
pop dx
pop cx
pop bx
pop ax
ret
; 子程序：divdw
; 要求：进行不会除法溢出的除法运算，被除数为dword，除数为word，结果为dword ; 参数：(ax) = 被除数dword型的低16位
; (dx) = 被除数dword型的高16位
; (cx) = 除数
; 返回：(dx) = 结果的高16位
; (ax) = 结果的低16位
; (cx) = 余数
divdw:
mov bx, ax ; 缓存ax——被除数的低16位
mov ax, dx ; ax = H，被除数的高16位
mov dx, 0
div cx ; ax 为商，dx为余数 = rem(H/N) * 65536
push ax ; 结果的商，也就是最后要放在dx中的
mov ax, bx ; dx为 rem(H/N) * 65536, 为高16位，ax为低16位，再进行一次除法运算
div cx ; ax 为商——最后结果的低１６位，dx为余数——为最后结果，应赋给cx
mov cx, dx
pop dx
ret
code ends
end start
实验结果实验一：变量ary,count,sum 的EA分别是00140，00154，00156此程序的功能是数列求和
实验二：
实验三：
实
验
总
结
这次实验，感觉难度最大的就是做2个子程序的设计，在网上向好友请教了N回！
还犯了一些低级的错误，如将16位的寄存器的内容传送到字符型数字串里去，这很明显是不对的，在逆序时寄存器的高16位会直接把正常的数字字符冲掉，还有就是将当我直接将字型单元的内容传送字型单元时，编译器会报错，不过提示是它后面的指令错误。

转换后的数字串的末尾如果不是0的话，在调用输出子程序时会出现BUG，于是又在转换子程序里加了条指令，在第一次转换出来后，在数字串的末尾添加一个终止标志0。

指
导
教
师
意
见签名：年月日。