单键遥控码学习控制器.doc

此文档收集于网络，如有侵权，请联系网站删除*; * 单键遥控码学习控制器 *; * 2001.11.29修改LRM *; *; 单键遥控码学习控制器电路原理图;* ;* KEYX0 P1.0 * 1 40 * VCC *;* KEYX1 P1.1 * 2 39 * P0.0 KEYY0 *;* KEYX2 P1.2 * 3 38 * P0.1 KEYY1 *;* KEYX3 P1.3 * 4 37 * P0.2 KEYY2 *;* SCL P1.4 * 5 36 * P0.3 KEYY3 *;* SDA P1.5 * 6 35 * P0.4 KEYY4 *;* STUDYLAMP P1.6 * 7 34 * P0.5 KEYY5 *;* LAMP P1.7 * 8 33 * P0.6 KEYY6 *;* RST * 9 32 * P0.7 KEYY7 *;* RXD P3.0 * 10 MCS-51 31 * EA VDD *;* TXD P3.1 * 11 30 * ALE *;* STUDYKEY INT0 P3.2 * 12 29 * PSEN *;* INT1 P3.3 * 13 28 * P2.7 A15 DEV7 *;* REMOTEIN T0 P3.4 * 14 27 * P2.6 A14 DEV6 *;* REMOTEOUT T1 P3.5 * 15 26 * P2.5 A13 DEV5 *;* WR P3.6 * 16 25 * P2.4 A12 DEV4 *;* RD P3.7 * 17 24 * P2.3 A11 DEV3 *;* XTAL2 * 18 23 * P2.2 A10 DEV2 *;* XTAL1 * 19 22 * P2.1 A9 DEV1 *;* VSS * 20 21 * P2.0 A8 DEV0 *;* SPBASE EQU 70H;堆栈基址 IEVAL EQU 00H ;关所有中断 MEMBASE EQU 08H;工作寄存器基址 MEMS EQU 67H;工作寄存器个数;BITNMBEQU08H;一个字节包含八个位 KEYFUNFLAG EQU 80H ; 键功能索引 KEYFUNNMB EQU 81H ;键功能号 KEYFUNRW EQU 82H ;遥控信号读写标志 READFLAG EQU 88H ;读标记 WITERFLAG EQU 99H ;写标记 TMPHADDR EQU 08H ;读入高电平存放首址 TMPLADDR EQU 90H ;读入低电平存放首址 READTIME EQU 00H ;读入数据指令时间; LOWH EQU R4 ;起始位存放高地址; LOWL EQU R5 ;起始位存放低地址 STUDYLAMP EQU P1.6 ;学习指示灯 LAMP EQU P1.7 ;未定义指示灯 STUDYKEY EQU P3.2 ;学习键 REMOTEIN EQU P3.4 ;遥控输入 REMOTEOUT EQU P3.5 ;遥控输出 DELAYCONUT EQU 30H ;延时值 DELAYCONUT0EQU0FFH;延时值 T1COUNT EQU 0F3H ;T1计数值 TMODVAL EQU 22H TCONVAL EQU 41H PCONVAL EQU 00H T2CONVAL EQU 00H SCONVAL EQU 0F8H IPVAL EQU 01H;*;* 主程序和中断程序入口 *;*ORG 0000HAJMP STARTORG 0003H AJMP INTEX0ORG 000BHRETI ORG 0013H RETIORG 001BHAJMP INTT1ORG 0023HRETIORG 002BHRETI;*;* 初始化程序中的各变量 *;*CLEARMEMIO: CLRADECAMOV P0,A;清 I/O 口MOVP3,AMOV P1,ACLRAMOVP2,ACLRSTUDYLAMPCLRLAMP CLR REMOTEOUT SETB REMOTEINMOV R0,#MEMBASE;清工作寄存器MOV R1,#MEMSCLEARMEM: MOV R0,AINC R0DJNZ R1,CLEARMEMMOVR0,#KEYFUNRWMOVR0,#READFLAGMOV SP,#SPBASE;设堆栈基址 MOV IE,#IEVAL ;关所有中断 MOV IP,#IPVAL MOV TMOD,#TMODVAL MOV PCON,#PCONVAL MOV SCON,#SCONVAL MOV TH1,#T1COUNT MOV TL1,#T1COUNT SETB EX0 SETB EARET* ;*主程序 *START: LCALL CLEARMEMIO ;初始化;MAIN: LCALL KEYWORK ;主体程序LJMPMAINNOP;PC值出错处理NOPNOPLJMPSTART;*;* T1中断服务程序 *;*INTT1: CPL REMOTEOUT ;40kHZRETI;*;* 载波合成 *;*REMOTETX:MOVR0,#TMPHADDRMOVR1,#TMPLADDR; CPL STUDYLAMPJZLOWBACKLOWBACKTMP: MOV R2,A ;起始位复原LOWBACKTMP0:SETBTR1SETBET1NOP NOP NOP NOPNOPNOPDJNZR2,LOWBACKTMP0DJNZR3,LOWBACKTMPLOWBACK:MOVA,R5MOVR2,ALOWBACKTMP1:SETBTR1SETBET1NOPNOP NOP NOP NOPNOPDJNZR2,LOWBACKTMP1TMP0: MOV A,R0 ;高电平处理MOVR2,A; CPL LAMPTMP1:CLRTR1CLRET1 CLR REMOTEOUT ;NOP NOP NOP NOP NOP NOPNOPNOPNOPNOPNOPNOPNOPNOPNOPDJNZR2,TMP1INCR0TMPP:MOVA,R1MOVR2,A ; CPL LAMPTMP2: SETB TR1 ;低电平处理SETBET1NOP NOP NOP NOP NOPNOPDJNZR2,TMP2INCR1MOVA,R1JZOUTAJMPTMP0OUT: CLRTR1CLRET1CLRLAMP CLR REMOTEOUTRET;*;* 遥控数据读取 INT0中断程序 *;* 高电平存TMPHADDR为首址RAM *;* 低电平存TMPLADDR为首址RAM *;*INTEX0: CLRET1CLRTR1 CLR EX0CLREASETBSTUDYLAMPCLRLAMPMOVR0,#TMPHADDRMOVR1,#TMPLADDRCLRAMOVDPH,AMOVDPL,AREADHEAD:JNBREMOTEIN,READDATA;寻找起始位INCDPTR NOP NOP NOP NOP NOP NOP NOP NOP NOPNOPNOPNOPNOPNOPNOPAJMPREADHEADREADDATA:CJNEA,DPH,READDATA00MOVDPH,AAJMPREADHEADREADDATA00:MOVR3,DPHMOVDPH,AMOVDPL,AREADLOOP01: JB REMOTEIN,READDATA02 ;读起始位INCDPTRNOP NOP NOP NOP NOP NOP NOPNOPNOPNOPNOPNOPNOPNOPNOPAJMPREADLOOP01READDATA02:CLRLAMPMOVR4,DPH MOV R5,DPL ;存起始位MOVDPH,#00HMOVDPL,#READTIMEAJMPREADLOOP1READDATA1: SETB LAMP ;存高电平MOVR0,DPLINCR0MOVDPL,#READTIME MOV DPH,#00HREADLOOP0: JB REMOTEIN,READDATA2 ;读低电平INCDPTRNOPNOPNOPNOPNOPNOPNOPNOPNOPNOP NOP NOP NOP NOP NOPAJMPREADLOOP0READDATA2: CLR LAMP ;存低电平MOVR1,DPLINCR1MOVDPL,#READTIME MOV DPH,#00HREADLOOP1: JNB REMOTEIN,READDATA3 ;读高电平INCDPTRNOPNOPNOPNOPNOPNOPNOPNOPNOPNOP NOP NOP NOP NOP NOP AJMP READLOOP1READDATA3: CLR ACJNEA,DPH,READDATA4AJMPREADDATA1READDATA4:MOVR0,AMOVR1,ASETBLAMP CLR STUDYLAMP SETB REMOTEINREADEND:JNBSTUDYKEY,READENDMOVR0,#KEYFUNRWMOVR0,#WITERFLAG SETB EX0SETBEARETI;*;* 键工作子程序 ;*KEYWORK: SETB P1.0 JNB P1.0,KEY0KEYOUT:RETKEY0: LCALL DL10MS ;