2051单片机仿PT2272软件解码程序

本程序是用51单片机来软件解码pt2262编码，是一个无线服务呼叫器的代码已经成功的在产品的应用，有LED显示.
并有原理图与pcb文件以及完整的代码提供下载：
http://www.51hei.com/ziliao/file/37724122PT2272.rar

; =========================================================; ================================================================;   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.1SIGPIN	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                     ;蜂鸣器运行期间=1EEEMPTY BIT     79H                     ;EEPROM空标志BELLON	BIT	7AH			;通知蜂鸣器鸣响CODEOK	BIT	7BH			;收到的编码正确TMK250	BIT	7CH			;250us标志，每250us置位一次SIGING	BIT	7DH			;手机发射信号正在持续=1,无信号=0LEDHIGH BIT	7EH			;显示器亮度标志=0：正常；=1：高亮TOUTMK	BIT	7FH			;显示器降低亮度时间已到=1RBUF81	DATA	20H			;后8位第一次采样结果A4-A11RBUF82	DATA	21H			;后8位第二次采样结果A4-A11RBUF44	DATA	22H			;前4位第12次采样结果A0-A3SIGPOT	DATA	23H			;接收引脚上次电平，直接保存P3口全部内容SIGMSK	EQU	04H			;SIG----P3.2TCNTL	DATA	24H			;定时计数器（4ms时基）TCNTH	DATA	25HTMX16	DATA	26H			;16*250=4000us=4msBELLTM	DATA	27H			;鸣响时间DBUF0	DATA	28H			;个位显示缓冲区DBUF1	DATA	29H			;十位DBUF2	DATA	2AH			;百位EEPTRL	DATA	2BH			;EEPROM当前位置指针EEPTRH	DATA	2CHEEPOL	DATA	2DH			;保存清除指针EEPOH	DATA	2EH			;RES2F	DATA	2FH			;使用其中的标志位EEBUF	DATA	30H			;30-37H, I2C缓冲区BELLCNT	DATA	38H			;鸣响次数计数器（3/2/1）BELLTMK	DATA	39HCODEL	DATA	40H			;接收到编码低位CODEH	DATA	41H			;	   高位CODELK  DATA    42H                     ;保存上一个编码CODEHK  DATA    43H                     ;CODE1L	DATA	44HCODE1H	DATA	45H; =======================================================; =============================================================ORG	0000HLJMP	START; ===================================================================;   250us进入一次，每16次(4ms)切换一次显示位; ==================================================================ORG	000BH			;定时器0中断入口，独占 R7TM0SUB: SETB	TMK250TM0_4MS:DJNZ	TMX16, TM0_EMOV	TMX16, #10HJNB	BELLSW, TM0_CLYDJNZ	BELLTM, TM0_CLYSETB	BELLONTM0_CLY:JB	TOUTMK, TM0_0		;每4ms执行一次DJNZ	TCNTL, TM0_0DJNZ	TCNTH, TM0_0SETB	TOUTMKTM0_0:	CJNE	R7, #0, TM0_1		;当前显示位CLR	U2EMOV	P1, DBUF0INC	R7SETB	U0ERETITM0_1:	CJNE	R7, #1, TM0_2CLR	U0EMOV	P1, DBUF1INC	R7SETB	U1ERETITM0_2:	CLR	U1EMOV	P1, DBUF2MOV	R7, #0SETB	U2ERETITM0_E:	RETI; ===============================================================; =======================================================START:	MOV	P1, #00H		;关闭显示器，正常亮度CLR	BELLONCLR     BELLACALL	EECHK			;检查EEPROM，确定指针，提取其中最后一个历史记录号码ACALL	TOBUFMOV	TMX16, #10H		;中断计数寄存器置初始值16SETB	TOUTMK			;延迟定时器处于停止状态CLR	U0ECLR	U1ECLR	U2EMOV	R7, #00H		;从第一位开始显示MOV	TMOD, #12H		;TIMER0, MODE 2, TIMER1, MODE 1MOV	TL0, #06HMOV	TH0, #06H		;时间=250usSETB	TR0SETB	ET0SETB	EAMOV	A, #6-1 		;开机时蜂鸣器自动鸣响ACALL	BELL_SMOV	BELLTM, #BELONT-20ACALL	LEDOFFCLR	LEDHIGH 		;关闭高亮度MOV	SIGPOT, #00H		;假设开始时接收引脚=0CLR	SIGINGSETB	F0;=--=--=--=--=--=--=--=--=--=--==--=--=--=--=--=--MAIN:   JNB     BELLSW, MAIN_S0ACALL	BELL_MMAIN_S0:JNB	LEDHIGH, MAIN_00 	;显示器普通亮度，不检查标志JNB	TOUTMK, MAIN_0ACALL	LEDOFF			;显示器回到正常亮度CLR	LEDHIGHJB	EEEMPTY, MAIN_0		;没有尚未确认的编码AJMP	MAIN_01MAIN_00:JB	EEEMPTY, MAIN_0		;没有尚未确认的编码JNB	TOUTMK, MAIN_0MOV     A, #2-1ACALL	BELL_S			;鸣响MAIN_01:MOV	TCNTL, #LOW(5000/4)	;高亮度持续3000ms=3s后恢复MOV	TCNTH, #HIGH(5000/4)CLR	TOUTMKMOV	BELLTM, #30MAIN_0: MOV	A, P3			;监视SIG引脚电平变化XCH	A, SIGPOTXRL	A, SIGPOTANL	A, #SIGMSKJZ	MAIN			;A=0表示引脚电平无变化SETB	F0ACALL	GETCOD			;开始接收，出错后直接返回JC	MAIN			;接收代码无效，舍弃。ACALL	FINDJC	MAIN			;C=1，表示代码无效，什么也不发生MOV	CODE1L, CODELMOV	CODE1H, CODEHCLR	F0ACALL	GETCOD			;开始接收，出错后直接返回SETB	F0JC	MAIN			;接收代码无效，舍弃。ACALL	FINDJC	MAIN			;C=1，表示代码无效，什么也不发生MOV	B, AMOV	A, CODE1LXRL	A, CODELJNZ	MAIN_0DMOV	A, CODE1HXRL	A, CODEHJZ	MAIN_0CMAIN_0D:MOV	CODE1L, CODELMOV	CODE1H, CODEHCLR	F0ACALL	GETCOD			;开始接收，出错后直接返回SETB	F0JC	MAIN			;接收代码无效，舍弃。ACALL	FINDJC	MAIN			;C=1，表示代码无效，什么也不发生MOV	B, AMOV	A, CODE1LXRL	A, CODELJNZ	MAIN_EMOV	A, CODE1HXRL	A, CODEHJNZ	MAIN_EMAIN_0C:MOV	A, BJNZ	MAIN_1			;A=1：主控手机，转去退栈MOV	BELLCNT, #4-1MOV     A, CODELXRL     A, CODELKJNZ     MAIN_0AMOV     A, CODEHXRL     A, CODEHKJZ      MAIN_0B;这里可以进行编码过滤=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-MAIN_0A:MOV	BELLCNT, #6-1ACALL	EEPUSH			;其他手机，转去保存、显示ACALL	TOBUFMAIN_0B:SETB	TOUTMKMOV	TCNTL, #LOW(3000/4)	;高亮度持续3000ms=3s后恢复MOV	TCNTH, #HIGH(3000/4)CLR	TOUTMKSETB	LEDHIGH 		;显示器进入高亮状态MOV     A, BELLCNTACALL	BELL_S			;鸣响MOV	BELLTM, #BELONTAJMP	MAINMAIN_1: MOV	A, CODEL		;核对手机号码XRL	A, #MYCLRLJNZ	MAIN_EMOV	A, CODEHXRL	A, #MYCLRHJNZ	MAIN_EACALL	EEPOP			;执行退栈操作MAIN_E:	AJMP	MAIN; =============================================================;	主程序结束; ============================================================BELL_S: MOV     BELLCNT, ASETB	BELLSWSETB	BELLRET; ===============================================================BELL_M: JBC	BELLON, BELLMRETBELLM:	MOV	A, BELLCNTBELLM0:	JNB	ACC.0, BELLM1MOV	BELLTM, #BELOFT		;A.0=1,正在鸣响，应该关闭CLR	BELLAJMP	BELLM9BELLM1:	MOV	BELLTM, #BELONT		;静音状态，应该打开SETB	BELLBELLM9:	DJNZ	BELLCNT, BELLMECLR	BELLSWCLR	BELLBELLME:	RET; ===================================================================LEDOFF: ANL	DBUF0, #0FEHANL	DBUF1, #0FEHANL	DBUF2, #0FEHRET; ================================================================; ============================================================TM1SET: CLR	TR1			;1,ACALL=2CLR	TF1			;1MOV	TL1, DPL		;2MOV	TH1, DPH		;2SETB	TR1			;1RET				;2, TOTAL=2+1+1+2+2+1+2=11us; =====================================================================;  接收代码，收到两个相同的编码即认可。;  发射结束后接收下一个。; =============================================================GETCOD: NOPGETC_S: MOV	DPTR, #65535-50000	;在50ms内搜索至少持续4ms的低电平	[***]ACALL	TM1SETGETC_S0:MOV	R6, #16 		;16*250us=4000us=4msGETC_S1:CLR	TMK250GETC_S2:JB	TF1, GETC_E		;这里超时认为目前无发射器工作，或上次发射已结束。JB	SIGPIN, GETC_S0JNB	TMK250, GETC_S2DJNZ	R6, GETC_S1MOV	R5, #4*2		;首先接收A0-A3，共4位，8个采样点MOV	DPTR, #65535-8000	;在接下来的8ms内必须出现上升沿		[***]ACALL	TM1SETGETC_0: JB	TF1, GETC_E		;这里超时认为目前无发射器工作，或上次发射已结束。JNB	SIGPIN, GETC_0;	JB	SIGING, GETC_F		;上次发射尚未结束，直接返回，不接收编码。;	AJMP	GETC_20JNB	SIGING, GETC_20		;上次发射尚未结束，直接返回，不接收编码。JNB	F0, GETC_20AJMP	GETC_FGETC_1P:MOV	DPTR, #65535-1250+11+2	;在接下来的1250us内必须出现低电平	[***]ACALL	TM1SETGETC_1: JB	TF1, GETC_F		;超时JB	SIGPIN, GETC_1MOV	DPTR, #65535-1250+11+2	;在接下来的1250us内必须出现上升沿	[***]ACALL	TM1SETGETC_2: JB	TF1, GETC_F		;超时JNB	SIGPIN, GETC_2GETC_20:MOV	DPTR, #65535-500+11+2	;固定延迟500us后采样ACALL	TM1SETJNB	TF1, $MOV	C, SIGPIN		;采样接收信号MOV	A, RBUF44RLC	AMOV	RBUF44, ADJNZ	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	TM1SETGETC_3: JB	TF1, GETC_F		;超时JB	SIGPIN, GETC_3MOV	DPTR, #65535-1250+11+2	;在接下来的1250us内必须出现上升沿	[***]ACALL	TM1SETGETC_4: JB	TF1, GETC_F		;超时JNB	SIGPIN, GETC_4GETC_40:MOV	DPTR, #65535-500+11+2	;固定延迟500us后采样ACALL	TM1SETJNB	TF1, $MOV	C, SIGPIN		;采样接收信号MOV	A, @R0RLC	AMOV	@R0, AXRL	00H, #RBUF81		;在RBUF81和RBUF82之间切换XRL	00H, #RBUF82DJNZ	R5, GETC_3P		;循环接收8个数据位，进行16次采样SETB	SIGINGCLR	CRETGETC_E: CLR	SIGINGGETC_F: SETB	CRET; ===========================================================; ===============================================================FIND:	MOV	A, RBUF44		;分析代码CJNE	A, #MYA0_3, FIND_EMOV	R4, RBUF81MOV	R5, RBUF82MOV	R6, #7MOV	R0, #00HMOV	R1, #00HFIND_L: MOV	A, R0			;结果乘以 3CLR	CRLC	AMOV	B, AMOV	A, R1RLC	AXCH	A, BADD	A, R0MOV	R0, AMOV	A, BADDC	A, R1MOV	R1, A			;结果乘以 3 结束MOV	A, R4RLC	AMOV	R4, A			;D7-->CMOV	A, R5RL	AMOV	R5, AANL	A, #01H 		;D7-->A.0ADDC	A, R0			;A.0+C+R0MOV	R0, AMOV	A, R1ADDC	A, #00HMOV	R1, ADJNZ	R6, FIND_L		;确定A4-A10的编码结果CLR	AMOV	C, RBUF81.0		;分析代码，确定是否主控手机MOV	ACC.0, CMOV	C, RBUF82.0ADDC	A, #00H 		;A=(0,1,2)。A=0:非主控手机；A=1:主控手机；A=2:无效手机JB	ACC.1, FIND_E		;A=2!MOV	CODEL, R0MOV	CODEH, R1CLR	CRET				;A=0/1FIND_E: SETB	CRET; ===============================================================; ======================================================================EECHK:	MOV	EEPTRL, #00H		;0000H记录不用，因为0000H用于判断EEPROM是否空MOV	EEPTRH, #00HMOV	EEBUF, #00HMOV	EEBUF+1, #00HEECHK0:	MOV	CODEL, EEBUF		;放到编码缓冲区MOV	CODEH, EEBUF+1ANL	CODEH, #0FHMOV	DPL, EEPTRL		;读取栈底的两个字节MOV	DPH, EEPTRHINC	DPTRINC	DPTR			;指向下一个记录，但是暂时不修改指针MOV	A, DPHADD	A, #HIGH(65536-EESIZE)	;???JC	EECHK9			;已经检查完所有记录空间。MOV	EEPOL, DPLMOV	EEPOH, DPH		;暂时保存在这里MOV	R0, #EEBUFMOV	B, #02HACALL	I2CD_RMOV	A, EEBUF+1ANL	A, #0F0HXRL	A, #PWDFJNZ	EECHK9MOV	EEPTRL, EEPOLMOV	EEPTRH, EEPOHAJMP	EECHK0EECHK9:	CLR	EEEMPTY			;假设非空MOV	A, EEPTRLORL	A, EEPTRHJNZ	EECHKESETB	EEEMPTY			;声明EEPROM空EECHKE:	RET; =======================================================================; =============================================================EEPUSH: MOV	EEBUF, CODEL		;写入EEPROM栈，采用实栈顶MOV	EEBUF+1, CODEHORL	EEBUF+1, #PWDF		;标志，50HMOV	DPL, EEPTRLMOV	DPH, EEPTRHINC	DPTR			;每个记录进入，指针加 2INC	DPTRMOV	A, DPH			;进行堆栈溢出检查ADD	A, #HIGH(65536-EESIZE)JC	EEPUSHEANL	DPL, #0FEHMOV	EEPTRL, DPLMOV	EEPTRH, DPHMOV	R0, #EEBUFMOV	B, #02HACALL	I2CD_WCLR	EEEMPTY			;声明EEPROM非空EEPUSHE:RET; ============================================================; ================================================================EEPOP:	MOV	A, EEPTRL		;EEPROM退出操作ORL	A, EEPTRHJZ	EEPOPBEEPOP0: MOV	EEPOL, EEPTRLMOV	EEPOH, EEPTRHCLR	C			;指针减 2，指向上一个数据MOV	A, EEPTRLSUBB	A, #02HMOV	EEPTRL, AMOV	A, EEPTRHSUBB	A, #00HMOV	EEPTRH, A		;指针已经更新MOV	A, EEPTRL		;检查退出一个记录后，堆栈是否变空？ORL	A, EEPTRHJNZ	EEPOP1MOV	CODEL, AMOV	CODEH, ASETB	EEEMPTY			;声明EEPROM空AJMP	EEPOP9EEPOP1: MOV	DPL, EEPTRL		;读取栈顶记录MOV	DPH, EEPTRHMOV	R0, #EEBUFMOV	B, #02HACALL	I2CD_RMOV	CODEL, EEBUF		;放到编码缓冲区MOV	CODEH, EEBUF+1ANL	CODEH, #0FH		;屏蔽掉标志EEPOP9: MOV	EEBUF, #00H		;清除刚才已经退栈的记录MOV	EEBUF+1, #00HMOV	DPL, EEPOLMOV	DPH, EEPOHMOV	R0, #EEBUFMOV	B, #02HACALL	I2CD_WACALL	TOBUF			;送到显示缓冲区ACALL	LEDOFFEEPOPB: MOV     A, #2-1ACALL	BELL_S			;鸣响;	MOV	BELLTM, #30EEPOPE: RET; ======================================================; =====================================================================TOBUF:	MOV	A, CODEL		;填写显示缓冲区MOV	B, CODEH		;/100MOV	R2, #00HTOBUF_0:CLR	CSUBB	A, #100XCH	A, BSUBB	A, #00HXCH	A, BJC	TOBUF_8INC	R2AJMP	TOBUF_0TOBUF_8:ADD	A, #100MOV	B, #10DIV	ABMOV	DPTR, #FONTMOVC	A, @A+DPTRMOV	DBUF1, AMOV	A, BMOVC	A, @A+DPTRMOV	DBUF0, AMOV	A, R2MOVC	A, @A+DPTRMOV	DBUF2, AMOV     CODELK, CODELMOV     CODEHK, CODEHRET; =================================================================; ===========================================================DELAY:	PUSH	ACC			;延迟时间=A*10msMOV	A, #20DLY1:	PUSH	ACCMOV	A, #250DJNZ	ACC, $			;500usPOP	ACCDJNZ	ACC, DLY1POP	ACCDJNZ	ACC, DELAYRET;======= I2C 子程序	=========================================;	I2CD_W, I2CD_R		;LAYER 1;	I2C_O,	I2C_I		;LAYER 2;	I2C_BG, I2C_ED		;LAYER 3;==========================================================;	向存储器写入几个字节，最多8个字节。;	入口：DPTR 要写的EEPROM存储单元地址。;	      R0   指向要写入字节在RAM的首地址。;	      B    写入字节个数。;	出口：如果 C=1,说明写出错。I2CD_W: ACALL	I2C_BGMOV	A, #10100000B	;写命令ACALL	I2C_OJC	I2CD_WE 	;C=1, 未收到 ACK 位，出错,不再继续处理，直接返回MOV	A, DPHACALL	I2C_OJC	I2CD_WEMOV	A, DPLACALL	I2C_OJC	I2CD_WEI2CD_WL:MOV	A, @R0ACALL	I2C_OJC	I2CD_WEINC	R0DJNZ	B, I2CD_WLACALL	I2C_EDCLR	CRETI2CD_WE:ACALL	I2C_EDSETB	CRET; ========================================================;	从 EEPROM 读入几个字节;	入口：DPTR 要读的存储单元地址。;	      R0   指向要读缓冲区在RAM的首地址。;	      B    读入字节个数。;	出口：读到的内容在缓冲区中，如果 C=1,说明读出错。I2CD_R: ACALL	I2C_BGMOV	A, #10100000B	;先发送[写]命令ACALL	I2C_OJC	I2CD_RE 	;C=1, 未收到 ACK 位，出错,不再继续处理，直接返回MOV	A, DPH		;发送地址低位ACALL	I2C_OJC	I2CD_REMOV	A, DPL		;发送地址低位ACALL	I2C_OJC	I2CD_REACALL	I2C_BGMOV	A, #10100001B	;发送读命令ACALL	I2C_OJC	I2CD_REI2CD_IB:MOV	DPL, #08H	;取得一个字节SETB	SDAI2CD_IL:SETB	SCL		;SCL=1NOPMOV	C, SDA		;MCU 采样 SDA，送到 C 中RLC	A		;C->ACC.0CLR	SCL		;SCL=0DJNZ	DPL, I2CD_IL	;得到的一个字节在 ACC 中MOV	@R0, AINC	R0MOV	A, BXRL	A, #01HJZ	I2CD_GOCLR	SDANOPI2CD_GO:SETB	SCLNOPCLR	SCLDJNZ	B, I2CD_IB	;取得不止一个字节ACALL	I2C_EDCLR	CRETI2CD_RE:ACALL	I2C_EDSETB	CRET; =================================================================;向 IIC 总线发送一个字节I2C_O:	PUSH	BMOV	B, #08HI2C_OLP:RLC	A		;ACC.7 -> CMOV	SDA, CSETB	SCL		;SCL=1NOPCLR	SCL		;SCL=0DJNZ	B, I2C_OLPSETB	SDA		;准备接收 ACK 位SETB	SCL		;SCL=1, [SDA=1]NOPMOV	C, SDACLR	SCLPOP	BRET			;C=1, 未收到 ACK 位，出错, C=0, 收到 ACK 位，正常; =====================================================I2C_BG: SETB	SCL		;确保SCL=HIGHCLR	SDA		;向 IIC 总线发送开始位NOPCLR	SCLRET; =========================================================================================I2C_ED: CLR	SDASETB	SCLNOPSETB	SDA		;向 IIC 总线发送停止位RET; ================================================================;最好显示000-999=1000个，否则容易造成误解，这里显示全部2187个，0-9,A-F,H,L,P,U,Y; ==============================================================FONT:	DB	0FDH			;"0"DB	061H			;"1"DB	0DBH			;"2"DB	0F3H			;"3"DB	067H			;"4"DB	0B7H			;"5"DB	0BFH			;"6"DB	0E1H			;"7"DB	0FFH			;"8"DB	0F7H			;"9"DB	0EFH			;"A"DB	03FH			;"B"DB	09DH			;"C"DB	07BH			;"D"DB	09FH			;"E"DB	08FH			;"F"DB	06FH			;"H"DB	071H			;"J"DB	01DH			;"L"DB	0CFH			;"P"DB	07DH			;"U"DB	077H			;"Y"; ==================================================END