Re: Se buscan colaboradores

[Altair Linux <altairlinux@gmail.com>]

Buenos dias a todos,

inicialmente no mandaria este mensaje aqui, sino al foro de NGL, pero dado que el movimiento inicial fue en la lista creo que es una buena razon para indicar aqui la direccion del primer video DEMO con NGL, en la actual version Alfa, y que todos lo puedan ver.

http://www.youtube.com/watch?v=ShVM51abkqA

Se trata de una simple ventana en la que vemos aparecer 3 cuadrados de distintos colores, a modo de "naves". Las coordenadas X e Y de cada cuadrado son aleatorias. Se que no es mucho (recordemos, es una version ALFA), pero ilustra un poco que se puede hacer.

Dado que no me he aclarado aun en como poner la web en sourceforge, os pongo aqui el codigo fuente (espero que no moleste, no es muy largo). He accedido via FTP y subido unos archivos HTML a modo de prueba, pero por lo visto no los pongo en el sitio correcto porque la web por defecto de sourceforge no cambia.

#include "Nautilus.h"

int
main( int argc, char* args[] )
{
    unsigned char pulsacion;
    int Salir;
    int Resultado;

    unsigned int Nave1; // Azul
    unsigned int Nave2; // Roja
    unsigned int Nave3; // Verde

    set_mode=2;
    create_screen();

    Nave1=create_entity();
    Nave2=create_entity();
    Nave3=create_entity();
    load_image(Nave1,"cuadrado_azul.png");
    load_image(Nave2,"cuadrado_rojo.png");
    load_image(Nave3,"cuadrado_verde.png");

    zone_screen.x=100;
    zone_screen.y=100;
    zone_screen.w=640;
    zone_screen.h=480;

    Salir=0;
    while (Salir<1)
    {
        // Nave azul
        pulsacion=0;
        pulsacion=key(_a);
        if (pulsacion>0) {
            entity_setx(Nave1, rand(1,640));
            entity_sety(Nave1, rand(1,480));
            map_to_screen(Nave1,2);
            frame();
        }

        // Nave roja
        pulsacion=0;
        pulsacion=key(_s);
        if (pulsacion>0) {
            entity_setx(Nave2, rand(1,640));
            entity_sety(Nave2, rand(1,480));
            map_to_screen(Nave2,2);
            frame();
        }

        // Nave verde
        pulsacion=0;
        pulsacion=key(_d);
        if (pulsacion>0) {

            entity_setx(Nave3, rand(1,640));
            entity_sety(Nave3, rand(1,480));
            map_to_screen(Nave3,2);
            frame();
        }

        // Salir
        pulsacion=0;
        pulsacion=key(_q);
        if (pulsacion>0)
            Salir=1;
    }

    unload_image(Nave1);
    unload_image(Nave2);
    unload_image(Nave3);

    delete_entity(Nave1);
    delete_entity(Nave2);
    delete_entity(Nave3);

    printf("\n");
    SDL_Quit();

    return 0; 
}