Div GO : Div Games Online

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_change_vectors;

private
    obj, v = 3;

begin   
    set_mode(640, 320);
    set_fps(60, 0);
   
    text_color = rgb(255,255,255);
    text_size  = 50;
   
    write(0, 5, 10, 3, "1 al 9: cambia objeto 3d");
    write(0, 5, 25, 3, "+ / -: incrementa / decrementa vectores");
          
    //inicia scene3d sin esto no funcionaran las funciones object3d() ni light3d()
    start_scene3d(0, 0, 0, 0); //numero, file, graph, region
   
    //crea objetos en escena
    obj = object3d(1, 1, #fff, 100, 0, 0, 0, 0); //tipo, wireframe, color, alpha, trazado, x, y, z

scene3d.camera = id;
    scene3d.visible = false;
    
    y = 240;
    angle_y = -20000;
    ctype	= c_scene3d;
    
	loop
		angle += 1000;
        
        if (key(_1)) delete_object3d(obj); obj = object3d(0, 1, #fff, 100, 0, 0, 0, 0); end 
        if (key(_2)) delete_object3d(obj); obj = object3d(1, 1, #fff, 100, 0, 0, 0, 0); end
        if (key(_3)) delete_object3d(obj); obj = object3d(2, 1, #fff, 100, 0, 0, 0, 0); end
        if (key(_4)) delete_object3d(obj); obj = object3d(3, 1, #fff, 100, 0, 0, 0, 0); end
        if (key(_5)) delete_object3d(obj); obj = object3d(4, 1, #fff, 100, 0, 0, 0, 0); end
        if (key(_6)) delete_object3d(obj); obj = object3d(5, 1, #fff, 100, 0, 0, 0, 0); end
        if (key(_7)) delete_object3d(obj); obj = object3d(6, 1, #fff, 100, 0, 0, 0, 0); end
        if (key(_8)) delete_object3d(obj); obj = object3d(7, 1, #fff, 100, 0, 0, 0, 0); end
        if (key(_9)) delete_object3d(obj); obj = object3d(8, 1, #fff, 100, 0, 0, 0, 0); end
       	
        if (key(_c_minus) and v > 0)  v--; end
        if (key(_c_plus)  and v < 40) v++; end
        
        change_vectors(obj, v);
        frame;
    end
end

Tamaño Código:

HTML5 Game engine

Entorno de desarrollo de juegos online en HTML5