/*
 * Project name:
     TermRele (Termometr andTimer)
 * Copyright:
     (c) MikroElektronika, 2005.
 * Description:
 * Test configuration:
     MCU:             PIC12F629
     Oscillator:      Internal, 04.000 MHz
     Ext. Modules:    -
     SW:              mikroC v7.0
 * NOTES:
     None.
*/
#define   Data GPIO.GP2
#define   Clk GPIO.GP0
#define   Strob GPIO.GP1
#define   DS &GPIO,GP4
#define   Button GPIO.GP3
#define   BeepPin GPIO.GP5

unsigned char counter,Des,Edn,FirstByte,SecondByte,Seg1,Seg2,Seg3,Minuts;
unsigned char DesSec,EdnSec,tmp0,tmpH,Seg10,Seg20,Flags;

const unsigned int   FTMR0 = 0,FOnTen = 1,TimeDispTemp=8,TenOnTerm = 38,\
                     FStop = 2,FBeep = 3,TenOffTerm = 40;//,FTMR1 = 1;

const unsigned int   Time05SH = 0xB;
const unsigned int   Time05SL = 0xDB;
const unsigned char  CharArrey[12] = {0b00000011, 0b10011111, 0b00100101,\
                                      0b00001101, 0b10011001, 0b01001001,\
                                      0b01000001, 0b00011111, 0b00000001,\
                                      0b00001001, 0b00111001, 0b11111111};
void LedOut(){
     unsigned char i;
     for (i = 0; i <=7u; i++){
         FirstByte = FirstByte >>1;
         if (STATUS.C == 1)
            Data = 1;
         else
            Data = 0;
         Clk = 1;
         Clk = 0;
     }
     for (i = 0; i <=7u; i++){
         SecondByte = SecondByte >> 1;
         if (STATUS.C == 1)
            Data = 1;
         else
            Data = 0;
         Clk = 1;
         Clk = 0;
     }
     Strob = 1;
     Strob = 0;
}//~


void interrupt(){
static unsigned char i,j;
   if    (INTCON.T0IF == 1){
        TMR0   = 96;
        INTCON.T0IF = 0;
        Flags.FTMR0=1;
        if  ((counter & 0b00010000) != 0)
             counter = 0b10000000;
        switch(counter){
              case 0b10000000:{
                                if (i != 0)
                                   SecondByte = (CharArrey[Seg1] & 0b11111110); //Гасим точку если показываем температуру
                                 else
                                   SecondByte = CharArrey[Seg1];
                                 break;}

              case 0b01000000:SecondByte = CharArrey[Seg2]; break;
              case 0b00100000:SecondByte = CharArrey[Seg3]; break;
              }


        FirstByte = counter;
        if  (Flags.FOnTen == 1)
            FirstByte = (FirstByte | 0b00000001);
        counter = counter >> 1;
        LedOut();}
   else{
        TMR1H   = Time05SH;
        TMR1L   = Time05SL;
        PIR1.TMR1IF = 0;
      if  (Button == 0){          //Переустанавливаем таймер если кнопка нажата
//          Flags.FStop = 1;
          Flags.FBeep = 0;
          Minuts = 9;
          DesSec = 5;
          EdnSec = 10;
      }

      if  (j==1){
           j = 0;

      if   (((EdnSec || DesSec) || Minuts) != 0){      //Проверяем досчитал ли до нуля таймер

      if (EdnSec == 0){
         EdnSec = 9;
         if (DesSec == 0){
              DesSec = 5;
            if (Minuts == 0)
               Minuts = 9;
            else
               Minuts--;}
         else
             DesSec--;}
      else
         EdnSec--;
      }


    Seg1 = Minuts;
    Seg2 = DesSec;
    Seg3 = EdnSec;
    i++;
    if  (i == TimeDispTemp){
       i=0;
       Seg1 = Seg10;
       Seg2 = Seg20;
       Seg3 = 0x0A;
       }
     }
   else
       j++;
   }
}

void Beep(){
     unsigned int   k;
     for (k=0;k<8000;k++){
       BeepPin = ~BeepPin;
       Delay_us(125);
     }
}
void main() {
     unsigned char   i; //tmp0,tmpH;
  OPTION_REG = 0b10000100;          // assign prescaler to TMR0
  TRISIO     = 0b00010000;           // designate gpio as output
  GPIO       = 0b00000000;          // initialize gpio
//  counter     =   0;          // initialize counter
  TMR0       =  96;
  counter = 0b10000000;
  Data = 0;
  Clk = 0;
  Strob = 0;
  BeepPin = 0;
  TMR1H = Time05SH;
  TMR1L = Time05SL;
  T1CON = 0b00110001;
  PIE1.TMR1IE = 1;
  INTCON     = 0b11100000;          // enable TMRO interrupt

  Minuts = 9;
  DesSec = 5;
  EdnSec = 10;
  Beep();
  do{
       Flags.FTMR0  = 0;
       do{}
       while (Flags.FTMR0 != 1); //((Flags.FTMR0 != 1) && (Flags.FTMR1 != 1));
       OW_Reset(DS);
       OW_Write(DS,0xCC);                 // Issue command SKIP_ROM
       OW_Write(DS,0x44);                 // Issue command CONVERT_T
       Delay_us(1000);

       Flags.FTMR0  = 0;
       do{}
       while (Flags.FTMR0 != 1); //((Flags.FTMR0 != 1) && (Flags.FTMR1 != 1));
       OW_Reset(DS);
       OW_Write(DS,0xCC);                 // Issue command SKIP_ROM
       OW_Write(DS,0xBE);                 // Issue command READ_SCRATCHPAD

       Flags.FTMR0  = 0;
       do{}
       while (Flags.FTMR0 != 1); //((Flags.FTMR0 != 1) && (Flags.FTMR1 != 1));
       tmp0 = OW_Read(DS);                   // Get temperature LSB
       tmpH = OW_Read(DS);                // Get temperature MSB
       tmpH = 0;

       tmp0 = tmp0 / 2;
       if   (tmp0 >= TenOffTerm)
            Flags.FOnTen = 0;
       if   (tmp0 < TenOnTerm)
            Flags.FOnTen = 1;

              while(tmp0 >= 10){
                  tmp0 = tmp0 - 10;
                  tmpH++;}
       if  (tmpH == 0)
            Seg10 = 0x0B;
       else
            Seg10 = tmpH;
       Seg20 = tmp0;


      Delay_ms(1000);
      if   (((EdnSec || DesSec) || Minuts) == 0){
           if (Flags.FBeep == 0){
           Beep();
           Flags.FBeep = 1;
           }
      }
   } while(1);
}//~