Hola gente! Hoy se me ocurrió hacer otro video, pero esta vez de programación, como no pienso enseñar LibGDX he preferido utilizar este video como referencia y enseñar a programar en Game Maker Studio, la verdad es que la primera vez que toque Game Maker, me pareció un asco, eso de arrastrar y hacer un juego, me pareció muy limitante, pero luego en el Start Up Lima Weekend los chicos hicieron el juego en 1 día prácticamente  y todo programando, entonces me dije, hay que darle otra mirada, es por eso que hice un video tutorial de cómo codear en game maker 😀

Video

Código Fuente
Aquí les dejo el código fuente que utilice:
obj_Dino.Create

Vel_Hor = 0;
Vel_Ver = 0;
Grav = 0.5;
En_Tierra = 0;

obj_Dino.Step

tecla_Izq = keyboard_check_direct(vk_left);
tecla_Der = keyboard_check_direct(vk_right);
tecla_Sal = keyboard_check_pressed(vk_space);
if(tecla_Izq)
{
    Vel_Hor = -2;
    image_xscale = -1;
}
if(tecla_Der)
{
    Vel_Hor = 2;
    image_xscale = 1;
}
if(tecla_Izq && tecla_Der) or
    (!tecla_Der && !tecla_Izq)
{
    Vel_Hor = 0;
}
if(tecla_Sal)
{
    if (En_Tierra)
    {
        Vel_Ver = -7;
    }
}
Vel_Ver += Grav;
if(place_meeting(x, y + Vel_Ver, obj_Padre))
{
    //Inicio Bucle
    while(!place_meeting(x, y + sign(Vel_Ver),
                obj_Padre))
        y += sign(Vel_Ver);
    //Fin Bucle
    if(sign(Vel_Ver) == 1)
    {
        En_Tierra = 1;
    }
    Vel_Ver = 0;
}
else
{
    En_Tierra = 0;
}
////place_meeting devuelve si hay colision, no el objeto y es mas veloz que instance_meeting
if(place_meeting(x+Vel_Hor, y, obj_Padre))
{
    while(!place_meeting(x+sign(Vel_Hor),y,
                obj_Padre))
        x+= sign(Vel_Hor);
    Vel_Hor = 0;
}
x += Vel_Hor;
y += Vel_Ver;

obj_Dino.Press R-key (Este Código lo olvidé en el video, es el del reseteo :P)

game_restart();

Imágenes
Las imágenes que utilice:



Suerte!