Div GO : Div Games Online

Entorno de desarrollo de juegos online en HTML5

Haz clic para obtener el control del teclado

PROGRAM ejemplo_set_point;

GLOBAL
    fichero1;
    punto=1;
    x_punto;
    y_punto;

BEGIN
	set_mode(m320x200, 2);
    fichero1=load_fpg("graficos/help");
    
    //creamos recorrido marcando distintos puntos en el mapa
    //set_point(fichero, gráfico, número, x, y);
    set_point(fichero1, 7, 1,  8,   18);
    set_point(fichero1, 7, 2,  63,  18);
    set_point(fichero1, 7, 3,  94,  71);
    set_point(fichero1, 7, 4,  127, 102);
    set_point(fichero1, 7, 5,  196, 102);
    set_point(fichero1, 7, 6,  246, 20);
    set_point(fichero1, 7, 7,  288, 20);
    set_point(fichero1, 7, 8,  312, 98);
    set_point(fichero1, 7, 9,  200, 113);
    set_point(fichero1, 7, 10, 163, 193);
    set_point(fichero1, 7, 11, 112, 193);
    set_point(fichero1, 7, 12, 90,  107);
    set_point(fichero1, 7, 13, 5,   94);
    set_point(fichero1, 7, 14, 4,   57);
    
    put_screen(fichero1, 7);
    
    graph=101;
    file=fichero1;
    size=70;
    Z=10;
        
    LOOP
        IF (fget_dist(x, y, x_punto, y_punto)<6)
            IF (punto++==14) punto=1; END
            marcar(x_punto, y_punto);
        END

// Cogemos el punto de control
        get_point(fichero1, 7, punto, offset x_punto, offset y_punto);

angle=fget_angle(x, y, x_punto, y_punto);
        advance(6);
        FRAME;
    END
END

PROCESS marcar(x, y)
BEGIN
	graph=200;
    file=fichero1;
    Z=20;
    
	LOOP
    	alpha -= 2; IF (alpha < 10) BREAK; END
        
    	FRAME;
    END
END

Tamaño Código:

HTML5 Game engine

Entorno de desarrollo de juegos online en HTML5