匯編課程設(shè)計(jì)源程序(數(shù)字時(shí)鐘)9頁(yè)

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

2、 DB 0;防止連擊標(biāo)志, krep=0:無(wú)鍵按下KSHAKE DB 0 ;鍵盤(pán)防抖KFLAG DB 0 ;功能鍵標(biāo)志位kflag=1,2,3-key(ABC)pressed,4-key(F)pressedSYMBL DB 0;顯示標(biāo)志位0-display bufer,1-display tempFIRST DB 0 ;修改標(biāo)志位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 ;鍵盤(pán)掃描碼ASCI DB"0123456789ABCDEFGMPRWXYS"鍵盤(pán)順序碼MASEG DB"THE KEY_PREESED IS ERROR!",13,10,'$' ;按鍵出錯(cuò)提示字符串 NUMERR DB 13,10,"THE ENTERED DIGIT IS ERROR,INPUT AGAIN!",13,10,'$' ;無(wú)效時(shí)間提示字符串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);時(shí)間緩存區(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 ;保存原來(lái)的中斷向量 MOV AL,11 INT 21H MOV OLDSEG,ES MOV OLDOFF,BX MOVAX,SEG KEYLED ;寫(xiě)入新的中斷向量 MOV DS,AX LEA DX,KEYLED ;取偏移地址 MOV AL,11 ;IRQ3中斷向量類(lèi)型號(hào) MOV AH,25H INT 21H ;寫(xiě)入IRQ3中斷向量 STI MOV AX,DATA ;CSH 數(shù)據(jù)段 MOV DS,A

6、X MOV ES,AX ;CSH 堆棧段(in HDY movsb 要重新設(shè)定堆棧段) 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 ;開(kāi)IRQ3 MOV DX,TC0+3 ;8253定時(shí)寄存器初始化 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 ;恢復(fù)IRQ3中斷向量 MOV AX,OLDSEG MOV DS,AX MOV AL,11 MOV AH,25H INT 21H ;重新寫(xiě)入原來(lái)的IRQ3的中斷向量地址 MOV AH,4CH INT 21H;*中斷子程序,進(jìn)行鍵盤(pán)掃描及顯示*KEYLED PROC FAR ;每72m

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

9、H ;(CH:CL)=時(shí):分,(DH:DL)=秒:1/100秒 MOV AX,CX ;放到AX中, MOV DI,OFFSET BUFER ;DI指向時(shí)間緩沖區(qū) MOV CL,4 ROL AX,CL ;循環(huán)左移,使得小時(shí)高位現(xiàn)在為最低位 MOVBL,AL ;保存到BL中 AND BL,0FH ;處理,得到小時(shí)的高位 MOVDI,BL ;將小時(shí)的高位放入緩沖區(qū)中 INC DI ROL AX,CL ;小時(shí)的低位處理,放入緩沖 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;* *鍵盤(pán)掃描KSCAN: MOV COUNT1,12 ;SMJP CX duan MOV DX,PA+1 ;利用線路翻轉(zhuǎn)法掃描鍵盤(pán) MOV AL,0 ;PB口輸出低電平 OUTDX,AL M

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

12、NE SCAN1; 有鍵按下轉(zhuǎn)移到SCAN1 JMP DISP;沒(méi)有,上次按鍵已被釋放SCAN1: MOV KREP,1;另一鍵按下，置標(biāo)志位KREPanother key is pressed MOV KSHAKE,0;清重復(fù)按鍵及防抖標(biāo)志 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;寫(xiě)PB（一位為0） OUT IN AL,DX;讀PA CMP AL

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

14、I,1;邏輯右移DI/2 MOV AL,ASCIDI;得到鍵碼GET PRESSED KEY' ASCII;*宏,將BUFER中的內(nèi)容移動(dòng)到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;得到按鍵,并在屏幕上顯示相應(yīng)的ASCII;鍵盤(pán)處理子程序,處理各個(gè)按鍵;KFLAG-有鍵按下標(biāo)志,如果有鍵按下為1;FIRST-上次有鍵按下?;SYMBL-

15、顯示內(nèi)容選擇,1時(shí)顯示TEMP,0時(shí)顯示BUFER內(nèi)容KA: CMP AL,'A'按下A鍵?調(diào)整小時(shí) JNE KB MOV KFLAG,1 MOV FIRST,0;判斷修改高位 CMP SYMBL,0;判斷顯示BUFER/TEMP JNE N1;如果顯示TEMP,不要capyBUFER內(nèi)容到TEMP BUFMOVN1: MOV TEMP,10H;HH=. MOV TEMP+1,10H JMP DISPKB: CMP AL,'B'按下B鍵?調(diào)整分鐘 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鍵?調(diào)整秒 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鍵?結(jié)束修改 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;從高到低修改兩個(gè)數(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;從高到低修改兩個(gè)數(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 ;從高到低修改兩個(gè)數(shù)碼管 CMP FIRST,0 JE FIR2 INC DI MOV FIRST,0 MOV ENTER,1 JMP S12FIR2: MOV FIRST,1S12: MOV DI,AL JMP DISP;*寫(xiě)入新時(shí)間* REFCMOS:CMP ENTER,1;是否有新時(shí)間寫(xiě)入? JNEDONT LEA DI,TEMP;修改時(shí)間 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;提示出錯(cuò)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寫(xiě)入實(shí)時(shí)時(shí)鐘 MOV KFLAG,0 MOV ENTER,0 JMP DISP;鍵盤(pán)處理程序完成,跳出顯示;幾種錯(cuò)誤的情況,在屏幕上顯示錯(cuò)誤 SHOWERR:MOV AH,9;時(shí)間無(wú)效字符串顯示 LEA DX,NUMERR INT 21H MOV KFLAG