STC12C5A60S2單片機廣州塔展示效果源程序

ID:200306 · 發表于 2017-5-13 15:57

STC12C5A60S2是STC系列單片機里應用比較廣泛的一款，在自動控制領域里享有很高的價值，以其易用性和多功能性受到了廣大電子設計愛好者的好評。本次設計主要是利用STC12C5A60S2單片機、該系統采用增強型8051單片機STC12C5A60S2為主控制器，利用單片機控制點陣的原理，控制廣州塔展示效果，還通過單片機內置的ADC對音頻信號進行采樣，然后控制廣州塔亮的層數達到根據音樂跳舞的效果。該方案具有電路結構簡潔，開發、生產成本低的優點。

單片機源程序如下:

#include <stc12c5a60s2.h>
#define uchar unsigned char
#define uint unsigned int
#define LongToBin(n) (((n>>21)&0x80)|((n>>18)&0x40)|((n>>15)&0x20)|((n>>12)&0x10)|((n>>9)&0x08)|((n>>6)&0x04)|((n>>3)&0x02)|((n)&0x01))
#define BIN(n) LongToBin(0x##n##)
sbit H1=P2^0;
sbit H2=P2^1;
sbit L1=P2^2;
sbit L2=P2^3;
sbit anjian=P3^2;
uint yanshi;
char moshi=0;
char flag=0;
void delay_1ms(uint q)
{
uint i,j;
for(i=0;i<q;i++)
for(j=0;j<120;j++);
}
void dh1()
{
char i;
yanshi=400;
P0=0XFF;
L1=L2=1;
L1=L2=0;
for(i=0;i<12;i++)
{
P0=0X01;
H1=1;
H1=0;
H2=1;
H2=0;
delay_1ms(yanshi);
P0=0X02;
H1=1;
H1=0;
H2=1;
H2=0;
delay_1ms(yanshi);
if(anjian==0){while(anjian==0);moshi=1;break;}
P0=0X04;
H1=1;
H1=0;
H2=1;
H2=0;
delay_1ms(yanshi);
P0=0X08;
H1=1;
H1=0;
H2=1;
H2=0;
delay_1ms(yanshi);
if(anjian==0){while(anjian==0);moshi=1;break;}
P0=0X10;
H1=1;
H1=0;
H2=1;
H2=0;
delay_1ms(yanshi);
P0=0X20;
H1=1;
H1=0;
H2=1;
H2=0;
delay_1ms(yanshi);
if(anjian==0){while(anjian==0);moshi=1;break;}
P0=0X40;
H1=1;
H1=0;
H2=1;
H2=0;
delay_1ms(yanshi);
P0=0X80;
H1=1;
H1=0;
H2=1;
H2=0;
delay_1ms(yanshi);
}
}
void dh2()
{
char i,j;
yanshi=500;
P0=0XFF;
H1=H2=1;
H1=H2=0;
for(i=0;i<1;i++)
{
P0=0X00;
L1=1;
L1=0;
P0=0X01;
L2=1;
L2=0;
if(anjian==0){while(anjian==0);moshi=1;break;}
delay_1ms(yanshi);
for(j=0;j<7;j++)
{
P0=P0<<1;
L2=1;
L2=0;
delay_1ms(yanshi);
if(anjian==0){while(anjian==0);moshi=1;break;}
}
P0=0X00;
L2=1;
L2=0;
P0=0X01;
L1=1;
L1=0;
delay_1ms(yanshi);
if(anjian==0){while(anjian==0);moshi=1;break;}
for(j=0;j<7;j++)
{
P0=P0<<1;
L1=1;
L1=0;
delay_1ms(yanshi);
if(anjian==0){while(anjian==0);moshi=1;break;}
}
P0=0X80;
L1=1;
L1=0;
delay_1ms(yanshi);
for(j=0;j<7;j++)
{
P0=P0>>1;
L1=1;
L1=0;
delay_1ms(yanshi);
if(anjian==0){while(anjian==0);moshi=1;break;}
}
P0=0X00;
L1=1;
L1=0;
P0=0X80;
L2=1;
L2=0;
delay_1ms(yanshi);
for(j=0;j<7;j++)
{
P0=P0>>1;
L2=1;
L2=0;
delay_1ms(yanshi);
if(anjian==0){while(anjian==0);moshi=1;break;}
}
}
}
void dh3()
{
char i,j;
yanshi=400;
P0=0XFF;
H1=H2=1;
H1=H2=0;
for(i=0;i<2;i++)
{
P0=0X01;
L2=1;
L2=0;
if(anjian==0){while(anjian==0);moshi=1;break;}
delay_1ms(yanshi);
for(j=0;j<7;j++)
{
P0=(P0<<1)|0x01;
L2=1;
L2=0;
delay_1ms(yanshi);
if(anjian==0){while(anjian==0);moshi=1;break;}
}
P0=0X01;
L1=1;
L1=0;
delay_1ms(yanshi);
for(j=0;j<7;j++)
{
P0=(P0<<1)|0x01;
L1=1;
L1=0;
delay_1ms(yanshi);
if(anjian==0){while(anjian==0);moshi=1;break;}
}
delay_1ms(5000);
P0=0X7F;
for(j=0;j<7;j++)
{
P0=P0>>1;
L1=1;
L1=0;
delay_1ms(yanshi);
if(anjian==0){while(anjian==0);moshi=1;break;}
}
P0=0X7F;
L2=1;
L2=0;
delay_1ms(yanshi);
for(j=0;j<7;j++)
{
P0=P0>>1;
L2=1;
L2=0;
delay_1ms(yanshi);
if(anjian==0){while(anjian==0);moshi=1;break;}
}
}
}
void dh4()
{
char i;
P0=0X81;
L1=1;
L1=0;
P0=0X02;
L2=1;
L2=0;
for(i=0;i<5;i++)
{
P0=0X33;
H1=1;
H1=0;
H2=1;
H2=0;
delay_1ms(600);
P0=0X66;
H1=1;
H1=0;
H2=1;
H2=0;
delay_1ms(600);
if(anjian==0){while(anjian==0);moshi=1;break;}
P0=0XCC;
H1=1;
H1=0;
H2=1;
H2=0;
delay_1ms(600);
P0=0X99;
H1=1;
H1=0;
H2=1;
H2=0;
delay_1ms(600);
}
}
char s1,s2;
void dh5()
{
char i,j;
yanshi=500;
P0=0XFF;
H1=H2=1;
H1=H2=0;
for(i=0;i<5;i++)
{
s1=0x01;
s2=0x80;
P0=s1;
L1=1;
L1=0;
P0=s2;
L2=1;
L2=0;
if(anjian==0){while(anjian==0);moshi=1;break;}
delay_1ms(yanshi);
for(j=0;j<7;j++)
{
s2=(s2>>1)&0x7F;
P0=s2;
L2=1;
L2=0;
s1=s1<<1;
P0=s1;
L1=1;
L1=0;
delay_1ms(yanshi);
if(anjian==0){while(anjian==0);moshi=1;break;}
}
}
}
void dh6()
{
char i,j;
yanshi=500;
P0=0XFF;
H1=H2=1;
H1=H2=0;
for(i=0;i<5;i++)
{
P0=0x00;
L2=1;
L2=0;
P0=0x80;
L1=1;
L1=0;
if(anjian==0){while(anjian==0);moshi=1;break;}
delay_1ms(yanshi);
for(j=0;j<7;j++)
{
P0=(P0>>1)|0x80;
L1=1;
L1=0;
delay_1ms(yanshi);
if(anjian==0){while(anjian==0);moshi=1;break;}
}
P0=0x80;
L2=1;
L2=0;
delay_1ms(yanshi);
for(j=0;j<7;j++)
{
P0=(P0>>1)|0x80;
L2=1;
L2=0;
delay_1ms(yanshi);
if(anjian==0){while(anjian==0);moshi=1;break;}
}
}
}
void dh7()
{
char i;
P0=0XFF;
L1=1;
L1=0;
P0=0XFF;
L2=1;
L2=0;
for(i=0;i<5;i++)
{
P0=0X11;
H1=1;
H1=0;
H2=1;
H2=0;
delay_1ms(700);
P0=0X22;
H1=1;
H1=0;
H2=1;
H2=0;
delay_1ms(700);
if(anjian==0){while(anjian==0);moshi=1;break;}
P0=0X44;
H1=1;
H1=0;
H2=1;
H2=0;
delay_1ms(700);
P0=0X88;
H1=1;
H1=0;
H2=1;
H2=0;
delay_1ms(700);
}
}
void dh8()
{
char i;
P0=0XFF;
L1=1;
L1=0;
P0=0XFF;
L2=1;
L2=0;
for(i=0;i<5;i++)
{
P0=0X33;
H1=1;
H1=0;
H2=1;
H2=0;
delay_1ms(600);
P0=0X66;
H1=1;
H1=0;
H2=1;
H2=0;
delay_1ms(600);
if(anjian==0){while(anjian==0);moshi=1;break;}
P0=0XCC;
H1=1;
H1=0;
H2=1;
H2=0;
delay_1ms(600);
P0=0X99;
H1=1;
H1=0;
H2=1;
H2=0;
delay_1ms(600);
}
}
void dh9()
{
char i;
P0=0XFF;
L1=1;
L1=0;
P0=0XFF;
L2=1;
L2=0;
for(i=0;i<10;i++)
{
if(anjian==0){while(anjian==0);moshi=1;break;}
P0=0X55;
H1=1;
H1=0;
H2=1;
H2=0;
delay_1ms(600);
P0=0XAA;
H1=1;
H1=0;
H2=1;
H2=0;
delay_1ms(600);
}
}
void dh10()
{
char i,j;
yanshi=500;
P0=0X01;
H1=H2=1;
H1=H2=0;
for(i=0;i<5;i++)
{
P0=0x00;
L2=1;
L2=0;
P0=0x80;
L1=1;
L1=0;
if(anjian==0){while(anjian==0);moshi=1;break;}
delay_1ms(yanshi);
for(j=0;j<7;j++)
{
P0=(P0>>1)|0x80;
L1=1;
L1=0;
delay_1ms(yanshi);
if(anjian==0){while(anjian==0);moshi=1;break;}
}
P0=0x80;
L2=1;
L2=0;
delay_1ms(yanshi);
for(j=0;j<7;j++)
{
P0=(P0>>1)|0x80;
L2=1;
L2=0;
delay_1ms(yanshi);
if(anjian==0){while(anjian==0);moshi=1;break;}
}
}
}
uchar STC_ADC() //！！根據數據手冊寫一個ad讀取函數
{
uchar i;
ADC_RES = 0;
ADC_RESL = 0;
ADC_CONTR = BIN(10001000);
i=3;
while(i--);
while (1)
{
if (ADC_CONTR & BIN(10000))
{
break;
}
}
ADC_CONTR = BIN(10000000);
return( ADC_RESL<<2) ;
}
uchar date;
void init()
{
TMOD= 0x10;
TL1 = (65536-50000)/256; //設置定時初值
TH1 = (65536-50000)%256; //設置定時初值
ET1 = 1;
TR1 = 1;
EA = 0;
}
char h=0,v=0;
void pp()
{
if(date<=15 && date>0)
{
h=1;
if(v<h)v=h;
if(flag==0)
{
P0=0X01;
L2=1;
L2=0;
delay_1ms(2);
P0=0X00;
L1=1;
L1=0;
}
if(flag==1)
{
P0=0X01;
L2=1;
L2=0;
delay_1ms(2);
P0=0X00;
L1=1;
L1=0;
}
}
if(date<=30 && date>15)
{
h=2;
if(v<h)v=h;
if(flag==0)
{
P0=0X03;
L2=1;
L2=0;
delay_1ms(2);
P0=0X00;
L1=1;
L1=0;
}
if(flag==1)
{
P0=0X02;
L2=1;
L2=0;
delay_1ms(2);
P0=0X00;
L1=1;
L1=0;
}
}
if(date<=45 && date>30)
{
h=3;
if(v<h)v=h;
if(flag==0)
{
P0=0X07;
L2=1;
L2=0;
delay_1ms(2);
P0=0X00;
L1=1;
L1=0;
}
if(flag==1)
{
P0=0X04;
L2=1;
L2=0;
delay_1ms(2);
P0=0X00;
L1=1;
L1=0;
}
}
if(date<=60 && date>45)
{
h=4;
if(v<h)v=h;
if(flag==0)
{
P0=0X0F;
L2=1;
L2=0;
delay_1ms(2);
P0=0X00;
L1=1;
L1=0;
}
if(flag==1)
{
P0=0X08;
L2=1;
L2=0;
delay_1ms(2);
P0=0X00;
L1=1;
L1=0;
}
}
if(date<=75 && date>60)
{
h=5;
if(v<h)v=h;
if(flag==0)
{
P0=0X1F;
L2=1;
L2=0;
delay_1ms(2);
P0=0X00;
L1=1;
L1=0;
}
if(flag==1)
{
P0=0X10;
L2=1;
L2=0;
delay_1ms(2);
P0=0X00;
L1=1;
L1=0;
}
}
if(date<=90 && date>75)
{
h=6;
if(v<h)v=h;
if(flag==0)
{
P0=0X3F;
L2=1;
L2=0;
delay_1ms(2);
P0=0X00;
L1=1;
L1=0;
}
if(flag==1)
{
P0=0X20;
L2=1;
L2=0;
delay_1ms(2);
P0=0X00;
L1=1;
L1=0;
}
}
if(date<=105 && date>90)
{
h=7;
if(v<h)v=h;
if(flag==0)
{
P0=0X7F;
L2=1;
L2=0;
delay_1ms(2);
P0=0X00;
L1=1;
L1=0;
}
if(flag==1)
{
P0=0X40;
L2=1;
L2=0;
delay_1ms(2);
P0=0X00;
L1=1;
L1=0;
}
}
if(date<=130 && date>105)
{
h=8;
if(v<h)v=h;
if(flag==0)
{
P0=0XFF;
L2=1;
L2=0;
delay_1ms(2);
P0=0X00;
L1=1;
L1=0;
}
if(flag==1)
{
P0=0X80;
L2=1;
L2=0;
delay_1ms(2);
P0=0X00;
L1=1;
L1=0;
}
}
if(date<=145 && date>130)
{
h=9;
if(v<h)v=h;
if(flag==0)
{
P0=0XFF;
L2=1;
L2=0;
delay_1ms(2);
P0=0X01;
L1=1;
L1=0;
}
if(flag==1)
{
P0=0X00;
L2=1;
L2=0;
delay_1ms(2);
P0=0X01;
L1=1;
L1=0;
}
}
if(date<=160 && date>145)
{
h=10;
if(v<h)v=h;
if(flag==0)
{
P0=0XFF;
L2=1;
L2=0;
delay_1ms(2);
P0=0X03;
L1=1;
L1=0;
}
if(flag==1)
……………………
…………限于本文篇幅余下代碼請從51黑下載附件…………