STC单片机学习型遥控器程序

         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
          MOV X @R0,A
        INC R0
          MOV  A,TH0    
          MOV X @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
          MOV X @R0,A
        INC R0
          MOV  A,TH1
          MOV X @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:  MOV X A,@R0
          CPL A
            MOV X @R0,A
           INC R0
           MOV X A,@R0
          CPL A
            MOV X @R0,A
           INC R0
           DJNZ R1,LOOP_CPL

上一页  [1] [2] [3] [4] [5] [6]  下一页

本文关键字：单片机  程序  遥控器  学习型  STC单片机(，单片机-工控设备 - STC单片机(