燃气灶智能控制器总程序.docVIP

燃气灶智能控制器设计总程序如下： DATAL DATA 30H DATAH DATA 31H TDATAL DATA 32H TDATAH DATA 33H SO BIT P2.2 SCK BIT P2.1 CS BIT P2.0 RS BIT P3.5 RW BIT P3.6 E BIT P3.7 ORG 0000H START: MOV SP,#50H MOV P1,#01H lCALL ENABLE MOV P1, #03H lCALL ENABLE MOV P1, #38H lCALL ENABLE MOV P1,#0CH lCALL ENABLE MOV P1,#06H lCALL ENABLE MOV P1,#0C0H lCALL ENABLE MOV DPTR,#TABLE1 lCALL WRITE1 MOV P1,#0C5H lCALL ENABLE WAIT: lCALL READY lCALL D16T12 lCALL DIV_2BYTE PROC: MOV A,34H lCALL WRITE0 MOV A,35H lCALL WRITE0 MOV A,36H lCALL WRITE0 MOV A,37H lCALL WRITE0 lCALL DELAY1 LCALL JIANPAN SJMP WAIT READY: PUSH ACC PUSH B PUSH 01H CLR CS NOP NOP NOP NOP SETB SCK NOP NOP NOP NOP CLR SCK NOP NOP NOP NOP MOV R2,#08H READH: MOV C,SO RLC A SETB SCK NOP NOP NOP NOP CLR SCK NOP NOP NOP NOP DJNZ R2,READH MOV DATAH,A MOV R2,#08H READL: MOV C,SO RLC A SETB SCK NOP NOP NOP NOP CLR SCK NOP NOP NOP NOP DJNZ R2,READL MOV DATAL,A SETB CS POP 01H POP B POP ACC RET D16T12:PUSH ACC PUSH B PUSH 01H MOV A,DATAH RLC A SWAP A MOV B,A ANL A,#0FH MOV TDATAH,A MOV A,B ANL A,#0F0H MOV B,A MOV A,DATAL CLR C RLC A MOV 0F4H,C ANL A,#0F0H SWAP A ORL A,B MOV TDATAL,A MOV A,TDATAH ANL A,#0FH CLR C RRC A MOV TDATAH,A MOV A,TDATAL RRC A MOV TDATAL,A MOV A,TDATAH ANL A,#0FH CLR C RRC A MOV TDATAH,A MOV A,TDATAL RRC A MOV TDATAL,A POP 01H POP B POP ACC RET DIV_2BYTE: PUSH ACC PUSH B PUSH 01H MOV R5,TDATAH MOV R4,TDATAL MOV R3,#03H MOV R2,#0E8H LCALL DIV_2BYT MOV 34H,R4 MOV A,R7 MOV R5,A MOV A,R6 MOV R4,A MOV R3,#0 MOV R2,#100 LCALL DIV_2BY