Glcd y Touch Screen?

[ema]

Cika tiene a 28 dolares unas que hay que agregarles el panel touch y su conversor, se va a 20 dolares mas.
Asi que estan baratas en serio esas...

yo ya lo tengo a ese pero le quiero agregar el touch, pero no lo consiguo por ningun lado, no me queda otra que comprar uno con touch

[MGLSOFT]

En SYC tienen los touch mas el integrado, consultalos alli.
www.sycelectronica.com.ar

[alogic.on]

hola
yo no encontraba los touch sueltos y al final en ebay localice para telefono o pda salen a dos leuros cada modulo. que aunque no sea igual que esa, les puede servir para alguna otra cosa
-una
-dos
-tres
-cuatro

un saludo

[ema]

En SYC tienen los touch mas el integrado, consultalos alli.
www.sycelectronica.com.ar

El probema es que tienen para 240*128 y el mio es de 128*64. pero igual voy a ver que hago.

hola
yo no encontraba los touch sueltos y al final en ebay localice para telefono o pda salen a dos leuros cada modulo. que aunque no sea igual que esa, les puede servir para alguna otra cosa
-una
-dos
-tres
-cuatro

un saludo

Estoy en la misma de comprar por ebay cosa que nunca hice.

[Sir_Egnos]

Yo si compro mucho en ebay pagando con paypal. Hasta la fecha todas mis compran han sido buenas ya que como vivo en un pueblo no tengo otra posibilidad que realizar la compras.

Yo siempre pago con paypal y me fijo que el vendedor tenga al menos 500 ventas con un indice por encima del 95% de satisfacion del cliente.

Si teneis alguna duda preguntarmela sin problemas.

[alogic.on]

hola

podrias, si no es mucha molestia, averiguar si se pueden pedir varias touch pagando un solo envio, vamos que las pongan todas dentro del mismo sobre, y como lo pagaria. queria pedir 10 pero si tengo que pagar todos los envios ya no es rentable, perdona pero no controlo bien ebay y menos ingles llevo tiempo intentando contactar con los vendedores, y no se si es que no contestan o que algo estoy haciendo mal, localice uno contra rembolso para probar, pero nunca me llego ningun paquete

un saludo y gracias

[ema]

Yo si compro mucho en ebay pagando con paypal. Hasta la fecha todas mis compran han sido buenas ya que como vivo en un pueblo no tengo otra posibilidad que realizar la compras.

Yo siempre pago con paypal y me fijo que el vendedor tenga al menos 500 ventas con un indice por encima del 95% de satisfacion del cliente.

Si teneis alguna duda preguntarmela sin problemas.

Mi problema no es de compra, ya que aqui en argentina hay algo similar a ebay que se llama deremate o sino mercado libre, los cuales uso sin problema.
mi problema radica en los envios desde el exterior que nunca hice. Y no se porque pero me asustan.

[RALF2]

Que tal amigos!
Yo ya realice un codigo que esta totalmente funcional pero desgraciadamente tuve un accidente con mi glcd (el perro me la mordio  ) y bueno no pude seguir realizando pruebas.
Ya compre dos mas pero estoy a la espera que me lleguen de U.S.A para grabar el videillo correspondiente con el software en proton para que lo puedan utilizar 

Apenas tenga las glcd en mi mano les posteo lo que he hecho!
En la pagina que coloque al principio de estos post es donde las compre, para los interesados!


Saludos

[Sir_Egnos]

No compensa ya que los gastos de envio son solo 3 euros desde el distribuidor a tu casa. El cobra un fijo de 3 euros por la primera unidad mas 1.5 euros por cada unidad a mayores. Si alguien compra 10 ahorraria solo 15 euros y aun falta mandarlos por correo desde el que los compre a los demas.

Vamos, en este caso, no compensa.

 

[Duende_Azul]

He aqui un videito.... 

Es una pantalla de las que venden en el link del primer post, montado en una placa easypic4...  el código es el que puse en un link anterior pero modificado y portado a CCS.

[ema]

Muy bueno el videito. Felicitaciones.

La numeración que pusiste al azar es tu clave de banco???? 

Saludos

P/D: Lo de la numeración es un chiste. Por las dudas vio!!!.

[Sir_Egnos]

muy interesante, me podias mandar (o publicar en este hilo) el codigo fuente en CCS a mi correo? Me intesa ver como has dado solucion a algunos de los problemas que me estoy encontrando al hacer este proyecto.

Gracias.

[Duende_Azul]

Este es el archivo  .c

Código: [Seleccionar]

/*****************************************************************
** Conexion del touchscreen resistivo de 4 hilos
** X+ = RA0/AN0
** Y+ = RA1/AN1
** X- = RA2/AN2
** Y- = RA3/AN3
*****************************************************************/



#include "E:\Archivos de programa\PICC\Projects\touchScreen\main.h"
#define FAST_GLCD;
#include <ks0108_mE_EP4.c> //Esta es la misma libreria HDM64GS12.C que trae el
                           //ccs pero con la asignacion de pines para la tarjeta
                           //easypic4.
#include <graphics.c>

//**  AQUI VA LA IMAGEN DEL TECLADO  ****


int16 tmp;
int16 y_min,y_max,x_min,x_max;
int16 y_loc,x_loc,y_rng,x_rng;
int1 touch_flag,line_flag;
char valor_x[5];
char valor_y[4];

/****************************************************************
*****   Rutina para mostrar la imagen del teclado             ***
****************************************************************/
void glcd_imagen()
{
   char i,j;
   signed char k;
   for( i = 0 ; i < 64 ; i ++ )
   { 
      for( j = 0 ; j < 16 ; j ++)
      {   
         for(k=7;k>-1;k--)
         {     
            if( bit_test(Prueba[i][j] ,7-k ))
               glcd_pixel( j*8+k,i, ON );
         } 
      }
   }
}


/**************************************************
*******  Lee la coordenada y   ********************
**************************************************/
int16 y_pos(void)
{
   int16 result;
   set_tris_a(0x04);
   output_a(0x0A);      //Energize X plate, RA1 and RA3
   set_adc_channel(2);   //Set AN2 as input
   delay_us(10);
   result = read_adc(); //get Y axis value
   if (result != 0)
   {
      set_tris_a(0x01);
      set_adc_channel(0);
      delay_us(10);
      tmp = (1023 - read_adc());
      result = (result + tmp) >> 1;   
   }
   Return(result);
}

/**************************************************
*******  Lee la coordenada x   ********************
**************************************************/
int16 x_pos(void)
{
   int16 result;
   set_tris_a(0x02);
   output_a(0x05);      //Energize X plate, RA1 and RA3
   set_adc_channel(1);   //Set AN2 as input
   delay_us(10);
   result = read_adc(); //get Y axis value
   if (result != 0)
   {
      set_tris_a(0x08);
      set_adc_channel(3);
      delay_us(10);
      tmp = (1023 - read_adc());
      result = (result + tmp) >> 1;   
   }   
   Return(result);
}

/**************************************************
***  Funcion para determinar si la pantalla     ***
***  ha sudo pulsada o no...                    ***
**************************************************/
int1 touch(void)
{
   int1 resp;
   int16 tmp,ty,tx;
   resp=false;
   ty = y_pos();
   if (ty > 0)
   {
      delay_ms(30);
      ty=y_pos();
      tx=x_pos();
      if (ty > y_min)
      {
         if(ty < y_max)
         {
            resp = true;
            tmp=(tx - x_min) << 7;
            x_loc =(int16)(tmp/x_rng);
            if(x_loc > 127)  x_loc = 127;
            tmp = (ty - y_min) << 6;
            y_loc = (int16)(tmp/y_rng);
            if(y_loc > 63)   y_loc = 63;
         }
      }
   }
   return(resp);
}

/*************************************************************
*****  Rutina para calibrar la pantalla                *******
*************************************************************/
void calibracion()
{
   int1 sw;
   sw=1;
   while(x_pos()==0)
   {
      glcd_rect(0,0,2,2,YES,SW);
      glcd_update();
      delay_ms(100);
      sw=!sw;
   }
   delay_ms(30);
   y_min = y_pos();
   x_min = x_pos();
   glcd_rect(0,0,2,2,YES,OFF);
   glcd_update();
   while(x_pos() > 0);
   delay_ms(30);
   while(x_pos()==0)
   {
      glcd_rect(125,61,127,63,YES,SW);
      glcd_update();
      delay_ms(100);
      sw=!sw;
   }
   delay_ms(30);
   y_max = y_pos();
   x_max = x_pos();
   y_rng = y_max - y_min;
   x_rng = x_max - x_min;
   while(x_pos() > 0);
   glcd_fillScreen(OFF);
   glcd_update();
}

/**********************************************************
****  muestra las coordenadas   ***************************
**********************************************************/
void print_xy_val()
{
   glcd_rect(13,40,29,57,YES,OFF);
   if(Touch()==true)
   { 
      touch_flag = true;
      sprintf(valor_x,"%lu",x_loc);
      valor_x[4]='\0';
      glcd_text57(13,40,valor_x,1,ON);
      sprintf(valor_y,"%lu",y_loc);
      valor_y[3]='\0';
      glcd_text57(13,50,valor_y,1,ON);
   }
   else
   {
      touch_flag = false;
      glcd_rect(13,40,29,57,YES,OFF);
   }
   //glcd_text57(1,40,x1,1,ON);
   //glcd_text57(1,50,x2,1,ON);
   glcd_update();   
   
}

/*****************************************************************
******  etermina sobre que boton se ha pulsado            ********
*****************************************************************/
int8 boton_act(void)
{
   int8 button;
   if(((x_loc>63) &&(x_loc<80)) &((y_loc>1) &&(y_loc<13))) button = '1';
   if(((x_loc>83) &&(x_loc<100))&((y_loc>1) &&(y_loc<13))) button = '2';
   if(((x_loc>103)&&(x_loc<120))&((y_loc>1) &&(y_loc<13))) button = '3';
   if(((x_loc>63) &&(x_loc<80)) &((y_loc>17)&&(y_loc<29))) button = '4';
   if(((x_loc>83) &&(x_loc<100))&((y_loc>17)&&(y_loc<29))) button = '5';
   if(((x_loc>103)&&(x_loc<120))&((y_loc>17)&&(y_loc<29))) button = '6';
   if(((x_loc>63) &&(x_loc<80)) &((y_loc>33)&&(y_loc<46))) button = '7';
   if(((x_loc>83) &&(x_loc<100))&((y_loc>33)&&(y_loc<46))) button = '8';
   if(((x_loc>103)&&(x_loc<120))&((y_loc>33)&&(y_loc<46))) button = '9';
   if(((x_loc>63) &&(x_loc<80)) &((y_loc>49)&&(y_loc<62))) button = '0';
   if(((x_loc>83) &&(x_loc<120))&((y_loc>49)&&(y_loc<62))) button = 'X';
   
   return(button);
}

void main()
{
   //lcd_init();
   setup_adc_ports(AN0_AN1_AN2_AN3_AN4);
   setup_adc(ADC_CLOCK_INTERNAL );
   setup_psp(PSP_DISABLED);
   setup_spi(SPI_SS_DISABLED);
   setup_wdt(WDT_OFF);
   setup_timer_0(RTCC_INTERNAL);
   setup_timer_1(T1_DISABLED);
   setup_timer_2(T2_DISABLED,0,1);
   setup_timer_3(T3_DISABLED|T3_DIV_BY_1);
//Setup_Oscillator parameter not selected from Intr Oscillator Config tab

   // TODO: USER CODE!!
   glcd_init(ON);             //Inicializa la glcd
   glcd_fillScreen(OFF);      //Limpia la pantalla
   glcd_update();
   calibracion();             //Calibra la pantalla
   glcd_update();
   glcd_imagen();             //muestra el teclado
   glcd_update();

   while(1)
   {
      if(touch()==true)
      {
      valor_x[0]=boton_act();
      valor_x[1]='\0';
      if (valor_x[0]=='X')
         glcd_rect(27,9,37,23,YES,OFF); //Borra el numero mostrado
      if ((valor_x[0]>='0')&&(valor_x[0]<='9'))
      {
         glcd_rect(27,9,37,23,YES,OFF);  //Borra el numero mostrado antes de
         glcd_text57(27,9,valor_x,2,ON); //escribir uno nuevo..   
      }
      glcd_update();
      }
   }
}


[Duende_Azul]

Este es el teclado..  lo pongo aparte porque supera los limites permitidos de caracteres en un post...

Código: [Seleccionar]

const int8 prueba[64][16] = {
      0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xF8, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,    /*  [*************************************************************                                                                   ]  */
      0xE0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x38, 0x7F, 0xFF, 0x07, 0xFF, 0xF0, 0x7F, 0xFF, 0x1E,    /*  [***                                                       ***    ***************     ***************     ***************   **** ]  */
      0xC0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x18, 0x80, 0x01, 0x88, 0x00, 0x18, 0x80, 0x01, 0x92,    /*  [**                                                         **   *              **   *              **   *              **  *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x01, 0x80, 0xD0, 0x3C, 0x0D, 0x03, 0xC0, 0xD2,    /*  [*                                                           *  *       **       ** *      ****      ** *      ****      ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x07, 0x80, 0xD0, 0x66, 0x0D, 0x06, 0x60, 0xD2,    /*  [*                                                           *  *     ****       ** *     **  **     ** *     **  **     ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x01, 0x80, 0xD0, 0x66, 0x0D, 0x00, 0x60, 0xD2,    /*  [*                                                           *  *       **       ** *     **  **     ** *         **     ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x01, 0x80, 0xD0, 0x06, 0x0D, 0x00, 0x60, 0xD2,    /*  [*                                                           *  *       **       ** *         **     ** *         **     ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x01, 0x80, 0xD0, 0x0C, 0x0D, 0x01, 0xC0, 0xD2,    /*  [*                                                           *  *       **       ** *        **      ** *       ***      ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x01, 0x80, 0xD0, 0x18, 0x0D, 0x00, 0x60, 0xD2,    /*  [*                                                           *  *       **       ** *       **       ** *         **     ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x01, 0x80, 0xD0, 0x30, 0x0D, 0x00, 0x60, 0xD2,    /*  [*                                                           *  *       **       ** *      **        ** *         **     ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x01, 0x80, 0xD0, 0x60, 0x0D, 0x00, 0x60, 0xD2,    /*  [*                                                           *  *       **       ** *     **         ** *         **     ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x01, 0x80, 0xD0, 0x60, 0x0D, 0x06, 0x60, 0xD2,    /*  [*                                                           *  *       **       ** *     **         ** *     **  **     ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x01, 0x80, 0xD0, 0x7E, 0x0D, 0x03, 0xC0, 0xD2,    /*  [*                                                           *  *       **       ** *     ******     ** *      ****      ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x08, 0x80, 0x01, 0xC8, 0x00, 0x1C, 0x80, 0x01, 0xD2,    /*  [*                                                           *   *              ***  *              ***  *              *** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x08, 0x7F, 0xFF, 0x87, 0xFF, 0xF8, 0x7F, 0xFF, 0x92,    /*  [*                                                           *    ****************    ****************    ****************  *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x08, 0x3F, 0xFF, 0x03, 0xFF, 0xF0, 0x3F, 0xFF, 0x12,    /*  [*                                                           *     **************      **************      **************   *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x12,    /*  [*                                                           *                                                              *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x08, 0x7F, 0xFF, 0x07, 0xFF, 0xF0, 0x7F, 0xFF, 0x12,    /*  [*                                                           *    ***************     ***************     ***************   *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x08, 0x80, 0x01, 0x88, 0x00, 0x18, 0x80, 0x01, 0x92,    /*  [*                                                           *   *              **   *              **   *              **  *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x00, 0xC0, 0xD0, 0x7E, 0x0D, 0x03, 0xC0, 0xD2,    /*  [*                                                           *  *        **      ** *     ******     ** *      ****      ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x01, 0xC0, 0xD0, 0x60, 0x0D, 0x06, 0x60, 0xD2,    /*  [*                                                           *  *       ***      ** *     **         ** *     **  **     ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x03, 0xC0, 0xD0, 0x60, 0x0D, 0x06, 0x00, 0xD2,    /*  [*                                                           *  *      ****      ** *     **         ** *     **         ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x03, 0xC0, 0xD0, 0x60, 0x0D, 0x06, 0x00, 0xD2,    /*  [*                                                           *  *      ****      ** *     **         ** *     **         ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x06, 0xC0, 0xD0, 0x7C, 0x0D, 0x07, 0xC0, 0xD2,    /*  [*                                                           *  *     ** **      ** *     *****      ** *     *****      ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x0C, 0xC0, 0xD0, 0x66, 0x0D, 0x07, 0x60, 0xD2,    /*  [*                                                           *  *    **  **      ** *     **  **     ** *     *** **     ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x0F, 0xC0, 0xD0, 0x06, 0x0D, 0x06, 0x60, 0xD2,    /*  [*                                                           *  *    ******      ** *         **     ** *     **  **     ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x00, 0xC0, 0xD0, 0x06, 0x0D, 0x06, 0x60, 0xD2,    /*  [*                                                           *  *        **      ** *         **     ** *     **  **     ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x00, 0xC0, 0xD0, 0x66, 0x0D, 0x06, 0x60, 0xD2,    /*  [*                                                           *  *        **      ** *     **  **     ** *     **  **     ** *  * ]  */
      0xC0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x19, 0x00, 0xC0, 0xD0, 0x3C, 0x0D, 0x03, 0xC0, 0xD2,    /*  [**                                                         **  *        **      ** *      ****      ** *      ****      ** *  * ]  */
      0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xF8, 0x80, 0x01, 0xC8, 0x00, 0x1C, 0x80, 0x01, 0xD2,    /*  [*************************************************************   *              ***  *              ***  *              *** *  * ]  */
      0xC0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x18, 0x7F, 0xFF, 0x87, 0xFF, 0xF8, 0x7F, 0xFF, 0x92,    /*  [**                                                         **    ****************    ****************    ****************  *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x08, 0x3F, 0xFF, 0x03, 0xFF, 0xF0, 0x3F, 0xFF, 0x12,    /*  [*                                                           *     **************      **************      **************   *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x12,    /*  [*                                                           *                                                              *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x08, 0x7F, 0xFF, 0x07, 0xFF, 0xF0, 0x7F, 0xFF, 0x12,    /*  [*                                                           *    ***************     ***************     ***************   *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x08, 0x80, 0x01, 0x88, 0x00, 0x18, 0x80, 0x01, 0x92,    /*  [*                                                           *   *              **   *              **   *              **  *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x07, 0xE0, 0xD0, 0x3C, 0x0D, 0x03, 0xC0, 0xD2,    /*  [*                                                           *  *     ******     ** *      ****      ** *      ****      ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x00, 0x60, 0xD0, 0x66, 0x0D, 0x06, 0x60, 0xD2,    /*  [*                                                           *  *         **     ** *     **  **     ** *     **  **     ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x00, 0x60, 0xD0, 0x66, 0x0D, 0x06, 0x60, 0xD2,    /*  [*                                                           *  *         **     ** *     **  **     ** *     **  **     ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x00, 0xC0, 0xD0, 0x66, 0x0D, 0x06, 0x60, 0xD2,    /*  [*                                                           *  *        **      ** *     **  **     ** *     **  **     ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x00, 0xC0, 0xD0, 0x3C, 0x0D, 0x06, 0xE0, 0xD2,    /*  [*                                                           *  *        **      ** *      ****      ** *     ** ***     ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x01, 0x80, 0xD0, 0x66, 0x0D, 0x03, 0xE0, 0xD2,    /*  [*                                                           *  *       **       ** *     **  **     ** *      *****     ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x01, 0x80, 0xD0, 0x66, 0x0D, 0x00, 0x60, 0xD2,    /*  [*                                                           *  *       **       ** *     **  **     ** *         **     ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x03, 0x00, 0xD0, 0x66, 0x0D, 0x00, 0x60, 0xD2,    /*  [*                                                           *  *      **        ** *     **  **     ** *         **     ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x03, 0x00, 0xD0, 0x66, 0x0D, 0x06, 0x60, 0xD2,    /*  [*                                                           *  *      **        ** *     **  **     ** *     **  **     ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x03, 0x00, 0xD0, 0x3C, 0x0D, 0x03, 0xC0, 0xD2,    /*  [*                                                           *  *      **        ** *      ****      ** *      ****      ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x08, 0x80, 0x01, 0xC8, 0x00, 0x1C, 0x80, 0x01, 0xD2,    /*  [*                                                           *   *              ***  *              ***  *              *** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x08, 0x7F, 0xFF, 0x87, 0xFF, 0xF8, 0x7F, 0xFF, 0x92,    /*  [*                                                           *    ****************    ****************    ****************  *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x08, 0x3F, 0xFF, 0x03, 0xFF, 0xF0, 0x3F, 0xFF, 0x12,    /*  [*                                                           *     **************      **************      **************   *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x12,    /*  [*                                                           *                                                              *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x08, 0x7F, 0xFF, 0x07, 0xFF, 0xFF, 0xFF, 0xFF, 0x12,    /*  [*                                                           *    ***************     ***********************************   *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x08, 0x80, 0x01, 0x88, 0x00, 0x00, 0x00, 0x01, 0x92,    /*  [*                                                           *   *              **   *                                  **  *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x03, 0xC0, 0xD0, 0x00, 0x03, 0x00, 0x00, 0xD2,    /*  [*                                                           *  *      ****      ** *                  **                ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x06, 0x60, 0xD0, 0x01, 0xF3, 0x00, 0x00, 0xD2,    /*  [*                                                           *  *     **  **     ** *           *****  **                ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x06, 0x60, 0xD0, 0x03, 0x0B, 0x00, 0x00, 0xD2,    /*  [*                                                           *  *     **  **     ** *          **    * **                ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x06, 0x60, 0xD0, 0x03, 0x0B, 0x68, 0x00, 0xD2,    /*  [*                                                           *  *     **  **     ** *          **    * ** ** *           ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x06, 0x60, 0xD0, 0x03, 0x03, 0x78, 0x00, 0xD2,    /*  [*                                                           *  *     **  **     ** *          **      ** ****           ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x06, 0x60, 0xD0, 0x03, 0x03, 0x60, 0x00, 0xD2,    /*  [*                                                           *  *     **  **     ** *          **      ** **             ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x06, 0x60, 0xD0, 0x03, 0x03, 0x60, 0x00, 0xD2,    /*  [*                                                           *  *     **  **     ** *          **      ** **             ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x06, 0x60, 0xD0, 0x03, 0x0B, 0x60, 0x00, 0xD2,    /*  [*                                                           *  *     **  **     ** *          **    * ** **             ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x06, 0x60, 0xD0, 0x03, 0x0B, 0x60, 0x00, 0xD2,    /*  [*                                                           *  *     **  **     ** *          **    * ** **             ** *  * ]  */
      0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x09, 0x03, 0xC0, 0xD0, 0x01, 0xF3, 0x60, 0x00, 0xD2,    /*  [*                                                           *  *      ****      ** *           *****  ** **             ** *  * ]  */
      0xC0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x18, 0x80, 0x01, 0xC8, 0x00, 0x00, 0x00, 0x01, 0xD2,    /*  [**                                                         **   *              ***  *                                  *** *  * ]  */
      0xE0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x38, 0x7F, 0xFF, 0x87, 0xFF, 0xFF, 0xFF, 0xFF, 0x9E,    /*  [***                                                       ***    ****************    ************************************  **** ]  */
      0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xF8, 0x3F, 0xFF, 0x03, 0xFF, 0xFF, 0xFF, 0xFF, 0x00,    /*  [*************************************************************     **************      **********************************        ]  */
     
};



[Duende_Azul]

y este es el achivo .h

Código: [Seleccionar]

#include <18F452.h>
#device adc=10

#FUSES NOWDT                    //No Watch Dog Timer
#FUSES WDT128                   //Watch Dog Timer uses 1:128 Postscale
#FUSES H4                       //High speed osc with HW enabled 4X PLL
#FUSES NOPROTECT                //Code not protected from reading
#FUSES NOOSCSEN                 //Oscillator switching is disabled, main oscillator is source
#FUSES BROWNOUT                 //Reset when brownout detected
#FUSES BORV20                   //Brownout reset at 2.0V
#FUSES PUT                      //Power Up Timer
#FUSES STVREN                   //Stack full/underflow will cause reset
#FUSES NODEBUG                  //No Debug mode for ICD
#FUSES NOLVP                    //No low voltage prgming, B3(PIC16) or B5(PIC18) used for I/O
#FUSES NOWRT                    //Program memory not write protected
#FUSES NOWRTD                   //Data EEPROM not write protected
#FUSES NOWRTB                   //Boot block not write protected
#FUSES NOWRTC                   //configuration not registers write protected
#FUSES NOCPD                    //No EE protection
#FUSES NOCPB                    //No Boot Block code protection
#FUSES NOEBTR                   //Memory not protected from table reads
#FUSES NOEBTRB                  //Boot block not protected from table reads

#use delay(clock=32000000)
#use fast_io(A)