C语言程序设计实训100例—基于8051+Proteus仿真》案例
01篇基础程序设计
闪烁的LED
名称：闪烁的LED
说明：LED按设定的时间间隔闪烁
延时
uchari;
while(x--)
{
for(i=0;i<120;i++);
}
主程序
while(1)
{
LED=~LED;
DelayMS(150);
}
从左到右的流水灯
名称：从左到右的流水灯
说明：接在P0口的8个LED
产生走
延时
uchari;
while(x--)
{
for(i=0;i<120;i++);
}
主程序
P0=0xfe;
while(1)
{
P0=_crol_(P0,1);//P0的值向左循环移动
DelayMS(150);
}
只LED左右来回点亮
名称：8只LED左右来回点亮
说明：程序利用循环移位函数_crol_和_cror_形成来回滚动的效果
延时
uchari;
while(x--)
{
for(i=0;i<120;i++);
}
主程序
uchari;
P2=0x01;
while(1)
{
for(i=0;i<7;i++)
{
  P2=_crol_(P2,1);//P2的值向左循环移动
  DelayMS(150);
}
for(i=0;i<7;i++)
{
  P2=_cror_(P2,1);//P2的值向右循环移动
  DelayMS(150);
}
}
花样流水灯
名称：花样流水灯
说明：16只LED分两组
延时
uchari;
while(x--)
{
for(i=0;i<120;i++);
}
主程序
uchari;
while(1)
{ //从数组中读取数据送至P0和P2口显示
for(i=0;i<136;i++)
{
  P0=Pattern_P0[i];
  P2=Pattern_P2[i];
  DelayMS(100);
}
}
模拟交通灯
名称：LED模拟交通灯
说明：东西向绿灯亮若干秒，黄
5次后红灯亮，红灯亮后，南
5此后变红灯，东西向变
//东西向灯
//南北向灯
闪烁次数，操作类型变量
延时
uchari;
while(x--)for(i=0;i<120;i++);
交通灯切换
switch(Operation_Type)
{
case1: //东西向绿灯与南北向红灯亮
  RED_A=1;YELLOW_A=1;GREEN_A=0;
  RED_B=0;YELLOW_B=1;GREEN_B=1;
  DelayMS(2000);
  Operation_Type=2;
  break;
case2: //东西向黄灯闪烁，绿灯关闭
  DelayMS(300);
  YELLOW_A=~YELLOW_A;GREEN_A=1;
  if(++Flash_Count!=10)return;//闪烁5次
  Flash_Count=0;
  Operation_Type=3;
  break;
case3: //东西向红灯，南北向绿灯亮
  RED_A=0;YELLOW_A=1;GREEN_A=1;
  RED_B=1;YELLOW_B=1;GREEN_B=0;
  DelayMS(2000);
  Operation_Type=4;
  break;
case4: //南北向黄灯闪烁5次
  DelayMS(300);
  YELLOW_B=~YELLOW_B;GREEN_B=1;
  if(++Flash_Count!=10)return;
  Flash_Count=0;
  Operation_Type=1;
}
主程序
while(1)Traffic_Light();
单只数码管循环显示0~9
名称：单只数码管循环显示0~9
说明：主程序中的循环语句反复将0~9的段码送至P0口，使数字0~9循环显示
延时
uchart;
while(x--)for(t=0;t<120;t++);
主程序
uchari=0;
P0=0x00;
while(1)
{/*for(;i<11;i++){P0=~DSY_CODE[i];DelayMS(300);}//注：另一方案*/
P0=~DSY_CODE[i];
i=(i+1)%10;
DelayMS(300);
}
只数码管滚动显示单个数字
名称：8只数码管滚动显示单个数字
说明：数码管从左到右依次滚动显示
，程序通过每次仅循环选通一只数
码
延时
uchart;
while(x--)for(t=0;t<120;t++);
主程序
uchari,wei=0x80;
while(1)
{
for(i=0;i<8;i++)
{
  P2=0xff; //关闭显示
  wei=_crol_(wei,1);
  P0=DSY_CODE[i];//发送数字段码
  P2=wei;  //发送位码
  DelayMS(300);
}
}
只数码管动态显示多个不同字符
名称：8只数码管动态显示多个不同字符
说明：数码管动态扫描显示0~7。
延时
uchart;
while(x--)for(t=0;t<120;t++);
主程序
uchari,wei=0x80;
while(1)
{
for(i=0;i<8;i++)
{ 
  P2=0xff;
  P0=DSY_CODE[i];//发送段码
  wei=_crol_(wei,1);
  P2=wei;  //发送位码
  DelayMS(2);
}
}
只数码管闪烁显示数字串
名称：8只数码管闪烁显示数字串
说明：数码管闪烁显示由0~7构成的一串数字
本例用动态刷新法显示一串数字，在停止刷新时所有数字显示消失。
段码表
位码表
延时
uchart;
while(x--)for(t=0;t<120;t++);
主程序
uchari,j;
while(1)
{
for(i=0;i<30;i++)
{ 
  for(j=0;j<8;j++)
  {
  P0=0xff;
  P0=DSY_CODE[j];//发送段码
  P2=DSY_IDX[j]; //发送位码
  DelayMS(2);
  }
}
P2=0x00; //关闭所有数码管并延时
DelayMS(1000);
}
只数码管滚动显示数字串
名称：8只数码管滚动显示数字串
说明：数码管向左滚动显示3个字符构成的数字串
段码表
下面数组看作环形队列，显示从某个数开始的8个数（10表示黑屏）
延时
uchart;
while(x--)for(t=0;t<120;t++);
主程序
uchari,j,k=0,m=0x80;
while(1)
{ //刷新若干次，保持一段时间的稳定显示
for(i=0;i<15;i++)
{ 
  for(j=0;j<8;j++)
  { //发送段码，采用环形取法，从第k个开始取第j个
  P0=0xff;
  P0=DSY_CODE[Num[(k+j)%11]];
  m=_crol_(m,1);
  P2=m; //发送位码
  DelayMS(2);
  }
}
k=(k+1)%11; //环形队列首支针k递增，Num下标范围0~10，故对11取余
}
控制LED移位
名称：K1-K4控制LED移位
说明：按下K1时，P0口LED上移一位；
按下K2时，P0口LED下移一位；
按下K3时，P2口LED上移一位；
按下K4时，P2口LED下移一位；
延时
uchari;
while(x--)for(i=0;i<120;i++);
根据P1口的按键移动LED
if((P1&0x10)==0)P0=_cror_(P0,1);//K1
elseif((P1&0x20)==0)P0=_crol_(P0,1); //K2
elseif((P1&0x40)==0)P2=_cror_(P2,1);//K3
elseif((P1&0x80)==0)P2=_crol_(P2,1); //K4
主程序
ucharRecent_Key; //最近按键
P0=0xfe;
P2=0xfe;
P1=0xff;
Recent_Key=0xff;
while(1)
{
if(Recent_Key!=P1)
{
  Recent_Key=P1; //保存最近按键
  Move_LED();
  DelayMS(10);
}
}
按键状态显示
名称：K1-K4按键状态显示
说明：K1、K2按下时LED点亮，松开时熄灭，
K3、K4按下并释放时LED点亮，再次按下并释放时熄灭；
延时
uchari;
while(x--)for(i=0;i<120;i++);
主程序
P0=0xff;
P1=0xff;
while(1)
{
LED1=K1;
LED2=K2;
if(K3==0)
{
  while(K3==0);
  LED3=~LED3;
}
if(K4==0)
{
  while(K4==0);
  LED4=~LED4;
}
DelayMS(10);
}
分组控制LED
名称：K1-K4分组控制LED
说明：每次按下K1时递增点亮一只LED，全亮时再次按下则再次循环开始，
K2按下后点亮上面4只LED，K3按下后点亮下面4只LED，K4按下后关闭所有LED
延时
uchari;
while(x--)for(i=0;i<120;i++);
主程序
uchark,t,Key_State;
P0=0xff;
P1=0xff;
while(1)
{
t=P1;
if(t!=0xff)
{
  DelayMS(10);
  if(t!=P1)continue;
  //取得4位按键值，由模式XXXX1111(X中有一位为0，其他均为1)
  //变为模式0000XXXX(X中有一位为1，其他均为0)
  Key_State=~t>>4;
  k=0;
  //检查1所在位置，累加获取按键号k
  while(Key_State!=0)
  {
  k++;
  Key_State>>=1;
  }
  //根据按键号k进行4种处理
  switch(k)
  {
  case1: if(P0==0x00)P0=0xff;
    P0<<=1;
    DelayMS(200);
    break;
  case2: P0=0xf0;break;
  case3: P0=0x0f;break;
  case4: P0=0xff;
  }
}
}
控制数码管移位显示
名称：K1-K4控制数码管移位显示
说明：按下K1时加1计数并增加显示位，
按下K2时减1计数并减少显示位，
按下K3时清零。
段码
位码
待显示到各数码管的数字缓冲（开始仅在0位显示0，其他黑屏）
延时
uchari;
while(x--)for(i=0;i<120;i++);
uchari;
for(i=0;i<8;i++)
{
P0=0xff;
P0=DSY_CODE[Display_Buffer[i]];
P2=DSY_Index[i];
DelayMS(2);
}
主程序
uchari,Key_NO,Key_Counts=0;
P0=0xff;
P1=0xff;
P2=0x00;
while(1)
{
Show_Count_ON_DSY();
P1=0xff;
Key_NO=P1;
/
/P1口按键状态分别为K1-0xfe，K2-0xfd,K3-0xfb
switch(Key_NO)
{
  case0xfe: Key_Counts++;
    if(Key_Counts>8)Key_Counts=8;
    Display_Buffer[Key_Counts-1]=Key_Counts;
    break;
  case0xfd: if(Key_Counts>0)Display_Buffer[--Key_Counts]=10;
    break;
  case0xfb: Display_Buffer[0]=0;
    for(i=1;i<8;i++)Display_Buffer[i]=10;
    Key_Counts=0;
}
//若键未释放则仅刷新显示，不进行键扫描
while(P1!=0xff)Show_Count_ON_DSY();
}
控制数码管加减演示
名称：K1-K4控制数码管加减演示
说明：按下K1后加1计数，按下K2
1计数，按下K3后清零。
段码
待显示的3位缓冲
按键代码，按键计数
延时
uchari;
while(x--)for(i=0;i<120;i++);
显示函数
uchari,j=0x01;
Num_Buffer[2]=Key_Counts/100;
Num_Buffer[1]=Key_Counts/10%10;
Num_Buffer[0]=Key_Counts%10;
for(i=0;i<3;i++)
{
j=_cror_(j,1);
P0=0xff;
P0=DSY_CODE[Num_Buffer[i]];
P2=j;
DelayMS(1);
}
主程序
uchari;
P0=0xff;
P1=0xff;
P2=0x00;
Key_Code=0xff;
while(1)
{
Show_Counts_ON_DSY();
P1=0xff;
Key_Code=P1;
//有键按下时，数码管刷新显示30次，该行代码同时起到延时作用
if(Key_Code!=0xff)
for(i=0;i<30;i++)Show_Counts_ON_DSY();
switch(Key_Code)
{
  case0xfe: if(Key_Counts<255)Key_Counts++;
    break;
  case0xfd: if(Key_Counts>0)Key_Counts--;
    break;
  case0x
fb: Key_Counts=0;
}
Key_Code=0xff;
}
矩阵键盘控制条形
显示
名称：4X4矩阵键盘控
LED显示
说明：运行本例时，按
的按键值越大点亮的
越多。
矩阵键盘按键特征码表
延时
uchari;
while(x--)for(i=0;i<120;i++);
键盘扫描
ucharsCode,kCode,i,k;
/
/低4位置0，放入4行
P1=0xf0;
//若高4位出现0，则有键按下
if((P1&0xf0)!=0xf0)
{
DelayMS(2);
if((P1&0xf0)!=0xf0)
{ 
  sCode=0xfe;  //行扫描码初值
  for(k=0;k<4;k++) //对4行分别进行扫描
  {
  P1=sCode;
  if((P1&0xf0)!=0xf0)
  {
    kCode=~P1;
    for(i=0;i<16;i++) //查表得到按键序号并返回
    if(kCode==KeyCodeTable[i]) 
      return(i);
  }
  else
    sCode=_crol_(sCode,1);
  }
}
}
return(-1);
主程序
uchari,P2_LED,P3_LED;
ucharKeyNo=-1;  //按键序号，-1表示无按键
while(1)
{
KeyNo=Keys_Scan(); //扫描键盘获取按键序号KeyNo
if(KeyNo!=-1)
{
  P2_LED=0xff;
  P3_LED=0xff;
  for(i=0;i<=KeyNo;i++) //键值越大，点亮的LED越多
  {
  if(i<8)
  P3_LED>>=1;
  else
  P2_LED>>=1;
  }
  P3=P3_LED;  //点亮条形LED
  P2=P2_LED;
}
}
数码管显示4X4矩阵键盘按键
名称：数码管显示4X4矩阵
说明：按下任意键时，数码
段码
上次按键和当前按键的序号，该矩阵中序号范围0~15，16表示无按键
延时
uchari;
while(x--)for(i=0;i<120;i++);
矩阵键盘扫描
ucharTmp;
P1=0x0f; //高4位置0，放入4行
DelayMS(1);
Tmp=P1^0x0f;//按键后0f变成0000XXXX，X中一个为0，3个仍为1，通过异或把3个1变为0，唯
0变为1
switch(Tmp) //判断按键发生于0~3列的哪一列
{
case1: KeyNo=0;break;
case2: KeyNo=1;break;
case4:KeyNo=2;break;
case8: KeyNo=3;break;
default:KeyNo=16; //无键按下 
}
P1=0xf0;//低4位置0，放入4列
DelayMS(1);
Tmp=P1>>4^0x0f;//按键后f0变成XXXX0000，X中有1个为0，三个仍为1；高4位转移到低4位并
switch(Tmp) //对0~3行分别附加起始值0，4，8，12
{
case1: KeyNo+=0;break;
单片机编程100例详解
case2: KeyNo+=4;break;
case4: KeyNo+=8;break;
case8: KeyNo+=12;
}
蜂鸣器
uchari;
for(i=0;i<100;i++)
{
DelayMS(1);
BEEP=~BEEP;
}
BEEP=0;
主程序
P0=0x00;
BEEP=0;
while(1)
{
P1=0xf0;
if(P1!=0xf0)Keys_Scan();//获取键序号
if(Pre_KeyNo!=KeyNo)
{
  P0=~DSY_CODE[KeyNo];
  Beep();
  Pre_KeyNo=KeyNo;
}
DelayMS(100);
}
开关控制LED
名称：开关控制LED
说明：开关S1和S2分别控制LED1和LED2。
主程序
while(1)
{
LED1=S1;
LED2=S2;
}
继电器控制照明设备
名称：继电器控制照明设备
说明：按下K1灯点亮，再次
延时
uchart;
while(ms--)for(t=0;t<120;t++);
主程序
P1=0xff;
RELAY=1;
while(1)
{
if(K1==0)
{
  while(K1==0);
  RELAY=~RELAY;
  DelayMS(20);
}
}
数码管显示拨码开关编码
名称：数码管显示拨码开关编码
说明：系统显示拨码开
关所设置的编码000~255
各数字的数码管段码（共阴）
显示缓冲
延时
uchart;
while(ms--)for(t=0;t<120;t++);
主程序
uchari,m,Num;
P0=0xff;
P2=0xff;
while(1)
{
m=0xfe;
Num=P1; //读取拨码开关的值
DSY_Buffer[0]=Num/100;
DSY_Buffer[1]=Num/10%10;
DSY_Buffer[2]=Num%10;
for(i=0;i<3;i++) //刷新显示在数码管上
{
  m=_crol_(m,1);
  P2=m;
  P0=DSY_CODE[DSY_Buffer[i]];
  DelayMS(10);
}
}
开关控制报警器
名称：开关控制报警器
说明：用K1开关控制报警器，程序控制P1.0输
发声函数
uchari,j;
for(i=0;i<200;i++)
{
SPK=~SPK;
for(j=0;j<t;j++); //由参数t行成不同的频率
}
SPK=0;
while(1)
{
if(K1==1)
{
  Alarm(90);
  Alarm(120);
}
}
按键发音
名称：按键发音
说明：按下不同的按键会是
发出不同频率的声音。
延时
uchart;
while(x--)for(t=0;t<120;t++);
按周期t发音
uchari;
for(i=0;i<100;i++)
{
BEEP=~BEEP;
DelayMS(t);
}
BEEP=0;
P1=0xff;
BEEP=0;
while(1)
{
if(K1==0) Play(1);
if(K2==0) Play(2);
if(K3==0) Play(3);
if(K4==0) Play(4);
}
播放音乐
名称：播放音乐   
说明：程序运行时播放生日快乐歌，
延时
生日快乐歌的音符频率表，不同频率由不同的延时来决定
    212,212,106,126,159,169,190,119,119,126,159,142,159,0};
生日快乐歌节拍表，节拍决定每个音符的演奏长短
延时
uchart;
while(x--)for(t=0;t<120;t++);
播放函数
uinti=0,j,k;
while(SONG_LONG[i]!=0||SONG_TONE[i]!=0)
{ //播放各个音符，SONG_LONG为拍子长度
for(j=0;j<SONG_LONG[i]*20;j++)
{
  BEEP=~BEEP;
  //SONG_TONE延时表决定了每个音符的频率
  for(k=0;k<SONG_TONE[i]/3;k++);
}
DelayMS(10);
i++; 
}
BEEP=0;
while(1)
{
PlayMusic(); //播放生日快乐
DelayMS(500); //播放完后暂停一段时间
}
中断计数 
名称：INT0中断计数   
说明：每次按下计数键时触发INT0中断，中断程序累加计数，计数值显示在3只数码管上，按下清
的段码
计数值分解后各个待显示的数位
数码管上显示计数值
DSY_Buffer[2]=Count/100; //获取3个数
DSY_Buffer[1]=Count%100/10;
DSY_Buffer[0]=Count%10;
if(DSY_Buffer[2]==0)//高位为0时不显示
{
DSY_Buffer[2]=0x0a;
if(DSY_Buffer[1]==0)//高位为0，若第二位为0同样不显示
  DSY_Buffer[1]=0x0a;
}
P0=DSY_CODE[DSY_Buffer[0]];
P1=DSY_CODE[DSY_Buffer[1]];
P2=DSY_CODE[DSY_Buffer[2]];
主程序
P0=0x00;
P1=0x00;
P2=0x00;
IE=0x81; //允许INT0中断
IT0=1;  //下降沿触发
while(1)
{
if(Clear_Key==0)Count=0; //清0
Show_Count_ON_DSY();
}
中断函数
Count++; //计数值递增
外部INT0中断控制LED 
名称：外部INT0中断控制LED
说明：每次按键都会触发INT0中
LED状态取反，产
LED状态由按键控制的效果
主程序
LED=1;
EA=1;
EX0=1;
IT0=1;
while(1);
中断函