Undertale Yellow script viewer

if (global.cutscene == false && 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;
    }
}
() && keyboard_multicheck_pressed(0) && !instance_exists(obj_transition))

{

    if (global.geno_complete[4])

        scr_summon_shop
scr_summon_shop

function scr_summon_shop(arg0)
{
    global.current_room_overworld = room_get_name(room);
    switch (arg0)
    {
        case "Wild East Gunshop":
            global.sound_carry_overworld = false;
            if (global.dunes_flag[20] == 9 && (global.dunes_flag[24] == 0 || global.dunes_flag[24] == 2))
                global.sound_carry_overworld = true;
            break;
        default:
            global.sound_carry_overworld = true;
            break;
    }
    global.shop_name = arg0;
    instance_create(__view_get(e__VW.XView, 0), __view_get(e__VW.YView, 0), obj_overworld_shop_fade_out_screen);
    scr_cutscene_start();
}

enum e__VW
{
    XView,
    YView,
    WView,
    HView,
    Angle,
    HBorder,
    VBorder,
    HSpeed,
    VSpeed,
    Object,
    Visible,
    XPort,
    YPort,
    WPort,
    HPort,
    Camera,
    SurfaceID
}
("Hotel Shop Geno");

    else

        scr_summon_shop
scr_summon_shop

function scr_summon_shop(arg0)
{
    global.current_room_overworld = room_get_name(room);
    switch (arg0)
    {
        case "Wild East Gunshop":
            global.sound_carry_overworld = false;
            if (global.dunes_flag[20] == 9 && (global.dunes_flag[24] == 0 || global.dunes_flag[24] == 2))
                global.sound_carry_overworld = true;
            break;
        default:
            global.sound_carry_overworld = true;
            break;
    }
    global.shop_name = arg0;
    instance_create(__view_get(e__VW.XView, 0), __view_get(e__VW.YView, 0), obj_overworld_shop_fade_out_screen);
    scr_cutscene_start();
}

enum e__VW
{
    XView,
    YView,
    WView,
    HView,
    Angle,
    HBorder,
    VBorder,
    HSpeed,
    VSpeed,
    Object,
    Visible,
    XPort,
    YPort,
    WPort,
    HPort,
    Camera,
    SurfaceID
}
("Hotel Shop");

}