智能溫度測量儀表課程設(shè)計報告(編輯修改稿)
2025-08-16 01:41 本頁面
【文章內(nèi)容簡介】 MAIN_INIT LCALL UART1_INIT LCALL ADC_INITAAA: LCALL SCANFKEYV LCALL DISPLAY SJMP AAAMAIN_INIT: MOV SP,70H MOV QIAN,00H MOV BAI,00H MOV SHI,00H MOV GEWEI,00H MOV COUNT,00H MOV KEYVALUE,00H MOV TEMPMH,00H MOV TEMPML,00H MOV TEMPMMH,00H MOV TEMPMML,00H RETUART1_INIT: MOV AUXR,11H MOV BRT,0FDH MOV SCON,50H MOV PCON,00H SETB EA SETB ES RETSCANFKEYV: MOV P1,0FFH MOV A,P1 CJNE A,0FDH,KEYS2 LCALL DELAY10MS MOV A,P1 CJNE A,0FDH,KEYS2 SETB EADC SJMP NOKEYKEYS2: CJNE A,0EFH,KEYS3 LCALL DELAY10MS MOV A,P1 CJNE A,0EFH,KEYS3 CLR EADC SJMP NOKEYKEYS3: CJNE A,0DFH,KEYS4 LCALL DELAY10MS MOV A,P1 CJNE A,0DFH,KEYS4 CLR CLR EA MOV R7,04HA21: MOV A,01H MOV SBUF,A JNB TI,$ CLR TI DJNZ R7,A21 SETB EA SJMP NOKEYKEYS4: CJNE A,0BFH,NOKEY LCALL DELAY10MS MOV A,P1 CJNE A,0BFH,NOKEY SETB CLR EA MOV R7,04HA22: MOV A,02H MOV SBUF,A JNB TI,$ CLR TI DJNZ R7,A22 SETB EA SJMP NOKEYNOKEY: RETADC_INIT: MOV P1ASF,01H MOV ADC_RES,00H MOV ADC_RESL,00H MOV AUXR1,04H MOV ADC_CONTR,088H LCALL DELAY10MS 。SETB EADC RETTONGXIN: CLR RI MOV A,SBUF CJNE A,46H,COMPEND SETB EADCCOMPEND: CJNE A,47H,STAR1 CLR EADCSTAR1: CJNE A,51H,STAR2 CLR STAR2: CJNE A,03H,END1 CLR END1: CJNE A,54H,END2 SETB END2: CJNE A,04,OUTTONGXIN SETB OUTTONGXIN: RETIADC_ISR: PUSH PSW PUSH ACC INC COUNT ANL ADC_CONTR,0EFH MOV TEMPMH,ADC_RES MOV TEMPML,ADC_RESL CLR C MOV A,TEMPMML ADD A,TEMPML MOV TEMPMML,A MOV A,TEMPMMH ADDC A,TEMPMH MOV TEMPMMH,A MOV A,COUNT CJNE A,20H,OUT0 MOV COUNT,00H MOV R6,TEMPMMH MOV R7,TEMPMML MOV R4,00H MOV R5,20H LCALL DBDIV MOV TEMPMH,5FH MOV TEMPML,5CH MOV TEMPMMH,00H MOV TEMPMML,00H LCALL CONVERT MOV R7,4 MOV R0,60HSENDTEMP: MOV A,@R0 MOV SBUF,A JNB TI,$ CLR TI INC R0 DJNZ R7,SENDTEMP MOV R4,240A12: DJNZ R4,A11 SJMP OUT0A11: LCALL SCANFKEYV LCALL DISPLAY SJMP A12OUT0: ORL ADC_CONTR,08H POP ACC POP PSW RETI CONVERT: MOV R2,TEMPMH MOV R3,TEMPML MOV R6,03H MOV R7,0E8H LCALL DBMUL MOV R3,56H MOV R4,57H MOV R5,58H MOV R2,04H MOV R1,00H LCALL TDSDIV MOV R6,5BH MOV R7,5AH MOV R4,03H MOV R5,0E8H LCALL DBDIV MOV QIAN,5CH MOV R6,5DH MOV R7,5EH MOV R4,00H MOV R5,64H LCALL DBDIV MOV BAI,5CH MOV R6,5DH MOV R7,5EH MOV R4,00H MOV R5,0AH LCALL DBDIV MOV SHI,5CH MOV GEWEI,5EH OUT: RET DBMUL: MOV A,R3 MOV B,R7 MUL AB XCH A,R7 MOV R5,B MOV B,R2 MUL AB ADD A,R5 MOV R4,A CLR A ADDC A,B MOV R5,A MOV A,R6 MOV B,R3 MUL AB ADD A,R4 XCH A,R6 XCH A,B ADDC A,R5 MOV R5,A MOV F0,C MOV A,R2 MUL AB ADD A,R5 MOV R5,A CLR A MOV ,C MOV C,F0 ADDC A,B MOV R4,A MOV 56H,R7 MOV 57H,R6 MOV 58H,R5 MOV 59H,R4 RET TDSDIV: CLR C MOV 30H,0 MOV 31H,0 MOV 32H,0 TDSDIV_LOOP: CLR C MOV A,R3 SUBB A,R1 MOV R3,A MOV A,R4 SUBB A,R2 MOV R4,A MOV A,R5 SUBB A,0 MOV R5,A JC TDSDIV_END _INC_SHANG:
職業(yè)教育相關(guān)推薦
鄂ICP備17016276號-1