WIRTE_BYTE: MOV R3,#8H
LOOP: RL A
SETB SDA
JB ACC.0,NET
CLR SDA
NOP
NET: SETB SCL
NOP
CLR SCL
DJNZ R3,LOOP
SETB SDA
NOP
JNB SDA,CANNEXT ;检查是否有应答
SETB 20H.4
CANNEXT: SETB SCL
NOP
CLR SCL
RET
;-------------------------------------------------------------------------
READ_BYTE: SETB SDA
MOV R3,#8H
LOOP1: RL A
SETB ACC.0
JB SDA,CONT
CLR ACC.0
CONT: SETB SCL
NOP
CLR SCL
DJNZ R3,LOOP1
RET
;---------------------------------------------------------------------------
START_BIT: SETB SDA
NOP
SETB SCL
NOP
CLR SDA
NOP
CLR SCL
RET
;----------------------------------------------------------------------------
STOP_BIT: CLR SDA
NOP
SETB SCL
NOP
SETB SDA
NOP
CLR SCL
RET
;-----------------------------------------------
DELAY: MOV 4EH,#0FFH
DEL5: MOV 4DH,#0FFH
DEL4: DJNZ 4DH,DEL4
DJNZ 4EH,DEL5
RET
END
;********************************************************
;数字信号发生器
;********************************************************
ORG 00H
AJMP MAIN
ORG 0BH
AJMP TR0EA
ORG 1BH
AJMP TR1EA
MAIN:
MOV P1,#0FFH
MOV R0,#00H
MOV TMOD,#11H
MOV TH0,#0DBH
MOV TL0,#0EFH
MOV TH1,#0ECH
MOV TL1,#07DH
MOV A,#0FAH
SETB EA
SETB ET0
上一页 [1] [2] [3] [4] [5] [6] [7] [8] 下一页
本文关键字:分析仪 自动控制-单片机,电子制作 - 自动控制-单片机