【正文】 000H MOV A，DPTR CMP A，30H JNZ MAIN MOV @R0,A ；存貯 INC R0 INC PRECNT MOV A,DPH RR A ；求下一個(gè)顯示位地址 MOV DPH,A PUSH DPH ；保護(hù)下一位顯示地址 PUSH DPL RETI ；中斷返回顯示產(chǎn)品數(shù)字程序：DISPLAY： MOV A,LED1 ；取要顯示的數(shù) MOV DPTR,SEGTBL MOVC A,@A+DPTR ；取顯示碼 MOVX @DPTR,A MOV DPTR,LEDADD1 ；顯示百位 MOVX @DPTR,A MOV A,LED2 MOV DPTR,SEGTBL MOVC A,@A+DPTR MOV DPTR,8001H MOVX @DPTR,A MOV DPTR,LEDADD2 ；顯示十位 MOV @DPTR,A MOV A,LED3 MOV DPTR,SEGTBL MOVC A,@A+DPTR MOV DPTR,8001H MOVX @DPTR,A MOV DPTR,LEDADD3 ；顯示個(gè)位 MOVX @DPTR,A RETSEGTBL： DB 3FH, 06H, 5BH,4FH, 66H, 6DH, 7DH, 07H, 7FH, 67H ；產(chǎn)品加1子程序：PORTADD1： MOV R0,LED3 MOV A,@R0 ；顯示個(gè)位數(shù) ADD A,01H ；個(gè)位加1 DA A ；BCD碼調(diào)整 JB 24H,ADD5 ；不等于個(gè)位所表示的最大數(shù)則轉(zhuǎn) RET ；返回主程序ADD5： CLR 14H ；個(gè)位的進(jìn)位清零 DEC R0 ；顯示十位數(shù) MOV A, @R0 ADD A,01H ；十位加1 DA A ；BCD碼調(diào)整 JB 1CH,ADD6 ；不等于十位所表示的最大數(shù)則跳轉(zhuǎn) RET ；返回主程序ADD3： CLR 1CH ；十位的進(jìn)位清零 DEC R0 ；顯示百位數(shù) MOV A,@R0 ADD A,01H ；百位加1 DA A ；BCD碼調(diào)整 JB 14H,ADD4 ；不等于百位所表示的最大數(shù)則轉(zhuǎn)移 RETADD4： CLR 24H ；清百位進(jìn)位 MOV R0,00H RET產(chǎn)品數(shù)比較子程序：PORTCOMP： MOV R0,PARTS MOV R1,LED1 ；百位數(shù)送R1 CJNE R2,03H ；比較3次COMP1： MOV A,@R0 MOV BUFF,@R1 ；保存給定值 CJNE A,BUFF,COMP2 ；兩者不相同則跳轉(zhuǎn) INC R0 ；產(chǎn)品數(shù)十位 INC R1 ；給定值十位 DJNZ R2,COMP1 SETB 08H ；產(chǎn)品標(biāo)志單元 RETCOMP3： CLR 08H ；清產(chǎn)品標(biāo)志單元 RETCOMP2： JNC COMP3 ；判斷有無進(jìn)位標(biāo)志 LJMP ALARM ；有進(jìn)位則報(bào)警產(chǎn)品加1子程序： BOXADD1： MOV R0,BOX3 MOV A,@R0 ADD A,01H ；包裝箱個(gè)位加1 DA A ；BCD碼調(diào)整 JB 3CH,ADD2 ；不大于個(gè)位顯示最大值則跳轉(zhuǎn) RETADD2： CLR 14H DEC R0 ；十位數(shù)加1 MOV A, @R0 ADD A,00H DA A ；BCD碼調(diào)整 JB 34H,ADD3 RETADD3： CLR 2CH ；清百位進(jìn)位 DEC R0 ；百位比較 MOV A,@R0 ADD A,00H DA A ；BCD碼調(diào)整 JB 2CH,ADD4 RETADD4： CLR 2CH ；清進(jìn)位標(biāo)志 MOV R0,00H RET包裝箱數(shù)比較子程序：BOXCOMP： MOV R0,PARTS MOV R1,LED1 ；百位數(shù)送R1 CJNE R2,03H ；比較3次COMP4： MOV A,@R0 MOV BUFF,@R1 CJNE A,BUFF,COMP5 INC R0 ；給定值十位數(shù) INC R1 ；包裝箱十位數(shù) DJNZ R2,COMP4 SETB 09H ；包裝箱計(jì)數(shù)單元置1 RETCOMP6： CLR 09H ；清包裝箱計(jì)數(shù)單元 RETCOMP5： JNC COMP6 LJMP ALARM ；超過給定值，則報(bào)警報(bào)警處理子程序：ALARM:： SETB 02H ；報(bào)警標(biāo)志單元置1 CLR 00H ；停電機(jī)1 CLR 01H ；停電機(jī)2 CLR 03H ；清正常運(yùn)行標(biāo)志單元 MOV A,20H ；將標(biāo)志單元存入A中 MOV DPTR,8002H MOVX @DPTR,A ；將標(biāo)志單元送入8255A的C口 LJMP MAIN延時(shí)子程序：DELAY： MOV R3，B9H ；延時(shí)的次數(shù) DEC R3 ；自減 NOP ；空操作 NOP CMP R3，00H ；是否達(dá)到延時(shí)次數(shù) JNZ DELAY ；沒有則繼續(xù)延時(shí) RET ；