單片機C語言程序舉例(一)

1.流水燈C程序

#include
////////////////////////////////////////////////////////
void delay(unsigned int cnt) //簡單的延時
{
while(--cnt);
}
///////////////////////////////////////////////////////
main()
{
P1=0xfe;//給初始化值
while(1)
{
delay(30000);//delay at crystal frequency in 12MHz
P1<<=1;//左移一位
P1|=0x01;//最后一位補1
if(P1==0x7f)//檢測是否移到最左端？
{
delay(30000);//delay
P1=0xfe;
}
}
}

2.數(shù)碼管動態(tài)掃描C程序

#include

unsigned char const dofly[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f};// 顯示段碼值01234567
unsigned char code seg[]={0,1,2,3,4,5,6,7};//分別對應相應的數(shù)碼管點亮
////////////////////////////////////////////////////////
void delay(unsigned int cnt)
{
while(--cnt);
}
///////////////////////////////////////////////////////
main()
{
unsigned char i;

while(1)
{

P0=dofly[i];//取顯示數(shù)據(jù)
P2=seg[i]; //取段碼
delay(200); //掃描間隙延時
i++;
if(8==i) //檢測8位掃描完全？
i=0;
}
}
3.LED
／＼／＼
＼　　／
＼／點陣C程序

#include

unsigned char const dofly[]={0x00,0x6C,0x92,0x82,0x44,0x28,0x10,0x00};// 心的形狀
unsigned char code seg[]={0x7f,0xbf,0xdf,0xef,0xf7,0xfb,0xfd,0xfe};//分別對應相應的段亮
////////////////////////////////////////////////////////
void delay(unsigned int cnt)
{
while(--cnt);
}
///////////////////////////////////////////////////////
main()
{
unsigned char i;

while(1)
{

P0=dofly[i];//取顯示數(shù)據(jù)
P2=seg[i]; //取段碼
delay(200); //掃描間隙延時
i++;
if(8==i)
i=0;
}
}

4.實時時鐘RTC

#include
#include

sbit SCK=P3^6;
sbit SDA=P3^4;
sbit RST = P3^5; // DS1302復位

bit ReadRTC_Flag;

unsigned char l_tmpdate[7]={0,0,12,15,5,3,8};//秒分時日月周年08-05-15 12:00:00
unsigned char l_tmpdisplay[8];
code unsigned char write_rtc_address[7]={0x80,0x82,0x84,0x86,0x88,0x8a,0x8c}; //秒分時日月周年 最低位讀寫位
code unsigned char read_rtc_address[7]={0x81,0x83,0x85,0x87,0x89,0x8b,0x8d};

code unsigned char table[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x40};
//共陰數(shù)碼管 0-9 - 熄滅‘表
code unsigned char table1[]={0,1,2,3,4,5,6,7};
//顯示位碼表

void Write_Ds1302_byte(unsigned char temp);
void Write_Ds1302( unsigned char address,unsigned char dat );
unsigned char Read_Ds1302 ( unsigned char address );

void Read_RTC(void);//read RTC
void Set_RTC(void); //set RTC

void InitTIMER0(void);//inital timer0

void main(void)
{
InitTIMER0();
Set_RTC();
while(1){
if(ReadRTC_Flag)
{
ReadRTC_Flag=0;
Read_RTC();
switch (l_tmpdate[0]/5) //設計每個5秒交替顯示年月日 時分秒
{
case 0:
case 2:
case 4:
case 6:
case 8:
case 10:
l_tmpdisplay[0]=l_tmpdate[2]/16;//數(shù)據(jù)的轉(zhuǎn)換，因我們采用數(shù)碼管0~9的顯示,將數(shù)據(jù)分開
l_tmpdisplay[1]=l_tmpdate[2]&0x0f;
l_tmpdisplay[2]=10; //加入"-"
l_tmpdisplay[3]=l_tmpdate[1]/16;
l_tmpdisplay[4]=l_tmpdate[1]&0x0f;
l_tmpdisplay[5]=10;
l_tmpdisplay[6]=l_tmpdate[0]/16;
l_tmpdisplay[7]=l_tmpdate[0]&0x0f;
break;
case 1:
case 3:
case 5:
case 7:
case 9:
case 11:
l_tmpdisplay[0]=l_tmpdate[6]/16;
l_tmpdisplay[1]=l_tmpdate[6]&0x0f;
l_tmpdisplay[2]=10;
l_tmpdisplay[3]=l_tmpdate[4]/16;
l_tmpdisplay[4]=l_tmpdate[4]&0x0f;
l_tmpdisplay[5]=10;
l_tmpdisplay[6]=l_tmpdate[3]/16;
l_tmpdisplay[7]=l_tmpdate[3]&0x0f;
break;
default:
break;
}

}
}
}

void InitTIMER0(void)
{
TMOD|=0x01;//定時器設置 16位
TH0=0xef;//初始化值
TL0=0xf0;
ET0=1;
TR0=1;
EA=1;
}

void Write_Ds1302_Byte(unsigned char temp)
{
unsigned char i;
for (i=0;i<8;i++) //循環(huán)8次 寫入數(shù)據(jù)
{
SCK=0;
SDA=temp&0x01; //每次傳輸?shù)妥止?jié)
temp>>=1; //右移一位
SCK=1;
}
}

void Write_Ds1302( unsigned char address,unsigned char dat )
{
RST=0;
_nop_();
SCK=0;
_nop_();
RST=1;
_nop_(); //啟動
Write_Ds1302_Byte(address);//發(fā)送地址
Write_Ds1302_Byte(dat);//發(fā)送數(shù)據(jù)
RST=0; //恢復
}

unsigned char Read_Ds1302 ( unsigned char address )
{
unsigned char i,temp=0x00;
RST=0;
_nop_();
SCK=0;
_nop_();
RST=1;
_nop_();
Write_Ds1302_Byte(address);
for (i=0;i<8;i++) //循環(huán)8次 讀取數(shù)據(jù)
{
if(SDA)
temp|=0x80;//每次傳輸?shù)妥止?jié)
SCK=0;
temp>>=1;//右移一位
SCK=1;
}
RST=0;
_nop_();//以下為DS1302復位的穩(wěn)定時間
RST=0;
SCK=0;
_nop_();
SCK=1;
_nop_();
SDA=0;
_nop_();
SDA=1;
_nop_();
return (temp);//返回
}

void Read_RTC(void)//讀取日歷
{
unsigned char i,*p;
p=read_rtc_address; //地址傳遞
for(i=0;i<7;i++)//分7次讀取秒分時日月周年
{
l_tmpdate[i]=Read_Ds1302(*p);
p++;
}
}

void Set_RTC(void)//設定 日歷
{
unsigned char i,*p,tmp;
for(i=0;i<7;i++){ //BCD處理
tmp=l_tmpdate[i]/10;
l_tmpdate[i]=l_tmpdate[i]%10;
l_tmpdate[i]=l_tmpdate[i]+tmp*16;
}
Write_Ds1302(0x8E,0X00);

p=write_rtc_address;//傳地址
for(i=0;i<7;i++)//7次寫入秒分時日月周年
{
Write_Ds1302(*p,l_tmpdate[i]);
p++;
}
Write_Ds1302(0x8E,0x80);
}

void tim(void) interrupt 1 using 1//中斷，用于數(shù)碼管掃描
{

static unsigned char i,num;
TH0=0xf5;
TL0=0xe0;

P0=table[l_tmpdisplay[i]];//查表法得到要顯示數(shù)字的數(shù)碼段
P2=table1[i];
i++;
if(i==8)
{
i=0;
num++;
if(10==num) //隔段時間讀取1302的數(shù)據(jù)。時間間隔可以調(diào)整
{
ReadRTC_Flag=1; //使用標志位判斷
num=0;
}

}
}

5.4*4矩陣鍵盤

//行列掃描程序，可以自己定義端口和掃描方式，這里做簡單介紹
#include //包含頭文件
#define uchar unsigned char
#define uint unsigned int

unsigned char const dofly[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,
0x77,0x7c,0x39,0x5e,0x79,0x71};//0-F

uchar keyscan(void);
void delay(uint i);

void main()
{
uchar key;
P2=0x00;//1數(shù)碼管亮 按相應的按鍵，會顯示按鍵上的字符
while(1)
{
key=keyscan();//調(diào)用鍵盤掃描，
switch(key)
{
case 0x7e:P0=dofly[0];break;//0 按下相應的鍵顯示相對應的碼值
case 0x7d:P0=dofly[1];break;//1
case 0x7b:P0=dofly[2];break;//2
case 0x77:P0=dofly[3];break;//3
case 0xbe:P0=dofly[4];break;//4
case 0xbd:P0=dofly[5];break;//5
case 0xbb:P0=dofly[6];break;//6
case 0xb7:P0=dofly[7];break;//7
case 0xde:P0=dofly[8];break;//8
case 0xdd:P0=dofly[9];break;//9
case 0xdb:P0=dofly[10];break;//a
case 0xd7:P0=dofly[11];break;//b
case 0xee:P0=dofly[12];break;//c
case 0xed:P0=dofly[13];break;//d
case 0xeb:P0=dofly[14];break;//e
case 0xe7:P0=dofly[15];break;//f
}
}
}
uchar keyscan(void)//鍵盤掃描函數(shù)，使用行列反轉(zhuǎn)掃描法
{
uchar cord_h,cord_l;//行列值
P3=0x0f; //行線輸出全為0
cord_h=P3&0x0f; //讀入列線值
if(cord_h!=0x0f) //先檢測有無按鍵按下
{
delay(100); //去抖
if(cord_h!=0x0f)
{
cord_h=P3&0x0f; //讀入列線值
P3=cord_h|0xf0; //輸出當前列線值
cord_l=P3&0xf0; //讀入行線值
return(cord_h+cord_l);//鍵盤最后組合碼值
}
}return(0xff); //返回該值
}

void delay(uint i)//延時函數(shù)
{
while(i--);
}

6.紅外解碼LCD顯示

//該程序使用LCD1602顯示
#include
#include
#include

////////////////////////////////////////////////
#define TURE 1
#define FALSE 0

////////////////////////////////////////////////

sbit IR=P3^2;//紅外接口標志
sbit RS = P2^4;//Pin4
sbit RW = P2^5; //Pin5
sbit E = P2^6;//Pin6

#define Data P0 //數(shù)據(jù)端口

unsigned int hour,minute,second,count;
char code Tab[16]="0123456789ABCDEF";

char data TimeNum[]=" ";
char data Test1[]=" ";

////////////////////////////////////////////

unsigned char irtime;//紅外用全局變量

bit irpro_ok,irok;
unsigned char IRcord[4];
unsigned char irdata[33];
void ShowString (unsigned char line,char *ptr);

//////////////////////////////////////////////

void Delay(unsigned char mS);
void Ir_work(void);
void Ircordpro(void);

////////////////////////////////////////////////////////////////
void Delay(unsigned char mS)//delay mS
{
unsigned char us,usn;

while(mS!=0)
{
usn = 4;
while(usn!=0)
{
us=0xf0;
while (us!=0) {us--;};
usn--;
}

mS--;

}
}

//////////////////////////////////////////////////////////////////
/

void Ir_work(void)//紅外鍵值散轉(zhuǎn)程序
{

TimeNum[5] = Tab[IRcord[0]/16];
TimeNum[6] = Tab[IRcord[0]%16];
TimeNum[8] = Tab[IRcord[1]/16];
TimeNum[9] = Tab[IRcord[1]%16];
TimeNum[11] = Tab[IRcord[2]/16];
TimeNum[12] = Tab[IRcord[2]%16];
TimeNum[14] = Tab[IRcord[3]/16];
TimeNum[15] = Tab[IRcord[3]%16];

ShowString(1,TimeNum);

irpro_ok=0;

}

void Ircordpro(void)//紅外碼值處理函數(shù)
{
unsigned char i, j, k;
unsigned char cord,value;

k=1;
for(i=0;i<4;i++)//處理4個字節(jié)
{
for(j=1;j<=8;j++) //處理1個字節(jié)8位
{
cord=irdata[k];
if(cord>7)//大于某值為1
{
value=value|0x80;
}
else
{
value=value;
}
if(j<8)
{
value=value>>1;
}
k++;
}
IRcord[i]=value;
value=0;
} irpro_ok=1;//處理完畢標志位置1

}

void DelayUs(unsigned char us)//delay us
{
unsigned char uscnt;
uscnt=us>>1;
while(--uscnt);
}

void DelayMs(unsigned char ms)//delay Ms
{
while(--ms)
{
DelayUs(250);
DelayUs(250);
DelayUs(250);
DelayUs(250);
}
}
void WriteCommand(unsigned char c)
{
DelayMs(5);//short delay before operation
E=0;
RS=0;
RW=0;
_nop_();
E=1;
Data=c;
E=0;
}

void WriteData(unsigned char c)
{
DelayMs(5); //short delay before operation
E=0;
RS=1;
RW=0;
_nop_();
E=1;
Data=c;
E=0;
RS=0;
}

void ShowChar(unsigned char pos,unsigned char c)
{
unsigned char p;
if (pos>=0x10)
p=pos+0xb0; //是第二行則命令代碼高4位為0xc
else
p=pos+0x80; //是第二行則命令代碼高4位為0x8
WriteCommand (p);//write command
WriteData (c); //write data
}

void ShowString (unsigned char line,char *ptr)
{
unsigned char l,i;
l=line<<4;
for (i=0;i<16;i++)
ShowChar (l++,*(ptr+i));//循環(huán)顯示16個字符
}

void InitLcd()
{
DelayMs(15);
WriteCommand(0x38); //display mode
WriteCommand(0x38); //display mode
WriteCommand(0x38); //display mode
WriteCommand(0x06); //顯示光標移動位置
WriteCommand(0x0c); //顯示開及光標設置
WriteCommand(0x01); //顯示清屏

}

/////////////////////////////////////////////////////////////////

void main(void)
{
EX0init(); // Enable Global Interrupt Flag
TIM0init();

InitLcd();//
DelayMs(15);

sprintf(Test1," www.haotun.com ");//the first line
ShowString(0,Test1);

sprintf(TimeNum,"Code ");//the second line
ShowString(1,TimeNum);

while(1)//主循環(huán)
{
if(irok)
{
Ircordpro();
irok=0;
}

if(irpro_ok)//step press key
{
Ir_work();
}
}
}

7.蜂鳴器

#include

sbit SPK=P1^2;//定義蜂鳴器端口

void delay(unsigned int cnt)//延時
{
while(--cnt);
}

main()
{
unsigned int i;
while(1)
{
for(i=0;i<200;i++)//喇叭發(fā)聲的時間循環(huán)，改變大小可以改變發(fā)聲時間長短
{
delay(80);//參數(shù)決定發(fā)聲的頻率，估算值
SPK=!SPK;
}
SPK=1; //喇叭停止工作，間歇的時間，可更改
delay(20000);

}
}