資源簡(jiǎn)介
Proteus單片機(jī)仿真跑馬燈程序
代碼片段和文件信息
/*
?*?跑馬燈?按鍵改變閃爍方式
?*
*/
#include?
sbit?ENLED?=?P1^4;
sbit?ADDR3?=?P1^3;
sbit?ADDR2?=?P1^2;
sbit?ADDR1?=?P1^1;
sbit?ADDR0?=?P1^0;
sbit?KeyIn1?=?P2^4;
sbit?KeyIn2?=?P2^5;
sbit?KeyIn3?=?P2^6;
sbit?KeyIn4?=?P2^7;
sbit?KeyOut1?=?P2^3;
sbit?KeyOut2?=?P2^2;
sbit?KeyOut3?=?P2^1;
sbit?KeyOut4?=?P2^0;
unsigned?char?key=0;
void?delay(unsigned?int?i)
{
while?(i--);
}
unsigned?char?just_keys(unsigned?char?n)
{
if?(KeyIn1?==?0)
{
delay?(100);
if?(KeyIn1?==?0)
{
while?(KeyIn1?==?0);
return?(1+4*n);
}
else
return?0;
}
if?(KeyIn2?==?0)
{
delay?(100);
if?(KeyIn2?==?0)
{
while?(KeyIn2?==?0);
return?(2+4*n);
}
else
return?0;
}
if?(KeyIn3?==?0)
{
delay?(100);
if?(KeyIn3?==?0)
{
while?(KeyIn3?==?0);
return?(3+4*n);
}
else
return?0;
}
if?(KeyIn4?==?0)
{
delay?(100);
if?(KeyIn4?==?0)
{
while?(KeyIn4?==?0);
return?(4+4*n);
}
else
?屬性????????????大小?????日期????時(shí)間???名稱
-----------?---------??----------?-----??----
?????文件???????3425??2012-02-08?17:31??paomadeng\leds.hex
?????文件?????????40??2012-02-08?17:31??paomadeng\leds.lnp
?????文件??????25625??2012-02-08?17:31??paomadeng\leds.M51
?????文件????????514??2012-02-08?23:25??paomadeng\leds.plg
?????文件???????1975??2010-10-26?22:06??paomadeng\leds_Uv2.Bak
?????文件???????5552??2010-10-26?23:03??paomadeng\main.c
?????文件???????2094??2011-11-17?17:23??paomadeng\leds.Uv2
?????文件???????1187??2012-02-08?00:40??paomadeng\leds_Opt.Bak
?????文件??????18168??2012-02-08?17:31??paomadeng\main.LST
?????文件??????15145??2012-02-08?17:31??paomadeng\main.OBJ
?????文件??????12872??2012-02-08?17:31??paomadeng\leds
?????文件???????1181??2012-02-08?23:25??paomadeng\leds.Opt
?????文件?????146518??2013-05-23?21:59??paomadeng\8051?LED?跑馬燈.DSN
?????目錄??????????0??2010-10-26?19:14??paomadeng
-----------?---------??----------?-----??----
???????????????234296????????????????????14
評(píng)論
共有 條評(píng)論