微机软件实验习题与答案(完整版)

微机原理软件实验
实验1两个多位十进制数相加的实验
实验内容：将两个多位十进制数相加，要求加数和被加数均以ASCII码形式各自顺序存放以DATA1和DATA必首的5个内存单元中(低位在前)，结果送回DATA 攸t。

完整代码如下：
DATAS SEGMENT
；此处输入数据段代码
STRING1 DB 'input the first number:' ,'$'
STRING2 DB 13,10,nput the second number:' ,'$'
STRING3 DB 13,10the output is:' ,'$'
DATA1 DB 6 DUP(00H),'$'
DATA2 DB 6 DUP(00H)'$'
DATAS ENDS
STACKS SEGMENT
;此处输入堆栈段代码
STACKS ENDS
ASSUME CS:CODES,DS:DATAS,SS:STACKS START:
MOV AX,DATAS
MOV DS,AX
；此处输入代码段代码
LEA SI,DATA1
LEA DI,DATA2
L0:
LEA DX,STRING1;打印字符申STRING1
MOV AH,09
INT 21H
INPUT1:;输入第一个数
MOV AH,01;输入字符至AL中
INT 21H
CMP AL,'/'
JE L1
MOV [SI],AL
JMP INPUT1
L1:
LEA DX,STRING2;打印字符申STRING2
MOV AH,09
INT 21H
INPUT2: ;输入第二个数
MOV AH,01;输入字符至AL
INT 21H
CMP AL,'/'
JE L2
MOV [DI],AL
INC DI
JMP INPUT2
L2:
MOV SI,0
CLC;活空进位标志位CF
PLUSE:;相加;SUB DATA1[SI],30H
;SUB DATA2[SI],30H
；这里不能使用这两条指令，因为如果DATA1[5]=00H,00H-30H需要借位相减，使
CF=1
MOV AL,DATA1[SI]
ADC AL,DATA2[SI]
AAA ；加法调整指令，可使两个ASCIB直接相加
MOV DATA1[SI],AL ;和赋给DATA1[SI]
INC SI
LOOP PLUSE
L3:
LEA DX,STRING3;打印字符申STRING3
MOV AH,09
INT 21H
MOV CX,6
MOV SI,6
SHOW:
DEC SI
CMP DATA1[SI],00H
JE SHOW
SHOW2:
MOV DL,DATA1[SI]
ADD DL,30H
MOV AH,02
INT 21H
CMP SI,0
JE L4
DEC SI
JMP SHOW2
L4: MOV AH,4CH
INT 21H
CODES ENDS
END START
运行结果如下：输入为低位在前，即输入1234和99999相加实际上是4321和99999 相加（即：4321+99999=104320
g DCsOa sr *『4 Zpu ipe^A. WDU W K Ffsk*
0.
实验2两个数相乘的实验（无符号数相乘）
实验内容：实现十进制数的乘法。

要求被乘数和乘数均以ASCII码形式各自顺序存放在内存中，乘积在屏幕上显示出来。

完整代码如下：
DATAS SEGMENT
；此处输入数据段代码
STRING1 DB 'the output is:' ,'$'
DATA1 DB 31H,32H,33H
DATA2 DB 35H,36H
DATAS ENDS
;此处输入堆栈段代码
STACKS ENDS
CODES SEGMENT
ASSUME CS:CODES,DS:DATAS,SS:STACKS START:
MOV AX,DATAS
MOV DS,AX
；此处输入代码段代码
MOV DL,10
MOV AL,DATA1[0] ;AL=31H
SUB AL,30H ;AL=01H
MUL DL;乘10 ;AL=10
ADD AL,DATA1[1];AL=10 +32H
SUB AL,30H ;AL=10 +32H-30H=12
MUL DL ;AL=120
ADD AL,DATA1[2] ;AL=120+33H
SUB AL,30H ;AL=120+33H-30H=123
J
MOV AL,DATA2[0] ;AL=35H
SUB AL,30H ;AL=5
MUL DL;乘10 ;AL=50
ADD AL,DATA2[1] ;AL=50+36H
SUB AL,30H ;AL=50+36H-30H=56
MUL BL ;AX=123x56=6888
SUB DX,DX;DX 活零
MOV BX,1000
DIV BX;(DX,AX)/1000，商6在AX 中，余数888在DX中PUSH DX
MOV DL,AL
ADD DL,30H
MOV AH,02 ;打印最高位6
INT 21H
POP DX
MOV AX,DX;888赋给AX
DIV BL;AX/100,商放在AL中，余数88放在AH中
MOV DL,AL
MOV CL,AH ;! ! !这里千万不能把AH直接赋给AL,因为经过INT 21H 指令后AL,AH会改变
ADD DL,30H
MOV AH,02打印第二位
INT 21H
MOV BL,10
MOV AL,CL
SUB AH,AH滞空AH
DIV BL;AX/10,商放在AL中，余数8放在AH中
MOV DL,AL
MOV CL,AH
ADD DL,30H
MOV AH,02打印第三位
INT 21H
MOV DL,CL
ADD DL,30H
MOV AH,02打印第四位
INT 21H
CODES ENDS
END START
实验3字符串匹配实验
match” ,实验内容：编写程序实现两个字符申比较。

如果相同，则屏幕显示
否则屏幕显示” nomatch”,完整代码如下：
DATAS SEGMENT
;此处输入数据段代码
PRINT1 DB 'input the first string:' ,'$'
PRINT2 DB 13,10input the second string:' ,'$
PRINT3 DB 'match' ,'$'
PRINT4 DB 'nomatch' ,'$'
PRINT5 DB 13,10output: ' ,'$'
STRING1 DB 30 DUP(00H),13,10$'
STRING2 DB 30 DUP(00H),13,10$'
DATAS ENDS
STACKS SEGMENT
;此处输入堆栈段代码
STACKS ENDS
CODES SEGMENT
ASSUME CS:CODES,DS:DATAS,SS:STACKS,ES:DATAS START:
MOV AX,DATAS
MOV DS,AX
;此处输入代码段代码
LEA DX,PRINT1;打印字符申PRINT1
MOV AH,09
INT 21H
LEA SI,STRING1;STRING1 地址赋给SI
LEA DI,STRING2;STRING2地址赋给DI
INPUT1:
MOV AH,01;输入字符至AL
INT 21H
CMP AL,'/';输入字符申以/‘‘结束，转L0
JE L0
MOV [SI],AL
INC SI
JMP INPUT1
L0:
LEA DX,PRINT2 ;打印字符申PRINT2
MOV AH,09
INT 21H
MOV AH,01;输入字符至AL
INT 21H
CMP AL,'/'
JE L1
MOV [DI],AL
INC DI
JMP INPUT2
L1: MOV CX,30 ;CX=30代表比较30次
MOV SI,00H
COMPARE:;字符申一个一个比较
MOV AL,STRING1[SI];取STRING1存储单位中的第SI个字符赋给AL
CMP AL,STRING2[SI] ;AL与STRING2存储单位中的第SI个字符比较
JNE NOMATCH
INC SI
LOOP COMPARE
JMP MATCH
LEA DX,PRINT5
MOV AH,09
INT 21H
LEA DX,PRINT4
MOV AH,09
INT 21H
JMP L2
MATCH:;打印output:match LEA DX,PRINT5
MOV AH,09
INT 21H
LEA DX,PRINT3
MOV AH,09
INT 21H
L2: MOV AH,4CH
INT 21H
CODES ENDS
END START
运行结果:
UQS-^DX0.J4,, Cpj 4peed eye岫；"r^ureekip CJ r PregifJm EWTLM^
圈UOiBoK 0./4 Cpu 部wdt 3000 cycles Fram^skp 0, Pragraunc DWltMP
实验4从键盘输入数据并显示的实验
实验内容：将键盘输入的2位十六进制数转换为等值的二进制数，并在屏幕上显示。

歹0如：键入f2,则显示11110010.完整代码如下：
DATAS SEGMENT
；此处输入数据段代码
STRING1 DB 'please input a string:' ,'$'
STRING2 DB 13,10the output is:' ,'$'
STRING3 DB 13,10,nput error' ,13,10$'
DATAS ENDS
STACKS SEGMENT
;此处输入堆栈段代码
STACKS ENDS
CODES SEGMENT
ASSUME CS:CODES,DS:DATAS,SS:STACKS
START:
MOV AX,DATAS
MOV DS,AX
;此处输入代码段代码
L0: LEA DX,STRING1;打印字符申STRING1 MOV AH,09
INT 21H
MOV AH,01;输入第一个字符至AL中
INT 21H
CMP AL, '0'
JB ERROR1
CMP AL,'9'
JBE ENTER1
CMP AL, 'A'
JB ERROR1
CMP AL, 'F'
JBE ENTER1
CMP AL, 'a'
JB ERROR1
CMP AL, 'f
JBE ENTER1
ERROR1:
LEA DX,STRING3;打印字符申STRING3
MOV AH,09
INT 21H
JMP L0
ENTER1:
CALL ASC2BCD ;把ASCI码转化成十进制数BCD码MOV CL,4
ROL AL,CL
MOV BL,AL ;把高四位放到BL寄存器中
;输入第二个字符
MOV AH,01;输入第二个字符至AL中
INT 21H
CMP AL, '0'
JB ERROR1
CMP AL, '9'
JBE ENTER2
CMP AL,'A'
JB ERROR1
CMP AL, 'F'
JBE ENTER2
CMP AL, 'a'
JB ERROR1
CMP AL, 'f
JBE ENTER2
ENTER2:
CALL ASC2BCD ;把ASCI码转化成十进制数BCD码ADD BL,AL
LEA DX,STRING2;打印字符申STRING2
MOV AH,09
INT 21H
MOV CX,9
CLC滞空标志位
SHOW: ;显示BL中的二进制数
DEC CX
JE NEXT ；输出完八位之后返回DOS
ROL BL,1 ；循环左移一位，若溢出为1,则CF=1 JC M1
JMP M2
M1: MOV DL,'1' ;若CF=1,转至M1 丁印1'
MOV AH,02
INT 21H
JMP SHOW
M2: MOV DL,'0' ;若CF=0，转至M1 打印0' MOV AH,02
INT 21H
JMP SHOW
NEXT:
MOV AH,4CH
INT 21H
ASC2BCD PROC
JBE L1 ;若AL 每，转L1
SUB AL,07H ；若输入的数为A~F，或者a~f,则减乙A接在39H后面，A~F=3AH~3FH,a~ 仁5AH~5FH
L1: SUB AL,30H ;减30H
AND AL,0FH ；滤除高位，保留低位，因为a~f恰好比A~F大20H,这样a~f就和A~F的数值一样了
RET
ASC2BCD ENDP
CODES ENDS
END START
输出结果为：（若输出不在0~9, A~F,a~f内，则重新输入）
DOJ JUOK Cpu speed 300C cyH” fra me skip D r Program； DWTLMfl
实验内容：先在屏幕上显示“input string, ”，输入字符申;再显示“result='
如为0~9的数字，则计数器加1,如为非数字，则直接显示，但不计数。

完整代码如下：
DATAS SEGMENT
；此处输入数据段代码
STRING1 DB 'input string:' ,'$'
STRING2 DB 13,10result=' ,'$'
STRING3 DB 13,10zifu:' ,'$'
DATAS ENDS
STACKS SEGMENT
；此处输入堆栈段代码
STACKS ENDS
CODES SEGMENT
ASSUME CS:CODES,DS:DATAS,SS:STACKS
START:
MOV AX,DATAS
MOV DS,AX
；此处输入代码段代码
LEA DX,STRING1;打印字符申1
MOV AH,09
INT 21H
MOV CX,0
MOV BX,0
INPUT:
MOV AH,01;输入字符至AL
INT 21H
CMP AL,'/' ;输入/ 后转L0
JE L0
CMP AL, '0' ;下溢出转RUZHAN
JB RUZHAN
CMP AL, '9' ;上溢出转RUZHAN
JA RUZHAN
INC CL ;若为数字则计数器+1
JMP INPUT
RUZHAN:;非数字字符入栈
PUSH AX
ADD BL,1 ;BL代表入栈的字符个数，方便待会输出JMP INPUT
L0:
LEA DX,STRING3;打印字符申3
MOV AH,09
INT 21H
CHUZHAN:
POP AX
MOV DX,AX
MOV AH,02
INT 21H
SUB BL,1
CMP BL,0 ;入了多少个栈，出多少栈
JNE CHUZHAN
OUTPUT:;输出数字的个数
LEA DX,STRING2;打印字符申2
INT 21H
MOV DL,CL
ADD DL,30H
MOV AH,02
INT 21H
MOV AH,4CH
INT 21H
CODES ENDS
END START
输出结果为：（这里非数字字符输出顺序与输入顺序相反）DO&Bn0.74r Q]u 3000 Frametbp 0r Programs DW1K1'1
实验6改变年月日的实验
实验内容：先在屏幕上显示“ what is the date(mm/dd/yy)? "从键盘输入的月日年能把计算机的系统日期改为你键入的值。

完整代码如下：
DATAS SEGMENT
S1DB 0AH,0DH,"what is the date(mm/dd/yy)?:" ,'$'
DATAS ENDS
STACKS SEGMENT
STACKS ENDS
CODES SEGMENT
ASSUME CS:CODES,DS:DATAS,SS:STACKS
START:
MOV AX,DATAS
MOV DS,AX
MOV DX,OFFSET S1
MOV AH,09H;打印字符申"what is the date(mm/dd/yy)?:"
INT 21H
MOV DX,0H;DX=CH=0
KAISHI:
MOV CL,0;用来压缩移位
SHURU:
MOV AH,01H;输入字符存入AL中
INT 21H
MOV AH,0AH;10武给AH
CMP AL,0DH ;AL=13则结束，设置日期
JE GENGGAI
CMP AL,'/';计算来判断是年，月，日
JE ZIZENG
AND AL,0FH
CMP CH,0;等丁0则转月
JE YUE
CMP CH,1;等丁1则转日
JE RI
CMP CH,2;等丁2则转年
JE NIAN
ZIZENG: INC CH
JMP SHURU ;无条件转移至SHURU
YUE:
ADD DH,AL
CMP CL,0
JNZ KAISHI
INC CL
MOV AL,DH
MUL AH
MOV DH,AL
JMP SHURU ;无条件转移至SHURU RI:
ADD DL,AL
CMP CL,0
JNZ KAISHI
INC CL
MOV AL,DL
MUL AH
MOV DL,AL
JMP SHURU ;无条件转移至SHURU
NIAN:
CMP CL,0
JNZ XIABU
ADD BL,AL
MOV CL,03H;3 赋给CL
JMP SHURU ;无条件转移至SHURU XIABU:
MOV AH,0滞空AH
MOV SI,BX;SI=BX
SHL BX,CL;BX左移三位，乘以8
SHL SI,1SI左移一位，乘以2
ADD BX,SI;两个相加，即乘以10
ADD BX,AX;BX加上新输入的数字
JMP SHURU
GENGGAI:
MOV AH,2BH;设置日期
INT 21H
MOV AH,4CH
INT 21H
CODES ENDS
END START
输出结果为：（设置2008年12月3日，注意如果要设置好系统,
否则可能计算机的日期改变不了）
圈DDSBox 3.74, Cpu 申5000 Firdrrf £扫0. PrL^gramc DWTFMP
实验7将小写字母转换为大写字母的实验
实验内容：接收键入字符（以Ctrl-c为结束），将小写字母变为大写字母，并
在屏幕上显示。

完整代码如下：
DATAS SEGMENT
；此处输入数据段代码
STRING1 DB 13,10please input a string:' ,'$'
STRING2 DB 13,10,the output string is:' ,'$'
DATA DB 100DUP(00H),'$'
DATAS ENDS
STACKS SEGMENT
;此处输入堆栈段代码
STACKS ENDS
CODES SEGMENT
ASSUME CS:CODES,DS:DATAS,SS:STACKS START:
MOV AX,DATAS
MOV DS,AX
;此处输入代码段代码
M: LEA SI,DATA
LEA DX,STRING1;打印字符申1
MOV AH,09
INT 21H
INPUT:
MOV AH,01;输入字符C
INT 21H
CMP AL,03H
JE OUTPUT
CMP AL, 'a'
JB M
CMP AL, 'z'
JA M
SUB AL,20H ;减20H 变小写
MOV [SI],AL
INC SI
JMP INPUT
OUTPUT:
LEA DX,STRING2;打印字符申2
LEA SI,DATA
L1:
MOV DL,[SI]
CMP DL,00H
JE ENDING
MOV AH,02
INT 21H
INC SI
JMP L1
ENDING:
MOV AH,4CH
INT 21H
CODES ENDS
END START
运行结果为：（如果输入的不在a~f中，则重新输入）
DOSBcx 0-^4, Cpu sprees: 100G uyHf. Fraincskip 0, Progr占E：DV/ltMP
实验8排序实验(0~9)
实验内容：从首地址为1000H开始存放10个数，将这些数按降序排列完整代码如下：
DATAS SEGMENT
；此处输入数据段代码
STRING1 DB 'please input 10 numbers:' ,'$'
STRING2 DB 13,10,the sorted numbers are:' ,'$'
ORG 1000H
DATA DB 10DUP(00H),'$'
DATAS ENDS
STACKS SEGMENT
;此处输入堆栈段代码
STACKS ENDS
CODES SEGMENT
ASSUME CS:CODES,DS:DATAS,SS:STACKS START:
MOV AX,DATAS
MOV DS,AX
；此处输入代码段代码
LEA DX,STRING1;输入提示语'plese input 10 numbers:' MOV AH,09
INT 21H
MOV CX,10
LEA SI,DATA
INPUT:
MOV AH,01;输入字符至AL
INT 21H
MOV [SI],AL;把AL赋给偏移地址为SI指向的单元
INC SI
LOOP INPUT
MOV BL,0
L0: MOV CX,9
LEA SI,DATA
L1:;比较第SI个数和第SI+1个数的大小
MOV AL,[SI]
INC SI
CMP AL,[SI]
JB CHANGE ;若小丁则转CHANGE
L2: LOOP L1 ;小循环（CX自动减1）,若CX=0则结束
L3: INC BL
CMP BL,10
JB L0 ;若大循环有1吹了，则转OUTPUT
JMP OUTPUT
CHANGE:;交换两个数
XCHG AL,[SI];交换，
MOV [SI-1],AL ;赋给SI-1
OUTPUT:
LEA DX,STRING2;输入提示语'the sorted numbers are:' MOV AH,09
INT 21H
MOV CX,10
LEA SI,DATA
L4:;循环输出
MOV DL,[SI]
MOV AH,02
INT 21H
INC SI
LOOP L4
MOV AH,4CH
INT 21H
CODES ENDS
END START
输出结果为:
Q DO&Bcx O.?4. Cpu ged 3000 cycles, f rameskip 0, Pro^wTt DWTCM P
实验8排序实验(多位数排序)
实验内容：从首地址为1000H开始存放10个数，将这些数按降序排列.
完整代码如下：
DATA SEGMENT ;CHANGE函数DI,S为入口函数，交换SI,D的值,
SI,D值已经大变
BUFFER DB 100
DB ?
DB 100DUP(?)
DB "$"
ORG 1000H
STOREDATA DB 110DUP(30H) TEMPI DB 12 DUP(24H)
TEMP2 DB 12 DUP(24H)
TEMP3 DB 12DUP(24H)
DATA ENDS
STACK SEGMENT PARA STACK
DW 60H DUP(0)
STACK ENDS
CODE SEGMENT
ASSUME DS:DATA,CS:CODE,SS:STACK
START:
MOV AX,DATA
MOV DS,AX
;MOV AX,STACK
;MOV SS,AX ;可以有可以无，因为其已经默认为 SS 了
MOV DX,OFFSET BUFFER
MOV AH,0AH
INT 21H
;每个数最大为10® ;中间变量 ;中间变量 ;中间变量
CALL TURNLINE
LEA SI,BUFFER
LEA DI,STOREDATA
CALL BUFFERTOSTORE
CALL TURNLINE
LEA SI,STOREDATA
CALL COMPARE
GO: MOV SI,OFFSET STOREDATA
MOV CL,110
PRINT: MOV DL,[SI]
CMP DL,30H
JNE PRINT1
CMP AL,1
JE PRINT1 ;打印该有的0
INC SI
LOOP PRINT
PRINT1:
CMP DL,2CH
JE PRINT0 JIXU: MOV AH,02H
INT 21H
CMP DL,2CH
JNE GOON5
MOV AL,0
JMP GOON6 PRINT0: CMP AL,0
JNE JIXU
MOV DL,30H
MOV AH,02H
INT 21H
MOV DL,2CH
JMP JIXU GOON5MIOV AL,1 GOON6:INC SI
LOOP PRINT
INT 21H
MOV AH,4CH
INT 21H
COMPARE PROC ；以，1为入口传递
MOV BX,SI
;LEA DI,TEMP2
;GETLAST:
;CALL TEMPSAVE
;INC DL
;CMP DL,N
;JE GOON1
;LEA DI,TEMP2
;JMP GETLAST ;TEMP2始终指向当前最后一个数
;GOON1:
MOV CL,N
COMPARE1:
MOV SI,BX
LEA DI,TEMP1
CALL TEMPSAVE ;TEMP 1指向第一个数，错啦，为
什么呢，因为那样比不会进行变化
MOV SI,BX
MOV DH,1
LEA DI,TEMP1
PUSH SI COMPARE2:
LODSB
MOV AH,[DI]
CMP AL,2CH
JE EQUAL
CMP AL,AH
JB BELOW
CMP AL,AH
JA ABOVE
INC DI
JMP COMPARE2 BELOW:
INC DH
PUSH SI
LEA DI,TEMP1
CALL TEMPSAVE ;使TEMPI存入当前最小，因为TEMPI当前元
已
经存在了
；不可以再转存，否则出错
POP SI
ADD SI,N
INC SI
PUSH SI
CMP DH,CL
JA GOON2
LEA DI,TEMP1
JMP COMPARE2
EQUAL:
INC DH ；不交换
POP SI
ADD SI,N
INC SI
PUSH SI
CMP DH,CL
JA GOON2 ;比较CL次
LEA DI,TEMP1
JMP COMPARE2
ABOVE: ；TEMP1始终指向当前最小，若当前值大丁时最小时前移
;此时TEMP 1不便，只需前移就好，交换前后两个数的大小
INC DH
POP SI
PUSH SI
SUB SI,N
SUB SI,1
MOV DI,SI
POP SI
PUSH SI
CALL CHANGE
POP SI
ADD SI,N
INC SI
PUSH SI
CMP DH,CL
JA GOON2 ;比较CL 次
LEA DI,TEMP1
JMP COMPARE2
GOON2:
LOOP COMPARE1
JMP GO
RET
COMPARE ENDP
；存储函数思路：从最后一位开始存，首位均置零，最高1独BUFFERTOSTORE PROC
MOV CL,10
ADD SI,2
;SUB DI,3
STORE:
MOV AL,[SI]
CMP AL,2CH ;直到SI指向,（结束一个数），再进行存储
INC SI
JMP STORE
STORE2: MOV BX,SI ;存储SI
STOREIN:
ADD DI,N
;ADD DI,3
MOV DX,DI ;存储DI
STOREIN1:
MOV AL,[SI]
MOV [DI],AL
DEC SI
DEC DI
LEA AX,BUFFER
ADD AX,1 ;注意边界要取好，因其也有值
CMP SI,AX
JE JMP1
MOV AL,[SI]
CMP AL,2CH
JMP STOREIN1
；条件控制循环
JMP1 :MOV SI,BX
INC SI ；进行存储下个数
INC DX ;使DI加1因为前几位已经用
了
MOV DI,DX
LOOP STORE
;MOV AL,"$"
;INC DI
;MOV [DI],AL
RET
BUFFERTOSTORE ENDP
CHANGE PROC
PUSH DI
PUSH SI
LEA DI,TEMP3
CALL TEMPSAVE ;TEMP3 存放SI 当前值
POP DI ;往，[存入值
POP SI
PUSH SI
CALL TEMPSAVE
;*****把DI的值存入SI 中
POP DI
LEA SI,TEMP3
CALL TEMPSAVE ;*****削SI的值存入DI中
RET
CHANGE ENDP
TEMPSAVE PROC ；存储中间变量的函数，以DI,SI为入口，以，标
志位结束
STEMP:LODSB
MOV [DI],AL
INC DI
CMP AL,2CH
JE NEXT
JMP STEMP
NEXT:
RET
TEMPSAVE ENDP
TURNLINE PROC。