【文章內(nèi)容簡介】 V DPTR,TAB 。MOV R7,0FEH 。第一位有效NEXT: MOV A,@R0 。 MOVC A,@A+DPTR 。把十進(jìn)制數(shù)轉(zhuǎn)化成數(shù)碼管對應(yīng)的數(shù)據(jù) MOV P1,A 。數(shù)據(jù)送出端口 MOV P2,R7 。地址送出端口 ACALL DEL1MS 。延時一毫秒 MOV A,R7 。 RL A 。地址位左移到下一位 MOV R7,A 。 INC R0 。數(shù)據(jù)地址加1 CJNE R0,80H,NEXT 。是否已經(jīng)顯示完LJMP DONETAB:DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07H,7FH,6FH,40H,00H 。0 1 2 3 4 5 6 7 8 9 空DEL1MS: 。延時1毫秒函數(shù) MOV R6,2 DEL1:MOV R5,250 DJNZ R5,$ DJNZ R6,DEL1RETT0: 。定時器0函數(shù) PUSH DPH PUSH DPL PUSH PSW PUSH ACC MOV TH0,0D8H 。定時時間設(shè)置為10毫秒 MOV TL0,0F0H DJNZ 50H,MIAO1 。是否已經(jīng)延時1秒 AJMP NEXT5 。 MIAO1:LJMP MIAOBIAO 。一秒還沒到，進(jìn)入秒表 NEXT5:MOV 50H,100 。 重新循環(huán)100次，即一秒 INC 73H 。秒加一 MOV A,73H 。 CJNE A,60,MIAO2 。是否已經(jīng)加到60 AJMP NEXT6 。 MIAO2:LJMP MIAOBIAO 。沒到60，進(jìn)入秒表 NEXT6:MOV 73H,0 。已經(jīng)加到60，秒清0 INC 74H 。分加一 MOV A,74H 。 CJNE A,60,MIAO3 。分是否已經(jīng)加到60 AJMP NEXT7 。 MIAO3:LJMP MIAOBIAO 。沒到60，進(jìn)入秒表 NEXT7:MOV 74H,0 。已經(jīng)到60，分清0 INC 75H 。時加1 MOV A,75H 。 CJNE A,24,MIAO4 。是否已加到24 AJMP NEXT8 。 MIAO4:LJMP MIAOBIAO 。沒到24則進(jìn)入秒表 NEXT8:MOV 75H,0 。時清0 INC 70H 。日加1 MOV A,70H 。 CJNE A,29,MONTH 。是否是29 MOV A,71H 。 CJNE A,2,MIAO5 。是否是2月 AJMP NEXT9 。MIAO5:LJMP MIAOBIAO 。不是2月，進(jìn)入秒表NEXT9:MOV 71H,3 。月份為3 MOV 70H,1 。日為1 LJMP MIAOBIAO 。MONTH: MOV A,70H 。 CJNE A,31,MONTH1 。是否是日是31 MOV A,71H 。 CJNE A,4,MONTH6 。是否是4月 MOV 71H,5 。月份為5 MOV 70H,1 。日為1 AJMP MIAOBIAO 。 MONTH6:MOV A,71H 。 CJNE A,6,MONTH9 。是否是6月 MOV 71H,7 。月份為7 MOV 70H,1 。日為1 AJMP MIAOBIAO 。 MONTH9:MOV A,71H 。 CJNE A,9,MONTH11 。是否是 9月 MOV 71H,10 。月分為10 MOV 70H,1 。日為1 AJMP MIAOBIAO 。 MONTH11:MOV A,71H 。 CJNE A,11,MIAOBIAO 。是否是11月 MOV 71H,12 。月份為12 MOV 70H,1 。 日為1 AJMP MIAOBIAO 。MONTH1: MOV A,70H 。 CJNE A,32,MIAOBIAO 。是否日是32 MOV A,71H 。 CJNE A,12,MONTH0 。是否是 12月 INC 73H 。年加1 MOV 70H,1 。月為1 MOV 71H,1 。日為1 AJMP MIAOBIAO 。 MONTH0:INC 71H 。不是12月，月加1 MOV 70H,1 。日為 AJMP MIAOBIAO 。MIAOBIAO: 。秒表函數(shù) JNB 03H,DINGSHI 。是否進(jìn)入計(jì)時 JNB 10H,DINGSHI 。是否開始計(jì)時 DJNZ 52H,DINGSHI 。是否100毫秒已到 MOV 52H,10 。 JNB ,CLEAR 。按鍵按下時清0 INC 60H 。 MOV A,60H 。 CJNE A,10,DINGSHI 。是否已加到10 MOV 60H,0 。 INC 61H 。秒位加1 MOV A,61H 。 CJNE A,60,DINGSHI 。秒是否已經(jīng)加到60 MOV 61H,0 。秒位清0 INC 62H 。分加1 MOV A,62H 。 CJNE A,60,DINGSHI 。是否是60分 MOV 62H,0 。分為清0 AJMP DINGSHI 。 CLEAR:MOV 60H,0 。清0 MOV 61H,0 。 MOV 62H,0 。 CLR 10H 。停止計(jì)數(shù) AJMP DINGSHI 。DINGSHI: 。定時函數(shù) JB 17H,YSTART 。定時器有效 LJMP BAOSHI 。定時器無效 YSTART:JB 12H,START 。是否已經(jīng)在放音樂 MOV A,63H 。 CJNE A,73H,BAO1 。是否時已到 AJMP NEXT10 。 BAO1:LJMP BAOSHI 。 NEXT10:MOV A,64H 。 CJNE A,74H,BAO2 。是否分已到 AJMP NEXT11 。 BAO2:LJMP BAOSHI 。 NEXT11:MOV A,65H 。 CJNE A,75H,BAO3 。是否秒已到 AJMP NEXT12 。 BAO3:LJMP BAOSHI 。 NEXT12:SETB 12H 。設(shè)置定時已到 MOV 55H,10H 。第一個節(jié)拍 MOV 57H,0FBH