基于單片機的豆?jié){機-資料下載頁
2025-01-18 14:53本頁面
【正文】 3CH MOV TL0,0B0H SETB EA SETB ET0 JB SB1,$ CALL D15MS CALL D15MS JNB SB1,$PDBJ: JNB K1,BJ1 MOV 46H,2BJ4: SETB CALL D1S CLR CALL D1S DJNZ 46H,BJ4 LJMP PDBJBJ1: CLR SETB TRO CLR LED；****主程序****MAIN1: CALL DS18B20 CLR JR CJNE R2,80,L1L1: JC MAIN1 CLR JR MOV 40H,5Q3: SETB DJ CALL D15S CLR DJ CALL D5S DJNZ 40H,Q3 MOV 44H,5S2: SETB JR JB K2,$ CLR JR CALL D20S DJNZ 44H,S2 CALL D10S MOV 46H,2S4: SETB CALL D1S CLR CALL D1S DJNZ 46H,S4L3: SETB JRL4: CALL DS18B20 CJNE R2,80,L2L2: JNC L3 CLR JR JMP L4；****定時中斷子程序****TIME: PUSH ACC MOV TH0,3CH MOV TL0,0B0H JNB K1,TIME1 JNB SB1,TIME2 POP ACC RETITIME1: CLR TR0 MOV A,0 PUSH ACC PUSH ACC RETITIME2: CALL D15MS CALL D15MS JNB SB1,$ CLR TR0 MOV A,0 PUSH ACC PUSH ACC RETI。****溫度傳感器子程序****DS18B20:CALL CSH CALL SZ CALL DSZ CALL WH RETCSH: SETB DQ NOP CLR DQ MOV 70H,150 DJNZ 70H,$ SETB DQ MOV 70H,150D1: MOV 71H,200D2: JNB DQ,CSH1 DJNZ 71H,D2 DJNZ 70H,D1 CLR BZW JMP CSH2CSH1: SETB BZW MOV 70H,240 DJNZ 70H,$CSH2: SETB DQ RETSZ: JB BZW,SZ1 RETSZ1: MOV A,0CCH CALL X18B20 MOV A,4EH CALL X18B20 MOV A,0 CALL X18B20 MOV A,0 CALL X18B20 MOV A,1FH CALL X18B20 RETDSZ: SETB DQ CALL CSH JB BZW,DSZ1 RETDSZ1: MOV A,0CCH CALL X18B20 MOV A,44H CALL X18B20 CALL CSH MOV A,0CCH CALL X18B20 MOV A,0BEH CALL X18B20 CALL D18B20 RETX18B20: MOV 73H,8 CLR CX1: CLR DQ MOV 70H,7 DJNZ 70H,$ RRC A MOV DQ,C MOV 70H,23 DJNZ 70H,$ SETB DQ DJNZ 73H,X1 RETD18B20: MOV R1,79H MOV 74H,2X2: MOV 75H,8X3: CLR C CLR DQ SETB DQ MOV C,DQ MOV 70H,23 DJNZ 70H,$ RRC A DJNZ 75H,X3 MOV @R1,A DEC R1 DJNZ 74H,X2 RETWH: MOV A,0F0H ANL A,79H SWAP A MOV R2,A MOV A,07H ANL A,78H SWAP A ORL A,R2 MOV R2,A RET；****延時子程序****D1S: MOV 70H,250DD1: MOV 71H,200DD2: MOV 72H,10 DJNZ 72H,$ DJNZ 71H,DD2 DJNZ 70H,DD1 RETD15S: MOV 70H,250DD4: MOV 71H,200DD3: MOV 72H,150 DJNZ 72H,$ DJNZ 71H,DD3 DJNZ 70H,DD4 RETD10S: MOV 70H,250DD6: MOV 71H,200DD5: MOV 72H,100 DJNZ 72H,$ DJNZ 71H,DD5 DJNZ 70H,DD6 RETD5S: MOV 70H,250DD8: MOV 71H,200DD7: MOV 72H,50 DJNZ 72H,$ DJNZ 71H,DD7 DJNZ 70H,DD8 RETD20S: MOV 70H,250DD0: MOV 71H,200DD9: MOV 72H,200 DJNZ 72H,$ DJNZ 71H,DD9 DJNZ 70H,DD0 RETD15MS: MOV 70H,250D0: MOV 71H,30 DJNZ 71H,$ DJNZ 70H,D0 RET END
畢業(yè)設計相關推薦
鄂ICP備17016276號-1