单片机实验自用材料不kd作业样例_第1页
单片机实验自用材料不kd作业样例_第2页
单片机实验自用材料不kd作业样例_第3页
单片机实验自用材料不kd作业样例_第4页
单片机实验自用材料不kd作业样例_第5页
已阅读5页,还剩2页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

1、作业 1:老师提供数码管显示 0123 的程序,修改为显示学号后三位,最后一位不亮作业 1:把老师按键+1、-1 的程序,修改为按键后加减值不同的程序 (此两题选一)作业 2:老师提供按红外0-9,数码管显示 0-9 的程序,按自己的想法修改实验四:红外接收与数码管显示作者:学号:*11735一:实验目的:利用 keil c编译程序生成 hex 文件,到单片机中,实现单片机功能,掌握红外接受功能和数码管显示相应数字。二:实验器材:电脑,元件,三:实验过程:线,电烙铁,焊锡【1】数码管显示学号后三位(即 735)程序:#include #define uchar unsigned charsbi

2、t sbit sbitsbitP2_0 P2_1 P2_2P2_3=P20; P21; P22;P23;uchar code table=0 xc0,0 xf9,0 xa4,0 xb0,0 x99,0 x92,0 x82,0 xf8,0 x80,0 x90;void delay(uchar i)uchar j,k; for(j=i;j0;j-)for(k=125;k0;k-);void display()P0=table7; 显示 7P2_0 = 0;delay(5); P2_0 = 1;P0=table3;显示 3P2_1 = 0;delay(5); P2_1 = 1;P0=table5;显

3、示 5P2_2 = 0;delay(5); P2_2 = 1;P0=table3;关闭 P2_3 = 1;delay(5);P2_3 = 1;/*演示主程序*/ void main(void)unsigneda;while(1)for(a=100;a0;a-)display();效果图:(学号后三位 735,最后一位不让亮)【2】红外上的按键依次相加因为水平有限因此实验时只实验从 1 加到 9,最后得 45。部分程序:.unsigned charirtime;/红外用全局变量unsigned charm,n=0;bit irpro_ok,irok; unsigned char IRcord4;

4、 unsigned char irdata33;.void Ir_work(void)/红外键值散转程序switch(IRcord2)/判断第三个数码值case 0 x0c:m=0 x01;break;/1 case 0 x18:m=0 x02;break;/2 case 0 x5e:m=0 x03;break;/3 case 0 x08:m=0 x04;break;/4 case 0 x1c:m=0 x05;break;/5 case 0 x5a:m=0 x06;break;/6 case 0 x42:m=0 x07;break;/7 case 0 x52:m=0 x08;break;/8

5、case 0 x4a:m=0 x09;break;/9 case 0 x16:m=0 x00;break;/0 default:break;m=m+n; n=m;irpro_ok=0;/处理完成标志保存相应的按键值.void display()P0=tablem%100/10; P2_0 = 0;delay(5);P2_0 = 1;P0=tablem%10; P2_1 = 0;delay(5);P2_1 = 1;.:依次按 1 到 9,每次按键后就自动求和了,即为 1+2+3+4+5+6+7+8+9=45其他同学作业见后附其他同学选做的作业【1】加减法程序构思:从零开始,加法时,每次加 4、减

6、法时,每次减 6.程序:include #define uchar unsigned char unsigned char m=0;uchar code table=0 xc0,0 xf9,0 xa4,0 xb0,0 x99,0 x92,0 x82,0 xf8,0 x80,0 x90;阳数码管 0-9unsigned char LEDAddr=0 x01,0 x02,0 x04,0 x08; void delay(uchar i)uchar j,k; for(j=i;j0;j-)for(k=125;k0;k-);/共void display()P0=tablem%1000/100; P2_0

7、= 0;delay(5);P2_0 = 1;P0=tablem%100/10; P2_1 = 0;delay(5);P2_1 = 1;P0=tablem%10; P2_2 = 0;delay(5);P2_2 = 1;/P0=tablem%10;/P2_3 = 0;/delay(5); P2_3 = 1;void_0()errupt0/加法delay(10); if (!P3_2)m+; m+; m+;m+;/ while(!P3_2);void_1()errupt2/减法delay(10); if (!P3_3)m-;m-;m-;m-;m-;m-;/ while(!P3_3);void main()unsigneda;P0=0 x00; EX0 = 1;EX1 = 1;IT0=1; /下降沿有效 I

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论