1、*; * 單鍵遙控碼學習控制器 *; * 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 *

2、;* 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 P

3、3.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 ; 鍵功能索

4、引 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 ;學習鍵 RE

5、MOTEIN 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 RETI

6、ORG 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;設堆棧基址 MO

7、V 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;*;* 載波合成 *;*RE

8、MOTETX: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:

9、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 *;* 低

10、電平存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,DP

11、HMOVDPH,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 REMO

12、TEIN,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