資源簡介
51單片機跑馬燈完整程序與電路仿真圖,適合對單片機開發感興趣的愛好者。

代碼片段和文件信息
#include?
unsigned?char?RunMode;
//**********************************System?Fuction*************************************************
void?Delay1ms(unsigned?int?count)
{
unsigned?int?ij;
for(i=0;i for(j=0;j<120;j++);
}
unsigned?char?code?LEDDisplayCode[]?=?{?0xC00xF90xA40xB00x990x920x820xF8 //0~7
?????????????????????????? 0x800x900x880x830xC60xA10x860x8E0xFF};
void?Display(unsigned?char?Value)
{
P3?=?LEDDisplayCode[Value];
}
void?LEDFlash(unsigned?char?Count)
{
unsigned?char?i;
bit?Flag;
for(i?=?0;?i {
Flag?=?!Flag;
if(Flag)
Display(RunMode);
else
Display(0x10);
Delay1ms(100);
}
Display(RunMode);
}
unsigned?char?GetKey(void)
{
unsigned?char?KeyTempCheckValueKey?=?0x00;
CheckValue?=?P2&0x32;
if(CheckValue==0x32)
return?0x00;
Delay1ms(10);
KeyTemp?=?P2&0x32;
if(KeyTemp==CheckValue)
return?0x00;
if(!(CheckValue&0x02))
Key|=0x01;
if(!(CheckValue&0x10))
Key|=0x02;
if(!(CheckValue&0x20))
Key|=0x04;
return?Key;
}
unsigned?int?TimerCountSystemSpeedSystemSpeedIndex;
void?InitialTimer2(void)
{
T2CON??=?0x00; //16?Bit?Auto-Reload?Mode
? TH2?=?RCAP2H?=?0xFC;?? //重裝值初始值 TL2?=?RCAP2L?=?0x18;
ET2=1; //定時器?2?中斷允許
TR2?=?1; //定時器?2?啟動
EA=1;
}
unsigned?int?code?SpeedCode[]={???1???2???3???5???8??10??14??17??20??30
?????40??50??60??70??80??90?100?120?140?160
180?200?300?400?500?600?700?800?9001000};//30
void?SetSpeed(unsigned?char?Speed)
{
SystemSpeed?=SpeedCode[Speed];
}
void?LEDShow(unsigned?int?LEDStatus)
{
P1?=?~(LEDStatus&0x00FF);
P0?=?~((LEDStatus>>8)&0x00FF);
}
void?InitialCPU(void)
{
RunMode?=?0x00;
TimerCount?=?0;
SystemSpeedIndex?=?10;
P1?=?0x00;
P0?=?0x00;
P2?=?0xFF;
P3?=?0x00;
Delay1ms(500);
P1?=?0xFF;
P0?=?0xFF;
P2?=?0xFF;
P3?=?0xFF;
SetSpeed(SystemSpeedIndex);
Display(RunMode);
}
//Mode?0
unsigned?int?LEDIndex?=?0;
bit?LEDDirection?=?1LEDFlag?=?1;
void?Mode_0(void)
{
LEDShow(0x0001< LEDIndex?=?(LEDIndex+1)%16;
}
//Mode?1
void?Mode_1(void)
{
LEDShow(0x8000>>LEDIndex);
LEDIndex?=?(LEDIndex+1)%16;
}
//Mode?2
void?Mode_2(void)
{
if(LEDDirection)
LEDShow(0x0001< else
LEDShow(0x8000>>LEDIndex);
if(LEDIndex==15)
LEDDirection?=?!LEDDirection;
???LEDIndex?=?(LEDIndex+1)%16;
}
//Mode?3
void?Mode_3(void)
{
if(LEDDirection)
LEDShow(~(0x0001< else
LEDShow(~(0x8000>>LEDIndex));
if(LEDIndex==15)
LEDDirection?=?!LEDDirection;
???LEDIndex?=?(LEDIndex+1)%16;
}
//Mode?4
void?Mode_4(void)
{
if(LEDDirection)
{
if(LEDFlag)
LEDShow(0xFFFE< ??? else
LEDShow(~(0x7FFF>>LEDIndex));
}
else
{
if(LEDFlag)
LEDShow(0x7FFF>>LEDIndex);
else
LEDShow(~(0xFFFE< }
if(LEDIndex==15)
{
LEDDirection?=?!LEDDirection;
if(LEDDirection) LEDFlag?=?!LE
?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????目錄???????????0??2009-04-23?17:01??走馬燈\
?????文件?????2801078??2005-09-17?04:19??走馬燈\hurricanelamp.bmp
?????文件??????165791??2006-01-19?02:55??走馬燈\HurricaneLamp.DSN
?????文件?????????626??2006-01-21?01:29??走馬燈\HurricaneLamp.PWI
?????目錄???????????0??2009-04-23?17:00??走馬燈\Keil\
?????文件???????12246??2005-09-17?01:24??走馬燈\Keil\HurricaneLamp
?????文件????????5134??2005-09-17?01:21??走馬燈\Keil\HurricaneLamp.c
?????文件????????3965??2005-09-17?01:24??走馬燈\Keil\HurricaneLamp.hex
?????文件??????????58??2005-09-17?01:24??走馬燈\Keil\HurricaneLamp.lnp
?????文件???????12987??2005-09-17?01:24??走馬燈\Keil\HurricaneLamp.LST
?????文件???????21437??2005-09-17?01:24??走馬燈\Keil\HurricaneLamp.M51
?????文件???????15453??2005-09-17?01:24??走馬燈\Keil\HurricaneLamp.OBJ
?????文件????????1465??2005-09-17?02:54??走馬燈\Keil\HurricaneLamp.Opt
?????文件?????????197??2005-09-17?02:54??走馬燈\Keil\HurricaneLamp.plg
?????文件????????2019??2005-09-17?01:24??走馬燈\Keil\HurricaneLamp.Uv2
?????文件????????1464??2005-09-17?01:24??走馬燈\Keil\HurricaneLamp_Opt.Bak
?????文件????????2001??2005-09-17?01:12??走馬燈\Keil\HurricaneLamp_Uv2.Bak
?????文件????????5115??2002-04-16?15:32??走馬燈\Keil\STARTUP.A51
?????文件??????165722??2005-09-17?17:28??走馬燈\Last?Loaded?HurricaneLamp.DBK
?????文件?????????184??2009-04-20?17:16??走馬燈\proteus仿真論壇.txt
?????文件?????????205??2009-04-20?17:14??走馬燈\proteus仿真論壇.url
?????文件?????????184??2009-04-20?17:17??走馬燈\重要說明.txt
- 上一篇:基于模糊神經網絡的自適應PID控制器
- 下一篇:5000本epub書籍有目錄.txt
評論
共有 條評論