#include <18F6722.h>
#device PASS_STRINGS=IN_RAM   

#FUSES NOWDT                    //No Watch Dog Timer
#FUSES NOBROWNOUT               //No brownout reset
#FUSES NOLVP                    //No low voltage prgming, B3(PIC16) or 
#FUSES NOPUT
#FUSES H4
#FUSES NOXINST                  //Extended set extension and Indexed

#use delay(clock=32M )
#use rs232(baud=15625,parity=N,xmit=PIN_C6,rcv=PIN_C7,bits=8  ,Errors)

#include "ks0108.c"
#include "graphics.c"


//***********************  DEFINE ***********************************/
//*******************************************************************/
#byte pA   =0xF80   //port a   //
#byte pB   =0xF81   //b         //
#byte pC   =0xF82   //c         //
#byte pD   =0xF83   //d         //
#byte pE   =0xF84   //port e   //
#byte pF   =0xF85   //port e   //
#byte pG   =0xF86   //port e   //
// *********************************


#Define  SetConfigPortA     9//100011  //33  100001
#Define  SetConfigPortB     240//255  11110010
#Define  SetConfigPortC    196//1000100 196//196//bx 11000100
#Define  SetConfigPortD     0
#Define  SetConfigPortE     0
#Define  SetConfigPortF     0
#Define  SetConfigPortG     0
//**************************************************


#bit IngSwitch=             pB.4
#bit UPButton=              pB.5
#bit DOWNButton=            pB.6
#bit MENUButton=            pB.7

#bit Led=                   pE.6
#bit LCD_Power=             pF.7     



  #define BUFFER_SIZE 32

BYTE buffer[BUFFER_SIZE];
BYTE next_in = 0;
BYTE next_out = 0;       

#define bkbhit (next_in!=next_out)   
     
       
//***********************************
#int_rda
void serial_isr() {
   int8 t;

   buffer[next_in]=getc();
   t=next_in;
  if (++next_in ==BUFFER_SIZE){ next_in=0; }

  if(next_in==next_out)
     next_in=t;           // Buffer full !!
     
}
//************************************

//***********************************
int WaitComGetc( ) {
   BYTE c;
   int16 count=10000;

   while((!bkbhit  )  ) ;
   
   
   c=buffer[next_out];

   if (++next_out ==BUFFER_SIZE)
       {
          next_out=0;
       }
   return(c);
}
//***********************************


//***********************************
void send_break(int16 time_ms)
{
// Disable the UART and send a Break
// for the specified time.
setup_uart(FALSE);
output_low(PIN_C6);
delay_ms(time_ms);

// Re-enable the UART.
setup_uart(TRUE);
set_uart_speed(15625);
}
//***********************************


//*********************************************************************
//Start initialization
void StartInit(void)
{
    int    tempBuff;
  Delay_ms(70);
     // Инициализациа със Break signal
  send_break(1800);
  Delay_ms(200);
  delay_ms(1000);


  putc (0xFE );    // Запитване
   
  //  Тук tempBuff =0xFE -Това е първия прочетен байт (ехо )         
   tempBuff=WaitComGetc( );

  // Тук tempBuff =0xE5  -Това е Вярния отговор
     tempBuff=WaitComGetc( );

  if (tempBuff==0xE5)
           
      {
        delay_ms(5 );
         putc (0xFF );  // Второ запитване
                 
        WaitComGetc( );   // tempBuff =0xFF  -Тук пак ехо
                 
               // tempBuff =0x0C - Тук пак верния байт от  PC       
        if (WaitComGetc( )==0x0C) 
                 
                   {
                   
                  ShowMessage("Connecton OK",1,1,1000,1);
                 
                 
                   }
                 else
                {
                     ShowMessage("Wrong Reply",1,1,1000,1);
                }
                   
                   While((UPButton!=0) && (DOWNButton!=0) && (MENUButton!=0))
                  {  Delay_ms(10);  }
   
                   
                   
                   
                   
              }
}//**********************************************************



Void MAIN (){
         char Message[21];
     
     set_tris_b(SetConfigPortB);
     set_tris_a(SetConfigPortA);
     set_tris_d(SetConfigPortD);
     set_tris_e(SetConfigPortE);
     set_tris_f(SetConfigPortF);
     set_tris_g(SetConfigPortG);

//LCD Init
     
      delay_ms(20 );
      Glcd_init(on);   
      delay_ms(20 );

      glcd_fillScreen(off);
  //LCD Init       

       delay_ms(500 );

       enable_interrupts(INT_RDA);  // turn on interrupts
       enable_interrupts(GLOBAL);
       

While(true)
{
     
             StartInit();
     
   }
   
} //End******