![程序代码--自动售货机_第1页](http://file3.renrendoc.com/fileroot_temp3/2022-3/5/83c9e63d-917a-4865-98c7-8b99e5afbc48/83c9e63d-917a-4865-98c7-8b99e5afbc481.gif)
![程序代码--自动售货机_第2页](http://file3.renrendoc.com/fileroot_temp3/2022-3/5/83c9e63d-917a-4865-98c7-8b99e5afbc48/83c9e63d-917a-4865-98c7-8b99e5afbc482.gif)
![程序代码--自动售货机_第3页](http://file3.renrendoc.com/fileroot_temp3/2022-3/5/83c9e63d-917a-4865-98c7-8b99e5afbc48/83c9e63d-917a-4865-98c7-8b99e5afbc483.gif)
![程序代码--自动售货机_第4页](http://file3.renrendoc.com/fileroot_temp3/2022-3/5/83c9e63d-917a-4865-98c7-8b99e5afbc48/83c9e63d-917a-4865-98c7-8b99e5afbc484.gif)
![程序代码--自动售货机_第5页](http://file3.renrendoc.com/fileroot_temp3/2022-3/5/83c9e63d-917a-4865-98c7-8b99e5afbc48/83c9e63d-917a-4865-98c7-8b99e5afbc485.gif)
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
1、附录A 程序清单CS BIT P1.0CLK BIT P1.1DAT BIT P1.2KEY BIT P1.3K01 BIT P1.4K02 BIT P1.5K03 BIT P1.6K04 BIT P1.7A1 DATA 40HB1 DATA 41H * 主程序和中断程序入口*ORG 0000HLJMP STRTORG 0003HLJMP INT0ORG 000BHLJMP TIMEORG 0500H* 初始化程序* STRT: MOV 60H,#05MOV 61H,#05MOV 62H,#05MOV 63H,#05MOV B1,#0MOV A1,#0MOV A,#0A4HLCALL SEND
2、SETB CS* 主程序*W1: MOV SP,#80HCLR IT0MOV TMOD,#01HMOV TL0,#0B0HMOV TH0,#3CHSETB EASETB ET0SETB EX0SETB TR0MOV 23H,#14HMOV A,#0AHLCALL TRANLCALL DISP11MOV A,#0AHLCALL TIME1SJMP $STR11: LCALL DUMPLCALL DISPSETB CSSTR1: JB KEY,$MOV A,#15HLCALL SENDLCALL RECESETB CSJNB KEY,$LCALL CHCKCJNE A,#00H,M1CALL ST
3、R110AJMP $M1: MOV A1,ACALL JIA_JIANAJMP STR1* 抢答组号判断*INT0: ORG 1000HSETB P3.4JNB K01,TRU1JNB K02,TRU2JNB K03,TRU3JNB K04,TRU4AJMP INT0 TRU1: MOV B1,#1MOV A,#0A4HLCALL SENDLCALL RECESETB CSMOV 58H,#01HMOV 5CH,#00HMOV 5DH,#00HMOV 5EH,#00HMOV 5FH,#00HLCALL DISPLJMP W1AJMP STR1 TRU2: MOV B1,#2MOV A,#0A4
4、HLCALL SENDLCALL RECESETB CSMOV 58H,#0FHMOV 59H,#02HMOV 5CH,#00HMOV 5DH,#00HMOV 5EH,#00HMOV 5FH,#00HLCALL DISPLJMP W1AJMP STR1 TRU3: MOV B1,#3MOV A,#0A4HLCALL SENDLCALL RECESETB CSMOV 58H,#0FHMOV 59H,#0FHMOV 5AH,#03HMOV 5CH,#00HMOV 5DH,#00HMOV 5EH,#00HMOV 5FH,#00HLCALL DISPLJMP W1AJMP STR1TRU4: MOV
5、B1,#4MOV A,#0A4HLCALL SENDLCALL RECESETB CSMOV 58H,#0FHMOV 59H,#0FHMOV 5AH,#0FHMOV 5BH,#04HMOV 5CH,#00HMOV 5DH,#00HMOV 5EH,#00HMOV 5FH,#00HLCALL DISPLJMP W1AJMP STR1RETI* 抢答开始程序*STR110: MOV B1,#0MOV 58H,#05HMOV 59H,#0FHMOV 5AH,#0FHMOV 5BH,#0FHMOV 5FH,#0FHMOV 5CH,#0FHMOV 5DH,#0FHMOV 5EH,#0FHLJMP DISP
6、RETSEND: CLR CSMOV R4,#08HLCALL LDELY SEN1: RLC AMOV DAT,CNOPNOPSETB CLKLCALL SDELYCLR CLKLCALL SDELYDJNZ R4,SEN1CLR DATRETLDELY: MOV R6,#25DJNZ R6,$RETSDEL Y: MOV R6,#4DJNZ R6,$RETRECE: MOV R7,#08HSETB DATLCALL LDELY REC1: SETB CLKLCALL SDEL YMOV C,DATRLC ACLR CLKLCALL SDEL YDJNZ R7,REC1CLR DATRETC
7、HCK: MOV R3,#8MOV R2,#00HMOV BUFF,ACHC1: MOV DPTR,#TBCHKMOV A,R2MOVC A,A+DPTRCJNE A,BUFF,NEXTSJMP CHEND NEXT: INC R2DJNZ R3,CHC1 CHEND: MOV A,R2RET* 显示程序* DISP: MOV R0,#87HMOV R1,#58HMOV R5,#08H DIS1: MOV A,R0LCALL SENDMOV A,R1LCALL SENDSETB CSDEC R0INC R1DJNZ R5,DIS1RETDUMP: MOV 58H,#0EHMOV 59H,#0F
8、HMOV 5AH,#0FHMOV 5BH,#0FHMOV 5CH,#0FHMOV 5DH,#0FHMOV 5EH,#0FHMOV 5FH,#0FHRET* 延时程序*D2S: MOV R5,#30DEL1: MOV R6,#200DEL2: MOV R7,#250DJNZ R7,$DJNZ R6,DEL2DJNZ R5,DEL1RET* 倒计时子程序*ORG 1000HTIME: DJNZ 23H,TIME1MOV 23H,#14HDEC ALCALL TRANLCALL DISP11CJNE A,#00H,TIME1CLR P3.4AJMP ENDTIME TIME1: MOV TL0,#0
9、B0HMOV TH0,#3CHRETIENDTIME: LJMP STR11ORG 1200H TRAN: PUSH ACCMOV R2,AMOV R6,#00HMOV R7,#08H LOOP: CLR CMOV A,R2RLC AMOV R2,AMOV A,R6ADDC A,R6DA AMOV R6,ADJNZ R7,LOOPPOP ACCRETORG 1300HDISP11: MOV R0,AMOV A,R6ANL A,#0FHACALL SEND11MOV A,R6SWAP AANL A,#0FHACALL SEND11MOV A,R0RETSEND11: MOV DPTR,#SGTB
10、1MOVC A,A+DPTRMOV SBUF,AJNB TI,$CLR TIRET* 加减分程序*JIA_JIAN: MOV A,A1CJNE A,#1,NEXT_JIANMOV A,B1CJNE A,#1,L2MOV B1,AMOV A,60HADD A,#1MOV 60H,AMOV 5CH,60HAJMP ENDJIA_JIAN L2: CJNE A,#2,L3MOV B1,AMOV A,61HADD A,#1MOV 61H,AMOV 5DH,61HAJMP ENDJIA_JIAN L3: CJNE A,#3,L4MOV B1,AMOV A,62HADD A,#1MOV 62H,AMOV
11、5EH,62HAJMP ENDJIA_JIANMOV ADD MOV MOV AJMP NEXT_JIAN: MOV MOV CJNE MOV MOV SUBB MOV MOV AJMP L22: CJNE MOV MOV SUBB MOV MOV AJMP L23: CJNE MOV MOV SUBB MOV MOV AJMP L24: MOV MOV A,63H A,#1 63H,A 5FH,63H ENDJIA_JIAN A,A1 A,B1 A,#1,L22 B1,A A,60H A,#1 60H,A 5CH,60H ENDJIA_JIAN A,#2,L23 B1,A A,61H A,#1 61H,A 5DH,61H ENDJIA_JIAN A,#3,L24 B1,A A,62H A,#1 62H,A 5E
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 初中外国神话故事
- 德国rwe拟投资光伏电站项目-0
- 电子商务对市场营销有影响吗
- 电器和设备标准和标识
- 统编版语文二年级上册园地一 公开课一等奖创新教学设计 (表格式)
- 23《父亲、树林和鸟》公开课一等奖创新教学设计
- 电力铁塔防盗系统介绍
- 2024年秋一年级上册6影子 公开课一等奖创新教学设计
- 统编版语文七年级上册(2024)第3课《雨的四季》活动型公开课一等奖创新教学设计
- 二《风景谈》公开课一等奖创新教学设计中职语文高教版(2023-2024)基础模块上册
- 制鞋生产常见的几种工艺介绍
- 部编高一上册语文提纲
- χγ辐射剂量率监测作业指导书(通用)
- 剑桥国际少儿英语-KB3词汇思维导图
- 输电线路铁塔吊车组立施工工法
- 建筑业增值税预缴税额台帐
- 移置带式输送机的结构特征与移设3
- 案例1 捷达半轴异响故障检测与维修
- 山东省高中通用技术学科课堂教学基本要求0910最终定版
- IEC-62304模板
- 《大学生毕业论文写作教程》第三章
评论
0/150
提交评论