第7组(单片机实验总结).doc

《第7组(单片机实验总结).doc》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、......广东药学院实验报告总结班级:生物医学工程11（电子仪器）组别:第19组组长：陈均连组员:陈春明、骆伟伟2013年12月15日专业.专注.......实验三单片机I/O口控制实验1、要求利用P1口做输出口，接八只发光二极管。编写程序，使发光二极管循环点亮，或者产生有一定规律的花样，花样要求如下（提示：每一个要求编一个程序）：①第一个发光管以间隔200ms闪烁#include//1#defineuintunsignedintvoiddelayms(uint);sbitled1=P1^0;voidmai

2、n(){while(1){led1=0;delayms(200);led1=1;delayms(200);}专业.专注.......}voiddelayms(uintxms){uinti,j;for(i=xms;i>0;i--)for(j=110;j>0;j--);}②8个发光管由上至下间隔1s流动，其中每个管亮500ms,灭500ms,亮时蜂鸣器响，灭时关闭蜂鸣器，一直重复下去。#include//2#include#defineuintunsignedintvoiddelayms(u

3、int);uintaa;sbitbeep=P1^5;voidmain(){P2=0xff;aa=0xfe;beep=1;while(1)专业.专注.......{P2=aa;beep=0;delayms(500);P2=0xff;beep=1;delayms(500);aa=_crol_(aa,1);}}voiddelayms(uintxms){uinti,j;for(i=xms;i>0;i--)for(j=110;j>0;j--);}③8个发光管来回流动，第个管亮100ms,流动时让蜂鸣器发出“滴滴”声。#include

4、eg52.h>//3#include#defineuintunsignedintvoiddelayms(uint);uintaa,i;专业.专注.......sbitbeep=P2^3;voidmain(){P1=0xff;beep=1;aa=0xfe;delayms(500);while(1){for(i=0;i<8;i++){P1=aa;beep=1;delayms(100);beep=0;delayms(100);aa=_crol_(aa,1);if(aa==0xfe)break;}aa=0x7f;

5、for(i=0;i<8;i++){专业.专注.......aa=_cror_(aa,1);P1=aa;beep=1;delayms(100);beep=0;delayms(100);if(aa==0xfe)break;}}}voiddelayms(uintxms){uinti,j;for(i=xms;i>0;i--)for(j=110;j>0;j--);}④用8个发光管演示出8位二进制数累加过程，结合两个开关（一加一减）实现加减运算。#include//4#defineucharunsignedchar#de

6、fineuintunsignedint专业.专注.......sbits0=P2^0;sbits1=P2^1;uchara;voiddelayms(uintz){inti,j;for(i=z;i>0;i--)for(j=110;j>0;j--);}voidmain(){while(1){a=0;if(s0==0){while(a!=256){a++;P1=~a;delayms(500);}专业.专注.......}a=0xff;if(s1==0){while(a!=0){a--;P1=~a;delayms(500);}}}}⑤

7、8个发光管间隔200ms由上至下，再由下至上，再重复一次，然后全部熄灭再以300ms间隔全部闪烁5次。重复此过程。#include//5#include#defineuintunsignedintvoiddelayms(uint);uinta,i,j;voidmain()专业.专注.......{while(1){a=0xfe;for(j=0;j<2;j++){for(i=0;i<8;i++){P1=a;a=_crol_(a,1);delayms(200);}a=0x7f;for(i=0

8、;i<7;i++){a=_cror_(a,1);P1=a;delayms(200);}}P1=0xff;delayms(500);专业.专注.......for(i=0;i<5;i++){P1=0x00;delayms(300);P1=0xff;delayms(300);}}