[www.maicas.net]

goofy

Software para pruebas.

• El propósito de estos programa es comprobar que el PIC funciona.
• Los programas se han desarrollado con PicSC.
• Puedes descargar los programas, incluidos los fuentes completos..

Test1.

Este programa hace destellar el led, encendiendo y apagando cada diez segundos (5 segundos encendido y 5 segundos apagado). El programa nos permite comprobar que funcionan el PIC, la alimentación, el oscilador y el led. Asimismo podemos medir el consumo con el led encendido/apagado.

Asimismo podemos usar este programa para probar cualquier dispositivo conectado a los pins de salida RA0, RA1, RA2, RA3 y RA4, como por ejemplo el control de la sirena, el control de alimentacion del GPS, etc...

//--------------------------
// rutina principal 
// (inicializacion y bucle principal)
	org 0;
	bank   = 1;
	trisa  = TRISA;
	trisb  = TRISB;
	bank   = 0;

	loop{
		porta = 0x00;      //Todos los pins a cero, 5 segundos
		wait_decimas(50);
		porta = 0xFF;      //Todos los pins a uno, 5 segundos
		wait_decimas(50);
	}

Test2.

Este programa comprueba las entradas de los sensores, encendiendo o apagando el led según el estado de las cuatro lineas RB4-RB7. El cambio en el estado de un bit, provoca el cambio de estado del led.

• Comprueba el detector de movimiento moviendo el módulo.
• Comprueba RB4-RB7 cambiando de estado cada entrada

//--------------------------
// rutina principal 
// (inicializacion y bucle principal)
	org 0;
	bank   = 1;
	trisa  = TRISA;
	trisb  = TRISB;
	bank   = 0;

	loop{
		acum = 0;
		if1(SENSOR1)  ++acum;
		if1(SENSOR2)  ++acum;
		if1(SENSORHG) ++acum;
		if1(POWER)    ++acum;
		if1(acum.0)   led = 1;
		else          led = 0;
	}

Test3.

Este programa comunica los dos puertos serie del módulo por software. El programa nos permite comprobar que funcionan los cables del PC, del telefono y del GPS.

/*++++++++++++++++++++++++++++++++++++++++++++++++
Conecta ambos puertos serie por software

  RX_COM1 (portb.0 )  -> TX_COM2 (portb.1)
  RX_COM2 (portb.2 )  -> TX_COM1 (portb.3)

++++++++++++++++++++++++++++++++++++++++++++++++*/
// inicializacion y bucle principal
	org 0;
	bank   = 1;
	trisa  = TRISA;	//0b11110001
	trisb  = TRISB;	//0b11110101
	bank   = 0;
	porta  = 0xFF;
	loop{
		portb <<= 1;
	}
	nop;

Seguimos trabajando !