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_light3d;
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, "ENTER: crea luces aleatorias en la escena");
    write(0, 5, 25, 3, "ESC: elimina todas las luces de la escena");
    write(0, 5, 40, 3, "+ / -: enciende / apaga luz ambiental");
    
    write_int(0, 635, 10, 5, offset num_light3d);
   
    //inicia scene3d sin esto no funcionaran las funciones object3d() ni light3d()
    start_scene3d(0, tex, 1, 0); //numero, file, graph, region
    
    scene3d.light = 0;
    scene3d.alpha = 100;
   
   	scene3d[0].camera = id;
   	
    y = 300;
    angle_y = -20000;
    ctype	= c_scene3d;
    
	loop
    	if (key(_enter)) 
        	//intensidad, color, distancia, x, y, z
        	light3d(rand(50, 200), rgb(rand(0, 255), rand(0, 255), rand(0, 255)), rand(100, 1000), rand(-500, 500), rand(100, 500), rand(-200, 500));
        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(_esc)) delete_light3d(all_light3d); end
       
        frame;
    end
end

Tamaño Código:

HTML5 Game engine

Entorno de desarrollo de juegos online en HTML5