Comunidad Game Maker

//Las teclas las definís vos según tu necesidad
var tecla_a = keyboard_check(tecla);
var tecla_b = keyboard_check(tecla);
var tecla_c = keyboard_check(tecla);

//Primer caso (TECLA A + TECLA B = salto)
if (tecla_a * tecla_b){
    //Ejecutar un script de salto
    salto();
}

//Segundo caso (TECLA A + TECLA B + TECLA C = sprintar)
if (tecla_a * tecla_b * tecla_c){
    //Ejecutar un script de sprint
    sprint();
}

if (tecla_a * tecla_b *tecla_c) {...}
//Es igual que:
if (1 * 1 * 0) {...} //1 * 1 * 0 = 0, que es false

puede_romperse = true; //Si puede romperse o no

if (place_meeting(x,y-1,obj_personaje) && puede_romperse = true){
    alarm[0] = room_speed * 1; //1 segundo hasta que se rompa
    puede_romperse = false; //Hacer que este evento no vuelva a suceder
}

instance_destroy();

//Colisión vertical
if (place_meeting(x,y+vsp,argument0)){
    while(!place_meeting(x,y+sign(vsp),argument0)) {y += sign(vsp);}
    vsp = 0;
    on_ground = true;
}
//Colisión horizontal
if (place_meeting(x+hsp,y,argument0)){
    while(!place_meeting(x+sign(hsp),y,argument0)) {x += sign(hsp);}
    hsp = 0;
}

//Si atravesó la hitbox en el step anterior
if (place_meeting(x,y,argument0) && last_move != -1){
    switch (last_move){
        case 0:
            while(place_meeting(x-1,y,argument0)) {x++;} //Derecha
            x -= 1;
            break;
        case 1:
            while(place_meeting(x,y+1,argument0)) {y--;} //Arriba
            y -= 1;
            break;
        case 2:
            while(place_meeting(x+1,y,argument0)) {x--;} //Izquierda
            x += 1;
            break;
        case 3:
            while(place_meeting(x,y-1,argument0)) {y++;} //Abajo
            y += 1;
            break;
    }
}

//Actualizar variable
last_move = -1;

//Si atraviesa la hitbox48x48
if (place_meeting(x,y,argument0)){
    //Actualizar variables
    x_ = x;
    y_ = y;
    y_p = 0;
    y_n = 0;
    x_p = 0;
    x_n = 0;
    //Ver qué dirección es la más corta para salir de la colisión
    while(place_meeting(x,y-1,argument0)) {y++; y_p++;} //Desde arriba
    x = x_;
    y = y_;
    while(place_meeting(x,y+1,argument0)) {y--; y_n++;} //Desde abajo
    x = x_;
    y = y_;
    while(place_meeting(x-1,y,argument0)) {x++; x_p++;} //Desde izquierda
    x = x_;
    y = y_;
    while(place_meeting(x+1,y,argument0)) {x--; x_n++;} //Desde derecha
    x = x_;
    y = y_;

    //Mover al objeto a la posición
    var result = min(y_p,y_n,x_p,x_n);
    if (y_p == result) {y += y_p-1; last_move = 3;} //Abajo
    else if (y_n == result) {y -= y_n-1; last_move = 1;} //Arriba
    else if (x_p == result) {x += x_p-1; last_move = 0;} //Derecha
    else if (x_n == result) {x -= x_n-1; last_move = 2;} //Izquierda
}

///VALORES GENERALES
change_state = false;
state = true; //Si se está moviendo o no
go_to = 1; //Si es 1, va desde x1, y1 a x2, y2, y si es -1 va desde x2, y2 a x1, y1.
dist = 0; //Distancia entre el punto x, y hasta el destindo
_dist = 0; //Distancia entre el punto x, y desde la salida
dir = 0; //Ángulo entre el punto A y el punto B
hitbox = instance_create(x,y,obj_hitbox48x48); //ID del objeto hitbox que se usará como hitbox de la plataforma

spd = 0;

///CONTROL DE ESTADO
dir = point_direction(x1,y1,x2,y2);
//Cambiar de estado
if (change_state){
    change_state = false;
    
    //Cambiar estado
    if (state) {state = false;}
    else {state = true;}
}

//Comprobar el estado
if (state){
    //Desde qué punto hasta qué punto
    if (go_to == 1) {dist = point_distance(x,y,x2,y2); _dist = point_distance(x,y,x1,y1);}
    else if (go_to == -1) {dist = point_distance(x,y,x1,y1); _dist = point_distance(x,y,x2,y2);}
    //Moverse
    if (_dist < 48) {spd = log10(1.1+_dist/3)*go_to}
    else if (dist < 48) {spd = log10(1.1+dist/3)*go_to}
    
    //Detenerse
    if (dist < spd || (spd < 0.1 && spd > -0.1) && _dist >= 48){
        if (go_to == 1) {x = x2; y = y2; go_to = -1;}
        else if (go_to == -1) {x = x1; y = y1; go_to = 1;}
    }
}

//Colision con el personaje
//if (place_meeting(x,y-1,obj_character)){ ANTERIOR
if (y > obj_character.y - 0.1 && place_meeting(x,y-1,obj_character)){
    obj_character.x += spd * cos(degtorad(dir));
    obj_character.y += spd * -sin(degtorad(dir));
}

//Mover la plataforma
x += spd * cos(degtorad(dir));
y += spd * -sin(degtorad(dir));

//Mover la hitbox
if (hitbox != 0){
    hitbox.x = x;
    hitbox.y = y;
}

//Desde el objeto jefe en el evento donde dispare
var bala = instance_create(x,y,obj_bala); //Crear una instancia de uan bala y almacenar su id única en una variable "bala"
bala.direction = point_direction(x,y,obj_personaje.x,obj_personaje.y); //Darle como direccion el ángulo entre el jefe y el personaje
bala = instance_create(x,y,obj_bala); //Crear la segunda bala
bala.direction = point_direction(x,y,obj_personaje.x,obj_personaje.y) - 20; //La misma dirección, pero 20º menos
bala = instance_create(x,y,obj_bala); //Crear la tercer bala
bala.direction = point_direction(x,y,obj_personaje.x,obj_personaje.y) + 20; //La misma dirección, pero 20º más

//Luego, desde el evento STEP de la bala...
x += cos(degtorad(direction))*5;
y += -sin(degtorad(direction))*5; //El menos va porque el eje y de gm está invertido