微机汇编实验代码Word文档格式.docx

1、，实验二：数据传送、数码转换程序设计实验（传送20个数据并排序）DATA SEGMENT MSR DB 20,19,18,17,16,15,14,13,12,11,10,9,8,7,6,5,4,3,2,1 N EQU 20 MSR1 DB the smallest and the largest,0AH,0DH,$ DATA ENDS EXDA SEGMENT VALUE DB 22 DUP（? EXDA ENDS ; CODE SEGMENT ASSUME CS:CODE,DS:DATA,ES:EXDA START: MOV AX,DATA MOV DS,AX MOV AX,EXDA MOV

2、 ES,AX MOV BX,0 XOR CX,CX MOV CX,N NEXT: MOV AL,MSRBX MOV ES:VALUEBX,AL INC BX LOOP NEXT MOV BX,OFFSET VALUE-1 MOV SI,1 FORI: MOV DI,SI INC DI FORJ: MOV AL,BX+SI CMP AL,BX+DI JBE NEXTJ XCHG AL,BX+DI MOV BX+SI,AL NEXTJ: CMP DI,N JBE FORJ NEXTI: INC SI CMP SI,N-1 JBE FORI; MOV DX,OFFSET MSR1 MOV AH,9

3、INT 21H MOV AL,ES:VALUE0 MOV BX,OFFSET VALUE XOR AH,AH MOV AL,BX ROR AL,4 CALL FOR MOV DL,h MOV AH,2 MOV BX,OFFSET VALUE+19BX MOV DL,0DH MOV DL,0AHVALUE20,0将附加段寄存器指向的段值赋给数据段寄存器 PO: CMP ES:VALUEBX,0 JA PO MOV AH,4CH FOR PROC PUSH AX AND AL,0FH CMP AL,09H JA NEXT2 ADD AL,30H MOV DL,AL POP AX RET NEXT2

4、: ADD AL,37H FOR ENDP CODE ENDS END START实验三：运算类程序设计实验（两个五位数减法运算，减数可大于被减数） HANG DB 0AH,0DH, SHU DB INPUT A 5 （WEI） NUMBER: A1 DB 8 DB 7 DUP（? A2 DB 8 A3 DB 5 DUP（? A4 DB 18 DUP（? DB STAK SEGMENT STACK SA DB 100 DUP（? STAK ENDSDATA,SS:STAK MAIN PROC FAR MOV AX,STAK MOV SS,AX MOV DX,OFFSET SHU MOV AH,

5、09H MOV DX,OFFSET A1 MOV AH,0AH MOV BX,DX ADD BX,2 MOV DX,OFFSET HANG MOV DX,OFFSET A2 MOV SI,DX ADD SI,2 MOV CX,5 BI: CMP AL,SI JB L2 JA L1 LOOP BI L1: MOV AX,1 CLC MOV BX,6 MOV SI,4 P1: MOV AL,A1BX SBB AL,A2BX MOV A3SI,AL DEC BX DEC SI LOOP P1 MOV SI,0 JIA: CMP A3SI,9 JA LL1 JBE LL2 LL1: ADD A3SI,

6、10 LL2: ADD A3SI,30H LOOP JIA JMP CHU L2: MOV AX,0 POP BX POP SI P11: MOV AL,A2BX SBB AL,A1BX LOOP P11 JIA1: JA LL11 JBE LL22 LL11: LL22: LOOP JIA1 CHU: K1: MOV AL,A1SI+2 MOV A4SI,AL LOOP K1 MOV A4SI,- MOV BX,2 K2: LOOP K2= CMP AX,0 JA Z2 Z1: Z2: K3: MOV AL,A3BX LOOP K3 MOV DX,OFFSET A4 MOV AX,4C00H

7、 MAIN ENDP实验四：子程序设计实验（含进制及数码转换）功能：输入1时将输入数转换为十六进制输出，输入2时将输入数转化为bcd码输出，输入3时将输入数转化为七段共阳极码，;输入4时返回dos系统 DATA SEGMENT MES DB Input a number from 1 to 4,1-H,2 -bcd,3 -7-duan,4-dos ME DB you put a wrong number, 0AH,0DH, TEM DB -Input a decimal number ,16 STR1 DB 0AH,0DH ; NUM DB 4 DUP（?）,H$ TAB DB 0123456

8、789ABCDEF MES2 DB -Ilease input two or more bits decimal :bcd MES1 DB -The BCD code of decimal are: MES3 DB 0000$ MES4 DB 0001$ MES5 DB 0010$ MES6 DB 0011$ MES7 DB 0100$ MES8 DB 0101$ MES9 DB 0110$ MES10 DB 0111$ MES11 DB 1000$ MES12 DB 1001$ BUF DB 100 DB ? DB 100 DUP（0） MED DB 100 DUP（?） ; MES21 D

9、B -Please input two or more bits decimal :7-d MES111 DB -The 7 duan code of decimal are: TAB1 DB 40H,79H,24H,30H,19H,12H,02H,78H,00H,18H BUF1 DB 100 MED1 DB 100 DUP（? STACK1 SEGMENT STACK DW 256 DUP（? STACK1 ENDSDATA ,SS: STACK1 BEGAIN: MOV DX,OFFSET MES MOV AH,1 CMP AL,1 JZ FOR12 JZ FOR23 JZ FOR34

10、JZ FOR4 MOV DX,OFFSET ME JMP BEGAIN FOR1: JMP FUNCTION1 FOR2: JMP FUNCTION2 FOR3: JMP FUNCTION3 FOR4: JMP FUNCTION4 FUNCTION1: LEA DX,TEM XOR BX,BX MOV CX,10 MOV AH,1 ;1号功能从键盘读入字符 CMP AL,0DH ;如果=13也就是回车则跳到conv进行转换 JZ CONV PUSH AX ;暂存ax MOV AX,BX ;bx存当前已有的数值，这里交换是为了用num MUL CX ;bx=bx* 10 MOV BX,AX XO

11、R AH,AH ;清空高位 ADD BX,AX ;相加 JMP NEXT ;继续读取下个字符 CONV:bx里存的是输入的10进制数 MOV CH,4 LEA BX,TAB ;bx保存16进制字符表的基址 MOV CL,4 LEA SI,NUM ;num是转换后存16进制字符的地方 LOPA: ROL AX,CL ;ax左移动4位，由于是rol，所以高4位移到低 4位暂存 AND AX,000FH ;取出低4位，也就是高4位移过来位 MOV DI, AX ;查表 MOV AL, BX+DI MOV SI,AL ;存储 INC SI ;下个位置 POP AX ;还原状态 DEC CH JNZ L

12、OPA LEA DX,STR1 ;输出 FUNCTION2: MOV DX,OFFSET MES2 MOV DX,OFFSET BUF MOV CL,BX+1 A1: MOV DL,0FFH MOV AL,BUFBX CMP AL,3AH ;比较AL中的数是否是09的ASCII码 JNB A2 SUB AL,30H JB A2 A2: MOV AL,DL MOV MEDBX,AL LOOP A1 MOV CL,BX1 MOV DX,OFFSET MES1 A3: MOV AL,MEDBX CALL SHOW1 A4: MOV DL,20H MOV AH,02H LOOP A3 SHOW1 PR

13、OC NEAR CMP AL,0 JE ZERO CMP AL,1 JE ONE CMP AL,2 JE TWO CMP AL,3 JE THREE CMP AL,4 JE FOUR CMP AL,5 JE FIVE CMP AL,6 JE SIX CMP AL,7 JE SEVEN CMP AL,8 JE EIGHT CMP AL,9 JE NINE ZERO: MOV DX,OFFSET MES3 JMP A4 ONE: MOV DX,OFFSET MES4 TWO: MOV DX,OFFSET MES5 THREE: MOV DX,OFFSET MES6 FOUR: MOV DX,OFF

14、SET MES7 FIVE: MOV DX,OFFSET MES8 SIX: MOV DX,OFFSET MES9 SEVEN: MOV DX,OFFSET MES10 EIGHT: MOV DX,OFFSET MES11 NINE: MOV DX,OFFSET MES12 ENDP FUNCTION3: MOV DX,OFFSET MES21 ；显示提示 MOV DX,OFFSET BUF1 A11: MOV AL,BUF1BX JNB A21 JB A21 A21: MOV MED1BX,AL LOOP A11 MOV DX,OFFSET MES111 A31: CALL SHOW2 MOV DL,48H LOOP A31 SHOW2 PROC NEAR MOV AL,MED1BX MOV DX,BX MOV BX ,OFFSET TAB1 XLAT TAB1 AND AL,0F0H ;取高4位 SHR AL,4 CMP AL,0AH ;是否是A以上的数 JB C2 ADD AL,07H C2: MOV DL,AL ;show character AND AL,0FH ;取低4位 CMP AL,0AH JB C3 C3: FUNCTION4: