/***********************************************************
實(shí)驗(yàn)名稱：數(shù)碼管
程序說明：本程序測試了數(shù)碼管
實(shí)驗(yàn)平臺(tái)：stc15單片機(jī)開發(fā)板v1.0版
日期：2012-05-27
QQ:	259902530
www.stcstudy.com    61mcu.taobao.com  版權(quán)所有 
***********************************************************/
#include "STC15F2K.h"
#include <intrins.H>

typedef unsigned char uchar;
typedef unsigned int  uint;


uchar bdata OutByte;         /*定義待輸出字節(jié)變量*/
sbit Bit_Out=OutByte^7;         /*定義輸出字節(jié)的最高位，即輸出位*/
sbit     SER=P4^4;             /*位輸出引腳*/
sbit     SRCLK=P4^2;             /*位同步脈沖輸出*/
sbit    RCLK=P4^1;             /*鎖存脈沖輸出*/
uchar code Segment[]={
     0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x77,         /*共陰7段LED段碼表*/
     0x7c,0x39,0x5e,0x79,0x71,0x76,0x73,0x3e,0x00};

void OneLed_Out(uchar i,uchar Location)   /*輸出點(diǎn)亮一個(gè)7段LED顯示器*/
{
     uchar j;

     OutByte=Location;             /*先輸出位碼*/
     for(j=1;j<=8;j++)
     {
         SER=Bit_Out;
         SRCLK=0;SRCLK=1;SRCLK=0;     /*位同步脈沖輸出*/
         OutByte=OutByte<<1;
     }

     OutByte=~Segment[i];         /*再輸出段碼*/
     for(j=1;j<=8;j++)
     {
         SER=Bit_Out;
         SRCLK=0;SRCLK=1;SRCLK=0;     /*位同步脈沖輸出*/
         OutByte=OutByte<<1;
     }

     RCLK=0;RCLK=1;RCLK=0;     /*一個(gè)鎖存脈沖輸出*/
}

void main()
{
     uchar i=0;
     uchar Location=0x01;                 /*定義位碼*/

     while(1)
     {
         OneLed_Out(i,Location);
         i=i+1;
         Location=_crol_(Location,1);

         if(i==8)                 //8次一輪
         {
             i=0;
             Location=0x01;
			 //Delay(1000);
         }	  
     }
}