STC89C52学习型遥控器源程序

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