domingo, 26 de agosto de 2012

Pinguino driver e instalador en windows 7



Después de muchas pruebas ya logre instalar pinguino en diferentes versiones de windows 32bits, 64bits(intel, amd).
El driver ya es algo que se había desarrollado con anterioridad, pero observe que no siempre copiaba los archivos libusb en el system, asi que se procede a copiarlos manualmente y listo. El vídeo muestra todo el proceso para un amd64, pero lo mismo aplica para intel64 y los de 32 bits.

Guia Pinguino LCD y LM35


En el siguiente enlace dejo una guia para manejo de lcd en pinguino.

jueves, 23 de agosto de 2012

Animación PSEINT Ejemplo5


Proceso animacionv05
    Definir i Como Entero;
    Definir j Como Entero;
    dimension cohete[9];
    cohete[1]<-"   /|\   ";
    cohete[2]<-"   |B|   ";
    cohete[3]<-"   |O|   ";
    cohete[4]<-"   |M|   ";
    cohete[5]<-"   |B|   ";
    cohete[6]<-"  //|\\  ";
    cohete[7]<-" ******* ";
    cohete[8]<-"* * * * *";
    cohete[9]<-" * * * * ";
    Para j<-15 Hasta 1 Con Paso -1 Hacer
        Borrar Pantalla;
        Para i<-j Hasta 15 Con Paso 1 Hacer
            Escribir "     ";
        FinPara
        Para i<-1 Hasta 9 Con Paso 1 Hacer
            Escribir cohete[i];
        FinPara
        Esperar 1 Segundo;
    FinPara
FinProceso

Animación PSEINT Ejemplo4


Proceso animacionv04
    Definir i Como Entero;
    Definir j Como Entero;
    dimension cohete[9];
    cohete[1]<-"   /|\   ";
    cohete[2]<-"   |B|   ";
    cohete[3]<-"   |O|   ";
    cohete[4]<-"   |M|   ";
    cohete[5]<-"   |B|   ";
    cohete[6]<-"  //|\\  ";
    cohete[7]<-" ******* ";
    cohete[8]<-"* * * * *";
    cohete[9]<-" * * * * ";
    Para j<-1 Hasta 15 Con Paso 1 Hacer
        Borrar Pantalla;
        Para i<-j Hasta 15 Con Paso 1 Hacer
            Escribir "     ";
        FinPara
        Para i<-1 Hasta 9 Con Paso 1 Hacer
            Escribir cohete[i];
        FinPara
        Esperar 1 Segundo;
    FinPara
FinProceso

Animación PSEINT Ejemplo3


Proceso animacion3
    Definir i Como Entero;
    dimension cohete[9];
    cohete[1]<-"   /|\   ";
    cohete[2]<-"   |B|   ";
    cohete[3]<-"   |O|   ";
    cohete[4]<-"   |M|   ";
    cohete[5]<-"   |B|   ";
    cohete[6]<-"  //|\\  ";
    cohete[7]<-" ******* ";
    cohete[8]<-"* * * * *";
    cohete[9]<-" * * * * ";
    Para i<-1 Hasta 9 Con Paso 1 Hacer
        Escribir cohete[i],cohete[i],cohete[i],cohete[i],cohete[i];
    FinPara
FinProceso

Animación PSEINT Ejemplo2


Proceso animacion2
    Definir i Como Entero;
    dimension cohete[9];
    cohete[1]<-"   /|\   ";
    cohete[2]<-"   |B|   ";
    cohete[3]<-"   |O|   ";
    cohete[4]<-"   |M|   ";
    cohete[5]<-"   |B|   ";
    cohete[6]<-"  //|\\  ";
    cohete[7]<-" ******* ";
    cohete[8]<-"* * * * *";
    cohete[9]<-" * * * * ";
    Para i<-1 Hasta 9 Con Paso 1 Hacer
        Escribir cohete[i];
    FinPara
FinProceso

Animacion PSEINT Ejemplo1



Proceso animacion
    Escribir "Presione una tecla para iniciar el lanzamiento!";
    Esperar Tecla;
    Borrar Pantalla;
    Escribir "         ";//1
    Escribir "         ";//2
    Escribir "         ";//3
    Escribir "         ";//4
    Escribir "         ";//5
    Escribir "         ";//6
    Escribir "         ";//7
    Escribir "         ";//8
    Escribir "         ";//9
    Escribir "         ";//10
    Escribir "         ";//11
    Escribir "   /|\   ";//12
    Escribir "   |B|   ";//13
    Escribir "   |O|   ";//14
    Escribir "   |M|   ";//15
    Escribir "   |B|   ";//16
    Escribir "  //|\\  ";//17
    Escribir " ******* ";//18
    Escribir "* * * * *";//19
    Escribir " * * * * ";//20
    Esperar 1 Segundo;
    Borrar Pantalla;
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "   /|\   ";
    Escribir "   |B|   ";
    Escribir "   |O|   ";
    Escribir "   |M|   ";
    Escribir "   |B|   ";
    Escribir "  //|\\  ";
    Escribir " ******* ";
    Escribir "* * * * *";
    Escribir " * * * * ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Esperar 1 Segundo;
    Borrar Pantalla;
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "   /|\   ";
    Escribir "   |B|   ";
    Escribir "   |O|   ";
    Escribir "   |M|   ";
    Escribir "   |B|   ";
    Escribir "  //|\\  ";
    Escribir " ******* ";
    Escribir "* * * * *";
    Escribir " * * * * ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Esperar 1 Segundo;
    Borrar Pantalla;
    Escribir "   /|\   ";
    Escribir "   |B|   ";
    Escribir "   |O|   ";
    Escribir "   |M|   ";
    Escribir "   |B|   ";
    Escribir "  //|\\  ";
    Escribir " ******* ";
    Escribir "* * * * *";
    Escribir " * * * * ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Escribir "         ";
    Esperar 1 Segundo;   
FinProceso

Animación en PSEINT con ASCII ART


Vídeo de ejemplo de una animación en PSEINT
 
En los siguientes enlaces se pueden descargar los dibujos en formato de caracteres, a estos dibujos se les llama ASCII Art.
  1. Galerias de imágenes
2. Editores