?? pt2272.asm
字號:
; =========================================================================================
; =========================================================================================
; PT2272 模擬解碼器（接收來自射頻解碼模塊的2262格式串行數據流）
; 管理三位數碼管顯示器
; 利用AT24C32實現堆棧式掉電緩存保護，通過特殊的清除發射器清除堆棧
; 顯示器具有兩級亮度變化
; 具有蜂鳴器，新的編碼收到后，蜂鳴器鳴響2/3次，顯示器高亮，三秒后正常
;
; CPU: AT89C2051@12MHz
;
; COPYRIGHT yanggt@163.net SEP 9, 2004
; =========================================================================================
; =========================================================================================
EESIZE EQU 32768 ;EEPROM容量(32768/16384/8192/4096/2048/1024/512)
PWDF EQU 50H ;EEPROM中用于標識歷史記錄有效
MYA0_3 EQU 00010101B ;有效識別碼，不匹配則不響應
MYCLRL EQU 00H ;主控手機編碼值（目前為 0000H）
MYCLRH EQU 00H ;根據A4-A11計算得到(00 D7 D6 D5 D4 D3 D2 D1)(D0)
BELONT EQU 40 ;聲音鳴響時間
BELOFT EQU 20 ;靜音時間
SCL BIT P3.0 ;AT24C32（4K字節）
SDA BIT P3.1
SIGPIN BIT P3.2 ;接收信號入口
BELL BIT P3.3 ;蜂鳴器控制
VSEL BIT P1.0 ;LED亮度選擇，H=高亮度
U0E BIT P3.5 ;個位LED位選
U1E BIT P3.4 ;十位LED位選
U2E BIT P3.7 ;百位LED位選
BELLSW BIT 78H ;蜂鳴器運行期間=1
EEEMPTY BIT 79H ;EEPROM空標志
BELLON BIT 7AH ;通知蜂鳴器鳴響
CODEOK BIT 7BH ;收到的編碼正確
TMK250 BIT 7CH ;250us標志，每250us置位一次
SIGING BIT 7DH ;手機發射信號正在持續=1,無信號=0
LEDHIGH BIT 7EH ;顯示器亮度標志=0：正常；=1：高亮
TOUTMK BIT 7FH ;顯示器降低亮度時間已到=1
RBUF81 DATA 20H ;后8位第一次采樣結果A4-A11
RBUF82 DATA 21H ;后8位第二次采樣結果A4-A11
RBUF44 DATA 22H ;前4位第12次采樣結果A0-A3
SIGPOT DATA 23H ;接收引腳上次電平，直接保存P3口全部內容
SIGMSK EQU 04H ;SIG----P3.2
TCNTL DATA 24H ;定時計數器（4ms時基）
TCNTH DATA 25H
TMX16 DATA 26H ;16*250=4000us=4ms
BELLTM DATA 27H ;鳴響時間
DBUF0 DATA 28H ;個位顯示緩沖區
DBUF1 DATA 29H ;十位
DBUF2 DATA 2AH ;百位
EEPTRL DATA 2BH ;EEPROM當前位置指針
EEPTRH DATA 2CH
EEPOL DATA 2DH ;保存清除指針
EEPOH DATA 2EH ;
RES2F DATA 2FH ;使用其中的標志位
EEBUF DATA 30H ;30-37H, I2C緩沖區
BELLCNT DATA 38H ;鳴響次數計數器（3/2/1）
BELLTMK DATA 39H
CODEL DATA 40H ;接收到編碼低位
CODEH DATA 41H ; 高位
CODELK DATA 42H ;保存上一個編碼
CODEHK DATA 43H ;
CODE1L DATA 44H
CODE1H DATA 45H
; =========================================================================================
; =========================================================================================
ORG 0000H
LJMP START
; =========================================================================================
; 250us進入一次，每16次(4ms)切換一次顯示位
; =========================================================================================
ORG 000BH ;定時器0中斷入口，獨占 R7
TM0SUB: SETB TMK250
TM0_4MS:DJNZ TMX16, TM0_E
MOV TMX16, #10H
JNB BELLSW, TM0_CLY
DJNZ BELLTM, TM0_CLY
SETB BELLON
TM0_CLY:JB TOUTMK, TM0_0 ;每4ms執行一次
DJNZ TCNTL, TM0_0
DJNZ TCNTH, TM0_0
SETB TOUTMK
TM0_0: CJNE R7, #0, TM0_1 ;當前顯示位
CLR U2E
MOV P1, DBUF0
INC R7
SETB U0E
RETI
TM0_1: CJNE R7, #1, TM0_2
CLR U0E
MOV P1, DBUF1
INC R7
SETB U1E
RETI
TM0_2: CLR U1E
MOV P1, DBUF2
MOV R7, #0
SETB U2E
RETI
TM0_E: RETI
; =========================================================================================
; =========================================================================================
START: MOV P1, #00H ;關閉顯示器，正常亮度
CLR BELLON
CLR BELL
ACALL EECHK ;檢查EEPROM，確定指針，提取其中最后一個歷史記錄號碼
ACALL TOBUF
MOV TMX16, #10H ;中斷計數寄存器置初始值16
SETB TOUTMK ;延遲定時器處于停止狀態
CLR U0E
CLR U1E
CLR U2E
MOV R7, #00H ;從第一位開始顯示
MOV TMOD, #12H ;TIMER0, MODE 2, TIMER1, MODE 1
MOV TL0, #06H
MOV TH0, #06H ;時間=250us
SETB TR0
SETB ET0
SETB EA
MOV A, #6-1 ;開機時蜂鳴器自動鳴響
ACALL BELL_S
MOV BELLTM, #BELONT-20
ACALL LEDOFF
CLR LEDHIGH ;關閉高亮度
MOV SIGPOT, #00H ;假設開始時接收引腳=0
CLR SIGING
SETB F0
;=--=--=--=--=--=--=--=--=--=--=--=--=--=--=--=--=--=--=--=--=--=--=--=--=--=--
MAIN: JNB BELLSW, MAIN_S0
ACALL BELL_M
MAIN_S0:JNB LEDHIGH, MAIN_00 ;顯示器普通亮度，不檢查標志
JNB TOUTMK, MAIN_0
ACALL LEDOFF ;顯示器回到正常亮度
CLR LEDHIGH
JB EEEMPTY, MAIN_0 ;沒有尚未確認的編碼
AJMP MAIN_01
MAIN_00:JB EEEMPTY, MAIN_0 ;沒有尚未確認的編碼
JNB TOUTMK, MAIN_0
MOV A, #2-1
ACALL BELL_S ;鳴響
MAIN_01:MOV TCNTL, #LOW(5000/4) ;高亮度持續3000ms=3s后恢復
MOV TCNTH, #HIGH(5000/4)
CLR TOUTMK
MOV BELLTM, #30
MAIN_0: MOV A, P3 ;監視SIG引腳電平變化
XCH A, SIGPOT
XRL A, SIGPOT
ANL A, #SIGMSK
JZ MAIN ;A=0表示引腳電平無變化
SETB F0
ACALL GETCOD ;開始接收，出錯后直接返回
JC MAIN ;接收代碼無效，舍棄。
ACALL FIND
JC MAIN ;C=1，表示代碼無效，什么也不發生
MOV CODE1L, CODEL
MOV CODE1H, CODEH
CLR F0
ACALL GETCOD ;開始接收，出錯后直接返回
SETB F0
JC MAIN ;接收代碼無效，舍棄。
ACALL FIND
JC MAIN ;C=1，表示代碼無效，什么也不發生
MOV B, A
MOV A, CODE1L
XRL A, CODEL
JNZ MAIN_0D
MOV A, CODE1H
XRL A, CODEH
JZ MAIN_0C
MAIN_0D:MOV CODE1L, CODEL
MOV CODE1H, CODEH
CLR F0
ACALL GETCOD ;開始接收，出錯后直接返回
SETB F0
JC MAIN ;接收代碼無效，舍棄。
ACALL FIND
JC MAIN ;C=1，表示代碼無效，什么也不發生
MOV B, A
MOV A, CODE1L
XRL A, CODEL
JNZ MAIN_E
MOV A, CODE1H
XRL A, CODEH
JNZ MAIN_E
MAIN_0C:MOV A, B
JNZ MAIN_1 ;A=1：主控手機，轉去退棧
MOV BELLCNT, #4-1
MOV A, CODEL
XRL A, CODELK
JNZ MAIN_0A
MOV A, CODEH
XRL A, CODEHK
JZ MAIN_0B
;這里可以進行編碼過濾=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
MAIN_0A:MOV BELLCNT, #6-1
ACALL EEPUSH ;其他手機，轉去保存、顯示
ACALL TOBUF
MAIN_0B:SETB TOUTMK
MOV TCNTL, #LOW(3000/4) ;高亮度持續3000ms=3s后恢復
MOV TCNTH, #HIGH(3000/4)
CLR TOUTMK
SETB LEDHIGH ;顯示器進入高亮狀態
MOV A, BELLCNT
ACALL BELL_S ;鳴響
MOV BELLTM, #BELONT
AJMP MAIN
MAIN_1: MOV A, CODEL ;核對手機號碼
XRL A, #MYCLRL
JNZ MAIN_E
MOV A, CODEH
XRL A, #MYCLRH
JNZ MAIN_E
ACALL EEPOP ;執行退棧操作
MAIN_E: AJMP MAIN
; =========================================================================================
; 主程序結束
; =========================================================================================
BELL_S: MOV BELLCNT, A
SETB BELLSW
SETB BELL
RET
; =========================================================================================
BELL_M: JBC BELLON, BELLM
RET
BELLM: MOV A, BELLCNT
BELLM0: JNB ACC.0, BELLM1
MOV BELLTM, #BELOFT ;A.0=1,正在鳴響，應該關閉
CLR BELL
AJMP BELLM9
BELLM1: MOV BELLTM, #BELONT ;靜音狀態，應該打開
SETB BELL
BELLM9: DJNZ BELLCNT, BELLME
CLR BELLSW
CLR BELL
BELLME: RET
; =========================================================================================
LEDOFF: ANL DBUF0, #0FEH
ANL DBUF1, #0FEH
ANL DBUF2, #0FEH
RET
; =========================================================================================
; =========================================================================================
TM1SET: CLR TR1 ;1,ACALL=2
CLR TF1 ;1
MOV TL1, DPL ;2
MOV TH1, DPH ;2
SETB TR1 ;1
RET ;2, TOTAL=2+1+1+2+2+1+2=11us
; =========================================================================================
; 接收代碼，收到兩個相同的編碼即認可。
; 發射結束后接收下一個。
; =========================================================================================
GETCOD: NOP
GETC_S: MOV DPTR, #65535-50000 ;在50ms內搜索至少持續4ms的低電平 [***]
ACALL TM1SET
GETC_S0:MOV R6, #16 ;16*250us=4000us=4ms
GETC_S1:CLR TMK250
GETC_S2:JB TF1, GETC_E ;這里超時認為目前無發射器工作，或上次發射已結束。
JB SIGPIN, GETC_S0
JNB TMK250, GETC_S2
DJNZ R6, GETC_S1
MOV R5, #4*2 ;首先接收A0-A3，共4位，8個采樣點
MOV DPTR, #65535-8000 ;在接下來的8ms內必須出現上升沿 [***]
ACALL TM1SET
GETC_0: JB TF1, GETC_E ;這里超時認為目前無發射器工作，或上次發射已結束。
JNB SIGPIN, GETC_0
; JB SIGING, GETC_F ;上次發射尚未結束，直接返回，不接收編碼。
; AJMP GETC_20
JNB SIGING, GETC_20 ;上次發射尚未結束，直接返回，不接收編碼。
JNB F0, GETC_20
AJMP GETC_F
GETC_1P:MOV DPTR, #65535-1250+11+2 ;在接下來的1250us內必須出現低電平 [***]
ACALL TM1SET
GETC_1: JB TF1, GETC_F ;超時
JB SIGPIN, GETC_1
MOV DPTR, #65535-1250+11+2 ;在接下來的1250us內必須出現上升沿 [***]
ACALL TM1SET
GETC_2: JB TF1, GETC_F ;超時
JNB SIGPIN, GETC_2
GETC_20:MOV DPTR, #65535-500+11+2 ;固定延遲500us后采樣
ACALL TM1SET
JNB TF1, $
MOV C, SIGPIN ;采樣接收信號
MOV A, RBUF44
RLC A
MOV RBUF44, A
DJNZ R5, GETC_1P ;循環接收4個數據位，進行8次采樣
MOV R5, #8*2 ;接收A4-A11，共8個數據位，16個采樣點
MOV R0, #RBUF81 ;RBUF81存放第一次采樣值
GETC_3P:MOV DPTR, #65535-1250+11+2 ;在接下來的1250us內必須出現低電平 [***]
ACALL TM1SET
GETC_3: JB TF1, GETC_F ;超時
JB SIGPIN, GETC_3
MOV DPTR, #65535-1250+11+2 ;在接下來的1250us內必須出現上升沿 [***]
ACALL TM1SET
GETC_4: JB TF1, GETC_F ;超時
JNB SIGPIN, GETC_4
GETC_40:MOV DPTR, #65535-500+11+2 ;固定延遲500us后采樣
ACALL TM1SET
JNB TF1, $
MOV C, SIGPIN ;采樣接收信號
MOV A, @R0
RLC A
MOV @R0, A
XRL 00H, #RBUF81 ;在RBUF81和RBUF82之間切換
XRL 00H, #RBUF82
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -