【文章內容簡介】 LCALL DELAY3 JB ,KEY1 MOV A,TEMP_TL ADD A,1 DA A MOV TEMP_TL,A CJNE A,99H,J1 MOV TEMP_TL,0 LJMP KEY1。等待按鍵抬起J0: JB ,KEY1 LCALL LOOK_ALARM SJMP J0J1: JB ,KEY1 LCALL LOOK_ALARM SJMP J1LOOK_ALARM: MOV A,TEMP_TH 。加載TH數(shù)據(jù) MOV TEMP_TH,A ANL A,0FH MOV 63H,A MOV A,TEMP_TH ANL A,0F0H SWAP A MOV 64H,A MOV A,TEMP_TL 。加載TL數(shù)據(jù) MOV TEMP_TL ANL A,0FH MOV 65H,A MOV A,TEMP_TL ANL A,0F0H SWAP A MOV 66H,A CALL DISPLAY 。顯示數(shù)據(jù) RET。==========================================================。 顯示子程序。========================================================== DISPLAY: MOV R0,66H MOV R2,4 MOV A,@R0 ORL A,20H MOV P1,A DEC R0 LCALL WAIT MOV A,@R0 ORL A,10H MOV P1,A DEC R0 LCALL WAIT MOV A,@R0 ORL A,80H MOV P1,A DEC R0 LCALL WAIT MOV A,@R0 ORL A,40H MOV P1,A LCALL WAIT RET 。====================================。讀出轉換后的溫度值。====================================GET_TEMPER: SETB DQBCD:LCALL INIT_1820 JB FLAG,S22 LJMP BCDS22:LCALL DELAY1 MOV A,0CCH LCALL WRITE_1820 MOV A,44H LCALL WRITE_1820 NOP LCALL DELAY LCALL DELAYCBA:LCALL INIT_1820 JB FLAG,ABC LJMP CBAABC:LCALL DELAY1 MOV A,0CCH LCALL WRITE_1820 MOV A,0BEH LCALL WRITE_1820 LCALL READ_1820。READ_1820 RET。寫DS18B20的程序WRITE_1820: MOV R2,8 CLR CWR1: CLR DQ MOV R3,6 DJNZ R3,$ RRC A MOV DQ,C MOV R3,23 DJNZ R3,$ SETB DQ NOP DJNZ R2,WR1 SETB DQ RETREAD_1820: MOV R4,2 。將溫度高地位讀出 MOV R1,36H 。地位存入36H RE00: MOV R2,8 RE01: 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,RE01 MOV @R1, A DEC R1 DJNZ R4,RE00 RET 。 將ds18b20中讀出溫度數(shù)據(jù)進行轉換TEMPER_COV:MOV A,0F0H ANL A,TEMPER_L SWAP A MOV TEMPER_NUM,A MOV A,TEMPER_L JNB ,TEMPER_COV1 SETB MOV A,TEMPER_L ANL A,0FH MOV B,100 MUL AB MOV R0,A MOV A,B ANL A,0FH SWAP A MOV B,A MOV A,R0 ANL A,0FH ORL A,B MOV TEMPER_XIAO,A LCALL BIN_BCD1TEMPER_COV1: MOV A,TEMPER_H ANL A,07H SWAP A ORL A,TEMPER_NUM MOV TEMPER_NUM,A LCALL BIN_BCD RETBIN_BCD: MOV DPTR,TEMP_TAB MOV A,TEMPER_NUM MOVC A,@A+DPTR MOV TEMPER_NUM,A RETBIN_BCD1: MOV DPTR,TEMP_TAB MOV A,TEMPER_XIAO MOVC A,@A+DPTR MOV TEMPER_XIAO,A RETTBCD_DISP: MOV A,TEMPER_NUM ANL A,0FH MOV 63H,A MOV A,TEMPER_NUM ANL A,0F0H SWAP A MOV 64H,A MOV A,TEMPER_XIAO ANL A,0FH MOV 65H,A。XIAOSHU MOV A,TEMPER_XIAO ANL A,0F0H SWAP A MOV 66H, A RETTEMP_TAB:DB 00H,01H,02H,03H,04H,05H,06H,07HDB 08H,09H,10H,11H,12H,13H,14H,15HDB 16H,17H,18H,19H,20H,21H,22H,23HDB 24H,25H,26H,27H,28H,29H,30H,31HDB 32H,33H,34H,35H,36H,37H,38H,39HDB 40H,41H,42H,43H,44H,45H,46H,47HDB 48H,49H,50H,51H,52H,53H,54H,55HDB 56H,57H,58H,59H,60H,61H,62H,63HDB 64H,65H,66H,67H,68H,69H,70H,71HDB 72H,73H,74H,75H,76H,77H,78H,79HDB 80H,81H,82H,83H,84H,85H,86H,87HDB 88H,89H,90H,91H,92H,93H,94H,95HDB 96H,97H,98H,99H。DS18B20初始化程序INIT_1820: SETB DQ NOP CLR DQ MOV R0,250TSR1: DJNZ R0,TSR1 SETB DQ MOV R0,07HTSR2: DJNZ R0,TSR2 JB DQ,TSR3 LJMP TSR4TSR3: SETB FLAG LJMP TSR5TSR4: CLR FLAG LJMP TSR7TSR5: MOV R0,06BHTSR6: DJNZ R0,TSR6TSR7: SETB DQ RET 。延時子程序 DELAY: MOV R6,250 MOV R6,250 DJNZ R6,$ RETDELAY1: MOV R7,20H DJNZ R7,$ RETDELAY2: MOV R7,02H DL0: MOV R6,0FFH DL1: DJNZ R6,DL1 DJNZ R7,DL0 RETDELAY3: MOV R7,01FH DLY: MOV R6,0F9H DLY1: DJNZ R6,DLY1 DJNZ R7,