【正文】 A2 。若進(jìn)位標(biāo)志為0表示投幣足夠，跳入推貨程序TOUBI3: NOP 。選擇商品3 SETB 。打開投幣口C3: LCALL QIAN 。調(diào)用投幣計算投幣總值子程序DENG3: MOV A,R4 。將子程序計算的投幣總值放入ACC中 CLR C 。清除進(jìn)位標(biāo)志CYW3: CJNE A,06H,L3 。判斷總面值是否大于等于3元L3: JNC AK3 。判斷進(jìn)位標(biāo)志是否置1 LCALL C3 。若進(jìn)位標(biāo)志為1則繼續(xù)調(diào)用投幣計算投幣總值子程序AK3: LJMP SA3 。若進(jìn)位標(biāo)志為0表示投幣足夠，跳入推貨程序TOUBI4: NOP 。選擇商品4 SETB 。打開投幣口C4: LCALL QIAN 。調(diào)用投幣計算投幣總值子程序DENG4: MOV A,R4 。將子程序計算的投幣總值放入ACC中 CLR C 。清除進(jìn)位標(biāo)志CYW4: CJNE A,06H,L4 。判斷總面值是否大于等于3元L4: JNC AK4 。判斷進(jìn)位標(biāo)志是否置1 LCALL C4 。若進(jìn)位標(biāo)志為1則繼續(xù)調(diào)用投幣計算投幣總值子程序AK4: LJMP SA4 。若進(jìn)位標(biāo)志為0表示投幣足夠，跳入推貨程序TOUBI5: NOP 。選擇商品5 SETB 。打開投幣口C5: LCALL QIAN 。調(diào)用投幣計算投幣總值子程序DENG5: MOV A,R4 。將子程序計算的投幣總值放入ACC中 CLR C 。清除進(jìn)位標(biāo)志CYW5: CJNE A,09H,L5 。L5: JNC AK5 。判斷進(jìn)位標(biāo)志是否置1 LCALL C5 。若進(jìn)位標(biāo)志為1則繼續(xù)調(diào)用投幣計算投幣總值子程序AK5: LJMP SA5 。若進(jìn)位標(biāo)志為0表示投幣足夠，跳入推貨程序TOUBI6: NOP 。選擇商品6 SETB 。打開投幣口C6: LCALL QIAN 。調(diào)用投幣計算投幣總值子程序DENG6: MOV A,R4 。將子程序計算的投幣總值放入ACC中 CLR C 。清除進(jìn)位標(biāo)志CYW6: CJNE A,09H,L6 。L6: JNC AK6 。判斷進(jìn)位標(biāo)志是否置1 LCALL C6 。若進(jìn)位標(biāo)志為1則繼續(xù)調(diào)用投幣計算投幣總值子程序AK6: LJMP SA6 。若進(jìn)位標(biāo)志為0表示投幣足夠，跳入推貨程序QIAN: ZL1: MOV R5,14H ZL2: MOV R6,0FFHZL3: MOV R7,0FFH ACE: JB ,A1 。JB ,A2 。檢測是否投入1元硬幣JB ,A3 。JB ,A4 。檢測是否投入1元紙幣JB ,A5 。檢測是否投入5元紙幣JB ,A6 。檢測是否投入10元紙幣JB ,QA 。是否取消DJNZ R7,ACEDJNZ R6,ZL3DJNZ R5,ZL2QA: LJMP ZHAO4NOP 。統(tǒng)計投入面值：A1: JB ,A1 。INC R0 。R0加1，LJMP ASA2: JB ,A2 。等待投入1元硬幣完成INC R1INC R1 。R1加2，表示投入一個1元LJMP ASA3: JB ,A3 。INC R0 。R0加一，LJMP ASA4: JB ,A4 。等待投入1元紙幣完成INC R1INC R1 。R1加2，表示投入一個1元LJMP ASA5: JB ,A5 。等待投入5元紙幣完成INC R2INC R2INC R2INC R2INC R2INC R2INC R2INC R2INC R2INC R2 。R2家10，LJMP ASA6: JB ,A6 。等待投入10元紙幣完成INC R3INC R3INC R3INC R3INC R3INC R3INC R3INC R3INC R3INC R3INC R3INC R3INC R3INC R3INC R3INC R3INC R3INC R3INC R3INC R3 。 R3加20，LJMP ASAS: MOV A,00H 。統(tǒng)計投幣總面值A(chǔ)DD A,R0ADD A,R1ADD A,R2ADD A,R3MOV R4,A RET附錄D:推出商品子程序：推出商品子程序的功能是，在選擇商品后，該商品有貨，且投幣總值大于商品價格的情況下，程序在相應(yīng)的引腳輸出4秒高電平，經(jīng)過電路設(shè)計。驅(qū)動電動機(jī)推出商品。SA1: MOV P3,07H LCALL YANSHI2 MOV P3,00H 。高電平驅(qū)動電機(jī)推貨，電機(jī)轉(zhuǎn)動4秒LJMP ZHAO1 。跳入找零環(huán)節(jié)SA2: MOV P3,08H LCALL YANSHI2 MOV P3,00H 。高電平驅(qū)動電機(jī)推貨，電機(jī)轉(zhuǎn)動4秒LJMP ZHAO1 。跳入找零環(huán)節(jié)SA3: MOV P3,09H LCALL YANSHI2MOV P3,00H 。高電平驅(qū)動電機(jī)推貨，電機(jī)轉(zhuǎn)動4秒LJMP ZHAO2 。跳入找零環(huán)節(jié)SA4: MOV P3,0AH LCALL YANSHI2 MOV P3,00H 。高電平驅(qū)動電機(jī)推貨，電機(jī)轉(zhuǎn)動4秒LJMP ZHAO2 。跳入找零環(huán)節(jié)SA5: MOV P3,0BH LCALL YANSHI2 MOV P3,00H 。高電平驅(qū)動電機(jī)推貨，電機(jī)轉(zhuǎn)動4秒LJMP ZHAO3 。跳入找零環(huán)節(jié)SA6: MOV P3,0CH LCALL YANSHI2 MOV P3,00H 。高電平驅(qū)動電機(jī)推貨，電機(jī)轉(zhuǎn)動4秒LJMP ZHAO3 。跳入找零環(huán)節(jié)附錄E:計算并找零子程序：計算并找零子系統(tǒng)的功能是，推出商品后系統(tǒng)跳轉(zhuǎn)至找零子程序，將投幣總值減去商品價格，然后將多余的面值退出。ZHAO1: CLR CYMOV A,R4SUBB A,02H 。投幣總值減去1元LJMP ZHAOZHAO2: CLR CYMOV A,R4SUBB A,06H 。投幣總值減去3元LJMP ZHAOZHAO3: CLR CYMOV A,R4SUBB A,09H 。LJMP ZHAOZHAO4: JB ,ZHAO4 JB ,ZHAO4MOV A,R4 LJMP ZHAO ZHAO: MOV B,02HDIV AB 。找零價錢除以2，整數(shù)部分為1元（存入A），余NOP 。 （存入B）MOV R4,A 。需找零的1元數(shù)存入R1JNZ YUAN1 。判斷是否要找零1元面值的紙幣ZH: MOV A,BJNZ YUAN5 。LJMP DAIJI YUAN1: MOV P3,0DHLCALL YANSHI2 MOV P3,00H 。 驅(qū)動電機(jī)找出一張1元紙幣LCALL YANSHI3DJNZ R4,YUAN1 。循環(huán)應(yīng)找1元張數(shù)LJMP ZH 。找完1元的，YUAN5: MOV P3,0EH 。啟動找零電機(jī)工作LCALL YANSHI2 。 MOV P3,00HLCALL YANSHI3LJMP DAIJI附錄F:延時子程序：延時子程序的功能是延時。調(diào)用延時子程序的情況是，當(dāng)需要一定時間的保持動作時，調(diào)用相應(yīng)的延時子程序。YANSHI1: MOV R5,1EH 。延時30秒 KK1: LCALL YANSHI4 DJNZ R5,KK1 RET YANSHI2: MOV R5,0FH 。延時15秒 KK2: LCALL YANSHI4 DJNZ R5,KK2 RET YANSHI3: LCALL YANSHI4 。延時2秒 LCALL YANSHI4 RETYANSHI4: MOV R6,0FFHDL4: MOV R7,0FFHDL5: DJNZ R1,DL5 DJNZ R6,DL4R附錄G:仿真界面及仿真調(diào)試：55