Div GO : Div Games Online

Entorno de desarrollo de juegos online en HTML5

Haz clic para obtener el control del teclado

// Pruebas de compilador online Div GO
// Php + Html5 + Canvas + Javascript + Three.js lib
// by J. Manuel Habas Millán

program ejemplo_object3d;
global
    tex;

begin
    tex = load_fpg("graficos/texturas");
   
    set_mode(640, 400);
    screen_color(#424);

set_fps(60, 0);
   
    text_color = #ccc;
    text_size  = 50;
   
    write(0, 5, 10, 3, "CURSORES: para girar la camara");
    write(0, 5, 30, 3, "ENTER: crea objetos 3d");
    write(0, 5, 50, 3, "ESC: elimina objetos 3d");
    write(0, 5, 70, 3, "+ / -: enciende / apaga luz ambiental");
    
    write_int(0, 635, 10, 5, offset num_object3d);
    
    //inicia scene3d sin esto no funcionaran las funciones object3d() ni light3d()
    start_scene3d(0, tex, 1, 0); //numero, file, graph, ancho, alto, region
      
    scene3d.light  = 100;
    scene3d.alpha  = 100;
    scene3d.camera = id;
    
    y		= 200;
    angle_y = -10000;
    ctype 	= c_scene3d;
    
	loop
        if (key(_left))	 angle -= 1000; end
        if (key(_right)) angle += 1000; end
        
        if (key(_c_minus) and scene3d.light > 0)	scene3d.light --; end
        if (key(_c_plus) and scene3d.light < 200)	scene3d.light ++; end
        
        if (key(_enter))
        	//tipo, wireframe, color, alpha, trazado, x, y, z
        	object3d(rand(0, 4), rand(0, 1), rgb(rand(0,255), rand(0,255), rand(0,255)), rand(0, 100), 0, rand(-200, 200), rand(0, 250), rand(-200, 200)); 
        end
        
        if (key(_esc)) delete_object3d(all_object3d); end
       
        frame;
    end
end

Tamaño Código:

HTML5 Game engine

Entorno de desarrollo de juegos online en HTML5