智能电表集中抄表系统入户子系统 第18页
MOV R2,#08H
MOV A,@R0
XGS3: RRC A
MOV IO,C
NOP
SETB SCLK
NOP
CLR SCLK
DJNZ R2,XGS3
RET
XGS4: INC R3
INC R3
INC R0
ACALL XGS1
DJNZ R1,XGS4
MOV R0,#3AH
MOV @R0,#80H
MOV R3,#8EH
ACALL XGS1
CLR C
CLR RST
RET
DQSJ: CLR RST
NOP
CLR SCLK
NOP
SETB RST
MOV R0,#33H
MOV R3,#81H
MOV R1,#07H
MOV R2,#08H
DQS: MOV A,#00H
DQS1: CLR SCLK
NOP
MOV C,IO
NOP
RRC A
SETB SCLK
DJNZ R2,DQS1
MOV R2,#08H
MOV @R0,A
INC R0
INC R3
INC R3
DJNZ R1,DQS
CLR C
CLR RST
RET
FSSJ: SETB RS1
MOV DPTR,#0401H
MOVX A,@DPTR
MOV R1,A
MOV R2,#01H
FSS1: MOV DPH,#1FH
MOV DPL,R2
MOVX A,@DPTR
XRL A,#01H
JZ FSS2
SETB TB8
MOV A,R2
MOV SBUF,A
JNB TI,$
CLR TI
CLR TB8
MOV A,3CH
MOV SBUF,A
JNB TI,$
CLR TI
NOP
www.751com.cn
CLR CY
SUBB A,#80H
JNC FSD1
INC DPH
FSD1: MOV DPL,R2
MOVX A,@DPTR
MOV SBUF,A
JNB TI,$
CLR TI
NOP
INC DPL
MOVX A,@DPTR
MOV SBUF,A
JNB TI,$
CLR TI
AJMP FSS2
FSYF: JNB RI,$
MOV A,38H
MOV SBUF,A
JNB TI,$
CLR TI
AJMP FSS2
FSS2: INC R2
DJNZ R1,FSS1
CLR RS1
RET
JZZH: CLR C
MOV A,@R0
SUBB A,#0E8H
INC R0
MOV @R0,A
MOV A,@R1
SUBB A,#03H
INC R1
MOV @R1,A
JC XY1000
INC R2
MOV 42H,@R0
MOV R0,#42H
MOV 40H,@R1
MOV R1,#40H
AJMP JZZH
XY1000: DEC R0
DEC R1
MOV A,R2
SWAP A
MOV R2,A
JZZ1: CLR C
MOV A,@R0
SUBB A,#64H
INC R0
<< 上一页 [11] [12] [13] [14] [15] [16] [17] [18] [19] [20] 下一页