【文章內容簡介】 G 13H LJMP CH451_INT1 ORG 100HSTART: MOV SP,6FH MOV P2,11001111B 。MOV TIMER,50 MOV TIMER,5START_DELAY: 。MOV TIMER1,255 MOV TIMER1,25START_DELAY1: DJNZ TIMER1,START_DELAY1 DJNZ TIMER,START_DELAY MOV DATA_OUT,00010101B。復位，下降沿，CS低電平有效 CALL SEND SETB CS ACALL DELAY_1S CLR IT1 。置外部中斷信號為低電平觸發(fā) SETB EX1 。允許鍵盤中斷 SETB EA 。開總中斷。***************************************************************** 。CS無效MAIN: MOV 20H,0 MOV DATA_KEY,0 。MOV DATA_OUT,00010101B 。 CALL SEND MOV A,28H MOV B,29H MOV TEN,A MOV DATA_OUT,10100001B CALL SEND MOV DATA_OUT,10100001B CALL SEND MOV DATA_OUT,10000001B 。下載，譯碼指令 CALL SEND MOV DATA_OUT,TEN 。十位數(shù)字 CALL SEND MOV DATA_OUT,10000000B 。下載和譯碼 CALL SEND MOV DATA_OUT,B 。發(fā)個位 CALL SEND SETB CS。***********鍵盤判斷*****************************WAIT: JNB 00H,WAIT CLR 00H MOV A,DATA_KEYUKEY1: JNB KEY_18B20,UKEY2 CALL RECEIVE 。MOV DATA_IN,15 SETB CS 。MOV B,10 。MOV A,DATA_IN 。DIV AB JMP MAINUKEY2: CJNE A,2,UKEY3 CALL DS1302_Measurement AJMP MAINUKEY3: AJMP MAIN。*****************************************************************************SEND: MOV BIT_COUNT,8 CLR CS CALL LONG_DELAYSEND_LOOP: MOV 21H,26H MOV C, 。1 MOV DAT,C SETB CLK 。CLK MOV A,DATA_OUT 。 RL A MOV DATA_OUT,A CALL SHORT_DELAY 。 CLR CLK 。CLK CALL SHORT_DELAY 。 DJNZ BIT_COUNT,SEND_LOOP 。8 CLR DAT 。 RET。******************************************* 。7279接受數(shù)據。*******************************************RECEIVE: MOV BIT_COUNT,8 LCALL INIT_18B20 LCALL GET_TEMPER。**********DS18B20復位程序*****************INIT_18B20: SETB DQ NOP CLR DQ MOV R0,0FBHTSR1: DJNZ R0, TSR1 。延時 SETB DQ MOV R0, 25HTSR2: JNB DQ , TSR3 DJNZ R0, TSR2TSR3: SETB FLAG1 。置標志位，表明DS18B20存在 。CLR 。二極管指示 AJMP TSR5TSR4: CLR FLAG1 LJMP TSR7TSR5: MOV R0,06BHTSR6: DJNZ R0,TSR6TSR7: SETB DQ 。表明不存在 RET。*****************讀轉換后的溫度值****************GET_TEMPER: SETB DQ LCALL INIT_18B20 JB FLAG1,TSS2 RET 。若不存在則返回TSS2: MOV A,0CCH 。跳過ROM LCALL WRITE_18B20 MOV A,44H 。發(fā)出溫度轉換命令 LCALL WRITE_18B20 。LCALL DISPLAY 。延時 。LCALL INIT_18B20 MOV A,0CCH 。跳過ROM LCALL WRIT