Undertale Yellow script viewer

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;
    }
}
())

{

    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;
}
();

    object_is_active = true;

    audio_sound_gain(obj_radio.current_song, 0, 300);

    audio_play_sound(snd_knock_beautiful, 1, 0);

    timer = 60;

}

if (object_is_active == false)

    exit;

if (scr_timer
scr_timer

function scr_timer()
{
    if (timer > 0)
    {
        timer--;
        return false;
    }
    else
    {
        return true;
    }
}
())

{

    global.cutscene = false;

    audio_sound_gain(obj_radio.current_song, 1, 300);

    scr_text
scr_text

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

    with (msg)

        message[0] = "* Sorry! I'm not home!";

    object_is_active = false;

}