; By Paprika
; 2017.10.31
; 程序內容： 1開機顯示四位8確定數碼管好壞和程序的正確性
;2 摁第一個鍵顯示班級，第其余三位顯示學號的四位 摁動四個數字鍵依次顯示為1503 1504 0130 2###
CH452_DCLK BIT P2.5 ;串行數據時鐘,上升沿激活
CH452_DIN BIT P2.6 ;串行數據輸出,接CH452的數據輸入
CH452_LOAD BIT P3.3 ;串行命令加載,上升沿激活
CH452_DOUT BIT P2.7 ;接 CH452 的數據輸出
ORG 0000H
START: ACALL CH452_INIT;調用初始化程序
MOV R5,#00H;R5清零
MOV R4,#00H;R清零
ceshi:;檢測數碼管是否OK顯示四位8
MOV B,#0CH ;B是高四位
MOV A,#0fdH ;設置為鍵盤與顯示開 ；A 是低八位
ACALL CH452_WRITE
MOV B,#0dH ;B是高四位
MOV A,#0FDH ;設置為鍵盤與顯示開 ；A 是低八位
ACALL CH452_WRITE
MOV B,#0eH ;B是高四位
MOV A,#0FDH ;設置為鍵盤與顯示開 ；A 是低八位
ACALL CH452_WRITE
MOV B,#0fH ;B是高四位
MOV A,#0FDH ;設置為鍵盤與顯示開 ；A 是低八位
ACALL CH452_WRITE
xianshi: ACALL jiance ;檢測是否有按鍵按下
SJMP xianshi ;顯示功能
SJMP $
jiance:
MOV C,CH452_DOUT ;判斷是否有按鍵按下，位判斷
JC jiance ;沒有按鍵按下，繼續檢測
ACALL CH452_READ ;有按鍵按下，通過452讀值
MOV R1,A
C0: CJNE R1,#44H,C1 ;由鍵碼得
ACALL banji
AJMP TES
C1: CJNE R1,#45H,C2
ACALL xuehao1
AJMP TES
C2: CJNE R1,#46H,C3
ACALL xuehao2
C3: CJNE R1,#47H,jiance ;由鍵碼得
ACALL xuehao3
AJMP TES
TES:
RET
JC jiance
banji:
; 顯示班級 具體寫入數據為： 段選+數字1503
MOV B,#0CH ;B是高四位
MOV A,#18H ;設置為鍵盤與顯示開 ；A 是低八位
ACALL CH452_WRITE
MOV B,#0dH ;B是高四位
MOV A,#0e9H ;設置為鍵盤與顯示開 ；A 是低八位
ACALL CH452_WRITE
MOV B,#0eH ;B是高四位
MOV A,#0bdH ;設置為鍵盤與顯示開 ；A 是低八位
ACALL CH452_WRITE
MOV B,#0fH ;B是高四位
MOV A,#0d9H ;設置為鍵盤與顯示開 ；A 是低八位
ACALL CH452_WRITE
RET
xuehao1:
; 顯示1504 具體寫入數據為： 段選+數字
MOV B,#0CH ;B是高四位
MOV A,#18H ;設置為鍵盤與顯示開 ；A 是低八位
ACALL CH452_WRITE
MOV B,#0dH ;B是高四位
MOV A,#0e9H ;設置為鍵盤與顯示開 ；A 是低八位
ACALL CH452_WRITE
MOV B,#0eH ;B是高四位
MOV A,#0bdH ;設置為鍵盤與顯示開 ；A 是低八位
ACALL CH452_WRITE
MOV B,#0fH ;B是高四位
MOV A,#078H ;設置為鍵盤與顯示開 ；A 是低八位
ACALL CH452_WRITE
RET
xuehao2:
; 顯示學號0130 具體寫入數據為： 段選+數字
MOV B,#0CH ;B是高四位
MOV A,#0bdH ;設置為鍵盤與顯示開 ；A 是低八位
ACALL CH452_WRITE
MOV B,#0dH ;B是高四位
MOV A,#018H ;設置為鍵盤與顯示開 ；A 是低八位
ACALL CH452_WRITE
MOV B,#0eH ;B是高四位
MOV A,#0d9H ;設置為鍵盤與顯示開 ；A 是低八位
ACALL CH452_WRITE
MOV B,#0fH ;B是高四位
MOV A,#0bdH ;設置為鍵盤與顯示開 ；A 是低八位
ACALL CH452_WRITE
RET
xuehao3:
; 顯示2### 具體寫入數據為： 段選+數字
MOV B,#0cH ;B是高四位
MOV A,#0d5H ;設置為鍵盤與顯示開 ；A 是低八位
ACALL CH452_WRITE
MOV B,#0dH ;B是高四位
MOV A,#0H ;設置為鍵盤與顯示開 ；A 是低八位
ACALL CH452_WRITE
MOV B,#0eH ;B是高四位
MOV A,#0H ;設置為鍵盤與顯示開 ；A 是低八位
ACALL CH452_WRITE
MOV B,#0fH ;B是高四位
MOV A,#0H ;設置為鍵盤與顯示開 ；A 是低八位
ACALL CH452_WRITE
RET
;**************************************************************************** CH452初始程序
CH452_INIT: ;CH452初始化
CLR CH452_DIN ;先低后高,輸出上升沿通知 CH452 選擇 4 線串行接口
SETB CH452_DCLK;置為默認的高電平
SETB CH452_DIN
SETB CH452_LOAD
SETB CH452_DOUT;置為輸入
MOV B,#04H ;B是高四位
MOV A,#03H ;設置為鍵盤與顯示開 ；A 是低八位
ACALL CH452_WRITE
MOV B,#05H ;設定顯示參數
MOV A,#0AH ;設置no bcd 掃描極限最高1000B
ACALL CH452_WRITE
RET
;****************************************************************************串口通信讀出寫入程序
CH452_WRITE:
CLR CH452_LOAD;命令開始
MOV R7,#08H;設置循環次數，將 ACC 中 8 位送出
CH452_WRITE_8:
RRC A;右移，低位在前,高位在后
CLR CH452_DCLK
MOV CH452_DIN,C;送出一位數據
SETB CH452_DCLK;產生時鐘上升沿通知 CH452 輸入位數據
DJNZ R7,CH452_WRITE_8;位數據未完繼續
MOV A,B
MOV R7,#04H;設置循環次數，將 B 中 高4 位送出
CH452_WRITE_4:
RRC A;低位在前,高位在后
CLR CH452_DCLK
MOV CH452_DIN,C;送出一位數據
SETB CH452_DCLK;產生時鐘上升沿通知 CH452 輸入位數據
DJNZ R7,CH452_WRITE_4;位數據未完繼續
SETB CH452_LOAD;產生加載上升沿通知 CH452 處理命令數據
RET
; 讀取數據
CH452_READ:
CLR CH452_LOAD ;命令開始
MOV A,#07H;讀取鍵值命令的高 4 位 0111B
MOV R7,#04H ;忽略 12 位命令的低 8 位 1111 0000 ；改過#040H
CH452_READ_4: ;讀出按鍵代碼命令
RRC A ;低位在前,高位在后
CLR CH452_DCLK
MOV CH452_DIN,C;送出一位數據
SETB CH452_DCLK;產生時鐘上升沿鎖通知 CH452 輸入位數據
DJNZ R7,CH452_READ_4 ;位數據未完繼續
SETB CH452_LOAD;產生加載上升沿通知 CH452處理命令數據
CLR A;先清除鍵值單元以便移位
MOV R7,#07H;讀入 7 位鍵值
CH452_READ_7: ;讀入按鍵代碼
MOV C,CH452_DOUT;讀入一位數據
CLR CH452_DCLK;產生時鐘下升沿通知 CH452輸出下一位
RLC A;數據移入 ACC,高位在前,低位在后
SETB CH452_DCLK
DJNZ R7,CH452_READ_7 ;位數據未完繼續
RET
|
QQ好友和群
QQ空間
騰訊微博
騰訊朋友
收藏
淘帖
頂
踩
