//用于MCS51的C語(yǔ)言例子程序
//這是用于7279A評(píng)估板的C51子程序
#include<reg51.h>
//#include<at89x55>

//***函數(shù)定義***
void long_delay(void); //***長(zhǎng)延時(shí)***
void short_delay(void); //***短延時(shí)***
void delay10ms(unsigned char time); //延時(shí)10MS
void write7279(unsigned char cmd, unsigned char dta);// 寫(xiě)入到HD7279
unsigned char read7279(unsigned char command);// 從HD7279讀出
void send_byte(unsigned char out_byte); //發(fā)送一個(gè)字節(jié)
unsigned char receive_byte(void); //接收一個(gè)字節(jié)

//**定義變量及I/O口**
unsigned char digit[5];
unsigned char key_number, j, k;
unsigned int tmr;
unsigned long wait_cnter;
sbit cs=P1^3; // cs at P1.0
sbit clk=P1^2; // clk 連接于P1.1
sbit dat=P1^1; // data 連接于P1.2
sbit key=P1^0; // key 連接于P1.3

 //****** HD7279A指令 ******
#define CMD_RESET 0xa4
#define CMD_TEST 0xbf
#define DECODE0 0x80
#define DECODE1 0xc8
#define CMD_READ 0x15
#define UNDECODE 0x90
#define RTL_CYCLE 0xa3
#define RTR_CYCLE 0xa2
#define RTL_UNCYL 0xa1
#define RTR_UNCYL 0xa0
#define ACTCTL 0x98
#define SEGON 0xe0
#define SEGOFF 0xc0
#define BLINKCTL 0x88

//***主程序***
main()
{
 // P1=0x9f;
while (1)
{
 for (tmr=0;tmr<0x4000;tmr++); //上電延時(shí)
 send_byte(CMD_RESET); // 復(fù)位HD7279A
//******************************************
//           測(cè)試指令演示
//******************************************
send_byte(CMD_TEST); //測(cè)試指令
for (j=0;j<3;j++) // 延時(shí)約3S
{
delay10ms(100);
}
send_byte(CMD_RESET); //清除顯示

//**********************************************
//閃爍指令及鍵盤(pán)接口測(cè)試
//將用戶按鍵的鍵碼顯示出來(lái)，如果10秒內(nèi)沒(méi)有按鍵或
//按SO鍵即進(jìn)入下一步演示
//**********************************************
wait_cnter=0;
key_number=0xff;

write7279(BLINKCTL,0xfc); // 第1、2位設(shè)為閃爍顯示
write7279(UNDECODE,0x08); // 第1位 顯示下劃線'_'
write7279(UNDECODE+1,0x08);// 第2位 顯示下劃線'_'
do
{
 if (!key) //如果有鍵按下
{
key_number=read7279(CMD_READ);//讀出鍵碼
write7279(DECODE1+1,key_number/16);//在第二位顯示鍵碼高八位
write7279(DECODE1,key_number&0x0f); //在第一位顯示鍵碼低八位
while (!key); //等待按鍵放開(kāi)
wait_cnter=0;
}
wait_cnter++;
}
while (key_number!=0 && wait_cnter<0x30000);
//如果按鍵為0或超時(shí)則進(jìn)入下一步演示 write7279(BLINKCTL,0xff); //清除閃爍設(shè)置

//******************************************
//快速計(jì)數(shù)演示
//******************************************
for (j=0;j<5;j++) //計(jì)數(shù)初值為00000
{
digit[j]=0;
write7279(DECODE0+j,digit[j]);
}
while (digit[4]<2) // 如果計(jì)數(shù)達(dá)到20000就停止
{
digit[0]++;
if (digit[0]>9)
{
digit[0]=0;
digit[1]++;
if (digit[1]>9)
{
digit[1]=0;
digit[2]++;
if (digit[2]>9)
{
digit[2]=0;
digit[3]++;
if (digit[3]>9)
{
digit[3]=0;
digit[4]++;
if (digit[4]>9)
{
digit[4]=0;
}
}
}
}
}
write7279(DECODE0,digit[0]);
if (digit[0]==0)
{
write7279(DECODE0+1,digit[1]);
if (digit[1]==0)
{
write7279(DECODE0+2,digit[2]);
if (digit[2]==0)
{
write7279(DECODE0+3,digit[3]);
if (digit[3]==0)
{
write7279(DECODE0+4,digit[4]);
}
}
}
}
}
delay10ms(150);
send_byte(CMD_RESET); //清除顯示

//*************************************************
//下載數(shù)據(jù)但不譯碼指令測(cè)試
//*************************************************
write7279(UNDECODE+7,0x49);//在第八位按不譯碼方式顯示一字符"三"
delay10ms(80);

//*************************************************
//    循環(huán)左/右移測(cè)試，"三"字向右運(yùn)動(dòng)3次，再向左運(yùn)動(dòng)3次
//*************************************************
for (j=0;j<23;j++)
{
send_byte(RTR_CYCLE); // 循環(huán)右移23次
delay10ms(12);
}
for (j=0;j<23;j++)
{
send_byte(RTL_CYCLE); // 循環(huán)左移23次
delay10ms(12);
}
//*********************************************
//譯碼方式0及左移指令測(cè)試
//******************************************************
for (j=0;j<16;j++)
{
send_byte(RTL_UNCYL); //不循環(huán)左移指令
write7279(DECODE0,j);//譯碼方式0，顯示在第1位
delay10ms(50);
}
delay10ms(150);
send_byte(CMD_RESET);
//*********************************************
//譯碼方式1及右移指令測(cè)試
//*********************************************
for (j=0;j<16;j++)
{
send_byte(RTR_UNCYL); //不循環(huán)右移指令
write7279(DECODE1+7,j);//譯碼方式1。顯示在第8位
delay10ms(50);
}
delay10ms(150);

//*********************************************
//消隱指令測(cè)試
//*********************************************
k=0xff;
for (j=0;j<6;j++)
{
k=k/2;
write7279(ACTCTL,k);//每隔一秒鐘增加一個(gè)消隱位
delay10ms(100);
}
write7279(ACTCTL,0xff); // 恢復(fù)8位顯示
delay10ms(100);
send_byte(CMD_RESET); // 清除顯示

//**********************************************
//段點(diǎn)亮指令和段關(guān)閉指令
//**********************************************
for (j=0;j<64;j++)
{
write7279(SEGON,j); // 將64個(gè)顯示段逐個(gè)點(diǎn)亮
write7279(SEGOFF,j-1); //同時(shí)將前一個(gè)顯示段關(guān)閉
delay10ms(20);
}
}
}
void write7279(unsigned char cmd, unsigned char dta)
{
send_byte (cmd);
short_delay();
send_byte (dta);
}
unsigned char read7279(unsigned char command)
{
send_byte(command);
return(receive_byte());
}
//***發(fā)送***
void send_byte( unsigned char out_byte)
{
unsigned char i;
cs=0;
long_delay();
for (i=8;i>0;i--)
  {
  if (out_byte & 0x80)
    {dat=1;}
  else
   {dat=0;}
  clk=1;
  short_delay();
  clk=0;
  short_delay();
  out_byte=out_byte<<1;
  }
dat=0;
}

//***接收***
unsigned char receive_byte(void)
{
  unsigned char i, in_byte;
  dat=1;             //設(shè)為輸入狀態(tài)
  long_delay();
  for (i=8;i>0;i--)
  {
  clk=1;
  short_delay();
  in_byte=in_byte<<1;
  if (dat)
    {in_byte=in_byte|0x01;}
  clk=0;
  short_delay();
  }
dat=0;
return (in_byte);
}

//***長(zhǎng)延時(shí)***
void long_delay(void)
{
unsigned char i;
for (i=0;i<0x12;i++);
}

//***短延時(shí)***
void short_delay(void)
{
unsigned char i;
for (i=0;i<3;i++);
}
// ********************* 延時(shí)n*10ms **********************
void delay10ms(unsigned char time)
{
unsigned char i;
unsigned int j;
for (i=0;i<time;i++)
{
for(j=0;j<0x390;j++)
{
}
}
}