历史上的今天
今天是:2025年12月19日(星期五)
2022年12月19日 | 51单片机有关广州塔实验程序
2022-12-19 来源:zhihu
include
#include
#define unint unsigned int
#define unchar unsigned char
unchar code table0[]={0xfe,0xfd,0xfb,0xf7,0xef,0xdf,0xbf,0x7f};//从低位往高位移一个灯
unchar code table1[]={0x7f,0xbf,0xdf,0xef,0xf7,0xfb,0xfd,0xfe};//从高位往低位移一个灯
unchar code table2[]={0xfe,0xfa,0xf8,0xf0,0xe0,0xa0,0x80,0x00};//从低位到高位逐步全部点亮
unchar code table3[]={0x7f,0x3f,0x1f,0x0f,0x07,0x03,0x01,0x00};//从高位到低位逐步全部点亮
unchar code table4[]={0x01,0x03,0x07,0x0f,0x1f,0x3f,0x7f,0xff};//从低位到高位逐步全部熄灭
unchar code table5[]={0x80,0xa0,0xe0,0xf0,0xf8,0xfa,0xfe,0xff};//从高位到低位逐步全部熄灭
unchar code table6[]={0x01,0x02,0x04,0x08,0x10,0x20,0x40,0x80};//从低位到高位,灭一个灯移动
unchar code table7[]={0x80,0x40,0x20,0x10,0x08,0x04,0x02,0x01};//从高位到低位,灭一个灯移动
unchar i;
void delay(unint z) //延时函数
{
unint x,y;
for(x=z;x>0;x--)
for(y=314;y>0;y--);
}
///////////////////////////////////////////////////
///////////////////////////////////////////////////
///////////////////////////////////////////////////
void deng123()//
{
for(i=0;i<8;i++)
{
P2=table1[i];
P0=table1[i];
delay(25);
}
}
/***********************************************
************************************************/
void deng0()//所有灯亮一会儿
{
P0=0x00;P1=0x00;P2=0x00;P3=0x00;
delay(150);
}
/////////////////////////////////
void deng0_1()//所有灯灭一会儿
{
P0=0xff;P1=0xff;P2=0xff;P3=0xff;
delay(150);
}
//////////////////////////////////////
void deng1()//两列灯顺时针旋转2遍,然后逐渐降低
{
unchar c;
P1=0x00;P3=0x00;
for(c=2;c>0;c--)
{
deng123();
}
////////////////
P1=0x03;
deng123();
/////////////////
P1=0x0f;
deng123();
////////////////
P1=0x3f;
deng123();
///////////////
P1=0xff;
deng123();
////////////////////////
P3=0x03;
deng123();
//////////////
P3=0x0f;
deng123();
//////////////
P3=0x3f;
deng123();
/////////////
P3=0xff;
deng123();
P2=0xff;P0=0xff;
}
///////////////////////////////////////////////
void deng2()//四列灯顺时针旋转2遍
{
unchar a;
unchar b;
b=0x77;
P2=b;
P0=b;
P1=0x00;P3=0x00;
for(a=4;a>0;a--)
{
for(i=0;i<8;i++)
{
b=_cror_(b,1);//循环左移
delay(25);
P2=b;
P0=b;
}
}
P2=0xff;P0=0xff;P1=0xff;P3=0xff;
}
//////////////////////////////////////////////
void deng3()//单层,向上升
{
P0=0x00;
P2=0x00;
for(i=0;i<8;i++)
{
P3=table1[i];
delay(25);
}
P3=0xff;
/*----------------------*/
for(i=0;i<8;i++)
{
P1=table1[i];
delay(25);
}
P1=0xff;
}
/////////////////////////////////////////
void deng4()//单层,向下降
{
P2=0x00;P0=0x00;
for(i=0;i<8;i++)
{
P1=table0[i];
delay(25);
}
P1=0xff;
/*----------------------*/
for(i=0;i<8;i++)
{
P3=table0[i];
delay(25);
}
P3=0xff;P1=0xff;P0=0xff;P2=0xff;
}
/////////////////////////////////////////
void deng5()//从上到下,逐层全部点亮】
{
P0=0x00;P2=0x00;
for(i=0;i<8;i++)
{
P1=table2[i];
delay(25);
}
for(i=0;i<8;i++)
{
P3=table2[i];
delay(25);
}
P0=0xff;P1=0xff;P2=0xff;P3=0xff;
}
////////////////////////////////////////
void deng6()//从上到下,逐层全部熄灭】
{
P0=0x00;P2=0x00;
P1=0x00;P3=0x00;
for(i=0;i<8;i++)
{
P1=table4[i];
delay(25);
}
P1=0xff;
for(i=0;i<8;i++)
{
P3=table4[i];
delay(25);
}
P3=0xff;
P0=0xff;P2=0xff;
}
///////////////////////////////////
void deng7()//四组灯,交替两次
{
for(i=2;i>0;i--)
{
P1=0x00;P2=0x00;//上左
delay(40);
P1=0xff;P2=0xff;
delay(40);
/////////////
P3=0x00;P0=0x00;//下右
delay(40);
P3=0xff;P0=0xff;
delay(40);
/////////////
P3=0x00;P2=0x00;//下左
delay(40);
P3=0xff;P2=0xff;
delay(40);
/////////////
P1=0x00;P0=0x00;//上右
delay(40);
P1=0xff;P0=0xff;
delay(40);
}
}
void deng8()//上半先逐步列点亮,然后再向下点点亮
{
P0=0xff;P2=0xff;P3=0xff;
P1=0x00;
for(i=0;i<8;i++)
{
P0=table3[i];
P2=table3[i];
delay(25);
}
delay(70);
P1=0x00;P2=0x00;P0=0x00;
for(i=0;i<8;i++)
{
P3=table2[i];
delay(25);
}
}
//////////////////////////////////////
void deng9()//从中间向上、下点亮,再熄灭
{
P0=0x00;P2=0x00;
for(i=0;i<8;i++)
{
P1=table3[i];
P3=table2[i];
delay(25);
}
for(i=0;i<8;i++)
{
P1=table4[i];
P3=table5[i];
delay(25);
}
}
///////////////////////////////////////////
void deng10()//从中间向上、下熄灭
{
P0=0x00;P2=0x00;
for(i=0;i<8;i++)
{
P1=table5[i];
P3=table4[i];
delay(25);
}
P1=0xff;P3=0xff;
}
void deng11()//逆时针逐列点亮所有灯
{
P1=0x00;P3=0x00;
P0=0xff;P2=0xff;
for(i=0;i<8;i++)
{
P0=table2[i];
delay(25);
}
for(i=0;i<8;i++)
{
P2=table2[i];
delay(25);
}
P0=0xff;P2=0xff;P3=0xff;P1=0xff;
}
///////////////////////////////////////////
void deng12()//闪烁
{
uchar i;
uchar b;
b=0xaa;
P2=b;
P0=b;
P1=b;
P3=b;
for(i=0;i<8;i++)
{
b=_cror_(b,1);//循环左移
delay(50);
P2=b;
P0=b;
P1=b;
P3=b;
}
P0=0xff;P1=0xff;P2=0xff;P3=0xff;
}
void deng13()//两层灯,分别从中间向上、下移动
{
P2=0x00;P0=0x00;
for(i=0;i<8;i++)
{
P1=table1[i];
P3=table0[i];
delay(25);
}
P2=0xff;P0=0xff;P1=0xff;P3=0xff;
}
void deng14_1()//点满一圈的小函数(限内部用)
{
P2=0xff;P0=0xff;
for(i=0;i<8;i++)
{
P2=table2[i];
delay(15);
}
for(i=0;i<8;i++)
{
P0=table2[i];
delay(15);
}
P2=0xff;P0=0xff;
}
void deng14()//从下开始,点满一圈后,灭,再上升点亮第二圈
{
P1=0xff;
P3=0x7f;//1层
deng14_1();//点满一圈的小函数(限内部用)
P3=0xbf;//2层
deng14_1();//点满一圈的小函数(限内部用)
P3=0xdf;//3层
deng14_1();//点满一圈的小函数(限内部用)
P3=0xef;//4层
deng14_1();//点满一圈的小函数(限内部用)
P3=0xf7;//5层
deng14_1();//点满一圈的小函数(限内部用)
P3=0xfb;//6层
deng14_1();//点满一圈的小函数(限内部用)
P3=0xfd;//7层
deng14_1();//点满一圈的小函数(限内部用)
P3=0xfe;//8层
deng14_1();//点满一圈的小函数(限内部用)
//////////////////
P3=0xff;
P1=0x7f;//1层
deng14_1();//点满一圈的小函数(限内部用)
P1=0xbf;//2层
deng14_1();//点满一圈的小函数(限内部用)
P1=0xdf;//3层
deng14_1();//点满一圈的小函数(限内部用)
P1=0xef;//4层
deng14_1();//点满一圈的小函数(限内部用)
P1=0xf7;//5层
deng14_1();//点满一圈的小函数(限内部用)
P1=0xfb;//6层
deng14_1();//点满一圈的小函数(限内部用)
P1=0xfd;//7层
deng14_1();//点满一圈的小函数(限内部用)
P1=0xfe;//8层
deng14_1();//点满一圈的小函数(限内部用)
P1=0xff;
}
/*====================================================
===================主函数===========================
======================================================*/
void main()
{
while(1)
{
deng0_1();//所有灯灭一会儿
deng0_1();//所有灯灭一会儿
deng14();//从下开始,点满一圈后,灭,再上升点亮第二圈
deng4();//单层,向下降
deng5();//从上到下,逐层全部点亮
deng6();//从上到下,逐层全部熄灭】
deng8();//上半先逐步点亮,然后再向下点亮
deng0();//所有灯亮一会
deng6();//从上到下,逐层全部熄灭】
deng9();//从中间向上、下点亮,再熄灭
deng9();//从中间向上、下点亮,再熄灭
deng0_1();//所有灯灭一会儿
deng11();//逆时针逐列点亮所有灯
deng10();//从中间向上、下熄灭
deng0_1();//所有灯灭一会儿
deng13();//两层灯,分别从中间向上、下移动
deng3();//单层,向上升
deng5();//从上到下,逐层全部点亮
deng12();//闪烁
deng12();//闪烁
deng2();//四列灯顺时针旋转2遍
deng1();//两列灯顺时针旋转2遍,然后逐渐降低
deng0_1();//所有灯灭一会儿
}
}
上一篇:51单片机的一些有趣的实验程序
下一篇:51单片机入门实验
史海拾趣
|
刚学AVR,下载的好多程序总是编译错误不能用。这个AD转换程序是我自己修改正确的。共享给像我一样刚学 AVR的朋友。绝对正确。任何问题请联系:132 6515 5485。联系请在晚上19:00以后。邮箱:h32446975@126.com 也同时希望交些使用AVR的朋友。  ...… 查看全部问答> |
|
个人品质有用词汇able 有才干的,能干的 active 主动的,活跃的 adaptable 适应性强的 adroit 灵巧的,机敏的 aggressive 有进取心的 alert 机灵的 ambitious 有雄心壮志的 amiable 和蔼可亲的 amicable 友好的 analytical 善于分析的 ap ...… 查看全部问答> |
|
台湾AnSC最新推出两通道LDO AP6401系列, AP6401系列的高精确度,双,低噪声,低压差稳压器的CMOS与启用功能.在EN功能允许输出的每一稳压必须关闭独立,导致 大大降低了能耗.该AP6401系列的软启动功能,以抑制浪涌电流.该电流限制器\'倍 ...… 查看全部问答> |
|
C语言降龙十八掌——第三掌 写对strcpy,你也可以进微软 好吧,我承认我在玩标题党。我没有去微软面试过,标题里面的微软,指的是同学们心向往之而不得的大公司。 这是我在职业生涯刚刚起步时,去某业内非常知名的,无数学子向往的一个大公司面试的时候被问到的一个问题。 当时回答得也不全面,回来思考 ...… 查看全部问答> |
|
有个线程 while(1) { f1(); Sleep(100); } 本来初衷是使这个线程每100毫秒循环一次,但是由于Sleep函数的不精确,以及f1()的执行时间不确定,因此,次线程循环周期总是不能精确到100毫秒,有没有什么方法能使此线 ...… 查看全部问答> |
|
在开发MC-1000中,想在程序一开启就把背光灯打开,用什么函数来控制打开背光呢,各位老大,请赐教。在线等。。。急。我用的时evc4.0开发平台。… 查看全部问答> |




