- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
南昌大学实验报告
学生姓名: 学 号: 专业班级:
实验类型:□ 验证 ■ 综合 □ 设计 □ 创新 实验日期:2010-12-20 实验成绩:
实验6 子程序实验
一.实验目的
1.掌握主程序与子程序之间的调用关系及调用方法;
2.掌握子程序调用过程中近程调用与远程调用的区别;
3.掌握通过堆栈转送参数的方法。
4. 掌握多模块程序设计方法
二.实验内容
1.将BUF开始的10个单元中的二进制数转换成两位十六进制数的ASCII码,在屏幕上显示出来。要求码型转换通过子程序HEXAC实现,在转换过程中,通过子程序DISP实现显示。
源程序如下:
DATAS SEGMENT
BUF DB
CAN DB $-BUF ;定义常量CAN
DATAS ENDS
CODES SEGMENT
ASSUME CS:CODES,DS:DATAS
MAIN PROC FAR ;主程序块
START:
MOV AX,DATAS
MOV DS,AX
MOV CL,10
LEA SI,BUF
LOOP1: ;调用子程序语句
call HEXAC
call DISP
DEC CAN
JNZ LOOP1
EXIT:
MOV AH,4CH
INT 21H
MAIN ENDP
HEXAC PROC NEAR ;二进制转换成十六进制子程序
MOV BL,[SI]
INC SI
RET
HEXAC ENDP
DISP PROC NEAR ;显示子程序
MOV CL,4
MOV CH,2
MOVE: ;移位语句
ROL BL,CL
MOV DL,BL
AND DL,0FH
ADD DL,30H
CMP DL,9
JBE PRINT
ADD DL,07H
PRINT:
MOV AH,02H ;显示语句
INT 21H
DEC CH
JNZ MOVE
MOV DL,
MOV AH,02H
INT 21H
RET
DISP ENDP
CODES ENDS
END START
2.编写一个主程序,从键盘接收若干个字符,然后用远调用的方法,调用子程序统计字符串中字符’b’的个数.子程序的参数是字符串的首地址TABLE,字符串长度N及字符”b”.子程序返回字符"b”的个数.参数传送采用堆栈实现.主程序在子程序返回后,显示字符”b”及其个数(设为一位十六进制数)。
源程序如下:
DATA SEGMENT
STR1 DB 0ah,0dh,PLEASE INPUT YOUR STRING:$
STR2 DB 0ah,0dh,THE NUMBER OF b is:$
TABLE DB 50, ? ,50 DUP(?),$
DATA ENDS
CODE SEGMENT
ASSUME CS: CODE, DS: DATA
START:
MOV AX,DATA
MOV DS,AX
LEA DX,STR1 ;显示STR1
MOV AH,9
INT 21H
LEA DX,TABLE
MOV AH,0AH ;输入字符串
INT 21H
LEA SI , TABLE
MOV CL, [SI+1]
MOV CH, 0 ;CX中为字符串长度
INC SI
INC SI
原创力文档


文档评论(0)