flsh_q.c

Low End Microchip PICs C函数

// FLSH_Q.C (PIC12C672), CCS PCM
//
// When input GP3 is at ground, T_threshold is output to Bicolor LED on GP5.
// When input GP3 is not at ground, the current value of T_C is output to
// the bicolor LED on GP4.  Note that readings are dummied in a constant array.
//
// In outputting the quantity, a long flash indicates a minus.  Each digit is
// output as a series of 250 ms flashes.  Interdigit time of 1 sec.  Five seconds
// between outputting each quantity.
//
//
//               PIC12C672
//
//  GRD ---- \-------------- GP3 (term 4) (internal weak pullup)
//
//                               Bicolor LED
//             GP4 (term 3) ---------------->|---- |------ 330 ---- GRD
//             GP5 (term 2) ---------------->|---- |
//
// Use internal RC oscillator.
//
// copyright, Peter H. Anderson, Elmore, VT, July, '01

#case

#device PIC12C672

#include <defs_672.h>
#include <delay.h>

#define TRUE !0
#define FALSE 0

#define LED_ALM   5
#define LED_TEMP  4

void flash_q(byte LED, byte q, byte minus_flag);
void calibrate(void);

void main(void)
{
   byte T_threshold = 34, T_C, minus_flag, n;
   char const T_C_array[5] = {-5, 0, 1, 25, 70};

   pcfg2 = 1; // configure A/D for AN0 (GP0) - Not used in this example
   pcfg1 = 1; // others as IO
   pcfg0 = 0;

// calibrate(); // don't use when using emulator
    not_gppu = 0; // enable weak pullups

#asm       // alarm LEDs at zero
    BCF GPIO, LED_ALM
    BCF GPIO, LED_TEMP
    BCF TRISIO, LED_ALM
    BCF TRISIO, LED_TEMP
#endasm

 while(1)
 {
    if(!gp3) // if switch at ground
    {
     flash_q(LED_ALM, T_threshold, FALSE);
     delay_ms(5000);
    }

    else
    {
     for (n = 0; n< 5; n++)
     {
      T_C = T_C_array[n];
      if (T_C & 0x80)
      {
       minus_flag = TRUE;
       T_C = (~T_C) + 1;
      }
      else
      {
       minus_flag = FALSE;
      }
      flash_q(LED_TEMP, T_C, minus_flag);
     }
    }
      delay_ms(5000);
   }
}

void flash_q(byte LED, byte q, byte minus_flag)
{
   byte n, digit;

#asm
   BCF GPIO, LED_ALM    // make LED pins output logic zeros
   BCF GPIO, LED_TEMP
   BCF TRISIO, LED_ALM
   BCF TRISIO, LED_TEMP
#endasm

   if (minus_flag)
   {
       if (LED == LED_ALM)
       {
#asm
          BSF GPIO, LED_ALM
#endasm
       }
       else
       {
#asm
          BSF GPIO, LED_TEMP
#endasm
       }

      delay_ms(500); // long delay to indicate minus
#asm
      BCF GPIO, LED_ALM
      BCF GPIO, LED_TEMP
#endasm
      delay_ms(1000);
   }

   digit = q/10; // number of tens
   if (digit)     // if non zero
   {
      for (n=0; n<digit; n++)
      {

         if (LED == LED_ALM)
         {
#asm
            BSF GPIO, LED_ALM
#endasm
         }
         else
         {
#asm
            BSF GPIO, LED_TEMP
#endasm
         }
         delay_ms(250);
#asm
         BCF GPIO, LED_ALM
         BCF GPIO, LED_TEMP
#endasm
      delay_ms(250);
      }

      delay_ms(1000); // separation between digits
   }

   digit = q%10;
   if (!digit)
   {
      digit = 10;
   }

   for (n=0; n<digit; n++)
   {
      if (LED == LED_ALM)
      {
#asm
         BSF GPIO, LED_ALM
#endasm
      }
      else
      {
#asm
          BSF GPIO, LED_TEMP
#endasm
      }
      delay_ms(250); // long delay to indicate minus
#asm
      BCF GPIO, LED_ALM
      BCF GPIO, LED_TEMP
#endasm
      delay_ms(250);
   }

   delay_ms(1000); // separation between digits
}

void calibrate(void)
{
#asm
   CALL 0x03ff
   MOVWF OSCCAL
#endasm
}

#include <delay.c>