汇编语言程序设计.docx
《汇编语言程序设计.docx》由会员分享，可在线阅读，更多相关《汇编语言程序设计.docx（27页珍藏版）》请在冰豆网上搜索。
汇编语言程序设计
实验1简单汇编语言程序设计
一、实验目的与要求
1．熟悉汇编语言运行、调试环境及方法。
2．掌握简单汇编语言程序的设计方法。
3．熟悉调试工具DEBUG，并运用DEBUG工具调试程序。
二、实验容
根据下列要求，编写汇编源程序，汇编连接汇编源程序，并利用DEBUG工具
调试程序，验证程序的正确性。
1.若X、Y、R、W是存放8位带符号数字节单元的地址，Z是16位字单元的
地址。
试编写汇编程序,完成Z←（（W-X）÷5-Y）⨯（R+2）。
2.试编写一个程序，测试某数是否是奇数。
如该数是奇数，则把DL的第0
位置1，否则将该位置0。
三、实验报告要求
1.程序算法流程图。
2.源程序清单。
3.程序运行结果。
4.调试过程中遇到的问题和解决的方法。
实验2分支及循环程序设计
一、实验目的与要求
1．熟悉汇编语言运行、调试环境及方法。
2．掌握分支程序和循环程序的设计方法。
3．熟悉调试工具DEBUG，并运用DEBUG工具调试程序。
二、实验容
根据下列要求，编写汇编源程序，汇编连接汇编源程序，并利用DEBUG工具调试程序，验证程序的正确性。
1.编写汇编程序，统计某存储区若干个数据中英文字母的个数，并将结果在屏幕上显示。
2.从键盘任意输入一组字符数据，请编写汇编程序将该组数据加密后在屏幕上显示。
参考加密方法是：
每个数乘以2。
（说明：
本题的加密方法，同学们可以自己拟定）
三、实验报告要求
1.程序算法流程图。
2.源程序清单。
3.程序运行结果。
4.调试过程中遇到的问题和解决的方法。
实验3子程序程序设计
一、实验目的与要求
1．熟悉汇编语言运行、调试环境及方法。
2．掌握子程序的设计方法。
3．熟悉调试工具DEBUG，并运用DEBUG工具调试程序。
二、实验容
根据下列要求，编写汇编源程序，并利用DEBUG工具调试程序，验证程序的正确性。
1.编程以十进制形式和十六进制形式显示AX的容，并把两个显示功能分别封装成子程序dispDEC和dispHEX。
2.设在以EXAMSCORE为首地址的数据缓冲区依次存放某班10名同学5门功课的成绩，现要统计各位同学的总分，并将总分放在该学生单科成绩后的单元，并调用第1个程序封装好的子程序，以十进制方式显示统计情况，显示格式自行设计。
请编程完成此功能。
数据缓冲区参考数据定义如下：
EXAMSCOREDB01;学号
DB89,76,54,77,99;单科成绩
DW?
;该学生的总分
DB02;学号
DB79,88,64,97,92;单科成绩
DW?
;该学生的总分
三、实验报告要求
1.程序算法流程图。
2.源程序清单。
3.程序运行结果。
4.调试过程中遇到的问题和解决的方法。
实验4综合程序设计
一、实验目的与要求
1．熟悉汇编语言运行、调试环境及方法。
2．掌握汇编语言程序的设计方法。
3．熟悉调试工具DEBUG，并运用DEBUG工具调试程序。
二、实验容
根据下列要求，编写汇编源程序，并利用DEBUG工具调试程序，验证程序的正确性。
1.编写汇编程序接收用户从键盘键入的月份数，在终端上显示该月的英文缩写名。
当用户按下ESC键时，程序退出，返回DOS。
参考程序执行过程如下：
month？
5↙MAYmonth？
9↙SEPmonth？
2.按15行×16列的表格形式显示ASCII码为10H～FFH的所有字符。
每16个字符为一行，每行中的相邻两个字符之间用空白符（ASCII码为0）分隔。
3.在第2题程序的基础上进行修改。
将显示表格的行、列数由固定的15行16列改为由用户从键盘输入。
然后，按用户输入的行列值进行显示。
4.编写汇编程序将存数据区保存的若干个带符号16位数据按从大到小的顺序排列后，以十进制真值的形式在屏幕上显示。
三、实验报告要求
1.程序算法流程图。
2.源程序清单。
3.程序运行结果。
4.调试过程中遇到的问题和解决的方法。
源程序：
1.1******************************************************************
DATASEGMENT
xDB3
yDB1
zdw?
wdb23
rdb6
DATAENDS
CODESEGMENT
ASSUMECS:
CODE,DS:
DATA
START:
MOVAX,DATA
MOVDS,AX
moval,w
subal,[x]
cbw
movbl,5
idivbl
subal,[y]
movbl,r
addbl,2
imulbl
mov[z],ax
MOVAH,4CH
INT21H
CODEENDS
ENDSTART
1.2******************************************************************
DATASEGMENT
xdb63
ydb?
DATAENDS
CODESEGMENT
ASSUMECS:
CODE,DS:
DATA
START:
MOVAX,DATA
MOVDS,AX
moval,[x]
shrdl,1
shral,1
rcldl,1
mov[y],dl
MOVAH,4CH
INT21H
CODEENDS
ENDSTART
2.1******************************************************************
DATASEGMENT
STRINGDB'g3tRfdtfTR34'
MESSAGEONEDB'Pleaseinputthenumberofstring（<10）:
$'
MESSAGETWODB'Thenumberofstringis:
$'
DATAENDS
CODESEGMENT
ASSUMECS:
CODE,DS:
DATA
START:
MOVAX,DATA
MOVDS,AX
movah,9
movdx,offsetmessageone
int21h
MOVAH,1
INT21H
MOVBL,AL
MOVDL,10
MOVAH,2
INT21H
SUBBL,30H
CBW
MOVCX,BX
MOVAL,0
MOVBX,OFFSETSTRING
BEGIN:
MOVDL,[BX]
CMPDL,'a'
JBRE
CMPDL,'z'
JARE
INCAL
RE:
INCBX
LOOPBEGIN
ADDAL,30H
movbl,al
movah,9
movdx,offsetmessagetwo
int21h
MOVDL,BL
MOVAH,2
INT21H
MOVAH,4CH
INT21H
CODEENDS
ENDSTART
2.2******************************************************************
DATASEGMENT
MAXLENDB32
ACTLENDB?
STRINGONEDB32DUP（?
）
STRINGTWODB32DUP（?
）
MESSAGEONEDB'Pleaseinputthestring（<31）:
$'
MESSAGETWODB'Theencrypticstringis:
$'
DATAENDS
CODESEGMENT
ASSUMECS:
CODE,DS:
DATA
START:
MOVAX,DATA
MOVDS,AX
movah,9
movdx,offsetmessageone
int21h
MOVDX,OFFSETMAXLEN
MOVAH,0AH
INT21H
SUBCH,CH
MOVCL,ACTLEN
ADDDX,2
MOVBX,DX
MOVBP,OFFSETSTRINGTWO
MOVDL,10
MOVAH,2
INT21H
BEGIN:
MOVDL,[BX]
SUBDL,20H
MOV[BP],DL
INCBX
INCBP
LOOPBEGIN
movAL,'$'
MOV[BP],AL
movah,9
movdx,offsetmessagetwo
int21h
MOVAH,9
MOVDX,OFFSETSTRINGTWO
INT21H
MOVAH,4CH
INT21H
CODEENDS
ENDSTART
3.1******************************************************************
CODESEGMENT
MAINPROCFAR
ASSUMECS:
CODE
START:
PUSHDS
SUBAX,AX
PUSHAX
MOVAX,10101B
CALLDISPDEC
CALLCRLF
CALLDISPHEX
RET
MAINENDP
DISPDECPROCNEAR
PUSHAX
PUSHBX
PUSHCX
PUSHDX
PUSHF
MOVBX,AX
MOVCX,10000D
CALLDEC_DIV
MOVCX,1000D
CALLDEC_DIV
MOVCX,100D
CALLDEC_DIV
MOVCX,10D
CALLDEC_DIV
MOVCX,1D
CALLDEC_DIV
POPF
POPDX
POPCX
POPBX
POPAX
RET
DEC_DIVPROCNEAR
MOVAX,BX
MOVDX,0
DIVCX
MOVBX,DX
MOVDL,AL
ADDDL,30H
MOVAH,2
INT21H
RET
DEC_DIVENDP
DISPDECENDP
DISPHEXPROCNEAR
PUSHAX
PUSHBX
PUSHCX
PUSHDX
PUSHF
MOVBX,AX
MOVCH,4
MOVCL,4
ROTATE:
ROLBX,CL
MOVAL,BL
ANDAL,0FH
ADDAL,30H
CMPAL,3AH
JLPRINTIT
ADDAL,7H
PRINTIT:
MOVDL,AL
MOVAH,2
INT21H
DECCH
JNZROTATE
POPF
POPDX
POPCX
POPBX
POPAX
RET
DISPHEXENDP
CRLFPROCNEAR
PUSHAX
PUSHDX
MOVDL,0AH
MOVAH,2
INT21H
POPDX
POPAX
升级会员 