Gemix Studio

Code: Select all

PROGRAM mi_juego;
BEGIN
    write_int(0, 200, 200, 4, &x);
    x=max(2, 3)+max(5, 4);
END
PROCESS max(a, b)
BEGIN
    IF (a>b)
        RETURN(a);
    ELSE
        RETURN(b);
    END
END

Code: Select all

program prueba;
global
	conecta;
	struct mensaje
    	texto = "";
   	end
        
begin
	mensaje.texto = "Prueba socket";

	write(0, 320, 70, 4, "Mi mensaje");
	write_int(0, 320, 90, 4, &mensaje.texto);
        
	conecta = open_socket("ws://www.divgo.net");
    
	send_socket(conecta, &mensaje); //envia datos
	mensaje = get_socket(conecta);  //recibe datos
    
	close_socket(conecta);
end

Code: Select all

program ejemplo_region_explorer;
begin
    set_title("Div GO : Ejemplo region_explorer");
    
    /* pruebas con opciones de pantalla */
    set_mode(m480x240);
    screen_color(#26b);

    set_fps(60, 0);

    // definimos las regiones donde mostrar los graficos
    define_region(1, 0, 0, 480, 120);

    // inicia scroll
    start_scroll(0, 0, 1, 2, 1, 0);
        
    flecha(3, 240, 60, 0);
    pantalla(240, 180);
end

process flecha(graph, x, y, angle);
begin
    size = 100;
    region = 1;
    scroll.camera = id;

    loop
        if (key(_up))
            y -= 2;
            angle = 90000;
        end
        
        if (key(_down))
            y += 2;
            angle = -90000;
        end
        
        if (key(_left))
            x -= 2;
            angle = 180000;
        end
        
        if (key(_right))
            x += 2;
            angle = 0;
        end
    
        frame;
    end
end

process pantalla(x, y);
private
    array, i;
    
begin
    size   = 100;
    region = 0;
    
    loop
        array = region_explorer(1);
        
        for (i = 0; i < sizeof(array.data); i += 4)
            array.data[i]     = 0; //r
            array.data[i+2]    = 255; //b
        end
        
        graph = graphic_builder(array);


        frame;
    end
end