.
MOV TH1,#0FFH SETB PI1 SETB TR1 SETB ET1 RET 采样子程序
SWAP: MOV R0,#20H SAW1: MOV DLY: DJNZ R2,DLY ;HERE: JB 数字滤波
CMP1: JNC CMP2: MOV
CMP3: JC
CMP4: MOV
.
MOV R1,#03H
DPTR,#7FF8H
MOVX @DPTR A ；A/D转化 MOV R2,#20H
延时
P3.3 ,HERE
MOV DPTR,#7FF8H
MOVX A,@DPTR ；读转化结果MOV @R0,A INC R0
DJNZ R1,SAM1
RET
FILTER: MOV A, 20H CJNE A,2DH CMP1 AJMP CMP2
CMP2 XCH A,2DH XCH A,2CH
A,2DH
CJNE A,22EH,CMP3 MOV 2AH,A AJMP RR
CMP4
MOV 2AH,A AJMP RR
A,2EH
CJNE A,2CH,CMP5
.
MOV
CMP5: JC
2AH ,A CMP6
AJMP RR
XCH A,2CH
CMP6: MOV 2AH,A RR: RET T1中断
PIT1: CLR GG: CLR
GGG:
.
00H
JB
20H, GGG SETB P1.0 PT1
RETI
SETB P1.1 CLR
20H
AJMP GG
；关闭电炉 ；关闭风扇
