微型计算机原理实验

1、实验一：输出字符'A'的源程序如下： PROG SEGMENT ASSUME CS:PROG START: MOV DL,'A' MOV AH , 2 INT 21H MOV AH,4CH INT 21H PROG ENDS END START 实验二：1 .把BX中的二进制数转换成十进制数，在屏幕上显示出来，只考虑无符号数。程序 如下：CODE SEGMENT ASSUME CS:CODE START: MOV BX,0FFFH MOV CX,10000 CALL DEC_DIV MOV CX, 1000 CALL DEC_DIV MOV CX,100 CAL

2、L DEC_DIV MOV CX,10 CALL DEC_DIV MOV CX,1 CALL DEC_DIV MOV AH,4CH INT 21HDEC_DIV PROC NEAR MOV AX,BX MOV DX,0 DIV CX MOV BX,DX MOV DL,AL ADDDL,30HMOV AH,2 INT 21H RETDEC_DIV ENDP CODE ENDSEND START2 .把BX中的带符号数转换成十进制数，在屏幕上显示出来。程序如下： CODE SEGMENT ASSUME CS:CODESTART: MOV BX,8001H MOV AX,8000H AND AX,B

3、X JNZ MINUS JMP DISPMINUS: MOV DL,'-' MOV AH,2 INT 21H NEG BX JMP DISP DISP: MOV CX,10000 CALL DEC_DIV MOV CX, 1000 CALL DEC_DIV MOV CX,100 CALL DEC_DIV MOV CX,10 CALL DEC_DIV MOV CX,1 CALL DEC_DIV MOV AH,4CH INT 21H DEC_DIV PROC NEAR MOV AX,BX MOV DX,0 DIV CX MOV BX,DX MOV DL,AL ADD DL,30H

4、MOV AH,2 INT 21H RETDEC_DIV ENDP CODE ENDS END START 3.求一个数据块（由10个单字节的无符号数组成）中的最大元素，并将结果在屏幕 上显示出来，程序如下： DATA SEGMENT BLOCK DB1,0,5,7,10,30,100,127,90,80RESULT DB?DATA ENDSCODE SEGMENT ASSUME CS:CODE,DS:DATA BEGIN PROC FARMOV AX,DATA MOV DS,AX MOV CX,9 LEA SI,BLOCK MOV AL,SI X1: INC SI CMP AL,SI JAE

5、X2 MOV AL,SI X2: LOOP X1MOV RESULT,AL MOV AH ,0 MOV BX,AX CALL XIANSHI MOV AH,4CH INT 21H BEGIN ENDP XIANSHI PROC NEAR MOV AL,80H AND AL,BL JNZ MINUS JMP DISP MINUS: MOV DL,'-'MOV AH,2 INT 21H NEG BL JMP DISP DISP: MOV CX,100 CALL DEC_DIV MOV CX,10 CALL DEC_DIV MOV CX,1 CALL DEC_DIV MOV AH,4

6、CH INT 21H XIANSHI ENDP DEC_DIV PROC NEARMOV AX,BXMOV DL,0 DIV CL MOV BL,AH MOV BH,0MOV DL,ALADD DL,30HMOV AH,2 INT 21H RETDEC_DIV ENDP CODE ENDS END BEGIN4 .求一个数据块（由20个单字节的带符号数组成）中的正数和（0字）和负数和（0 字），并在屏幕上用十进制的形式显示出两个和。程序如下：DATA SEGMENTBLOCK DW -100,100,200,-200,5,6,7,8,9,10DW 11,12,13,14,15,50,-50,1

7、50,-150,-200POSIT DW ?NEGAT DW ?ST1 DB 'The sum of all the positive numbers:$'ST2 DB 'The sum of the negative numbers:$'DATA ENDSCODE SEGMENT ASSUME CS:CODE ,DS:DATA START PROC MOV AX,DATA MOV DS,AX MOV BX,OFFSET BLOCK MOV SI,0 MOV DI,0 MOV CX,20 X1: MOV AX,BX CMP AX,0 JGE X3 ADD DI,

8、AX JMP X2 X3: ADDSI,AXX2: ADDBX,2LOOP X1 MOV POSIT,SI MOV NEGAT,DI MOV BX,SI MOV DX,OFFSET ST1 MOV AH,9 INT 21H CALL XIANSHI MOV DL,0DH MOV AH,2 INT 21HMOV DL,0AH MOV AH,2 INT 21H MOV BX,NEGAT NEG BX AND BX,7FFFH MOV DX,OFFSET ST2 MOV AH,9 INT 21H MOV DL,'-' MOV AH,2 INT 21H CALL XIANSHI MOV

9、 AH,4CH INT 21H START ENDP XIANSHI PROC NEAR MOV CX,100 CALL DEC_DIV MOV CX,10 CALL DEC_DIV MOV CX,1 CALL DEC_DIV RET XIANSHI ENDP DEC_DIV PROC NEAR MOV AX,BX MOV DX,0 DIV CX MOV BX,DX MOV DL,AL ADD DL,30H MOV AH,2 INT 21H RET DEC_DIV ENDP CODE ENDS END START5 .将寄存器BX中的二进制数转换成十六进制数并在屏幕上显示出来 程序如下： CO

10、DE SEGMENT ASSUME CS:CODEBINHEX PROC FAR MOV CH,4 MOV BX,1000ROTATE: MOV CL,4 ROL BX,CL MOV DL,BL AND DL,0FH ADDDL,30HCMP DL,3AH JL OUTPUT ADD DL,7OUTPUT: MOV AH,2INT 21H DEC CH JNE ROTATE MOV DL,'H' MOV AH,2 INT 21H MOV AH,4CH INT 21H BINHEX ENDP CODE ENDSEND BINHEX实验三：1.从键盘上输入一个十进制数（065535

11、）,转换成二进制数并放入寄存器 BX中，其程序框图如下：程序如下： CODE SEGMENT ASSUME CS:CODE START PROC CALL DECBIN CALL XIANSHI MOV AH,4CH INT 21HSTART ENDP DECBIN PROC NEAR MOV CX,10 MOV BX,0 LOP1: MOV AH,1 INT 21H CMP AL,30H JL EXIT CMP AL,39H JG EXIT SUB AL,30H MOV AH,00H XCHG AX,BX MUL CX ADD BX,AX JMP LOP1 EXIT: RET DECBIN

12、ENDP XIANSHI PROC NEAR LP1: MOV CX,10000 CALL DEC_DIV MOV CX,1000 CALL DEC_DIV MOV CX,100 CALL DEC_DIV MOV CX,10 CALL DEC_DIV MOV CX,1 CALL DEC_DIV RET XIANSHI ENDP DEC_DIV PROC NEARMOV AX,BX MOV DX,0 DIV CX MOV BX,DX MOV DL,AL ADDDL,30HMOV AH,2 INT 21H RET DEC_DIV ENDP CODE ENDS END START 2.从键盘上输入0

13、65535范围的一个十进制数，在屏幕上显示出相应的十 六进制数。程序如下： CODE SEGMENT ASSUME CS:CODE START PROC CALL DECBIN MOV CH,4 CALL ROTATE MOV AH,4CH INT 21H START ENDP DECBIN PROC NEAR MOV CX,10 MOV BX,0 LOP1: MOV AH,1 INT 21H CMP AL,30H JL EXIT CMP AL,39H JG EXIT SUB AL,30H MOV AH,00H XCHG AX,BX MUL CX ADD BX,AX JMP LOP1 EXIT

14、: RET DECBIN ENDP ROTATE PROC LOP2: MOV CL,4 ROL BX,CL MOV DL,BLAND DL,0FH ADDDL,30HCMP DL,3AH JL OUTPUT ADD DL,7 OUTPUT: MOV AH,2 INT 21H DEC CH JNE LOP2 MOV DL,'H' MOV AH,2 INT 21H MOV AH,4CH INT 21H ROTATE ENDP CODE ENDS END START 实验四：1 .在内存中存有一字符串，以 0为结尾，程序开始输出HELLO然 后等待从键盘输入一字符，再改字符串中寻找

15、该字符，若找到，输出yes' 若找不到，输出no',然后再输入下一字符。程序如下：DATA SEGMENTSTR1 DB'HELLO',0DH,0AH,'$'STR2 DB20H,'YES',0DH,0AH,$STR3 DB20H,'NO',0DH,0AH,'$'STR4 DB '1 2 3 0 4 5 A B a=! ?',00HDATA ENDS CODE SEGMENTASSUME CS:CODE,DS:DATASTART PROC FARMOV AX,DATAMOV DS,A

16、XMOV DX,OFFSET STR1MOV AH,9INT 21HLOOP1: MOV AH,1INT 21HMOV BX,OFFSET STR4GON: MOV AH,BXCMP AH,0JZ NOINC BXCMP AH,ALJNZ GONMOV DX,OFFSET STR2GO: MOV AH,9INT 21HJMP LOOP1NO: MOV DX,OFFSET STR3JMP GOSTART ENDPCODE ENDSEND START2 .实验内容1的程序是个无限循环程序，若按'ESC键，让程序退 出循环，是系统返回 DOS已知ESC键的键值是1BH按照上面要求对 实验内容1的程序进行修改，然后重新汇编、链接和运行。程序如下：DATA SEGMENTSTR1 DB'HELLO',0DH,0AH,$STR2 DB20H,'YES',0DH,0AH,$STR3 DB20H,'NO',0DH,0AH,$STR4 DB '1 2 3 0 4 5 A B a=! ?',00HDATA ENDSCODE SEGMENTASSUME CS:CODE,D