?? 7.asm
字號(hào):
MOV 27H,#05H
MOV 26H,#00H
LCALL DISPUPDAT ;寫入控制芯片（修改發(fā)射頻率）
RET
;
;07號(hào)鍵功能程序（頻率預(yù)置鍵）
KEYFUN07: MOV 29H,#01H ; 預(yù)置100.0MHZ發(fā)射頻率
MOV 28H,#00H
MOV 27H,#00H
MOV 26H,#00H
LCALL DISPUPDAT ;寫入控制芯片（修改發(fā)射頻率）
RET
;
;08號(hào)鍵功能程序（頻率預(yù)置鍵）
KEYFUN08: MOV 29H,#00H ; 預(yù)置98.0MHZ發(fā)射頻率
MOV 28H,#09H
MOV 27H,#08H
MOV 26H,#00H
LCALL DISPUPDAT ;寫入控制芯片（修改發(fā)射頻率）
RET
;
;09號(hào)鍵功能程序（頻率預(yù)置鍵）
KEYFUN09: MOV 29H,#00H ; 預(yù)置96.0MHZ發(fā)射頻率
MOV 28H,#09H
MOV 27H,#06H
MOV 26H,#00H
LCALL DISPUPDAT ;寫入控制芯片（修改發(fā)射頻率）
RET
;
;10號(hào)鍵功能程序（頻率預(yù)置鍵）
KEYFUN10: MOV 29H,#00H ; 預(yù)置94.0MHZ發(fā)射頻率
MOV 28H,#09H
MOV 27H,#04H
MOV 26H,#00H
LCALL DISPUPDAT ;寫入控制芯片（修改發(fā)射頻率）
RET
;
;11號(hào)鍵功能程序（頻率預(yù)置鍵）
KEYFUN11: MOV 29H,#00H ; 預(yù)置92.0MHZ發(fā)射頻率
MOV 28H,#09H
MOV 27H,#02H
MOV 26H,#00H
LCALL DISPUPDAT ;寫入控制芯片（修改發(fā)射頻率）
RET
;
;12號(hào)鍵功能程序（頻率預(yù)置鍵）
KEYFUN12: MOV 29H,#00H ; 預(yù)置90.0MHZ發(fā)射頻率
MOV 28H,#09H
MOV 27H,#00H
MOV 26H,#00H
LCALL DISPUPDAT ;寫入控制芯片（修改發(fā)射頻率）
RET
;
;13號(hào)鍵功能程序（頻率預(yù)置鍵）
KEYFUN13: MOV 29H,#00H ; 預(yù)置88.0MHZ發(fā)射頻率
MOV 28H,#08H
MOV 27H,#08H
MOV 26H,#00H
LCALL DISPUPDAT ;寫入控制芯片（修改發(fā)射頻率）
RET
;
;14號(hào)鍵功能程序（頻率預(yù)置鍵） ; 預(yù)置87.0MHZ發(fā)射頻率
KEYFUN14: MOV 29H,#00H
MOV 28H,#08H
MOV 27H,#07H
MOV 26H,#08H
LCALL DISPUPDAT ;寫入控制芯片（修改發(fā)射頻率）
RET
;
;15號(hào)鍵功能程序（立體聲/單聲道設(shè)置鍵）
KEYFUN15: CPL 03H ;立體/單聲標(biāo)志取反
JNB 03H,MONO ;為0轉(zhuǎn)單聲道MONO
CLR P3.3 ;為1開(kāi)立體聲指示燈
LCALL PUTBIT ;發(fā)送控制字至BH1415
RET ;返回
MONO: SETB P3.3 ;關(guān)立體聲指示燈
LCALL PUTBIT ;發(fā)控制字至BH1415
RET ;返回
;
; 將BCD碼轉(zhuǎn)為十六進(jìn)制數(shù)，與5位控制碼合成操作碼，寫入控制芯片
DISPUPDAT: LCALL BCDB ; 調(diào)BCD碼轉(zhuǎn)為十六進(jìn)制數(shù)程序
LCALL CONCOMMAND ; 調(diào)與5位控制碼合成操作碼程序
LCALL PUTBIT ; 發(fā)控制字至BH1415
RET ;返回
;
; 將BCD碼轉(zhuǎn)為十六進(jìn)制數(shù)程序
BCDB: MOV CONBITL,#00H ; 控制字清0
MOV CONBITH,#00H ; 控制字清0
MOV CONBITL,26H ;小數(shù)位數(shù)放入控制字低8位
MOV A,27H ;個(gè)位數(shù)乘10操作
MOV B,#10 ;
LCALL MULLOOP ;調(diào)乘法子程序
MOV A,28H ;十位數(shù)乘100操作
MOV B,#100 ;
LCALL MULLOOP ; 調(diào)乘法子程序
MOV A,29H ;
JNZ ADD3E8 ;百位數(shù)為1轉(zhuǎn)ADD3E8（加1000操作）
RET ; 百位數(shù)為0退出
ADD3E8: CLR C ;清進(jìn)位檔標(biāo)志
MOV A,#0E8H ;低8位加法
ADD A,CONBITL ;累加
MOV CONBITL,A ;放回CONBITL
MOV A,#03H ; 高8位加法
ADDC A,CONBITH ;控制字高8位處理
MOV CONBITH,A ;放回CONBITH
RET ;返回
;
;乘法及累加處理程序（將四位顯示的十進(jìn)制BCD碼轉(zhuǎn)為1個(gè)二進(jìn)制數(shù)）
MULLOOP: MUL AB ;乘法
CLR C ;清進(jìn)位標(biāo)志
ADD A,CONBITL ;積低8位與CONBITL相加
MOV CONBITL,A ;放回CONBITL
MOV A,CONBITH ;
ADDC A,B ;積高8位與CONBITH帶進(jìn)位累加
MOV CONBITH,A ;放回CONBITH
RET ;返回
;
;頻率控制數(shù)據(jù)與5位控制碼合成BH1415控制字
CONCOMMAND: ANL CONBITH,#07H ;高四位為0
MOV A,20H ;控制字放入A
ORL A,CONBITH ;合成控制字
MOV CONBITH,A ;放回CONBITH
RET ;返回
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; 顯示程序 ;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;共陽(yáng)LED顯示，P0口輸出段碼，P2口輸出掃描字
DISPLAY: MOV R1,#26H ;顯示首址
MOV R5,#0FEH ;設(shè)掃描字
PLAY: MOV A,R5 ;放入A
MOV P2,A ;P2口輸出
MOV A,@R1 ;取顯示數(shù)據(jù)
MOV DPTR,#TAB ;取段碼表首址
MOVC A,@A+DPTR ;查段碼
MOV P0,A ;從P0輸出
MOV A,R5 ;讀入掃描字
JB ACC.1,PLAY1 ; 不是十位（LED），不顯示小數(shù)點(diǎn)
CLR P0.7 ;是十位,顯示小數(shù)點(diǎn)
PLAY1: LCALL DL1MS ;點(diǎn)亮1毫秒
INC R1 ;指向下一顯示數(shù)據(jù)
JNB ACC.3,ENDOUT ;是第四位LED，退出
RL A ;不是，左移一位
MOV R5,A ;放回R5
SETB P0.7 ;關(guān)小數(shù)點(diǎn)
AJMP PLAY ;轉(zhuǎn)PLAY循環(huán)
ENDOUT: MOV P2,#0FFH ;顯示結(jié)束，關(guān)顯示輸出口
MOV P0,#0FFH ;
RET ;返回
;
;0-9共陽(yáng)段碼表
TAB: DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H,0FFH,0FFH
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; 發(fā)送控制字節(jié)子程序 ;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
PUTBIT: MOV A,CONBITL ;低8位控制字入A
SETB P3.2 ;BH1415使能（允許寫）
LCALL PUT ;發(fā)送8位
MOV A,CONBITH ; 高8位控制字入A
LCALL PUT ; 發(fā)送8位
CLR P3.2 ; BH1415寫禁止
CLR P3.0 ;復(fù)位
CLR P3.1 ;復(fù)位
RET ;返回
;
;字節(jié)發(fā)送子程序
PUT: MOV R3,#8 ;發(fā)送8位控制
CLR C ;清C
PUT1: RRC A ;帶進(jìn)位位右移（先發(fā)低位）
MOV P3.0,C ;低位送至P3.0口
NOP ;延時(shí)4微秒
NOP ;
NOP ;
NOP ;
SETB P3.1 ;鎖存數(shù)據(jù)（上升沿時(shí)鎖存數(shù)據(jù)）
NOP ;延時(shí)4微秒
NOP ;
NOP ;
NOP ;
CLR P3.1 ;
DJNZ R3,PUT1 ;8位未發(fā)完轉(zhuǎn)PUT1再發(fā)
RET ; 8位發(fā)完結(jié)束
;
;513微秒延時(shí)子程序
DL513: MOV R3,#0FFH
DL513LOOP: DJNZ R3,DL513LOOP
RET
;
;1毫秒延時(shí)子程序（LED點(diǎn)亮用）
DL1MS: MOV R4,#02H
DL1MSLOOP: LCALL DL513
DJNZ R4,DL1MSLOOP
RET
;
;10毫秒延時(shí)子程序（消抖動(dòng)用）
DL10MS: MOV R6,#0AH
DL10MSLOOP: LCALL DL1MS
DJNZ R6,DL10MSLOOP
RET
;
;
END ;程序結(jié)束
?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -