单片机并行口实验报告.doc_第1页
单片机并行口实验报告.doc_第2页
单片机并行口实验报告.doc_第3页
已阅读5页,还剩4页未读 继续免费阅读

下载本文档

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

文档简介

实验二 并行口实验报告班级: 学号: 姓名: 教师: 一、实验目的通过实验了解8051并行口输入方式和输出方式的工作原理及编程方法。二、实验内容1、输出实验如图4-1所示。以8031的P2口为输出口。通过程序控制发光二极管的亮灭。2、输入实验如图4-1所示。以8031的P1口为输入口。用开关向P1.0P1.3输入不同的状态,控制P2口P2.4P2.7发光二极管的亮灭。3、查询输入输出实验如图1-1所示。以8051的P1.6或P1.0为输入位,以P2口为输出,二进制计数记录按键的次数。图1-1三、编程提示1、输出实验程序(1)设计一组显示花样,编程使得P2口按照设计的花样重复显示。(2)为了便于观察,每一状态加入延时程序。2、输入实验程序开关打开,则输入为1;开关闭合,则输入为0。读取P1.0 P1.3的状态,并将它们输出到P2.4 P2.7,驱动发光二极管。所以发光二极管L1L4的亮灭应与开关P1.0 P1.3的设置相吻合。3、查询输入输出程序(1)编程计数P1.0按键次数,按键不去抖动。(2)编程计数P1.6按键次数,按键不去抖动。(3)编程计数P1.0按键次数,按键软件延时去抖动。观察(1)、(2)、(3)、的结果。四、实验器材 计算机,目标系统实验板五、实验步骤1、在KEILC中按要求编好程序,编译,软件调试,生成.HEX文件。2、断开电源,按图1-1所示,连好开关及发光二极管电路。3、下载程序。4、调试运行程序,观察发光二极管状态。六、C源程序清单1、#include #define uchar unsigned char #define ON 0#define OFF 1sbit led1=P20;sbit led2=P21;sbit led3=P22;sbit led4=P23;sbit led5=P24;sbit led6=P25;sbit led7=P26;sbit led8=P27;void delay1(void);void main(void) led1=led2=led3=led4=led5=led6=led7=led8=OFF; while(1) led1=led8=ON; delay1(); led2=led7=ON; delay1(); led3=led6=ON; delay1(); led4=led5=ON; delay1(); led1=led8=OFF; delay1(); led2=led7=OFF; delay1(); led3=led6=OFF; delay1(); led4=led5=OFF; delay1(); void delay1(void) uchar i,j,k; for(i=0;i10;i+) for(j=0;j100;j+) for(k=0;k255;k+);2、#include#define uchar unsigned charsbit k8=P10;sbit k7=P11;sbit k6=P12;sbit k5=P13;sbit led5=P24;sbit led6=P25;sbit led7=P26;sbit led8=P27;void main(void)while(1)if(!k8)led5=0;if(!k7)led6=0;if(!k6)led7=0;if(!k5)led8=0;if(k8)led5=1;if(k7)led6=1;if(k6)led7=1;if(k5)led8=1;3、(1)和(2)#include#define uchar unsigned charsbit k8=P10;sbit k2=P16;void main(void)ucharnum1,num2; num1=0;num2=0;while(1)if(!k8)num1+; P2=num1; if(!k2)num2+;P2=num2;3、(3)#include#define uchar unsigned charvoid delay(uchar);sbit k8=P10;sbit k7=P11;sbit k6=P12;sbit k5=P13;sbit k4=P14;sbit k3=P15;sbit k2=P16;sbit k1=P17;void main(void)ucharnum; num=0;while(1)if(!k3|!k4|!k5|!k6|!k7)num+; P2=num; delay(100); if(!k8)num=0;P2=num;delay(100);void delay(uchar k )uchar x,y,z;for(x=k;x0;x-)for(y=20;y0;y-)for(z=250;z0;z-)

温馨提示

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

评论

0/150

提交评论