片機數(shù)字溫度計-資料下載頁
2025-01-06 15:57本頁面
【正文】 取出高四位 SWAP A MOV TEMPL,A MOV A,TEMPH 。取出低四位 ANL A,0FH SWAP A ORL A,TEMPL 。重新組合 MOV TEMP_ZH,A MOV B,100 。十六進制 BCD DIV AB 。B= A % 100 MOV TEMPHH,A 。TEMPHH = 百位數(shù) TEMPC3: MOV A,10 XCH A,B DIV AB 。B = A % B MOV TEMPHL,A 。TEMPHL = 十位數(shù) BCD MOV TEMPLH,B 。TEMPLH = 個位數(shù) BCD RET 。========================================================== 。 LED 顯示子程序 (已修改） 。========================================================== LED_DISP: LCALL LED_BCD MOV R0,01H MOV R1,29H 。待輸出數(shù)據(jù)，百位 MOV R2,02H 。連續(xù)輸出百位和十位 MOV DPTR,TAB2 LED_DISP0: MOV P2,00H 。百位 MOV A,@R1 MOVC A,@A+DPTR SETB MOV P0,A 中國礦業(yè)大學(xué)電氣信息電子綜合設(shè)計 23 MOV A,R0 MOV P2,A RL A MOV R0,A LCALL DELAY CLR 。延時 5mS INC R1 MOV P2,00H 。十位 MOV A,@R1 MOVC A,@A+DPTR SETB MOV P0,A MOV A,R0 MOV P2,A RL A RL A MOV R0,A LCALL DELAY CLR 。延時 5mS INC R1 MOV P2,00H MOV DPTR,TAB1 。輸出個位 MOV A,@R1 MOVC A,@A+DPTR MOV P0,A SETB LCALL DELAY 。延時 5mS CLR INC R1 MOV P2,00H 。輸出小數(shù)部分 MOV A,@R1 MOV DPTR,TAB2 MOVC A,@A+DPTR SETB MOV P0,A MOV A,R0 MOV P2,A LCALL DELAY 。延時 5mS CLR 中國礦業(yè)大學(xué)電氣信息電子綜合設(shè)計 24 RET 。 。 個位部分碼表 (共陰極） 。 TAB1: DB 02H 9EH 24H 0CH 98H DB 48H 40H 1EH 00H 08H TAB0: DB 0FFH 0FEH 0FEH 0FDH 0FCH 0FCH 0FBH 0FBH DB 0FAH 0F9H 0F9H 0F8H 0F7H 0F7H 0F6H 0F6H 。 。小數(shù)、十位、百位、符號等碼表 (共陰極） 。 TAB2: DB 03H 9FH 25H 0DH 99H 49H 41H DB 1FH 01H 09H 0FDH 0FFH 0FFH 0FFH 。 ( H L 熄滅 ) 。 ( 0A 0B 0C 0D ) 。 。 符號的顯示位置調(diào)整程序 （已修改） 。 LED_BCD: MOV A,TEMPHH JZ LED_BCD1 。百位為零，轉(zhuǎn)移 RET 。百位不為零，返回 LED_BCD1: MOV A,TEMPHL JZ LED_BCD3 。十位為零，轉(zhuǎn)移 JB SIGN,LED_BCD2 。溫度零下，轉(zhuǎn)移 MOV TEMPHH,0DH 。溫度大于零且為兩位數(shù)，百位熄滅 SJMP LED_BCD5 LED_BCD2: MOV TEMPHH,0AH 。溫度小于零且為兩位數(shù)，百位顯示負號 SJMP LED_BCD5 LED_BCD3: MOV TEMPHH,0DH 。溫度小于 10，百位熄滅 JB SIGN,LED_BCD4 。溫度零下，轉(zhuǎn)移 MOV TEMPHL,0DH 。溫度大于零且小于 10 ，十位熄滅 SJMP LED_BCD5 LED_BCD4: MOV TEMPHL,0AH 。溫度小于零且為一位數(shù)，十位顯負號 LED_BCD5: RET 。 BEEP_BL: 中國礦業(yè)大學(xué)電氣信息電子綜合設(shè)計 25 MOV R6,20 BL2: CALL DEX1 CPL BEEP DJNZ R6,BL2 RET DEX1: MOV R7,180 DE2: NOP DJNZ R7,DE2 RET 。 DELAY: 。延時 5MS MOV R6,10 DL2: MOV R7,100 DJNZ R7,$ DJNZ R6,DL2 RET 。================================================ END
公司管理相關(guān)推薦
鄂ICP備17016276號-1