/*******************************************************************************
*  標題:  北京藍海微芯LJD-SY-5200單片機開發系統演示程序                        *
*  文件:  MAIN.C                                                               *
*  日期:  2006-8-9                                                             *
*  版本:  1.0                                                                  *
*  作者:  藍海微芯                                                             *
*  網站： http://www.ljd-2008.com                                              *
********************************************************************************
*  描述:                                                                       *
*           模擬房間購電，把IC卡內的金額寫到24C02中                            *        
*                                                                              *
*                                                                              *
********************************************************************************
* 【版權】 Copyright(C)微芯科技 http://www.bluemcu.com    All Rights Reserved  *          
* 【聲明】 此程序僅用于學習與參考，引用請注明版權和作者信息！                  *
*******************************************************************************/
#include  <reg51.h>                         /*=== 頭文件包含 ===*/
#include  <absacc.h>
#include  <intrins.h>
#include  <IC_CARD_B.h>

#define  uchar  unsigned  char
#define  uint   unsigned  int
  
uchar pdata hz_ts1[14]="電量不足請購電";
uchar pdata hz_ts2[15]="剩余電量:XXX度";
uchar pdata hz_ts3[28]="購電金額超過卡內余額無法購電";
uchar pdata hz_ts4[8 ]="購電成功";
uchar pdata hz_ts5[13]="購電量:XXXX度";
uchar pdata hz_ts6[15]="卡內余額:XXXX元";
uchar pdata hz_ts7[12]="  插卡有誤  ";
uchar pdata hz_ts8[14]="  請重新插卡  ";
uchar pdata hz_ts9[15]="請輸入購電金額:";
uchar pdata hz_ts10[23]="輸入金額太大 請重新輸入";

uchar count;
bit   flag_count;
uint  K;
uchar i;
uint  N;
uchar k0;
uchar k1;
uchar k2;
uchar n0;
uchar n1;
uchar n2;
uchar EOC;

uchar read_num[2];  
uchar RST_CODE[4]={0xA2,0x13,0x10,0x91};
/********************************************************************
函 數 名：delay_1s()
功    能：延時1s
說    明：
調    用：
入口參數：
出口參數：
***********************************************************************/
void delay_1s(void)
{
  uint p;
  uint r;

  for(r=0;r<100;r++)
  for(p=0;p<1500;p++);
}
/********************************************************************
函 數 名：buy_power()
功    能：購買電量調用子程序模塊
說    明：
調    用：
入口參數：
出口參數：
***********************************************************************/
void buy_power(void)
{
  EOC=rdsm_ec();                     /*讀錯誤計數器*/
  EOC=verifi();                      /*校驗密碼*/
  EOC=rdsm_ec();
  ICDATA[0]=N;
  wrmm();                            /*把余額寫入到IC卡*/
  read_num[0]=K+M;                          
  write_iic_data(read_num,0,1);      /*把剩余電量寫入到24C02中*/
  initial_GLCD();
  command_GLCD(0x80);
  for(i=0;i<8;i++)
  {
    write_GLCD(hz_ts4[i]);           /*顯示購電成功*/
  }
  delay_1s();
  delay_1s();
  initial_GLCD();
  command_GLCD(0x80);
  for(i=0;i<7;i++)
  {
    write_GLCD(hz_ts5[i]);           /*顯示購電量*/
  }
  m1=M/100;
  m2=M%100/10;
  m3=M%100%10;
  M=0;
  write_GLCD(ds_num[m1]);
  write_GLCD(ds_num[m2]);
  write_GLCD(ds_num[m3]);
  write_GLCD(hz_ts5[11]);
  write_GLCD(hz_ts5[12]);
  delay_1s();
  delay_1s();
  initial_GLCD();
  command_GLCD(0x80);
  for(i=0;i<9;i++)
  {
    write_GLCD(hz_ts6[i]);          /*顯示卡內余額*/
  }
  n0=N/100;
  n1=N%100/10;
  n2=N%100%10;
  write_GLCD(ds_num[n0]);
  write_GLCD(ds_num[n1]);
  write_GLCD(ds_num[n2]);
  write_GLCD(hz_ts6[13]);
  write_GLCD(hz_ts6[14]);
}
/********************************************************************
函 數 名：no_enough()
功    能：提示卡內余額不足
說    明：
調    用：
入口參數：
出口參數：
***********************************************************************/
void no_enough(void)
{
  initial_GLCD();
  command_GLCD(0x80);
  for(i=0;i<14;i++)
  {
    write_GLCD(hz_ts3[i]);       /*提示卡內余額不足*/
  }
  command_GLCD(0x90);
  for(i=14;i<28;i++)
  {
    write_GLCD(hz_ts3[i]);
  }
}
/********************************************************************
函 數 名：IC_right()
功    能：判斷插卡正確后調用子程序模塊
說    明：
調    用：
入口參數：
出口參數：
***********************************************************************/
void IC_right(void)
{
  initial_GLCD();
  command_GLCD(0x80);
  for(i=0;i<15;i++)
  {
    write_GLCD(hz_ts9[i]);           /*提示輸入購電金額*/
  }
  command_GLCD(0x90);
  while(flag_enter==0);              /*等待確認按鍵按下*/
  input_money();                     /*獲取由鍵盤輸入的購電金額*/
  flag_cnt=0;
  flag_enter=0;                      /*讀主存儲區*/
  N=ICDATA[0];
  while(M>255)                       /*當購電金額超過255時提示，輸入購電金額太大*/
  {
    initial_GLCD();
    command_GLCD(0x80);
    for(i=0;i<13;i++)
    {
      write_GLCD(hz_ts10[i]);
    }
    command_GLCD(0x90);
    for(i=13;i<23;i++)
    {
      write_GLCD(hz_ts10[i]);
    }
    delay_1s();
    delay_1s();
    initial_GLCD();
    command_GLCD(0x80);
    for(i=0;i<15;i++)
    {
      write_GLCD(hz_ts9[i]);
    }
    command_GLCD(0x90);
    while(flag_enter==0);            /*等待確認按鍵按下*/
    input_money();                   /*獲取由鍵盤輸入的購電金額*/
    flag_enter=0;
    flag_cnt=0;    
  }
  N=N-M;                 
  if(N>0)                           /*若余額足夠多，則允許購電*/
  {
    buy_power();
  }
  else                              /*否則提示卡內余額不足*/
  {
    no_enough();
  }
  delay_1s();
  delay_1s();
  initial_GLCD();
}
/********************************************************************
函 數 名：IC_wrong()
功    能：提示插卡有誤
說    明：
調    用：
入口參數：
出口參數：
***********************************************************************/
void IC_wrong(void)
{
  initial_GLCD();
  command_GLCD(0x80);
  for(i=0;i<12;i++)
  {
    write_GLCD(hz_ts7[i]);
  }
  command_GLCD(0x90);
  for(i=0;i<14;i++)
  {
    write_GLCD(hz_ts8[i]);
  }
  delay_1s();
  delay_1s();
  initial_GLCD();
}
/********************************************************************
函 數 名：isr_time0()
功    能：定時器0中斷服務子程序
說    明：
調    用：
入口參數：
出口參數：
***********************************************************************/
void isr_time0(void) interrupt 1 using 3
{
  TH0=0x4b;
  TL0=0xff;
   
  if(count==40)
  {
    count=0;
    flag_count=1;
  }
  else
  {
    count++;
  }
}
/********************************************************************
函 數 名：system_init()
功    能：初始化子程序
說    明：
調    用：
入口參數：
出口參數：
***********************************************************************/
void system_init(void)
{
  //TMOD=0x01;
  //TH0=0x4b;
  //TL0=0xff;
  EX1=1;
  PX1=1;
  //ET0=0;
  EA=1;
  //TR0=1;
  P1_4=1;
  P1_4=0;
  P1_5=1;
  P1_3=1;
  ch451_init();
  ch451_write(0x402);   /*開鍵盤，關看門狗、顯示*/
  initial_GLCD();
}
/********************************************************************
函 數 名：main()
功    能：主程序
說    明：
***********************************************************************/
main()
{
  system_init();
  while(1)
  {
    read_iic_data(read_num,0,1);        /*首先獲取剩余電量*/
    K=read_num[0];
    k0=K/100;
    k1=K%100/10;
    k2=K%100%10;
    /*while(flag_count)
    {
      flag_count=0;
      if(K!=0)
      {
        K--;
        read_num[0]=K;
        write_iic_data(read_num,0,1);
      }
    }*/
    if(K==0)                        /*若剩余電量為零則提示電量不足*/
    {
      command_GLCD(0x80);
      for(i=0;i<14;i++)
      {
        write_GLCD(hz_ts1[i]);
      } 
    }
    else                           /*若剩余電量不為零則對剩余電量進行顯示*/
    {
      command_GLCD(0x80);
      for(i=0;i<9;i++)
      {
        write_GLCD(hz_ts2[i]);
      }
      write_GLCD(ds_num[k0]);
      write_GLCD(ds_num[k1]);
      write_GLCD(ds_num[k2]);
      write_GLCD(hz_ts2[12]);
      write_GLCD(hz_ts2[13]);
    }
    while(flag_enter==1)         /*首次按下確認鍵進入購電界面*/
    {
      initial_GLCD();
      flag_cnt=0;
      flag_enter=0;
      rdmm();
      i=0;
      while(RSTANSER[i]==RST_CODE[i])      /*判斷插卡是否正確*/
      {
        i++;
        if(i==4)
        break;
      }
      if(i==4)          
      {
        IC_right();   /*插卡正確則提示輸入購電金額*/
      }
      else
      {
        IC_wrong();   /*否則提示插卡有誤*/
      }
    }
  }
}
/*-------------------------------------------------------------------*/