課程設(shè)計(jì)溫度控制

1、TEMPER_L EQU 36H; 主程序TEMPER_H EQU 35HTEMPER_NUM EQU 33HFLAG1 EQU 0D5HFLAG2 EQU 00HDQ EQU P1.0SkipDS18B20 EQU 0CCHStartDS18B20 EQU 44HReadDs EQU 0BEH ORG 0000H SJMP MAINORG 0003HAJMP TTINT0 ORG 0045HMAIN: MOV SP,#60H CLR EA CLR FLAG2 LCALL RE_CONGIGSETB EASETB IT0SETB EX0TTINT0:LCALL INPUTRETILL: CLR

2、 FLAG2 LCALL GET_TEMPER LCALL TEMPER_COV MOV A,TEMPER_NUM ANL A,#0FH MOV 50H,A MOV A,TEMPER_NUM ANL A,#0F0H SWAP A MOV 51H,A MOV 52H,#10H JNB FLAG2,L1 MOV 52H,#11HL1: MOV 53H,#10H LCALL DISPLAY LCALL DISPLAY LCALL DISPLAY LCALL DISPLAY LJMP LLGET_TEMPER: ; 讀出轉(zhuǎn)換后的溫度值 SETB DQ LCALL InitDS18B20 JB FLAG

3、1,S22 RETS22: LCALL Delay64uS MOV A,#SkipDS18B20 LCALL WriteByteDS18B20 MOV A,#StartByteDS18B20 LCALL WriteByteDS18B20 LCALL DELAY1s LCALL InitDS18B20 JB FLAG1,ABC RETABC: LCALL Delay64uS MOV A,#SkipDS18B20 LCALL WriteByteDS18B20 MOV A,#ReadDs LCALL WriteByteDS18B20 LCALL ReadDs18B20 RET ReadByteDS1

4、8B20: ;從溫度傳感器中讀出一個(gè)字節(jié)的數(shù)據(jù) MOV R2,#8RE1: CLR C SETB DQ NOP NOP CLR DQ NOP NOP NOP SETB DQ MOV R3,#7 DJNZ R3,$ MOV C,DQ MOV R3,#23 DJNZ R3,$ RRC A DJNZ R2,RE1 RETWriteByteDS18B20: ; 溫度傳感器寫(xiě)程序 MOV R2;#8 CLR CWR1: CLR DQ MOV R3,#6 DJNZ R3,$ RRC A MOV DQ,C MOV R3,$ SETB DQ NOP DJNZ R2,WR1 SETB DQ RETReadByt

5、eDS18B20: ;讀兩個(gè)字節(jié)的程序 LCALL ReadByteDS18B20 MOV TEMPER_L,A LCALL ReadByteDS18B20 MOV TEMPER_H,A RETRE_CONFIG: ;重寫(xiě)ds1820暫存存儲(chǔ)設(shè)定值 ;LCALL InitDS18B20 JB FLAG1,RE_CONFIG1RE_CONFIG1: MOV A,#0CCH LCALL WriteByteDS18B20 MOV A,#4EH LCALL WriteByteDS18B20 MOV A,#00H LCALL WriteByteDS18B20 MOV A,#00H LCALL Write

6、ByteDS18B20 MOV A,#7FH LCALL WriteByteDS18B20 RETDelay500US: ; 延時(shí)子程序 MOV R6,#80H DJNZ R6,$ RETDelay64US: MOV R6,#10H DJNZ R6,$ RETDelay1S: MOV B,#130Dela11: PUSH B POP B DJNZ B,Dela11 RETInitDS18B20: ; ds18b20的初始化 CLR DQ MOV R7,#00H DJNZ R7,$ SETB DQ MOV R7,#25H DJNZ R7,$ SETB FLAG11 JNB DQ,TSR5 CLR

7、 FLAG1 LJMP TSR7TSR5: MOV R7,#06BH DJNZ R7,$TSR7: SETB DQ RETTEMPER_COV: ; 讀出溫度的數(shù)據(jù)交換 MOV A,TEMPER_H SUBB A,#0F8H JC TEM0 SETB FLAG2 MOV A,TEMPER_H CPL A MOV TEMPER_H,A MOV A,TEMPER_L CPL A INC A MOV TEMPER_L,ATEM0: MOV A,#0F0H ANL A,TEMPER_L SWP A MOV TEMPER_NUM,A MOV A,TEMPER_L JNB ACC.3,TEMPER_COV

8、1 INC TEMPER_NUMTEMPER_COV1: MOV A,TEMPER_H ANL A,#07H SWAP A ORL A,TEMPER_NUM MOV TEMPEER_NUM,A LCALL BIN_BCD RETBIN_BCD: ;溫度數(shù)據(jù)轉(zhuǎn)換成bcd碼 MOV DPTR,#TEMP_TAB MOV A,TEMPER_NUM MOVC A,A+DPTR MOV TEMPER_NUM,A RETDISPLAY:MOV R0,#50H MOV R2,#4 MOV R3,#0F7H MOV A,R3 LD0:MOV P2,A MOV A,R0 ADD A,#0BH MOVC A,A+

9、PC MOV P0,A ACALL DL1 INC R0 MOV A,R3 PR A MOV R3,A DJNZ R2,LD0 RETTAB:DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H DB 80H,90H,88H,83H,0C6H,0A1H,86H,8EH,FFH,0BFH DL1: MOV R7,#02H DL: MOV R6,#0FFH DL0: DJNZ R6,DL0 DJNZ R7,DL RETTEMP_TAB: DB 00H,01H,02H,03H,04H,05H,06H,07H,08H,09H DB 10H,11H,12H,13H,14H,15

10、H,16H,17H,18H,19H DB 20H,21H,22H,23H,24H,25H,26H,27H,28H,29H DB 30H,31H,32H,33H,34H,35H,36H,37H,38H,39H DB 40H,41H,42H,43H,44H,45H,46H,47H,48H,49H DB 50H,51H,52H,53H,54H,55H,56H,57H,58H,59H DB 60H,61H,62H,63H,64H,65H,66H,67H,68H,69HDB 70H,71H,72H,73H,74H,75H,76H,77H,78H,79HDB 80H,81H,82H,83H,84H,85H

11、,86H,87H,88H,89HDB 90H,91H,92H,93H,94H,95H,96H,97H,98H,99H START: MOV A,#0FFH MOV P1,A MOV A,P1 CPL A MOV R7,P2 JZ START CJNE R7,#1, KEY0 CJNE R7,#2, KEY1 CJNE R7,#4, KEY2 CJNE R7,#8, KEY3 CJNE R7,#16, KEY4 CJNE R7,#32, KEY5 CJNE R7,#64, KEY6 CJNE R7,#128, KEY7 CJNE R7,#129, KEY8 CJNE R7,#130, KEY9

12、CJNE R7,#3, KEY10 JMP STARTKEY0: MOV 40H,#0 JMP STARTKEY1: MOV 40H,#1 JMP STARTKEY2: MOV 40H,#2 JMP STARTKEY3: MOV 40H,#3 JMP STARTKEY4: MOV 40H,#4 JMP STARTKEY5: MOV 40H,#5 JMP STARTKEY6: MOV 40H,#6 JMP STARTKEY7: MOV 40H,#7 JMP STARTKEY8: MOV 40H,#8 JMP STARTKEY9: MOV 40H,#9 JMP STARTKEY10: MOV 40

13、H,#80H JMP STARTCLR CMOV R1, #DATA1MOV A, R1MOV B,#1000HMUL ABMOV DPH, BMOV DPL, AMOV R1, #DATA2MOV A,R1MOV B,#100HMUL ABADD A, DPLMOV A, BADDC A,DPHMOV DPH, ACLR CMOV R1,DATA3MOV A,R1MOV R2, #10HMOV B,R2MUL ABADD A,DPLMOV DPL, AMOV A, BADDC A, DPHMOV DPH, ACLR CMOV R1,DATA4MOV A,R1ADD A,DPLMOV DPL,AMOV A,DPHADDC DPH,0CLR P1.3 CLR P1.2CLR P1.1CLR CMOV R0,DPLMOV R1,DPHSU