Div GO : Div Games Online

Haz clic para obtener el control del teclado

// Ejemplo de compilador online Div GO
// Php + Html5 + Canvas + Javascript
// by J. Manuel Habas

program ejemplo_graphic_explorer;
global

id_draw[3];
	i, grafico, ancho, alto;
    info = "";

ux, uy;
    sx = 63, sy = 198;
    
	roj, ver, azu;

begin
	set_mode(640, 400);
    set_visible_mouse(false);

grafico = graphic_explorer(0, 1); //obtienes información de la imagen
    
    ancho	= grafico.width;
    alto	= grafico.height;
    
    text_size = 70;
   	write(0,0,0,0, "Pulsa C para crear procesos");
    write(0,64,200,0, "0 1 2 3 4 5 6 7");
    
    text_size = 50;
    write(0,60,61,6, "EDITAR IMAGEN");
    write_int(0,60,181,0, offset info);
    
    x		= 120;
    y		= 120;
    
    draw(2, #fff, 15, 0, 60, 60, 120, 120);
    draw(2, #fff, 15, 0, 168, 182, 12, 12);

id_draw[0] = draw(2, #fff, 15, 0, 0, 0, 2, 2); //mouse
    id_draw[1] = draw(3, #fff, 15, 0, 0, 0, 2, 2); //muestra
    id_draw[2] = draw(2, #fff, 15, 0, sx, sy, 12, 20); //selector
    
    loop
    	ux = mouse.x - 58;
        uy = mouse.y - 58;
           
        i = (uy * ancho + ux) * 4;
        
        move_draw(id_draw[0], #fff, 15, mouse.x, mouse.y, 3, 3);
        move_draw(id_draw[2], #fff, 15, sx, sy, 12, 20);
 
        if (ux > 0 and uy > 0 and ux < ancho and uy < alto)
        	info = "RGB:" + grafico.data[i] + "," + grafico.data[i + 1] + "," + grafico.data[i + 2];
            move_draw(id_draw[1], rgb(grafico.data[i], grafico.data[i + 1], grafico.data[i + 2]), 15, 169, 183, 10, 10);

if (mouse.left)
                grafico.data[i] 	= roj; // color rojo
                grafico.data[i + 1] = ver; // color verde
                grafico.data[i + 2] = azu; // color azul
                grafico.data[i + 3] = 255; // alpha
            end
            
        else
        	info = "RGB:0,0,0";
            move_draw(id_draw[1], rgb(0, 0, 0), 15, 169, 183, 10, 10);
        end
             	
        if (key(_0)) sx = 63;	roj = 0; 	ver = 0; 	azu = 0; 	end
        if (key(_1)) sx = 78;	roj = 255;	ver = 0; 	azu = 0;	end
        if (key(_2)) sx = 92;	roj = 0; 	ver = 255; 	azu = 0;	end
        if (key(_3)) sx = 107;	roj = 0; 	ver = 0; 	azu = 255;	end
        if (key(_4)) sx = 121;	roj = 255;	ver = 255; 	azu = 0;	end
        if (key(_5)) sx = 136;	roj = 255;	ver = 0; 	azu = 255;	end
        if (key(_6)) sx = 151;	roj = 0; 	ver = 255; 	azu = 255;	end
        if (key(_7)) sx = 165;	roj = 255;	ver = 255; 	azu = 255;	end
        
        graph = graphic_builder(grafico);

if (key(_c)) muestra(graph); end

frame;
    end
end

process muestra(graph);
begin
	x	 = rand(400, 600);
	y 	 = -10;
	size = rand(40, 120);

loop
		y += 3; if (y > 410) break; end
        angle += 500;

frame;
    end
end

Tamaño Código:

HTML5 Game engine

Entorno de desarrollo de juegos online en HTML5