#include<reg52.h>
#include<stdio.h>
#include<string.h>
#include<math.h>
#include<absacc.h>
#define uchar unsigned char
#define uint  unsigned int
#define ulong unsigned long
#define cm1 co1.co1
#define cm2 co2.co2
#define cm3 co3.co3
#define cm4 co4.co4
#include <reg52.h>
#define cmdd 0
#define datt 1
sbit dat=P1^3;
sbit clk=P1^2;
sbit stb=P1^1;
union
{
  uchar dat;
  struct
 {
   uchar dms: 3; //選擇顯示屏硬件的柵和段的位數
   uchar dnc: 3; //數據空位
   uchar ad1: 2; //此命令的地址值固定為0X00
 }co1;
}co1;
union 
{
  uchar dat;
  struct
 {
  uchar fru: 2; //功能選擇：00：WRITE DATA TO DISRAM 01：WRITE DATA TO LED 02：READ DATA FROM KEY 03：READ DATA FROM SW
  uchar mad: 1; //0遞增 1指定地址
  uchar mst: 1; //0正常 1測試模式
  uchar dnc: 2; //數據空位
  uchar ad2: 2; //此命令的地址值固定為0X01
 }co2;
}co2;
union
{
  uchar dat;
  struct
 {
  uchar add: 5; //16312內部DISRAM地址選擇
  uchar dnc: 1; //數據空位
  uchar ad3: 2; //此命令的地址值固定為0X03
 }co3;
}co3;
union
{
  uchar dat;
  struct
 {
   uchar pwm: 3; //輸出點亮時間選擇（可以調節亮度）
   uchar dis: 1; //0顯示關閉
   uchar dnc: 2; //數據空位
   uchar ad4: 2; //此命令的地址值固定為0X02
 }co4;
}co4;

void wrd(uchar disno,bit lei)  //寫一個字節的命令或者數據（由LEI控制是寫數據還是寫命令）
{
  uchar a;
  if(lei)
  goto s;
  stb=1;
  stb=1;
  stb=0;
 s:  for(a=0;a<8;a++)
    {
     clk=1;
     clk=1;
	 clk=0;
     clk=0;
      if(disno&0x01)
        dat=1;
      else
        dat=0;
        disno=disno>>1;
        clk=1;
        clk=1;
		clk=1;
        clk=1;
     }
}
void inivfd(void)
 {
  cm1.dms=0x01;//設置為5區 16段
  cm1.ad1=0x00;
  cm2.mad=0x01;//地址模式為指定地址
  cm2.mst=0x00;//取消測試
  cm2.ad2=0x01;
  cm3.ad3=0x03;
  cm4.pwm=0x07;//亮度為最亮
  cm4.dis=0x01;//打開顯示
  cm4.ad4=0x02;
 }
 /////////////////////////////************以下為主程序*************************//////////////////////
void wrvfd(uchar addr,uchar dat) //向VFD指定地址寫數據
  {
  inivfd();
  wrd(co1.dat,cmdd);
  stb=1;
  cm2.fru=0x00;
  wrd(co2.dat,cmdd);
  stb=1;
  cm3.add=addr;
  wrd(co3.dat,cmdd);
  wrd(dat,datt);
  stb=1;
  wrd(co4.dat,cmdd);
  stb=1;
  }
void wrled(uchar leddata) //控制16312的四個輸出口數據存放在LEDDATA的低四位
{
  inivfd();
  cm2.fru=0x01;
  wrd(co2.dat,cmdd);
  wrd(leddata,datt);
  stb=1;
}						 
ulong rdkey()			//讀鍵盤
{ ulong key=0;
  uchar i;
  inivfd();
  cm2.fru=0x02;
  wrd(co2.dat,cmdd);
  for(i=0;i<24;i++)
  {
   clk=1;
   clk=1;
   clk=0;
   clk=0;
   clk=0;
   clk=1;
   dat=1;
   if(dat==1)
   key=(key<<1)+1;
   else
   key=(key<<1);
  }
  return(key);
}

main()//                         測試程序
{
uchar i;
ulong k;
for(i=0;i<16;i++)
wrvfd(i,0xff);	   //點亮VFD熒光屏上所有的數據段
wrled(0x0f);       //使16312上的輸出口置高電平
while(1)
k=rdkey();		   //讀鍵盤實驗，實際應用中應參照數據手冊取值（如按下某一個按鍵應讀讀幾次，其中只有一次是正確的其他幾次做為消抖處理）
}