//出租車計價器程序
//2007/4/19
/*---------------------------------------------------
利用單片機串口模式0發(fā)送數(shù)據(jù)，經(jīng)164串并轉(zhuǎn)換驅(qū)動數(shù)碼管
計價器顯示內(nèi)容有兩組164驅(qū)動，共14個數(shù)碼管，分別顯示
單價（2個），總額（4個),里程（4個），時間（4個）
計價器通過T1口對外部脈沖進行計數(shù)，轉(zhuǎn)換為具體的里程和價格
計價器計價規(guī)則：前4公里10元，4公里后每公里1.5元，凌晨0點
到6點為每公里2元。 
---------------------------------------------------*/

#include	"reg51.h"
#define uchar unsigned char
#define uint  unsigned int

#define  segport P1	  //數(shù)碼管段選擇



uint Counter1;		  //計數(shù)值變量
uchar overflow_count; //定時器溢出次數(shù)變量
uchar hour,minute,second;  //時間變量
uint  distance;
uint  price;
uchar per_price;

bit halfsec_fg;   //半秒標志

sbit key1=P3^2;
sbit key2=P3^4;

sbit key3=P3^3;

sbit P1_0=P1^0;
sbit P1_2=P1^2;
sbit P1_1=P1^1;

uchar group0[8],group1[8],group2[8];
uchar code Tab1[11]={		  //數(shù)碼管代碼
        0x03,/*0*/
        0x9F,/*1*/
        0x25,/*2*/
        0x0D,/*3*/
        0x99,/*4*/
        0x49,/*5*/
        0x41,/*6*/
        0x1F,/*7*/
        0x01,/*8*/
        0x09,/*9*/

		0xff, /*no light*/

		};

unsigned char code Tab2[11]={	 //數(shù)碼管帶小數(shù)點代碼
        0x02,/*0*/
        0x9e,/*1*/
        0x24,/*2*/
        0x0c,/*3*/
        0x98,/*4*/
        0x48,/*5*/
        0x40,/*6*/
        0x1e,/*7*/
        0x00,/*8*/
        0x08,/*9*/

		0xff, /*no light*/

		};
unsigned char code Tab3[11]={	  //時間數(shù)碼管代碼
        0x03,/*0*/
        0x7B,/*1*/
        0x46,/*2*/
        0x4A,/*3*/
        0x3A,/*4*/
        0x8A,/*5*/
        0x82,/*6*/
        0x6B,/*7*/
        0x02,/*8*/
        0x0A,/*9*/	 
		0xff, /*no light*/ 
		};

/*-------------------------
    系統(tǒng)初始化程序
---------------------------*/
void systeminit(void)
{
   
   SCON=0x00;
   TMOD = 0x51;
   ET0 = 1;                      //開啟定時器0中斷
 //  ET1 = 1;
   TR0 = 1;                      //開啟定時器0計數(shù)
 //  TR1 =1 ;
   EA = 1;                       //開啟全局中斷
   TH0=0x3c;					 //定時器0賦初值
   TL0=0xb7;					 
   Counter1=0;					 //計數(shù)值清零

   hour=0x0c;
   minute=0x00;
   second=0x00;
   distance=0x00;
   price=0x00;
   per_price=15;

 }

/*-------------------------
    定時器0中斷處理程序
---------------------------*/
void timer0_ISR (void) interrupt 1	using 2  //定時器0中斷處理程序
{
    TH0=0x3c;
    TL0=0xb7;
    overflow_count++;   

  if(overflow_count==10|overflow_count==20)
  {
    halfsec_fg=!halfsec_fg;
	 
    if(overflow_count==20)
    {
     overflow_count=0;
    // Counter1=TH1*256+TL1;
	// TH1=0;
    // TL1=0;
     
      second++;
	  if(second==60)	//時鐘處理程序
	   {
       second=0;
	   minute++;
	   }
	  if(minute==60)
	   {
       minute=0;
	   hour++;
	   }
      if(hour==24)
	   {
	    hour=0;
	   }	  

     }
	}
}


void DelayMs(unsigned char no)		   //延時毫秒程序
{
	unsigned char i,j;
	for(i=0;i<no;i++)
	{
	  for(j=0;j<164;j++);
	  for(j=0;j<164;j++);
	 }
}
/*-------------------------
    顯示處理程序
---------------------------*/
void display(void)			 //數(shù)碼管顯示
{
   uchar segdata;		   // 數(shù)碼管段選擇數(shù)據(jù)存儲變量
   uchar i;
   uchar sendtemp;


 	  segdata=0x7f;
 for(i=0;i<8;i++)
	 {
	 segport=0xff;			 //全滅

       
	  if(i==2)
	   {
	    SBUF=Tab2[group0[i]];	  //里程帶小數(shù)點
	    while(TI==0) ;
	    TI=0;
	   }
	   else	if(i==0|i==1|i==3)
	   {
	    SBUF=Tab1[group0[i]];	  //不帶小數(shù)點
	    while(TI==0) ;
	    TI=0;
	   } 
	   else
	   {
	   	if(halfsec_fg)
		{
         sendtemp=Tab3[group0[i]]&0xfd;	//時鐘中間秒點
		 }
		else
		{
		 sendtemp=Tab3[group0[i]];
		 }

	    SBUF=sendtemp;  //Tab3[group0[i]];	  //時鐘
	    while(TI==0) ;
	    TI=0;
	   } 	   


	 if(i==0|i==4)
	  {
	  SBUF=Tab2[group1[i]];		//帶小數(shù)點
	  while(TI==0) ;
	  TI=0;
	  } 

     else
	 {
	  SBUF=Tab1[group1[i]];	 //發(fā)送第1組數(shù)據(jù)不帶小數(shù)點
	  while(TI==0) ;
	  TI=0;
	 }

      segport=segdata	;	 //選擇對應組數(shù)碼管

	  DelayMs(1);
	  segdata=(segdata>>1)+0x80;
     }

     segport=0xff;		   //全滅

}
/*-------------------------------
    調(diào)時處理程序
------------------------------*/
void timekeydetect()
{
   if(key1==0)
   {
	 DelayMs(5);
	 if(key1==0)
	 {
	  hour++;
	  if(hour==24)
	  {
	   hour=0;
       }
	  while(key1==0)
	  {
	   display();
	   }
	  }
	}

   if(key2==0)
   {
	 DelayMs(5);
	 if(key2==0)
	 {
	  minute++;
	  if(minute==60)
	  {
	   minute=0;
       }
	  while(key2==0)
	  {
	   display();
	   }
	  }
	}
	 
}
/*-------------------------------
    拆分數(shù)據(jù)處理程序
------------------------------*/
void  getdata()			  //獲取數(shù)據(jù)
{
   if(hour>=0&hour<=6)
	{
	per_price=20;
	 }
	else
	 {
	 per_price=15;
	 }

	distance=(TH1*256+TL1)/64;

	if(distance<=40)
	{
	 price=100;
	 }
	else
	{
	 price=((distance-30)/10*per_price)+100;
	 }

   group0[4]=hour/10;			 //拆分時間數(shù)據(jù)
   group0[5]=hour%10;
   group0[6]=minute/10;
   group0[7]=minute%10;

   group0[0]=distance/1000;		  //拆分里程數(shù)據(jù)
   if(group0[0]==0)
    {
	 group0[0]=10;
	}    
   group0[1]=distance%1000/100;
    if(group0[0]==10&&group0[1]==0)
    {
	 group0[1]=10;
	}  
   group0[2]=distance%100/10;
   group0[3]=distance%10; 

   group1[0]=per_price/10;
   group1[1]=per_price%10;

   group1[2]=price/1000;	//拆分金額數(shù)據(jù)
   if(group1[2]==0)
    {
	 group1[2]=10;
	}
   group1[3]=price%1000/100;
   group1[4]=price%100/10;
   group1[5]=price%10;
}

/*-------------------------
    主程序
---------------------------*/
void	main()
{
	uchar i;


	systeminit();

    for(i=0;i<8;i++)
	  group0[i]=i;
	for(i=0;i<8;i++)
	  group1[i]=i;


	while(1)
	{
	if(key3==1)		   //是否啟動計價
	{
	 distance=0;		 //無計價
	 TH1=0;
	 TL1=0;
     TR1=0;
	 }
	 else
	 {
	 TR1=1;			   //開始計價
	 }
	getdata();
	display();
	timekeydetect();  //調(diào)整時間按鍵檢測
	}
}