?? 鍵盤掃描服務子程序.txt
字號:
萬年歷程序2
*******鍵盤掃描服務子程序********
KEY1:MOV R6,#07H ;
MOV 22H,#00H ;標志位置零
LCALL XS1602 ;顯示并延時,判斷是否為抖動抖動
JNB P1.1,KEY1 ;的確有鍵按下,進入時間調(diào)整程序
AJMP KS ;否則跳出調(diào)時程序
KEY11:LCALL XS1602 ;調(diào)顯示
JNB P1.1,KEY11 ;等待鍵釋放
CHMIN:LCALL XS1602 ;分鐘調(diào)整入口
JNB P1.4CCHR ;
JNB P1.3 ,ADDMIN ;
JNB P1.1,KS
AJMP CHMIN
ADDMIN: LCALL XS1602
JB P1.3,CHMIN ;
INC CMIN ;
SETB 10H ;
CLR 11H ;
PUSH A ;分鐘加1調(diào)整,并保護現(xiàn)場
MOV A,CMIN
ANL A,#0FH
CLR C
CJNE A,#0AH ,PPA
ANL CMIN,#0F0H
MOV A,CMIN
ADD A,#10H
MOV CMIN,A
CJNE A,#60H,PPA
JB P1.3, CHMIN ;若鍵釋放,則返回到分鐘調(diào)整入口程序
LCALL XS1602 ;顯示并延時
ANL CMIN,#00H
CCHR : LCALL XS1602 ;小時調(diào)整入口
JNB P1.4 ,CCDETA
JNB P1.3 ,ADDCHR ;
JNB P1.1,KS
AJMP CHHR
ADDCHR: LCALL XS1602
JB P1.3,CCHR ;
INC CHR ;
SETB 13H ;
CLR 14H ;
PUSH A ;小時加1調(diào)整,并保護現(xiàn)場
MOV A,CHR
ANL A,#0FH
CLR C
CJNE A,#0AH ,PPA
ANL CHR,#0F0H
MOV A,CHR
ADD A,#13H
MOV CHR,A
CJNE A,#24H,PPA
JB P1.3, CCHR ;若鍵釋放,則返回到小時調(diào)整入口程序
LCALL XS1602 ;顯示并延時
ANL CHR ,#00H
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -