#include <16f628a.h>                            // Inclui o cabeçalho especifico do pic a ser utilizado
#include                               // Inclui as funçoes padroes de entrada e saida
#fuses HS,NOWDT,NOPROTECT                       // Configuração dos fuses (ver manual)
#use delay(clock=4000000)                       // Seta o clock interno para 4Mhz
#use rs232(baud=9600, xmit=PIN_B2, rcv=PIN_B1)  // Seta o baud rate para 9600, e define o pino B2 como TX e B1 como RX
 
unsigned char x[4];  //Variavel do tipo char com 4 posiçoes (string de até 3 carateres) ou do tamanho do comando que desejarem utilizar
// lembrando que sempre deve ter um caractere a mais pois tem o '\0' no final da string
unsigned int pino; //Variavel que armazenara o pino que esta sendo utilizado
 
void main(void) // função principal
{
   delay_ms(100); //tempo para inicializar a conexão
 
   printf("TESTE DE CONTROLE COM PIC\n\r"); // Manda esta mesagem para o terminal
   //Para testar se foi tudo ligado corretamente, feche a função aqui, compile e teste
   do {
      printf("\n\r");
      printf("Envie um comando de 3 caracteres");
      printf("sendo abc a=porta b=pino c=estado(l ou d) \n\r");
      gets(x); // pega a string e coloca na variavel x
      if(x[0] == 'a' || x[0]=='A') // Fazer isso para todas as portas desejadas, podendo ser A,B,C.. depende do pic
      {
         switch(x[1]) // Ve se qual pino da porta quer controlar
         {
            case '0':
               pino = PIN_A0;
               break;
            case '1':
               pino = PIN_A1;
               break;
            case '2':
               pino = PIN_A2;
               break;
            case '3':
               pino = PIN_A3;
               break;
            default:
               pino = 0; // se não for nenhum, coloca como 0;
               break;
         }
      }
      else if(x[0] == 'b' || x[0]=='B') // mesma coisa que antes, porem agora para a porta B (e assim pode continuar)
      {
         switch(x[1])
         {
            case '0':
               pino = PIN_B0;
               break;
            case '1':
               pino = 0; // pino reservado para RS232
               printf("Pino reservado!");
               break;
            case '2':
               pino = 0; // pino reservado para RS232
               printf("Pino reservado!");
               break;
            case '3':
               pino = PIN_B3;
               break;
            case '4':
               pino = PIN_B4;
               break;
            case '5':
               pino = PIN_B5;
               break;
            case '6':
               pino = PIN_B6;
               break;
            case '7':
               pino = PIN_B7;
               break;
            default:
               pino = 0;
               break;
         }
      }
      else
      {
       pino=0;
       // Se não existir a porta que foi escolhida, seta o pino para 0 para que não mude o que foi escolhido anteriormente
      }
 
      if(pino != 0) // Se o pino existir (não for 0)
      {
         if(x[2]=='l' || x[2]=='L')// Se o comando for L ou l (de ligar)
         {
            output_high(pino); // Coloca o valor 1 logico no pino escolhido
         }
         else if(x[2]=='d' || x[2]=='D') // Se o comando for D ou d(de desligar)
         {
            output_low(pino); // Coloca o valor 0 logico no pino escolhido
         }
         else // Se o comando não for de ligar ou desligar
         {
            printf("Comando invalido. Tente novamente \n\r"); //Avisa que o comando é invalido
         }
      }
      else // Se o pino não existir (variavel pino igual a 0)
      {
         printf("Comando invalido. Tente novamente \n\r");
      }
   } while (TRUE); // mantem o laço de repetição rodando em loop infinito
}