匯編課程設計源程序(數(shù)字時鐘)9頁

1、功能：實現(xiàn)一個電子表按A換小時，按B換小時按，C換小時，按D換小時,每次結束后要按F鍵;*用兩個74LS373進行數(shù)碼管的動態(tài)顯示;一個做段(要顯示的筆畫)選,一個做位選PORTS EQU 211H ;數(shù)碼管顯示地址(選管)PORTB EQU 210H ;數(shù)碼管顯示內容控制;*在8253的定時中斷中,通過8255的8個PA口,3個PB口進行掃描PA EQU 220H ;8255 CS 選擇信號端TC0 EQU 230H;8253 CS 選擇信號端 ;*數(shù)據(jù)段DATA SEGMENT COUNT1 DB 12 ;掃描鍵盤中斷口標志CM讀數(shù)碼管COUNT2 DB 13 ;延世13次中斷標志KREP

2、 DB 0;防止連擊標志, krep=0:無鍵按下KSHAKE DB 0 ;鍵盤防抖KFLAG DB 0 ;功能鍵標志位kflag=1,2,3-key(ABC)pressed,4-key(F)pressedSYMBL DB 0;顯示標志位0-display bufer,1-display tempFIRST DB 0 ;修改標志位check 2 digit 0-hight,1-lowENTER DB 0 ;在緩沖區(qū)里有新的數(shù)字?有則為1TABL DW 57FH,5BFH,5DFH,5EFH,5FEH,5FDH,5FBH,5F7H DW 67FH,6BFH,6DFH,6EFH,6FEH,6FDH

3、,6FBH,6F7H DW 37FH,3BFH,3DFH,3EFH,3FEH,3FDH,3FBH,3F7H ;鍵盤掃描碼ASCI DB"0123456789ABCDEFGMPRWXYS"鍵盤順序碼MASEG DB"THE KEY_PREESED IS ERROR!",13,10,'$' ;按鍵出錯提示字符串 NUMERR DB 13,10,"THE ENTERED DIGIT IS ERROR,INPUT AGAIN!",13,10,'$' ;無效時間提示字符串LED8 DB 3FH,06H,5BH,4

4、FH,66H,6DH,7DH,07H,7FH,67H DB 77H,7CH,39H,5EH,79H,71H,80H,76H,38H,05CH ;顯示編碼表POINT DW ?ORDER DW 0BUFER DB 11H,0EH,12H,12H,0H,13H;hh:mm:ss;'HELLOo'-at start s；LED初始顯示狀態(tài)TEMP DB6 DUP(0);時間緩存區(qū)SELECT DB 1,2,4,8,10H,20HOLDSEG DW 0;保持初始中斷向量段地址OLDOFF DW0;保存偏移地址DATA ENDS;* *代碼段*CODE SEGMENTASSUME CS:

5、CODE,DS:DATA,ES:DATAMAIN: MOV AX,DATA MOVDS,AX MOV DX,PORTBMOVAL,00 OUT DX,AL ;熄滅所有數(shù)碼管 MOV AH,35H ;保存原來的中斷向量 MOV AL,11 INT 21H MOV OLDSEG,ES MOV OLDOFF,BX MOVAX,SEG KEYLED ;寫入新的中斷向量 MOV DS,AX LEA DX,KEYLED ;取偏移地址 MOV AL,11 ;IRQ3中斷向量類型號 MOV AH,25H INT 21H ;寫入IRQ3中斷向量 STI MOV AX,DATA ;CSH 數(shù)據(jù)段 MOV DS,A

6、X MOV ES,AX ;CSH 堆棧段(in HDY movsb 要重新設定堆棧段) MOV DX,PA+3 ;8255 控制字 MOV AL,10010000B ;PA口 輸入,PB 口輸出 OUT DX,AL MOV POINT,OFFSET TEMP ;輸入 HCQ IN AL,21H ;讀8259中斷寄存器 AND AL,0F7H ;1111 1011b OUT 21H,AL ;開IRQ3 MOV DX,TC0+3 ;8253定時寄存器初始化 MOV AL,01010110B ;xuan TD 1,xie yige di ZJ,gongzuo fangshi 3 OUT DX,AL

7、MOV DX,TC0+1 ;TD1,wei ding shi qi fu chu zhi MOV AL,5 ;LS393 OUT 8M/8K,T1 OUT 200HZ OUT DX,AL ;tc1low8=10 STEP:MOV AH,1 ;按任意鍵退出 INT 16H JZ STEP MOV DX,OLDOFF ;恢復IRQ3中斷向量 MOV AX,OLDSEG MOV DS,AX MOV AL,11 MOV AH,25H INT 21H ;重新寫入原來的IRQ3的中斷向量地址 MOV AH,4CH INT 21H;*中斷子程序,進行鍵盤掃描及顯示*KEYLED PROC FAR ;每72m

8、s進入一次鍵盤掃描程序 PUSH AX ;寄存器A壓棧 STI ;開中斷 DEC COUNT1 ;-1 ,到72ms的話要掃描鍵盤 JZ SCANK ;到72ms的話進行鍵盤掃描 JMP DISP;否則進行顯示SCANK:MOV COUNT1,12 ;72ms初始化數(shù)字,為下次掃描鍵盤準備 DEC COUNT2 ;72*13ms=1s?N 掃描 JNZ KSCAN ;去掃描鍵盤 MOV COUNT2,13 ;恢復count2,為下次讀實時時間準備;*通過BIOS功能調用讀系統(tǒng)時間,并處理后的ASCII數(shù)值放入BUFER緩沖區(qū)READT: MOV AH,2 ;讀BIOS中系統(tǒng)的時間 INT 1A

9、H ;(CH:CL)=時:分,(DH:DL)=秒:1/100秒 MOV AX,CX ;放到AX中, MOV DI,OFFSET BUFER ;DI指向時間緩沖區(qū) MOV CL,4 ROL AX,CL ;循環(huán)左移,使得小時高位現(xiàn)在為最低位 MOVBL,AL ;保存到BL中 AND BL,0FH ;處理,得到小時的高位 MOVDI,BL ;將小時的高位放入緩沖區(qū)中 INC DI ROL AX,CL ;小時的低位處理,放入緩沖 MOV BL,AL AND BL,0FH MOV DI,BL INC DI ROL AX,CL ;分鐘的高位處理,放入緩沖區(qū) MOV BL,AL AND BL,0FH MOV

10、 DI,BL INC DI ROL AX,CL ;分鐘的低位處理,放入緩沖區(qū) MOV BL,AL AND BL,0FH MOV DI,BL INC DI MOV AX,DX ;秒的高位處理,放入緩沖區(qū) ROL AX,CL MOV BL,AL AND BL,0FH MOV DI,BL INC DI ROL AX,CL ;秒的低位處理,放入緩沖區(qū) MOV BL,AL AND BL,0FH MOV DI,BL;* *鍵盤掃描KSCAN: MOV COUNT1,12 ;SMJP CX duan MOV DX,PA+1 ;利用線路翻轉法掃描鍵盤 MOV AL,0 ;PB口輸出低電平 OUTDX,AL M

11、OV DX,PA ;讀PA口 IN AL,DX CMP AL,0FFH ;AL=0FFH?是的話沒有按鍵,否則有鍵按下 JNE PRE ;不相等,說明有鍵按下 MOV KREP,0 ;按鍵被釋放，置KREP=0 JMP DISP ;無鍵按下，停止掃描，繼續(xù)顯示;*判斷是否進行過防抖處理,如果KREP為0且有鍵按下,則下次中斷掃描鍵盤要防抖動PRE: CMP KSHAKE,1 JE SCAN;已經(jīng)進行過防抖處理? MOV KSHAKE,1 JMP DISP;沒有進行過防抖處理,則設立防抖處理標志,并跳出進行顯示;*判斷是否是重復按鍵,防止誤操作SCAN: CMP KREP,1;是否有鍵按下？ J

12、NE SCAN1; 有鍵按下轉移到SCAN1 JMP DISP;沒有,上次按鍵已被釋放SCAN1: MOV KREP,1;另一鍵按下，置標志位KREPanother key is pressed MOV KSHAKE,0;清重復按鍵及防抖標志 MOV CX,3;有鍵按下，掃描列三次SOME KEY PREESED,SCAN CO MOV BL,0FEH;PB口一位置0。逐次從低位到高位'0'FROM LOW BIT TNEXT: MOV AL,BL MOV DX,PA+1 OUT DX,AL MOV DX,PA;寫PB（一位為0） OUT IN AL,DX;讀PA CMP AL

13、,0FFH;如果PA=FF，這一列無鍵按下 JNE KEYON ROL BL,1;掃描下一列 LOOP NEXT JMP DISP ;一次循環(huán)掃描結束ONE CIRCLE SCAN END KEYON: AND BL,7 MOV AH,BL;組合鍵碼AX=PRESSED KEY CODEEFECT: LEA DI,TABL;查表得到鍵碼地址SEARCH PRESSED KEY' LOC CLD;清除方向標志 MOV CX,24 REPNE SCASW JEl1 JMP ERR; 提示出錯NOTHING FOUNDl1: SUB DI,2 SUB DI,OFFSET TABL SHR D

14、I,1;邏輯右移DI/2 MOV AL,ASCIDI;得到鍵碼GET PRESSED KEY' ASCII;*宏,將BUFER中的內容移動到TEMP中去BUFMOV MACRO MOV SI,OFFSET BUFER MOV DI,OFFSET TEMPMOV CX,6 CLD REP MOVSB MOV SYMBL,1;symbl=1,display the tempENDM MOV DL,AL MOV AH,2 INT 21H;得到按鍵,并在屏幕上顯示相應的ASCII;鍵盤處理子程序,處理各個按鍵;KFLAG-有鍵按下標志,如果有鍵按下為1;FIRST-上次有鍵按下?;SYMBL-

15、顯示內容選擇,1時顯示TEMP,0時顯示BUFER內容KA: CMP AL,'A'按下A鍵?調整小時 JNE KB MOV KFLAG,1 MOV FIRST,0;判斷修改高位 CMP SYMBL,0;判斷顯示BUFER/TEMP JNE N1;如果顯示TEMP,不要capyBUFER內容到TEMP BUFMOVN1: MOV TEMP,10H;HH=. MOV TEMP+1,10H JMP DISPKB: CMP AL,'B'按下B鍵?調整分鐘 JNE KC MOV KFLAG,2 MOV FIRST,0 CMP SYMBL,0 JNE N2 BUFMOVN2

16、: MOV TEMP+2,10H;MM=. MOV TEMP+3,10H JMP DISPKC: CMP AL,'C'按下C鍵?調整秒 JNE KF MOV KFLAG,3 MOV FIRST,0 CMP SYMBL,0 JNE N3 BUFMOVN3: MOV TEMP+4,10H;SS=. MOV TEMP+5,10H JMP DISPKF: CMP AL,'F'按下F鍵?結束修改 JNE K4 MOV KFLAG,4 MOV SYMBL,0;symbl=0,display bufer JMP REFCMOSK4: CMP AL,'9'按下的

17、數(shù)字鍵? JBE CHECK JMP DISPCHECK: MOV DI,OFFSET TEMP AND AL,0FH JNE MM CMP KFLAG,1HH: CMP FIRST,0;從高到低修改兩個數(shù)碼管 JE FIR INC DI MOV FIRST,0 MOV ENTER,1;enter=1 there is entered digit in temp JMP H12FIR: MOV FIRST,1H12: MOV DI,AL JMP DISPMM: CMP KFLAG,2 JNE SS0 ADD DI,2 CMP FIRST,0;從高到低修改兩個數(shù)碼管 JE FIR1 INC DI

18、 MOV FIRST,0 MOV ENTER,1 JMPM12FIR1: MOV FIRST,1M12: MOV DI,AL JMP DISPSS0: CMP KFLAG,3 JE YES JMP DISPYES: ADD DI,4 ;從高到低修改兩個數(shù)碼管 CMP FIRST,0 JE FIR2 INC DI MOV FIRST,0 MOV ENTER,1 JMP S12FIR2: MOV FIRST,1S12: MOV DI,AL JMP DISP;*寫入新時間* REFCMOS:CMP ENTER,1;是否有新時間寫入? JNEDONT LEA DI,TEMP;修改時間 MOV AH,D

19、I MOV CL,4 SHL AH,CL INC DI MOVAL,DI AND AL,0FH OR AH,AL CMP AH,24H JB HOK JMP SHOWERR;提示出錯HOK: INC DI MOV BH,DI;M1 SHL BH,CL INC DI MOV BL,DI;M2 AND BL,0FH OR BH,BL CMP BH,60H;MM<=60? JB MOK JMP SHOWERRMOK: INC DI MOV DH,DI;S1 SHL DH,CL INC DI MOV DL,DI;S2 AND DL,0FH OR DH,DL CMP DH,60H;SS<=60? JB SOK JMP SHOWERRSOK: MOV CH,AH MOV CL,BH MOV AH,3 INT 1AH;向CMOS寫入實時時鐘 MOV KFLAG,0 MOV ENTER,0 JMP DISP;鍵盤處理程序完成,跳出顯示;幾種錯誤的情況,在屏幕上顯示錯誤 SHOWERR:MOV AH,9;時間無效字符串顯示 LEA DX,NUMERR INT 21H MOV KFLAG