




已阅读5页,还剩6页未读, 继续免费阅读
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
课 程 设 计 课程名称 单片机原理 题目名称 单片机原理课程设计 学生学院_自动化学院_专业班级_ _学 号 学生姓名_ _ _指导教师 何X敏、李X芳 2010 年 09 月 10 日(1)把两条输入线同一端口的一根输入线接到k0接口。当k0=1,显示78FA;当k0=0,显示12BE:程序如下:ORG 0000HHJMP MAINORG 1000HDB 0EEH,8EH,0FEH,0E0HDB 9EH,3EH,0DAH,60HMAIN:MOV 52H,#00HMOV 53H,#00HMOV 51H,#00HMOV 50H,#00HMOV R5,#53HKEYSUB:MOV A,#03HMOV DPTR,#7F00HMOVX DPTR,ABEGIN:MOV DPTR,#07F03HMOV A,DPTRMOV R3,#0FEHJB ACC.1,DISPLAY1JMP DISPLAY2DISPLAY1:MOV R2,#00HJMP A1DISPLAY2:MOV R2,#04HA1:MOV A,R3MOV DPTR,#7F01HMOVX DPTR,AMOV DPTR,#1000HMOV A,R2MOVC A,A+DPTRMOV DPTR,#7F02HMOVX DPTR,ACALL DLIMSINC R2MOV A,R3RL AMOV R3,AJNB ACC.4,BEGINJMP A1DLIMS:MOV R7,#05HDL0:MOV R6,#0FFHDL1:DJNZ R6,DL1DJNZ R7,DL0RETEND54790EBA(2)编程实现键盘并能左移显示:程序如下:ORG 0000HHJMP MAINORG 1000HMAIN:MOV 52H,#00HMOV 53H,#00HMOV 51H,#00HMOV 50H,#00HMOV R5,#53HKEYSUB:MOV A,#03HMOV DPTR,#7F00HMOVX DPTR,ABEGIN:ACALL DISACALL CLEARACALL CCSCANJNZ INK1AJMP BEGININK1:ACALL DISACALL DLIMSACALL DLIMSACALL CLEARACALL CCSCANJNZ INK2AJMP BEGININK2:MOV R2,#0FEHMOV R4,#00HCOLUM:MOV DPTR,#7F01HMOV A,R2MOVX DPTR,AINC DPTRINC DPTRMOVX A,DPTRJB ACC.3,LONEMOV A,#00HAJMP KCODELONE:JB.ACC.2,NEXTMOV A,#04HKCODE:ADD A,R4ACALL PUTBUFPUSH ACCKON:ACALL DISACALL CLEARACALL CCSCANJNZ KONPOP ACCNEXT:INC R4MOV A,R2JNB ACC.4,KEERRL AMOV R2,AAJMP COLUMKERR:AJMP BEGINCCSCAN:MOV DPTR,#7F01HMOV A,#00HMOV DPTR,AINC DPTRINC DPTRMOVX A ,DPTRCPL AANL A,#0CHRETCLEAR:MOV DPTR,#7F02HMOV A,#00HMOVX DPTR,ARETDIS:PUSH ACCPUSH 00HPUSH 03HMOV R0,#05HMOV R3,#0F7HMOV A,R3AGAIN:MOV DPTR,#7F01HMOVX DPTR,AMOV A,R0MOV DPTR,#DDEGMOVC A,A+DPTRMOV DPTR,#7F02HMOVX DPTR,AACALL DLIMSINC R0MOV A,R3JNB ACC.0,OUTRR AMOV R3,AAJMP AGAINOUT:POP 03HPOP 00HPOP ACCRETDDEG:DB 0EE,3EH,9EH,7AHDB 0E6H,0E0H,66H,0B6HDLIMS:MOV R7,#01HDL0:MOV R6,#0FFHDL1:DJNZ R6,DL1DJNZ R7,DL0RETPUTBUF:PUSH 00HMOV R7,A MOV A,51HMOV 50H,AMOV A,52HMOV 51H,AMOV A,53HMOV 52H,AMOV A,R7MOV R3,APOP 00HRETEND(3)程序实现单片机售票机,以下要求:a)当k0=1时,键入地址、价钱、SET,设置某个地址的票价,该机至少可连续设置三个不同地址的价钱:上海864元、北京756元、广州819元。b)当k0=0时,键入一个地址,购买的张数,按SET 得到总价,再键入另一个地址、购买的张数,按SET即得总价,可计得至少三个地址的合总价。程序如下:#include#include#define uchar unsigned char#define pcon XBYTE0X7F00#define pa XBYTE0X7F01#define pb XBYTE0X7F02#define pc XBYTE0X7F03#define led0 DBYTE0x50#define led1 DBYTE0x51#define led2 DBYTE0x52#define led3 DBYTE0x53#define keynum DBYTE0x54uchar bdata da;sbit pc2=da2;sbit pc3=da3;sbit k0=da1;sbit p26=P26;uchar code table=0XFC,0X60,0XBA,0XF2,0X66,0XB6,0XBE,0XE0,0XFE,0XE6;uchar code ctrl4=0XFE,0XFD,0XFB,0XF7;void Init()p26=1;pa=0x00;pcon=0x03;Void Delay(int sec)int i,j;for(i=0;isec;i+)for(j=0;j=3&keynum=3&sadd=3&keynum=3&sadd=5)/7countsadd-3=numbuff0*1000+numbuff1*100+numbuff2*10+numbuff3;totalprice+=countsadd-3*pricesadd-3;numbuff0=totalprice/1000;temp=totalprice-numbuff0*1000;numbuff1=temp/100;temp=temp-numbuff1*100;numbuff2=temp/10;temp=temp-numbuff2*10;numbuff3=temp;sadd=0;status=0;/7br
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 集安市2025-2026学年九年级下学期语文月考测试试卷
- 高速铁路行车安全课件
- 高速铁路工务安全课件
- 电脑知识培训技术课程课件
- 建设工程涉及土地利用总体规划修改服务合同
- 电脑打开课件显示问题
- qe考试题及答案
- 电磁学知识培训心得总结
- 电焊知识点培训总结课件
- 电焊班基础知识培训课件
- 迷彩九月+启航青春+课件-2025-2026学年高一上学期开学军训动员主题班会
- 2025年暑期教师研修心得-研修蓄力笃行致远
- 2025秋人教版初中数学九年级上册教学计划及进度表
- 2025年政府会计准则制度实施能力考试(气象事业单位)高频错题及答案
- TCCEAS001-2022建设项目工程总承包计价规范
- 大学普通化学-课件文档
- 2024-2025学年人教版(2024)七年级英语上册 教学计划
- 《只有一个地球》说课课件课件
- 200T钻具点压校直机技术方案
- 挡土墙计算书(共19页)
- 供配电技术实验指导书(09318)
评论
0/150
提交评论