#include <p30f4013.h>
#include <uart.h>
#include <math.h>
#include <stdio.h>

_FOSC(CSW_FSCM_OFF & XT_PLL8);
_FWDT(WDT_OFF);
_FBORPOR(PBOR_ON & BORV_20 & PWRT_64 & MCLR_EN);
_FGS(CODE_PROT_OFF);


unsigned int config1 = UART_EN & UART_IDLE_CON & 
             UART_ALTRX_ALTTX & UART_DIS_WAKE & UART_DIS_LOOPBACK & 
             UART_DIS_ABAUD & UART_NO_PAR_8BIT & UART_1STOPBIT;

unsigned int config2 = UART_INT_TX_BUF_EMPTY & 
             UART_TX_PIN_NORMAL & UART_TX_ENABLE & 
             UART_INT_RX_CHAR & UART_ADR_DETECT_DIS & UART_RX_OVERRUN_CLEAR;

unsigned char y[13];

int main(void)
{

 int i,t,n,u;
  u=0;
  init_I2C();
  OpenUART1(config1,config2,129);

 for(t=0;t<1300;t=t+13)  //一つまとまりが13バイトなので、とりあえず100回分を
 {                       //確認できればいいかなということで、1300までにしてある。
  putsUART1("\n\r\n\rROM_data ");
  while(BusyUART1());

  for(n=0;n<t/130;n++)
  {
    putsUART1("#");
    while(BusyUART1());
  }

  for(n=0;n<(t%130)/13;n++)
  {
    putsUART1("*");
    while(BusyUART1());
  }
  putsUART1("\n\r");
  while(BusyUART1());

  for(i=0;i<13;i++)
  {
   u=t+i;
   y[i]= EEPROM_read(u);
  }
 //緯度
 putsUART1("lat: ");
 while(BusyUART1());
 if(y[0]==1)
  {
   putsUART1("N");
   while(BusyUART1());
  }
   else if(y[0]==2)
  {
   putsUART1("S");
   while(BusyUART1());
  }

 moji(0,4);              
 putsUART1(".");
 while(BusyUART1());
 moji(1,4);              
 moji(2,4);              
 putsUART1("\n\r");
 while(BusyUART1());

//経度
 putsUART1("lon: ");
 while(BusyUART1());
 if(y[4]==1)
  {
   putsUART1("E");
   while(BusyUART1());
  }
   else if(y[4]==2)
  {
   putsUART1("W");
   while(BusyUART1());
  }
 moji(3,4);              
 putsUART1(".");
 while(BusyUART1());
 moji(4,4);              
 moji(5,4);              
 putsUART1("\n\r");
 while(BusyUART1());

//高度
 putsUART1("alt: ");
 while(BusyUART1());
 if(y[8]==1)
  {
   putsUART1("+");
   while(BusyUART1());
  }
   else if(y[8]==2)
  {
   putsUART1("-");
   while(BusyUART1());
  }
 moji(6,5);              
 putsUART1(".");
 while(BusyUART1());
 moji(7,1);              
 putsUART1("m\n\r");
 while(BusyUART1());

//速度
 putsUART1("sp: ");
 while(BusyUART1());
 moji(8,3);               
 putsUART1(".");
 while(BusyUART1());
 moji(9,1);               
 putsUART1("km/h\n\r");
 while(BusyUART1());

//方位
 putsUART1("dir: ");
 while(BusyUART1());
 moji(10,3);             
 putsUART1(".");
 while(BusyUART1());
 moji(11,1);             
 putsUART1("\n\r");
 while(BusyUART1());

//衛星数
 putsUART1("sat: ");
 while(BusyUART1());
 moji(12,2);                 
 putsUART1("\n\r");
 while(BusyUART1());



 }

 //終了確認
 putsUART1("\n\rEND\n\r");
 while(BusyUART1());

}

void moji(int sel,int num)
{
 int k,h,temp,data;
 unsigned int str[8] = {};
   switch(sel)
   {
    case 0:
     data = y[1];
     break;

    case 1:
     data = y[2];
     break;

    case 2:
     data = y[3];
     break;

    case 3:
     data = y[5];
     break;

    case 4:
     data = y[6];
     break;

    case 5:
     data = y[7];
     break;

    case 6:
     data = y[9]/10;
     break;

    case 7:
     data = y[9]%10;
     break;

    case 8:
     data = y[10]/10;
     break;

    case 9:
     data = y[10]%10;
     break;

    case 10:
     data = y[11]/10;
     break;

    case 11:
     data = y[11]%10;
     break;

    case 12:
     data = y[12];
     break;

    default:
     data = 100;
     break;
   }

    for(k=0;k<num;k++){
  
     temp = data%10;

   //数値を文字列にする作業…。
   switch(temp)
   {
    case 0:
     str[k] = '0';
     break;

    case 1:
     str[k] = '1';
     break;

    case 2:
     str[k] = '2';
     break;

    case 3:
     str[k] = '3';
     break;

    case 4:
     str[k] = '4';
     break;

    case 5:
     str[k] = '5';
     break;

    case 6:
     str[k] = '6';
     break;

    case 7:
     str[k] = '7';
     break;

    case 8:
     str[k] = '8';
     break;

    case 9:
     str[k] = '9';
     break;

    default:
     str[k] = '?';
     break;
   }
   if(data!=0)
    {
    //次の行
     data /=10;
    }
 }
 for(h=num;h>=0;h--){
  WriteUART1(str[h]);
  while(BusyUART1());
 }
}