【正文】 *********************************************** 西安航空職業(yè)技術(shù)學(xué)院 溫度控制系統(tǒng) 7 READTEMP: LCALL INITDS1820 MOV A,0CCH LCALL WRITEDS1820 MOV R6,34H DJNZ R6,$ MOV A,44H LCALL WRITEDS1820 MOV R6,34H DJNZ R6,$ RET READTEMP1: LCALL INITDS1820 MOV A,0CCH LCALL WRITEDS1820 MOV R6,34H DJNZ R6,$ MOV A,0BEH LCALL WRITEDS1820 MOV R6,34H DJNZ R6,$ MOV R5,09H MOV R0,TEMPHEAD MOV B,00H READTEMP2: LCALL READDS1820 MOV R0,A INC R0
。*********************************************** 。寫 DS1820的程序 ,從 DS18B20中寫一個(gè)字節(jié)的數(shù)據(jù) 。********************************** READDS1820:MOV R7,08H SETB TEMPDIN NOP NOP READDS1820LOOP: CLR TEMPDIN NOP NOP NOP SETB TEMPDIN MOV R6,07H DJNZ R6,$ MOV C,TEMPDIN MOV R6,3CH DJNZ R6,$ RRC A SETB TEMPDIN DJNZ R7,READDS1820LOOP MOV R6,3CH DJNZ R6,$ RET 。******************************** 。 RESET DS18B20 。 子程序區(qū) 。加 CALL D10MS JNB ,$ CLR C MOV 75H,01H MOV A,74H ADDC A,75H MOV 74H,A JNC LS11 MOV A,79H ADDC A,00H MOV 79H,A LS11:JMP KYKK11 KEY22: JB ,KYKK11 。正數(shù)下限 QH: JB ,KEEY2 CALL D10MS JNB ,$ MOV 98H,02H QH1: MOV A,79H MOV A,0FH MOV B,0AH ANL A,B MOV 79H,A 西安航空職業(yè)技術(shù)學(xué)院 溫度控制系統(tǒng) 5 MOV 73H,A MOV A,74H MOV B,10 DIV AB MOV 72H,A MOV 71H,B MOV A,00H ANL A,0FH MOV 70H,A LCALL DISP1 LCALL KEEY11 JB ,KYY11 MOV 75H,01H CALL D10MS JNB ,$ JMP KEE11 KYY11: JB ,QH1 。加 CALL D10MS JNB ,$ MOV 98H,00H MOV 75H,01H MOV A,76H SUBB A,75H MOV 76H,A CJNE A,00H,LSAS1 MOV A,09H ORL A,09H LSAS1: MOV 76H,A JNC LSS1 MOV A,77H SUBB A,00H DA A MOV 77H,A LSS1:JMP KYKKK KYKKK: RET 。下限加減 KEEY1: JB ,KEEY2 。加 CALL D10MS JNB ,$ CLR C MOV 75H,01H MOV A,78H ADDC A,75H MOV 78H,A JNC LS 西安航空職業(yè)技術(shù)學(xué)院 溫度控制系統(tǒng) 4 MOV A,79H ADDC A,00H MOV 79H,A LS: JMP KYKK KEY2:JB ,KYKK 。下限 ANL A,0FH MOV 73H,A MOV A,76H MOV B,10 DIV AB MOV 72H,A MOV A,B MOV 71H,A MOV A,00H ANL A,0FH MOV 70H,A LCALL DISP1 LCALL KEEY1 LCALL QH JB ,KYY MOV 75H,01H CALL D10MS JNB ,$ KEE: MOV P1,00H RET QH11:LJMP QH1 。設(shè)置 MOV 75H,01H CALL D10MS JNB ,$ KKK: MOV A,79H 。 按鍵 。C=0 跳轉(zhuǎn) LJMP SS22 MAN32: CLR C MOV A,79H ANL A,0FH CJNE A,73H,MAX22 MAN22: CLR C MOV A,74H MOV B,10 DIV AB CJNE A,72H,MAX22 MAN12: CLR C MOV A,74H MOV B,10 DIV AB MOV A,B CJNE A,71H,MAX22 SETB JMP SS22 MAX22: JC BJ22 SETB JMP SS22 西安航空職業(yè)技術(shù)學(xué)院 溫度控制系統(tǒng) 3 BJ22: CLR SS22: RET 。 下限比較 。C=0 跳轉(zhuǎn) LJMP SS MAN3: CLR C MOV A,79H ANL A,0FH CJNE A,73H,MAX MAN2: CLR C MOV A,78H MOV B,10 DIV AB CJNE A,72H,MAX MAN1: CLR C MOV A,78H MOV B,10 西安航空職業(yè)技術(shù)學(xué)院 溫度控制系統(tǒng) 2 DIV AB MOV A,B CJNE A,71H,MAX CLR JMP SS MAX: JC BJ CLR JMP SS BJ: SETB SS: RET 。 升降溫 。************************************************************ MAIN: LCALL DISP1 JNB TIME1SOK,MAIN CLR TIME1SOK JNB TEMPONEOK,MAIN2 LCALL READTEMP1 LCALL CONVTEMP LCALL DISPBCD LCALL DISP1 MAIN2: LCALL READTEMP SETB TEMPONEOK LCALL KEY LCALL SHENGJIANG MOV A,98H SUBB A,01H JNC LJL LCALL SHENGJIANG1 LJMP MAIN LJL: LCALL SHENGJIANG2 LJMP MAIN 。************************************************************ 。 定時(shí)器 0中斷程序 。************************************************************ ORG 0100H START: MOV SP,60H CLSMEM: MOV R0,20H MOV R1,60H CLSMEM1: MOV R0,00H INC R0 DJNZ R1,CLSMEM1 MOV TMOD,00100001B MOV TH0,TIMEH MOV TL0,TIMEL SJMP INIT ERROR: NOP LJMP START NOP INIT: NOP SETB ET0 SETB TR0 SETB EA MOV PSW,00H CLR TEMPONEOK MOV 79H,0AH MOV 78H,28 MOV 77H,0BH MOV 76H,025 MOV 74H,20 西安航空職業(yè)技術(shù)學(xué)院 溫度控制系統(tǒng) 1 MOV 98H,00H MOV P1,00H LJMP MAIN 。************************************************************ 。 中斷向量區(qū) 。TEMPDIN BIT 。 引腳定義 。*********************************************************** BITST DATA 20H TIME1SOK BIT TEMPONEOK BIT TEMPL