【正文】 CALL KEY 。等待是否有鍵按下 MOV A,R5 CJNE A,0FFH,PRESSB6 SJMP NEXTF12 PRESSB6: CJNE A,05H,NEXTF13 。按下確定鍵 ,所選貨物掉出 MOV A,B SUBB A,09H MOV R0,03H 。將選擇的貨物數(shù)量值存入 R0 LCALL OUTMONEY 。找錢(qián) LCALL OUTGOODS 。所選貨物掉出 基于單片機(jī)的自動(dòng)售貨機(jī)系統(tǒng)設(shè)計(jì) 第 40 頁(yè) 共 49 頁(yè) JMP MAIN 。 返回 ,等待下一次投幣 NEXTF13: CJNE A,06H,BACKF5 MOV A,B 。退還全部的錢(qián) LCALL OUTMONEY JMP MAIN 。 返回 ,等待下一次投幣 BACKF5: JMP NEXTF12 。選擇按下其他 鍵返回，等到有鍵按 NEXTF9: CJNE A,05H,NEXTF14 。按下確定鍵 ,所選貨物掉出 MOV A,B SUBB A,03H MOV R0,01H 。將選擇的貨物數(shù)量值存入 R0 MOV R1,A 。將找錢(qián)數(shù)存入 R1 LCALL OUTMONEY 。找錢(qián) LCALL OUTGOODS 。所選貨物掉出 JMP MAIN 。 返回 ,等待下一次投幣 NEXTF14: CJNE A,06H,BACKF6 MOV A,B LCALL OUTMONEY 。退還全部的錢(qián) JMP MAIN 。 返回 ,等待下一次投幣 BACKF6: JMP NEXTF9 。選擇按下其他鍵返回，等到有鍵按下 FOURYUAN: MOV A,B 。將投入的貨幣累加數(shù)存入寄存器 B CJNE A,04H,NEXTG1 。判斷投入的貨幣數(shù)是否為 4 元錢(qián) MOV R0,01H 。選擇的貨物數(shù)為 1 個(gè) LOOPG1: LCALL KEY 。等待是否有鍵按下 MOV A,R5 CJNE A,0FFH,PRESSC1 SJMP LOOPG1 PRESSC1: CJNE A,05H,NEXTG2 。按下確定鍵 ,所選貨物掉出 LCALL OUTGOODS JMP MAIN 。 返 回 ,等待下一次投幣 NEXTG2: CJNE A,06H,BACKG1 。按下取消鍵 MOV A,B 。退還全部的錢(qián) LCALL OUTMONEY JMP MAIN 。 返回 ,等待下一次投幣 BACKG1: JMP LOOPG1 。選擇按下其他鍵返回，等到有鍵按下 NEXTG1: JNC NEXTG3 。投入的貨幣數(shù)小于所選擇商品的預(yù)設(shè)價(jià)格 LCALL OUTMONEY 。錢(qián)全 部退還 基于單片機(jī)的自動(dòng)售貨機(jī)系統(tǒng)設(shè)計(jì) 第 41 頁(yè) 共 49 頁(yè) JMP MAIN 。 返回 ,等待下一次投幣 NEXTG3: LCALL KEY 。等待是否有鍵按下 MOV A,R5 CJNE A,0FFH,PRESSC2 SJMP NEXTG3 PRESSC2: CJNE A,03H,NEXTG4 。選擇一次性購(gòu)買(mǎi) 2 個(gè)貨物 MOV A,B CJNE A,08H,NEXTG5 。判斷投入的貨幣數(shù)是否為 8 元 MOV R0,02H 。將選擇的貨物數(shù)量值存入 R0 LOOPG2: LCALL KEY 。等待是否有鍵按下 MOV A,R5 CJNE A,0FFH,PRESSC3 SJMP LOOPG2 PRESSC3: CJNE A,05H,NEXTG6 。按下確定鍵 ,所選貨物掉出 LCALL OUTGOODS JMP MAIN 。 返回 ,等待下一次投幣 NEXTG6: CJNE A,06H,BACKG2 。按下取消鍵 MOV A,B 。退還全部的錢(qián) LCALL OUTMONEY JMP MAIN 。 返回 ,等待下一次投幣 BACKG2: JMP LOOPG2 。選擇按下其他鍵返回 ,等到有鍵按下 NEXTG5: JNC NEXTG7 。投入的貨幣數(shù)小于所選貨物的預(yù)設(shè)價(jià)格 LCALL OUTMONEY 。錢(qián)全部退還 JMP MAIN 。 返回 ,等待下一次投幣 NEXTG7: LCALL KEY 。等待是否有鍵按下 MOV A,R5 CJNE A,0FFH,PRESSC4 SJMP NEXTG7 PRESSC4: CJNE A,05H,NEXTG8 。按下確定鍵 ,所選貨物掉出 MOV A,B SUBB A,08H MOV R0,02H 。將選擇的貨物數(shù)量值存入 R0 LCALL OUTMONEY 。找錢(qián) LCALL OUTGOODS 。所選貨物掉出 JMP MAIN 。 返回 ,等待下一次投幣 NEXTG8: CJNE A,06H,BACKG3 基于單片機(jī)的自動(dòng)售貨機(jī)系統(tǒng)設(shè)計(jì) 第 42 頁(yè) 共 49 頁(yè) MOV A,B 。退還全部的錢(qián) LCALL OUTMONEY JMP MAIN 。 返回 ,等待下一次投幣 BACKG3: JMP NEXTG7 。選擇按下其他鍵返回，等到有鍵按 NEXTG4: CJNE A,04H,NEXTG9 。選擇一次性購(gòu)買(mǎi) 3 個(gè)貨物 MOV A,B CJNE A,0CH,NEXTG10 。判斷投入的貨幣數(shù)是否為 12 元 MOV R0,03H 。將選擇的貨物數(shù)量值存入 R0 LOOPG3: LCALL KEY 。等待是否有鍵按下 MOV A,R5 CJNE A,0FFH,PRESSC5 SJMP LOOPG3 PRESSC5: CJNE A,05H,NEXTG11 。按下確定鍵 ,所選貨物掉出 LCALL OUTGOODS JMP MAIN 。 返回 ,等待下一次投幣 NEXTG11: CJNE A,06H,BACKG4 MOV A,B 。退還全部的錢(qián) LCALL OUTMONEY JMP MAIN 。 返回 ,等待下一次投幣 BACKG4: JMP LOOPG3 。選擇按下其他鍵返回，等到有鍵按下 NEXTG10: JNC NEXTG12 。投入的貨幣數(shù)小于所選貨物的預(yù)設(shè)價(jià)格 LCALL OUTMONEY 。錢(qián)全部退還 JMP MAIN 。 返回 ,等待下一次投幣 NEXTG12: LCALL KEY 。等待是否有鍵按下 MOV A,R5 CJNE A,0FFH,PRESSC6 SJMP NEXTG12 PRESSC6: CJNE A,05H,NEXTG13 。按下確定鍵 ,所選貨物掉出 MOV A,B SUBB A,0CH MOV R0,03H 。將選擇的貨物數(shù)量值存入 R0 LCALL OUTMONEY 。找錢(qián) LCALL OUTGOODS 。所選貨物掉出 JMP MAIN 。返回 ,等待下一次投幣 NEXTG13: CJNE A,06H,BACKG5 MOV A,B 。退還全部的錢(qián) 基于單片機(jī)的自動(dòng)售貨機(jī)系統(tǒng)設(shè)計(jì) 第 43 頁(yè) 共 49 頁(yè) LCALL OUTMONEY JMP MAIN 。返回 ,等待下一次投幣 BACKG5: JMP NEXTG12 。選擇按下其他鍵返回，等到有鍵按 NEXTG9: CJNE A,05H,NEXTG14 。按下確定鍵 ,所選貨物掉出 MOV A,B SUBB A,04H MOV R0,01H 。將選擇的貨物數(shù)量值存入 R0 LCALL OUTMONEY 。找錢(qián) LCALL OUTGOODS 。所選貨物掉出 JMP MAIN 。返回 ,等待下一次投幣 NEXTG14:CJNE A,06H,BACKG6 MOV A,B 。退還全部的錢(qián) LCALL OUTMONEY JMP MAIN 。返回 ,等待下一次投幣 BACKG6: JMP NEXTG9 。選擇按下其他鍵返回， 等到有鍵按下 ＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊ 出貨程序 ＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊ OUTGOODS: MOV A,R6 MOV DPTR,GOODSTAB MOVC A,@A+DPTR MOV P0,A 。掉出貨物 LCALL DELAY1 。 調(diào)用延時(shí)程序 MOV A,0FFH MOV P0,A 。將控制掉出貨物開(kāi)關(guān)關(guān)閉 LCALL DELAY1 DJNZ R0,OUTGOODS 。判斷是否還將繼續(xù)掉出貨物 LCALL DELAY1 RET GOODSTAB: DB 0FEH 。出 2 元貨物 DB 0FDH 。出 3 元貨物 DB 0FBH 。出 4 元貨物 ＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊ 找零程序 ＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊ OUTMONEY:MOV DPTR,MONEYTAB 。查表 MOVC A,@A+DPTR MOV P0,A 。找出零錢(qián) LCALL DELAY1 。調(diào)用延時(shí)程序 MOV A,0FFH 。將控制掉出零錢(qián)開(kāi)關(guān)關(guān)閉 基于單片機(jī)的自動(dòng)售貨機(jī)系統(tǒng)設(shè)計(jì) 第 44 頁(yè) 共 49 頁(yè) MOV P0,A RET MONEYTAB: DB 0FFH 。找回 0 元 DB 0F7H 。找回 1 元 DB 0EFH 。找回 2 元 DB 0E7H 。找回 3 元 DB 0CFH 。找回 4 元