；#########################################
州_ 8279 EQU 0301H；命令端口地址
數據_ 8279 EQU 0300h；數據端口地址
時間_狀態_ 8279 EQU 32H；除以20
基_ DISP _州EQU 00H；顯示模式命令字，8個字符左輸入，編碼掃描鍵盤，雙按鍵鎖定。
CLR _ STATE EQU 0d 1H；清除命令字
READ _ FIFO _ RAM EQU 40H；
KEY_FLAGE位00H密鑰標誌位
DISP _添加數據70H顯示命令字
ORG 0000H
LJMP啟動
ORG 0030H
開始:
MOV SP，#40H
LCALL INIT8279
打電話給DISP
SACN _這裏:
LCALL SCAN_KEY
LCALL DISP1
這裏是SACN
；# # # # # # # # # # # # # # # # # 8279初始化
INIT8279:
MOV DPTR，#州_8279
MOV A，#CLR_STATE
MOVX @DPTR
等等:MOVX A，@DPTR
JB ACC.7，等等
MOV A，#時間_狀態_8279
MOVX @DPTR
MOV A，#基_DISP州
MOVX @DPTR
浸水使柔軟
；# # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # #
SCAN_KEY:
MOV DPTR，#州_8279
MOVX A，@DPTR
ANL A，# 07H屏蔽D7 - D3位
JNZ鍵；判斷是否有按鍵被按下。
JMP掃描_鍵
；# # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # #
關鍵字:MOV DPTR，#州_8279
MOV A，# READ _ FIFO _ RAM讀取FIFO RAM命令
MOVX @DPTR
MOV DPTR，# DATA _ 8279讀取密鑰
MOVX A，@DPTR
ANL A，# 3FH屏蔽高四位，SHFIT和
MOV灣
浸水使柔軟
ADD_1:
添加壹個#8
MOV灣
浸水使柔軟
；***************************************
DISP: MOV 70H，#1
MOV 71H，2號
MOV 72H，3號
MOV 73H，4號
MOV 74H，5號
MOV 75H，6號
MOV 76H，7號
MOV 77H，8號
MOV R1，#70H
MOV R7，#08H
AJMP LL
顯示1: MOV 70H，B
MOV R1，#70H
MOV R7，#01H
LH:噢，MOV·DPTR，8279號州
MOV A # 90H
MOVX @DPTR
DISP _環線:
MOV A，@R1
MOV·DPTR
MOVC A，@A+DPTR
MOV DPTR，#數據_8279
MOVX @DPTR
INC R1
DISP環路DJNZ R7
浸水使柔軟
波:MOV R5，#0AH
wave 1:l呼叫延遲
DJNZ R5，WAVE1
浸水使柔軟
延遲:MOV R7，#40H
延遲1: MOV R6，#4DH
DJNZ R6，美元
DJNZ R7，延遲1
浸水使柔軟
LEDSEG:
DB 03FH，06H，5BH，4FH，66H，6DH，7DH，07H，07FH，6FH，77H，7CH，39H，4EH* * *陰極數碼管段代碼！
；0 1 2 3 4 5 6 7 8 9不亮。