Undertale Yellow script viewer

var mail_station_blocked = false;

if (global.geno_complete[2] == true)

    mail_station_blocked = true;

if (keyboard_multicheck_pressed(0) && scr_interact
scr_interact

function scr_interact()
{
    if (distance_to_object(obj_pl) < 20 && obj_pl.state == scr_normal_state)
    {
        var pl_dir = obj_pl.direction;
        var pl_x = 0;
        var pl_y = 0;
        var check_distance_x = 0;
        var check_distance_y = 0;
        switch (pl_dir)
        {
            case 0:
                pl_x = obj_pl.bbox_right;
                pl_y = obj_pl.bbox_top + 1;
                check_distance_x = 20;
                break;
            case 180:
                pl_x = obj_pl.bbox_left;
                pl_y = obj_pl.bbox_top + 1;
                check_distance_x = -20;
                break;
            case 90:
                pl_x = obj_pl.x;
                pl_y = obj_pl.bbox_top;
                check_distance_y = -20;
                break;
            case 270:
                pl_x = obj_pl.x;
                pl_y = obj_pl.bbox_bottom;
                check_distance_y = 20;
                break;
        }
        if (collision_line_first(pl_x, pl_y, pl_x + check_distance_x, pl_y + check_distance_y, id, false, false))
            return true;
    }
}
() && scene == 0)

{

    scr_cutscene_start
scr_cutscene_start

function scr_cutscene_start()
{
    global.cutscene = true;
    obj_pl.state = scr_frozen_state;
    obj_pl.image_index = 0;
    obj_pl.image_speed = 0;
}
();

    image_index = 0;

    image_speed = 0.2;

    audio_play_sound(bell_sound, 1, 0);

    scene++;

}

switch (scene)

{

    case 1:

    case 2:

        if (on_animation_end())

        {

            image_index = 0;

            scene++;

        }

        break;

    case 3:

        image_speed = 0;

        image_index = 0;

        if (mail_station_blocked)

        {

            scr_text
scr_text

function scr_text()
{
    if (!instance_exists(obj_dialogue))
        msg = instance_create(x, y, obj_dialogue);
}
();

            with (msg)

                message[0] = "* But nobody came.";

            if (!global.dialogue_open)

            {

                scene = 0;

                scr_cutscene_end
scr_cutscene_end

function scr_cutscene_end()
{
    global.cutscene = false;
    obj_pl.alarm[0] = 1;
}
();

            }

            exit;

        }

        var x_distance = 64;

        while (!place_free(obj_pl.x + x_distance, obj_pl.y))

            x_distance -= 1;

        instance_create(obj_pl.x + x_distance, camera_get_view_y(view_camera[0]) - 40, obj_mail_whale);

        scene = 0;

}