/*-----------------------------------------------
  名稱：雙色點陣
  論壇：www.doflye.net
  編寫：shifang
  修改：無
  內容：使用hc595驅動雙色點陣 
------------------------------------------------*/
#include<reg52.h>    //包含頭文件，一般情況不需要改動，頭文件包含特殊功能寄存器的定義
#include <intrins.h> 

//unsigned char  segout[8]={0,1,2,3,4,5,6,7}; //8列
unsigned char  segout[8]={0x01,0x02,0x04,0x08,0x10,0x20,0x40,0x80}; //8列
unsigned char code tab[]={
                        0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
                        0x08,0x1C,0x3E,0x7F,0x1C,0x1C,0x1C,0x1C,
						0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
                        };
/*------------------------------------------------
                硬件端口定義
------------------------------------------------*/

sbit LATCH = P1^0; 
sbit SRCLK= P1^1;
sbit SER  = P1^2;


sbit LATCH_B = P2^2;
sbit SRCLK_B= P2^1;
sbit SER_B= P2^0;

/*------------------------------------------------
 uS延時函數，含有輸入參數 unsigned char t，無返回值
 unsigned char 是定義無符號字符變量，其值的范圍是
 0~255 這里使用晶振12M，精確延時請使用匯編,大致延時
 長度如下 T=tx2+5 uS 
------------------------------------------------*/
void DelayUs2x(unsigned char t)
{   
 while(--t);
}
/*------------------------------------------------
 mS延時函數，含有輸入參數 unsigned char t，無返回值
 unsigned char 是定義無符號字符變量，其值的范圍是
 0~255 這里使用晶振12M，精確延時請使用匯編
------------------------------------------------*/
void DelayMs(unsigned char t)
{
     
 while(t--)
 {
     //大致延時1mS
     DelayUs2x(245);
	 DelayUs2x(245);
 }
}
/*------------------------------------------------
                發送字節程序
------------------------------------------------*/
void SendByte(unsigned char dat)
{    
  unsigned char i; 
        
   for(i=0;i<8;i++)
        {
         SRCLK=0;
         SER=dat&0x80;
         dat<<=1;
         SRCLK=1;
         }
         
}
/*------------------------------------------------
                發送雙字節程序
     595級聯，n個595，就需要發送n字節后鎖存
------------------------------------------------*/
void Send2Byte(unsigned char dat1,unsigned char dat2)
{    
   SendByte(dat1);
   SendByte(dat2);      
}
/*------------------------------------------------
                   595鎖存程序
		  595級聯發送數據后，鎖存有效
------------------------------------------------*/
void Out595(void)
{
        LATCH=0;
        _nop_();
        LATCH=1;
}

/*------------------------------------------------
                發送位碼字節程序
               使用另外一片單獨595
------------------------------------------------*/
void SendSeg(unsigned char dat)
{    
unsigned char i; 
        
   for(i=0;i<8;i++)  //發送字節
        {
         SRCLK_B=0;
         SER_B=dat&0x80;
         dat<<=1;
         SRCLK_B=1;
         }
      LATCH_B=0;    //鎖存
      _nop_();
      LATCH_B=1;
         
         
}
/*------------------------------------------------
                   主程序
------------------------------------------------*/
void main()
{
unsigned char i,j,k;
while(1)
{
          //上行指示
          for(j=0;j<16;j++)
		    for(k=0;k<10;k++)
              for(i=0;i<8;i++) //8列顯示
                  {
                     SendSeg(segout[7-i]);
	
					 Send2Byte(~tab[i+j],0xff);
					 Out595();
                     DelayMs(1);
			
					 Send2Byte(0xff,0xff);//delay(10); //防止重影
					 Out595();
                  }
          //下行指示
          for(j=0;j<16;j++)
		    for(k=0;k<10;k++)
              for(i=0;i<8;i++) //8列顯示
                  {
                     SendSeg(segout[i]);
	
					 Send2Byte(~tab[i+j],0xff);
					 Out595();
                     DelayMs(1);
			
					 Send2Byte(0xff,0xff);//delay(10); //防止重影
					 Out595();
                  }
          
    }
}