/*Crea mensajes en el aire a prtir de 7 led
Por ahora 1 letra simetrica
Funciona
*/
#include <18F1320.h>
#fuses INTRC_IO,NOWDT, PUT, BROWNOUT, BORV45, FCMEN, NOCPD, STVREN, NODEBUG, NOLVP, NOWRT, NOWRTC, NOWRTD, NOIESO, NOEBTR, NOEBTRB, NOMCLR, NOPROTECT, NOCPB
//INTRCIO permite uso rc interno y ra6 como I/O normal
#use delay(clock=4000000)
#use standard_io(a)
#use standard_io(b)
#byte PORTA=0x0F80
#byte PORTB=0x0F81
///VARIABLES
int letra1[7];
int letra2[7];
int i;
int j;
void main() {//cambiar inicio y goto inicio a do-while y funciones
//INICIO:
setup_oscillator(OSC_4MHZ|OSC_INTRC);
//Puertos
set_tris_b(0x00); //porb
set_tris_a(0x00); //pora salida
//Prueba en este caso la letra A,C
letra1[0]=0b00000000;
letra1[1]=0b00111111;
letra1[2]=0b01001000;
letra1[3]=0b01001000;
letra1[4]=0b01001000;
letra1[5]=0b00111111;
letra1[6]=0b00000000;
letra2[0]=0b00000000;
letra2[1]=0b01111111;
letra2[2]=0b01111111;
letra2[3]=0b01000001;
letra2[4]=0b01000001;
letra2[5]=0b01000001;
letra2[6]=0b00000000;
do{//probado:5(original),1,10,4*,3
i= 0;
j= 0;
for(i=0;i<7;i++){
output_b(letra1[i]); //filas
delay_ms(1000); //pausa para poder verse
}
for(j=0;j<7;j++){
output_b(letra2[j]); //filas
delay_ms(1000); //pausa para poder verse
}
}while(true);
}