/* 
 **********************************************************************
 * File  Hello_uk.C      -     Rel. 1.1  con  Hi-TECH PICC 8.35PL3    *
 * GRIFO(R)   via Dell'Artigiano 8/6   40016 S. Giorgio di Piano (BO) *
 * Hardware: GMM 4620                                                 *
 *     Tel. +39 051 892052                      Fax. +39 051 893661   *
 *     http://www.grifo.com                     http://www.grifo.it   *
 *     by Graziano Gaiba                                   02.02.06   *
 **********************************************************************

02/02/06: Hello_it.C - Rel 1.1 - By Graziano Gaiba
 Program preloaded im mini modules.
 Makes the on-board LEDs blink.

*/




/****************** Header, costanti, strutture dati, etc. *****************/
#include <pic18.h>

/* Set HS quartz */
__CONFIG(1, HS);




/************************* Procedures and functions ************************/
void delay(void)
{
  unsigned int msec, rit;
  for(msec=5; msec; msec--)
    for(rit=1; rit; rit++)
      ;
}




/******************************* Main program ******************************/
void main(void)
{
  // Set as output LED control signal
  TRISB4=0;
  TRISA3=0;

  for(;;)
  {
    // Turn on DL1 and turn off DL2
    RA3=1;
    RB4=0;
    delay();            // Pause
    // Turn off DL1 and turn on DL2
    RA3=0;
    RB4=1;
    delay();            // Pause
  }
}