您当前的位置:五五电子网电子知识单片机-工控设备源码-程序STC89C52学习型遥控器源程序 正文
STC89C52学习型遥控器源程序

STC89C52学习型遥控器源程序

点击数:7771 次   录入时间:03-04 11:55:44   整理:http://www.55dianzi.com   源码-程序
    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
 



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


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