倒计数器实验报告

<1>编程使用四位LED同时显示5A7C（要求将5A7C设在数据段并用XLAT译码显示）程序如下：COMA EQU60HCOMB EQU61HCOMC EQU62HCOMMODE EQU63HSTACK SEGMENT STACKDW 64 DUP(?)STACK ENDSDATA SEGMENTDMTABLE DB 3FH,06H,5BH,4FH,66H,6DHDB 7DH,07H,7FH,6FHDB 77H,7CH,39H,5EH,79H,71HDATA ENDSCODE SEGMENTASSUME CS:CODE,DS:DATA,SS:STACKSTART:MOV AX,DATAMOV DS,AXMOV AL,89H ;方式0，A口、B口输出，C口输入OUT COMMODE,ALMOV SI,3000H ;建立缓冲区，存放要显示的键值MOV [SI],05HMOV [SI+1],0AHMOV [SI+2],07HMOV [SI+3],0CHMOV DI,3004HBEGIN:CALL DIS ;显示刷新CALL CLEAR ;清屏JNZ BEGINDIS PROC NEAR ;显示子程序PUSH AXMOV SI,3000HMOV DL,7FHMOV AL,DLAGAIN:OUT COMB,ALMOV AL,[SI]MOV BX,OFFSET DMTABLEXLAT DMTABLEOUT COMA,ALCALL DALLYINC SIMOV AL,DLTEST AL,0EFHJZ OUT1ROL AL,1MOV DL,ALJMP AGAINOUT1:POP AXRETDIS ENDPCLEAR PROC NEAR ;清除数码管显示子程序MOV AL,00HOUT COMA,ALRETCLEAR ENDPDALLY PROC NEAR ;延时子程序PUSH CXMOV CX,0009HA1: MOV AX,0030HA2: DEC AXJNZ A2LOOP A1POP CXRETDALLY ENDPCODE ENDSEND START实验结果：数码管上显示5A7C，按键无效实验三：<2>编程使键盘为：上行：5C7F 下行：E0A4 ，并能左移显示<3>在<2>的基础上，按动A显示ABCD，按动5显示0123，按动C显示98EF <3>的程序如下：COMA EQU60HCOMB EQU61HCOMC EQU62HCOMMODE EQU63HSTACK SEGMENT STACKDW 64 DUP(?)STACK ENDSDATA SEGMENTDMTABLE DB 79H,3FH,77H,66HDB 6DH,39H,07H,71HDB 3FH,06H,5BH,4FHDB 77H,7CH,39H,5EHDB 6FH,7FH,79H,71HDATA ENDSCODE SEGMENTASSUME CS:CODE,DS:DATA,SS:STACKSTART:MOV AX,DATAMOV DS,AXMOV AL,89H ;方式0，A口、B口输出，C口输入OUT COMMODE,ALMOV SI,3000H ;建立缓冲区，存放要显示的键值MOV [SI],01HMOV [SI+1],01HMOV [SI+2],01HMOV [SI+3],01HMOV DI,3004HBEGIN:CALL DIS ;显示刷新CALL CLEAR ;清屏CALL CCSCAN ;扫描按键JNZ INK1 ;有按键按下，则跳转JMP BEGININK1: CALL DIS ;消抖CALL DALLYCALL DALLYCALL CLEARCALL CCSCANJNZ INK2JMP BEGININK2: MOV CH,7FHMOV CL,00HCOLUM:MOV AL,CH ;键盘扫描OUT COMB,ALIN AL,COMCL1: TEST AL,20HJNZ L2MOV AL,00HJMP KCODEL2: TEST AL,10HJNZ NEXTMOV AL,04HKCODE:ADD AL,CL ;AL为按键键值MOV SI,3000H ;判断按键是否为A,5,CCMP AL,04HJZ DIS0123CMP AL,02HJZ DISABCDCMP AL,05HJZ DIS98EFCALL PUTBUF ;保存按键值CALL UNPRESS ;松手检测NEXT: INC CL ;检测下一列MOV AL,CHTEST AL,10HJZ KERRROR AL,1MOV CH,ALJMP COLUMKERR: JMP BEGINDIS0123:MOV [SI],08HMOV [SI+1],09HMOV [SI+2],0AHMOV [SI+3],0BHJMP BEGINDISABCD:MOV [SI],0CHMOV [SI+1],0DHMOV [SI+2],0EHMOV [SI+3],0FHJMP BEGINDIS98EF:MOV [SI],10HMOV [SI+1],11HMOV [SI+2],12HMOV [SI+3],13HJMP BEGINCCSCAN PROC NEAR ;扫描按键是否按下MOV AL,00HOUT COMB,ALIN AL,COMCNOT ALAND AL,30HRETCCSCAN ENDPCLEAR PROC NEAR ;清除数码管显示子程序MOV AL,00HOUT COMA,ALRETCLEAR ENDPDIS PROC NEAR ;显示键值子程序PUSH AXPUSH CXPUSH DXMOV SI,3000HMOV DL,7FHMOV AL,DLAGAIN:OUT COMB,ALMOV AL,[SI]XOR AH,AHMOV BX,OFFSET DMTABLEADD AX,BXMOV DI,AXMOV AL,[DI]OUT COMA,ALCALL DALLYINC SIMOV AL,DLTEST AL,10HJZ OUT1ROR AL,1MOV DL,ALJMP AGAINOUT1:POP DXPOP CXPOP AXRETDIS ENDPPUTBUF PROC NEAR ;保存键值并左移子程序PUSH BXMOV SI,3000HMOV BL,[SI+1]MOV [SI],BLMOV BL,[SI+2]MOV [SI+1],BLMOV BL,[SI+3]MOV [SI+2],BLMOV [SI+3],ALPOP BXRETPUTBUF ENDPUNPRESS PROC NEAR ;松手检测PUSH AXKON: CALL DISCALL CLEARCALL CCSCANJNZ KONPOP AXRETUNPRESS ENDPDALLY PROC NEAR ;延时子程序PUSH CXPUSH AXMOV CX,0009HA1: MOV AX,0030HA2: DEC AXJNZ A2LOOP A1POP AXPOP CXRETDALLY ENDPCODE ENDSEND START实验结果：按动A，数码管显示ABCD，按动5显示0123，按动C显示98EF，按动其他键，数码管显示相应键值，并左移显示。

实验四：3.要求实现：a)定义键盘按键，5个为数字键2、3、4、5、9，3个功能键：设置SET、清零CLR、开始START；b)显示器上的四位显示为秒（两位）、10毫秒（两位）；c)通过键盘的按键SET，可以设置倒计数器初始时间（最大为55秒）；d)按START键启动倒计数直到计到零停止，或松开START键停止计数，按CLR键清零。

程序如下：COMA EQU60HCOMB EQU61HCOMC EQU62HCOMMODE EQU63HSTACK SEGMENT STACKDW 64 DUP(?)STACK ENDSDATA SEGMENTDMTABLE DB 3FH,06H,5BH,4FH,66H,6DHDB 7DH,07H,7FH,6FH,00HDATA ENDSCODE SEGMENTASSUME CS:CODE,DS:DATA,SS:STACKSTART:MOV AX,DATAMOV DS,AXMOV AL,89H ;方式0，A口、B口输出，C口输入OUT COMMODE,ALZERO1:MOV SI,3000H ;建立缓冲区，存放要显示的键值XOR AL,ALMOV [SI],ALMOV [SI+1],ALMOV [SI+2],ALMOV [SI+3],ALMOV DI,3004HBEGIN:CALL DIS ;显示刷新CALL CLEAR ;清屏CALL CCSCAN ;扫描按键JNZ INK1 ;有按键按下，则跳转JMP BEGININK1: CALL DIS ;消抖CALL DALLYCALL DALLYCALL CLEARCALL CCSCANJNZ INK2JMP BEGININK2: MOV CH,7FHMOV CL,00HCOLUM:MOV AL,CH ;键盘扫描OUT COMB,ALIN AL,COMCL1: TEST AL,20HJNZ L2MOV AL,02HJMP KCODEL2: TEST AL,10HJNZ NEXTMOV AL,06HKCODE:ADD AL,CL ;AL为按键键值CMP AL,08H ;判断是否为功能键JZ SETCMP AL,06HJZ BEGINCMP AL,07HJZ ZERO1JMP BEGINCALL UNPRESS ;松手检测NEXT: INC CL ;检测下一列MOV AL,CHTEST AL,10HJZ KERRROR AL,1MOV CH,ALJMP COLUMKERR: JMP BEGINSET: MOV SI,3000H ;功能键设置入口XOR AL,ALMOV [SI],ALMOV [SI+1],ALMOV [SI+2],ALMOV [SI+3],ALCALL UNPRESSCALL INPUT ;等待输入CALL UNPRESSCMP AL,06HJZ START1CMP AL,07HJZ SETCMP AL,08HJZ SETMOV SI,3000HMOV [SI+1],ALCALL INPUTCMP AL,06HJZ START1CMP AL,07HJZ SETCMP AL,08HJZ SETCMP AL,05H ;判断是否大于55JS X2MOV AL,[SI+1]CMP AL,09HJNZ X1MOV AL,05HMOV [SI+1],ALX1: MOV AL,05HX2: MOV SI,3000HMOV [SI],ALX3: CALL INPUTCMP AL,06HJZ START1CMP AL,07HJZ SETCMP AL,08HJZ SETJMP X3START1:CALL CCSCAN ;扫描START是否一直按着JNZ COUNTJMP BEGINZERO: XOR AL,ALMOV SI,3000HMOV [SI],ALMOV [SI+1],ALMOV [SI+2],ALMOV [SI+3],ALJMP BEGINCOUNT:CALL DIS ;10毫秒显示减一MOV SI,3000HMOV DH,[SI]MOV DL,[SI+1]MOV CH,[SI+2]MOV CL,[SI+3]DEC CLCMP CL,0FFHJNZ X4MOV CL,09HDEC CHX4: CMP CH,0FFHJNZ X5MOV CH,09HDEC DLX5: CMP DL,0FFHJNZ X6MOV DL,09HDEC DHX6: CMP DH,0FFHJZ ZEROMOV [SI],DHMOV [SI+1],DLMOV [SI+2],CHMOV [SI+3],CLCALL DELLYJMP START1CCSCAN PROC NEAR ;扫描按键是否按下MOV AL,00HOUT COMB,ALIN AL,COMCNOT ALAND AL,30HRETCCSCAN ENDPCLEAR PROC NEAR ;清除数码管显示子程序MOV AL,00HOUT COMA,ALRETCLEAR ENDPDIS PROC NEAR ;显示键值子程序PUSH AXPUSH CXPUSH DXMOV SI,3000HMOV DL,7FHMOV AL,DLAGAIN:OUT COMB,ALMOV AL,[SI]XOR AH,AHMOV BX,OFFSET DMTABLEADD AX,BXMOV DI,AXMOV AL,[DI]CALL DALLYINC SIMOV AL,DLTEST AL,10HJZ OUT1ROR AL,1MOV DL,ALJMP AGAINOUT1:POP DXPOP CXPOP AXRETDIS ENDPUNPRESS PROC NEAR ;松手检测PUSH AXKON: CALL DISCALL CLEARCALL CCSCANJNZ KONPOP AXRETUNPRESS ENDPINPUT PROC NEARCOLUM1:CALL DISMOV CH,7FHMOV CL,00HCOLUM2:MOV AL,CHOUT COMB,ALIN AL,COMCL3: TEST AL,20HJNZ L4MOV AL,02HJMP KCODE1L4: TEST AL,10HJNZ NEXT1MOV AL,06HJMP KCODE1NEXT1:INC CLMOV AL,CHTEST AL,10HROR AL,1MOV CH,ALJMP COLUM2KCODE1:ADD AL,CL ;AL为按键键值RETINPUT ENDPDALLY PROC NEAR ;延时子程序PUSH CXPUSH AXMOV CX,0009HA1: MOV AX,0030HA2: DEC AXJNZ A2LOOP A1POP AXPOP CXRETDALLY ENDPDELLY PROC NEAR ;10毫秒减一延时计数PUSH CXPUSH AXMOV CX,0010HB1: MOV AX,0014HB2: DEC AXJNZ B2LOOP B1POP AXPOP CXRETDELLY ENDPCODE ENDSEND START实验结果：<1>数码管前两位为秒数，后两位为10毫秒数，最大倒计时数为55秒，设置秒数时，若检测到秒数大于55，则自动将秒数改为55。