当前位置:首页 > 单片机 > 单片机
[导读]STC89C52做的学习型遥控器,可存八个红外遥控信息,只要再把按键用定时器中断2完成就可以用于商业生产.RXIN BIT P2.0 TXZAI BIT P2.2 TXOUT BIT P2.1 KEY_SIGN BIT 20H ;为0按键错误,为1按键正确 RXTX_SIGN B

STC89C52做的学习型遥控器,可存八个红外遥控信息,只要再把按键用定时器中断2完成就可以用于商业生产.

RXIN BIT P2.0
TXZAI BIT P2.2
TXOUT BIT P2.1
KEY_SIGN BIT 20H   ;为0按键错误,为1按键正确
RXTX_SIGN BIT 21H   ;为0是为发射状态,为1是为接收状态

ISP_DATA DATA 0E2H     ;ISP功能寄存器定义
ISP_ADDRH DATA 0E3H
ISP_ADDRL DATA 0E4H
ISP_CMD DATA 0E5H
ISP_TRIG DATA 0E6H
ISP_CONTR DATA 0E7H

ISP_CMD_NO EQU 0        ;操作数
ISP_CMD_READ EQU 1
ISP_CMD_PROGRAM EQU 2
ISP_CMD_ERASE EQU 3

WAIT_TIME EQU 1           ;等待时间

ZHIL EQU 30H
ZHIH EQU 31H
GESHU EQU 32H
JISHU EQU 33H
KEY_WORD EQU 34H
KEY_VALUE EQU 35H
ADDRH EQU 36H
ADDRL EQU 37H
TX_GESHU EQU 38H


ORG 0000H
LJMP START
ORG 000BH
LJMP T0IN
ORG 001BH
LJMP T1IN

 

ORG 0100H
START:      MOV SP,#10H
            CLR RXTX_SIGN       
            LJMP KEY_MAIN


KEY_MAIN:LCALL SCAN_KEY             ;检测有没有单个按键按下 
         MOV A,KEY_WORD
   CJNE A,#00H,NEXT1
   LJMP KEY_MAIN
NEXT1:   JNB KEY_SIGN,KEY_MAIN
         MOV KEY_VALUE,A
     
   LCALL RE_DELAY             ;消抖时间20ms

   LCALL SCAN_KEY             ;是否依然是按下的
   MOV A,KEY_WORD
   CJNE A,#00H,NEXT2
   LJMP KEY_MAIN
NEXT2:   JNB KEY_SIGN,KEY_MAIN
         CJNE A,KEY_VALUE,KEY_MAIN

RELEASE: LCALL SCAN_KEY            ;查看是否放开按键了
   MOV A,KEY_WORD
   CJNE A,#00H,RELEASE


   
         MOV DPTR,#TAB             ;执行相应的程式
   CLR C
   MOV A,KEY_VALUE
   ADD A,KEY_VALUE
       JMP @A+DPTR
        
TAB:     AJMP KEY_0
         AJMP KEY_1
         AJMP KEY_2
   AJMP KEY_3
   AJMP KEY_4
   AJMP KEY_5
   AJMP KEY_6
   AJMP KEY_7
   AJMP KEY_8
   AJMP KEY_9
   AJMP KEY_10
   AJMP KEY_11
   AJMP KEY_12
   AJMP KEY_13
    AJMP KEY_14
   AJMP KEY_15
   AJMP KEY_16

KEY_0: LJMP KEY_MAIN                 ;无效的按健值

KEY_1:  JNB RXTX_SIGN,T1RX           ;接收发送键设定键,P1灯亮为接收存储状态,灯灭是为发射状态
T1TX:   CLR RXTX_SIGN
        MOV P1,#0FFH
        LJMP KEY_MAIN
T1RX:   SETB RXTX_SIGN
        MOV P1,#00H
        LJMP KEY_MAIN

 

KEY_2:  MOV ADDRH,#20H
        MOV ADDRL,#00H
        JB RXTX_SIGN,KEY2_RX
KEY2_TX:LJMP TX_START
KEY2_RX:LJMP RX_START


KEY_3:  MOV ADDRH,#22H
        MOV ADDRL,#00H
    JB RXTX_SIGN,KEY3_RX
KEY3_TX:LJMP TX_START
KEY3_RX:LJMP RX_START


KEY_4:  MOV ADDRH,#24H
        MOV ADDRL,#00H
    JB RXTX_SIGN,KEY4_RX
KEY4_TX:LJMP TX_START
KEY4_RX:LJMP RX_START


KEY_5:  MOV ADDRH,#26H
        MOV ADDRL,#00H
    JB RXTX_SIGN,KEY5_RX
KEY5_TX:LJMP TX_START
KEY5_RX:LJMP RX_START


KEY_6:  MOV ADDRH,#28H
        MOV ADDRL,#00H
    JB RXTX_SIGN,KEY6_RX
KEY6_TX:LJMP TX_START
KEY6_RX:LJMP RX_START


KEY_7:  MOV ADDRH,#2AH
        MOV ADDRL,#00H
    JB RXTX_SIGN,KEY7_RX
KEY7_TX:LJMP TX_START
KEY7_RX:LJMP RX_START


KEY_8:  MOV ADDRH,#2CH
        MOV ADDRL,#00H
    JB RXTX_SIGN,KEY8_RX
KEY8_TX:LJMP TX_START
KEY8_RX:LJMP RX_START


KEY_9:  MOV ADDRH,#2EH
        MOV ADDRL,#00H
    JB RXTX_SIGN,KEY9_RX
KEY9_TX:LJMP TX_START
KEY9_RX:LJMP RX_START

 

KEY_10:  MOV ADDRH,#2EH
         MOV ADDRL,#00H
     JB RXTX_SIGN,KEY10_RX
KEY10_TX:LJMP TX_START
KEY10_RX:LJMP RX_START


KEY_11:  MOV ADDRH,#2EH
         MOV ADDRL,#00H
     JB RXTX_SIGN,KEY11_RX
KEY11_TX:LJMP TX_START
KEY11_RX:LJMP RX_START

 

KEY_12:  MOV ADDRH,#2EH
         MOV ADDRL,#00H
     JB RXTX_SIGN,KEY12_RX
KEY12_TX:LJMP TX_START
KEY12_RX:LJMP RX_START


KEY_13:  MOV ADDRH,#2EH
         MOV ADDRL,#00H
     JB RXTX_SIGN,KEY13_RX
KEY13_TX:LJMP TX_START
KEY13_RX:LJMP RX_START


KEY_14:  MOV ADDRH,#2EH
         MOV ADDRL,#00H
     JB RXTX_SIGN,KEY14_RX
KEY14_TX:LJMP TX_START
KEY14_RX:LJMP RX_START


KEY_15:  MOV ADDRH,#2EH
         MOV ADDRL,#00H
     JB RXTX_SIGN,KEY15_RX
KEY15_TX:LJMP TX_START
KEY15_RX:LJMP RX_START


KEY_16:  MOV ADDRH,#2EH
         MOV ADDRL,#00H
     JB RXTX_SIGN,KEY16_RX
KEY16_TX:LJMP TX_START
KEY16_RX:LJMP RX_START

 

SCAN_KEY:CLR KEY_SIGN
         MOV KEY_WORD,#00H


KEY1:    MOV P3,#11111110B      ;第一行
         JB P3.4,KEY2
         JB KEY_SIGN,KEYWRONG1
         MOV KEY_WORD,#1
   SETB KEY_SIGN
KEY2:    JB P3.5,KEY3
   JB KEY_SIGN,KEYWRONG1
   MOV KEY_WORD,#2
   SETB KEY_SIGN
KEY3:    JB P3.6,KEY4
         JB KEY_SIGN,KEYWRONG1
   MOV KEY_WORD,#3
   SETB KEY_SIGN
KEY4:    JB P3.7,KEY5
         JB KEY_SIGN,KEYWRONG1
   MOV KEY_WORD,#4
   SETB KEY_SIGN
   LJMP KEY5
KEYWRONG1: LJMP KEYWRONG

KEY5:    MOV P3,#11111101B      ;第二行
         JB P3.4,KEY6
   JB KEY_SIGN,KEYWRONG2
   MOV KEY_WORD,#5
   SETB KEY_SIGN
KEY6:    JB P3.5,KEY7
         JB KEY_SIGN,KEYWRONG2
   MOV KEY_WORD,#6
   SETB KEY_SIGN
KEY7:    JB P3.6,KEY8
         JB KEY_SIGN,KEYWRONG2
   MOV KEY_WORD,#7
   SETB KEY_SIGN
KEY8:    JB P3.7,KEY9
         JB KEY_SIGN,KEYWRONG2
   MOV KEY_WORD,#8
   SETB KEY_SIGN
   LJMP KEY9

KEYWRONG2:LJMP KEYWRONG        
   
KEY9:    MOV P3,#11111011B     ;第三行
         JB P3.4,KEY10
   JB KEY_SIGN,KEYWRONG3
   MOV KEY_WORD,#9
   SETB KEY_SIGN
KEY10:   JB P3.5,KEY11
         JB KEY_SIGN,KEYWRONG3
   MOV KEY_WORD,#10
   SETB KEY_SIGN
KEY11:   JB P3.6,KEY12
         JB KEY_SIGN,KEYWRONG3
   MOV KEY_WORD,#11
   SETB KEY_SIGN
KEY12:   JB P3.7,KEY13
         JB KEY_SIGN,KEYWRONG3
   MOV KEY_WORD,#12
   SETB KEY_SIGN
         LJMP KEY13

KEYWRONG3:LJMP KEYWRONG

KEY13:   MOV P3,#11110111B       ;第四行
         JB P3.4,KEY14
   JB KEY_SIGN,KEYWRONG4
   MOV KEY_WORD,#13
   SETB KEY_SIGN
KEY14:   JB P3.5,KEY15
         JB KEY_SIGN,KEYWRONG4
   MOV KEY_WORD,#14
   SETB KEY_SIGN
KEY15:   JB P3.6,KEY16
         JB KEY_SIGN,KEYWRONG4
   MOV KEY_WORD,#15
   SETB KEY_SIGN
KEY16:   JB P3.7,SCAN_END
         JB KEY_SIGN,KEYWRONG4
         MOV KEY_WORD,#16   
   SETB KEY_SIGN
   LJMP SCAN_END

KEYWRONG4: LJMP KEYWRONG

KEYWRONG:CLR KEY_SIGN
SCAN_END:RET

 

RE_DELAY:MOV R7,#5
     DE2:MOV R6,#10
   DE1:MOV R5,#200
      DJNZ R5,$
    DJNZ R6,DE1
    DJNZ R7,DE2
    RET


RX_START:  CLR P2.4                              ;接收红外信号,存入外部扩展寄存器0~256
           CLR P2.6
           CLR P2.7
           CLR P2.2
         CLR TXOUT
         MOV R1,#00H
           MOV R0,#00H
           MOV TMOD,#00010001B
         MOV TH0,#00H
         MOV TL0,#00H
         MOV TH1,#00H
         MOV TL1,#00H
           CLR ET0
         CLR ET1
         CLR EA
         CLR TR0
         CLR TR1
           LJMP RX_MAIN

RX_MAIN: MOV R0,#00H
         JB RXIN,$
         SETB TR0

JUDGE1: JB TF0,RXEND
        JNB RXIN,JUDGE1
      CLR TR0
      SETB TR1
      MOV A,TL0
      MOVX @R0,A
        INC R0
      MOV A,TH0 
      MOVX @R0,A
      INC R0
      MOV TL0,#00H
      MOV TH0,#00H
      INC R1
JUDGE2: JB TF1,RXEND   
      JB RXIN,JUDGE2
      CLR TR1
      SETB TR0
      MOV A,TL1
      MOVX @R0,A
        INC R0
      MOV A,TH1
      MOVX @R0,A
      INC R0
      MOV TL1,#00H
      MOV TH1,#00H
      INC R1
      AJMP JUDGE1

RXEND:  CLR TR0
        CLR TR1
      CLR TF0
      CLR TF1
        MOV TL0,#00H
      MOV TH0,#00H
      MOV TL1,#00H
      MOV TH1,#00H
      MOV GESHU,R1

 


        MOV R1,GESHU                               ;取反转换重新存入外部扩展寄存器
        MOV R0,#00H
LOOP_CPL: MOVX A,@R0
          CPL A
        MOVX @R0,A
        INC R0
          MOVX A,@R0
          CPL A
        MOVX @R0,A
        INC R0
        DJNZ R1,LOOP_CPL
          LJMP ISP_STORE
   
ISP_STORE:   LCALL ISP_ERASE
    


     MOV ISP_DATA,GESHU                         ;将个数输入到ISP_EEPROM的第一位
     MOV ISP_ADDRH,ADDRH
     MOV ISP_ADDRL,ADDRL
     CLR EA
     MOV ISP_CONTR,#WAIT_TIME
     ORL ISP_CONTR,#10000000B
     MOV ISP_CMD,#ISP_CMD_PROGRAM
     MOV ISP_TRIG,#46H
     MOV ISP_TRIG,#0B9H
     NOP


             MOV R1,GESHU      
     MOV R0,#00H
LOOP_WRITE:  LCALL BYTE_WRITE                           ;将扩展寄存器中的计时值依次放入ISP_EEPROM第二位开始的存储器中
             INC R0
     LCALL BYTE_WRITE
     INC R0
     DJNZ R1,LOOP_WRITE

     MOV ISP_CMD,#00H                           ;ISP指令清零,防止误触发
             MOV ISP_TRIG,#00H
             MOV ISP_ADDRH,#00H
             MOV ISP_ADDRL,#00H
             mov p1,geshu

     LJMP KEY_MAIN
    

    

    

BYTE_WRITE:  MOVX A,@R0
             MOV ISP_DATA,A
             MOV ISP_ADDRH,ADDRH
     INC R0
     MOV ISP_ADDRL,R0
     DEC R0
     CLR EA
     MOV ISP_CONTR,#WAIT_TIME
     ORL ISP_CONTR,#10000000B
     MOV ISP_CMD,#ISP_CMD_PROGRAM
     MOV ISP_TRIG,#46H
     MOV ISP_TRIG,#0B9H
     NOP
     RET

ISP_ERASE:   MOV ISP_ADDRH,ADDRH
             MOV ISP_ADDRL,ADDRL
     CLR EA
     MOV ISP_CONTR,#WAIT_TIME
     ORL ISP_CONTR,#10000000B
     MOV ISP_CMD,#ISP_CMD_ERASE
     MOV ISP_TRIG,#46H
     MOV ISP_TRIG,#0B9H
     NOP
     RET

 

 


TX_START:    MOV ISP_ADDRH,ADDRH                        ;取出第一位的个数
             MOV ISP_ADDRL,ADDRL
     CLR EA
     MOV ISP_CONTR,#WAIT_TIME
     ORL ISP_CONTR,#10000000B
     MOV ISP_CMD,#ISP_CMD_READ
     MOV ISP_TRIG,#46H
     MOV ISP_TRIG,#0B9H
     NOP
             MOV ISP_CMD,#00H                           ;ISP指令清零,防止误触发
             MOV ISP_TRIG,#00H
             MOV ISP_ADDRH,#00H
             MOV ISP_ADDRL,#00H

     MOV A,ISP_DATA                             ;为0FF则是错误的,回去,不为0FF则继续
     CJNE A,#0FFH,ISP_READ
     LJMP KEY_MAIN


ISP_READ:   MOV GESHU,ISP_DATA
            MOV R1,GESHU
            MOV R0,#00H
LOOP_READ:  LCALL BYTE_READ
            INC R0
    LCALL BYTE_READ
    INC R0
    DJNZ R1,LOOP_READ
    LJMP TX_EXROM


BYTE_READ:   INC R0
             MOV ISP_ADDRH,ADDRH                      
             MOV ISP_ADDRL,R0
     DEC R0
     CLR EA
     MOV ISP_CONTR,#WAIT_TIME
     ORL ISP_CONTR,#10000000B
     MOV ISP_CMD,#ISP_CMD_READ
     MOV ISP_TRIG,#46H
     MOV ISP_TRIG,#0B9H
     NOP
     MOV A,ISP_DATA
     MOVX @R0,A
     RET
    

 


TX_EXROM:    MOV TMOD,#00010010B
           MOV TH0,#0F4H
           MOV TL0,#0F4H
           MOV R1,GESHU
           MOV R0,#00H
           MOVX A,@R0
           MOV TL1,A
           INC R0
           MOVX A,@R0
           MOV TH1,A
           INC R0
           DEC R1
           MOVX A,@R0
           MOV ZHIL,A
           INC R0
           MOVX A,@R0
           MOV ZHIH,A
           INC R0
           DEC R1

           SETB ET1
           SETB ET0
           SETB EA
           SETB TR1
           SETB TR0       
           CLR TXOUT

MAIN2:CJNE R1,#00H,MAIN2
      CLR TXOUT
      mov p1,#55h
      LJMP KEY_MAIN


T0IN:CPL TXZAI           
     RETI                

T1IN: MOV TL1,ZHIL
      MOV TH1,ZHIH
      JB TR0,NEXTT1      
      SETB TR0
      LJMP NEXTT
NEXTT1:CLR TR0           
       CLR TXZAI         

NEXTT:CPL TXOUT
      MOVX A,@R0
      MOV ZHIL,A
      INC R0
  MOVX A,@R0
      MOV ZHIH,A
      INC R0
  DJNZ R1,OUTTI
      CLR TR1
      CLR TR0            
      CLR TXZAI          
      CLR TXOUT
OUTTI:RETI

DELAYXMS:MOV R7,#255
    DEL1:MOV R6,#4
  DEL2:MOV R5,#5
   DJNZ R5,$
         DJNZ R6,DEL2
   DJNZ R7,DEL1
   RET

DELAYX2MS:MOV R7,#255
    DEL12:MOV R6,#50
  DEL22:MOV R5,#50
 DJNZ R5,$
         DJNZ R6,DEL22
 DJNZ R7,DEL12
   RET


END
 

本站声明: 本文章由作者或相关机构授权发布,目的在于传递更多信息,并不代表本站赞同其观点,本站亦不保证或承诺内容真实性等。需要转载请联系该专栏作者,如若文章内容侵犯您的权益,请及时联系本站删除。
换一批
延伸阅读

9月2日消息,不造车的华为或将催生出更大的独角兽公司,随着阿维塔和赛力斯的入局,华为引望愈发显得引人瞩目。

关键字: 阿维塔 塞力斯 华为

加利福尼亚州圣克拉拉县2024年8月30日 /美通社/ -- 数字化转型技术解决方案公司Trianz今天宣布,该公司与Amazon Web Services (AWS)签订了...

关键字: AWS AN BSP 数字化

伦敦2024年8月29日 /美通社/ -- 英国汽车技术公司SODA.Auto推出其旗舰产品SODA V,这是全球首款涵盖汽车工程师从创意到认证的所有需求的工具,可用于创建软件定义汽车。 SODA V工具的开发耗时1.5...

关键字: 汽车 人工智能 智能驱动 BSP

北京2024年8月28日 /美通社/ -- 越来越多用户希望企业业务能7×24不间断运行,同时企业却面临越来越多业务中断的风险,如企业系统复杂性的增加,频繁的功能更新和发布等。如何确保业务连续性,提升韧性,成...

关键字: 亚马逊 解密 控制平面 BSP

8月30日消息,据媒体报道,腾讯和网易近期正在缩减他们对日本游戏市场的投资。

关键字: 腾讯 编码器 CPU

8月28日消息,今天上午,2024中国国际大数据产业博览会开幕式在贵阳举行,华为董事、质量流程IT总裁陶景文发表了演讲。

关键字: 华为 12nm EDA 半导体

8月28日消息,在2024中国国际大数据产业博览会上,华为常务董事、华为云CEO张平安发表演讲称,数字世界的话语权最终是由生态的繁荣决定的。

关键字: 华为 12nm 手机 卫星通信

要点: 有效应对环境变化,经营业绩稳中有升 落实提质增效举措,毛利润率延续升势 战略布局成效显著,战新业务引领增长 以科技创新为引领,提升企业核心竞争力 坚持高质量发展策略,塑强核心竞争优势...

关键字: 通信 BSP 电信运营商 数字经济

北京2024年8月27日 /美通社/ -- 8月21日,由中央广播电视总台与中国电影电视技术学会联合牵头组建的NVI技术创新联盟在BIRTV2024超高清全产业链发展研讨会上宣布正式成立。 活动现场 NVI技术创新联...

关键字: VI 传输协议 音频 BSP

北京2024年8月27日 /美通社/ -- 在8月23日举办的2024年长三角生态绿色一体化发展示范区联合招商会上,软通动力信息技术(集团)股份有限公司(以下简称"软通动力")与长三角投资(上海)有限...

关键字: BSP 信息技术
关闭
关闭