采用stc89c52单片机的红外学习型遥控器汇编代码

    MOV  A,R1
    MOV  LRDBUF,A                      ;代码个数缓冲
    RET        
;@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
;@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
LRD1SEND:
    CLR  EA
    MOV  R1,LRDBUF
    MOV  R0,#LRDBUF
    MOV  A,R1
    JZ    LRD_END
    SUBB  A,#101  ;72
    JNC  LRD_END
    CLR  EA
    MOV  TH1,#0

     LRD1OUTLOOP:
    CLR  TR1
    INC  R0
    MOV  A,@R0
    CPL  A
    MOV  TL1,A   
    INC  R0
    MOV  A,@R0
    CPL  A
    MOV  TH1,A
    SETB  TR1         
    CLR  TF1
;--------------------------------------
  LRD1CONT:
    CPL  LRD1
    NOP
    NOP
    NOP
    NOP
    NOP
    NOP
    NOP
    NOP
    NOP
    NOP                                ;发送红外波形  38K Hz
    JNB  TF1,LRD1CONT              ;红外前导代码               
    CLR  LRD1   
    DJNZ  R1,SEND_DATA
    LJMP  LRD_END

     SEND_DATA:
;--------------------------------------
 
    CLR  TR1
    INC  R0
    MOV  A,@R0
    CPL  A
    MOV  TL1,A   
    INC  R0
    MOV  A,@R0
    CPL  A
    MOV  TH1,A
    SETB  TR1
    CLR  TF1
    DJNZ  R1,OUT_1_CODE

   
 LRD_END:
    CLR  TR1
    CLR  TF1
    SETB  EA
    RET
 OUT_1_CODE:
    JNB  TF1,$          ;红外代码
;--------------------------------------
    LJMP  LRD1OUTLOOP
    RET          ;取下一个代码
;==========================================================
;@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@

   
DELAY:
      MOV  R7,#200
DEL_L:
      MOV  R6,#30
      DJNZ  R6,$
      DJNZ  R7,DEL_L
      RET
     
DELY_2:
            MOV    R7,#250
DEL_2:       
          LJMP    DELAY
          DJNZ    R7,DEL_2
          MOV    R7,#250
DEL_3:    LJMP    DEL_2
          DJNZ    R7,DEL_3
          RET

上一页  [1] [2] [3] 

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