Deltarune (Chapter 5) script viewer

← back to main script listing
gml_Object_DEVICE_MENU_Step_0

(view raw script w/o annotations or w/e)
if (!input_enabled)
    exit;
if (MENU_NO == 1 || MENU_NO == 4 || MENU_NO == 6 || MENU_NO == 7 || MENU_NO == 11)
{
    if (left_p())
    {
        if (MENUCOORD[MENU_NO] == 1)
        {
            MENUCOORD[MENU_NO] = 0;
            MOVENOISE = 1;
        }
    }
    if (right_p())
    {
        if (MENUCOORD[MENU_NO] == 0)
        {
            MENUCOORD[MENU_NO] = 1;
            MOVENOISE = 1;
        }
    }
    if (button1_p() && ONEBUFFER < 0)
    {
        ONEBUFFER = 2;
        TWOBUFFER = 2;
        SELNOISE = 1;
        if (MENUCOORD[MENU_NO] == 0)
        {
            if (MENU_NO == 1 || MENU_NO == 11)
            {
                var FILECHECK = 0;
                var FILESLOT = 0;
                var DONAMING = 0;
                if (MENU_NO == 1)
                    FILESLOT = MENUCOORD[0];
                if (MENU_NO == 11)
                    FILESLOT = MENUCOORD[10];
                if (MENU_NO == 1 && FILE[MENUCOORD[0]] == 1)
                    FILECHECK = 1;
                if (MENU_NO == 11)
                {
                    if (INCOMPLETE_LOAD)
                    {
                        if (INCOMPLETEFILE_PREV[FILESLOT] == 1)
                            FILECHECK = 1;
                        else
                            FILECHECK = -1;
                    }
                    else if (COMPLETEFILE_PREV[FILESLOT] == 1)
                    {
                        FILECHECK = 1;
                    }
                    else
                    {
                        FILECHECK = -1;
                    }
                }
                if (FILECHECK)
                {
                    global.filechoice = FILESLOT;
                    snd_free_all();
                    f = instance_create(0, 0, obj_persistentfadein);
                    f.image_xscale = 1000;
                    f.image_yscale = 1000;
                    if (ossafe_file_exists("keyconfig_" + string(global.filechoice) + ".ini"))
                    {
                        ossafe_ini_open("keyconfig_" + string(global.filechoice) + ".ini");
                        for (i = 0; i < 10; i += 1)
                        {
                            readval = ini_read_real("KEYBOARD_CONTROLS", string(i), -1);
                            if (readval != -1)
                                global.input_k[i] = readval;
                        }
                        for (i = 0; i < 10; i += 1)
                        {
                            readval = ini_read_real("GAMEPAD_CONTROLS", string(i), -1);
                            if (readval != -1)
                                global.input_g[i] = readval;
                        }
                        if (!global.is_console)
                        {
                            ini_close();
                        }
                        else
                        {
                            readval = ini_read_real("SHOULDERLB_REASSIGN", "SHOULDERLB_REASSIGN", obj_gamecontroller.gamepad_shoulderlb_reassign);
                            if (readval != -1)
                                obj_gamecontroller.gamepad_shoulderlb_reassign = readval;
                            global.button0 = global.input_g[4];
                            global.button1 = global.input_g[5];
                            global.button2 = global.input_g[6];
                            global.screen_border_id = ini_read_string("BORDER", "TYPE", "Dynamic");
                            var _disable_border = global.screen_border_id == "None" || global.screen_border_id == "なし";
                            scr_enable_screen_borderscr_enable_screen_borderfunction scr_enable_screen_border(arg0)
{
    var flag = arg0;
    flag = flag != 0;
    if (flag != global.screen_border_active)
    {
        global.screen_border_active = flag != 0;
        global.screen_border_state = 0;
        global.screen_border_dynamic_fade_id = 0;
        global.screen_border_dynamic_fade_level = 0;
    }
}(!_disable_border);
                            ossafe_ini_close();
                            ossafe_savedata_save();
                        }
                    }
                    if (MENU_NO == 1)
                    {
                        if (os_type == os_ps5)
                        {
                            with (obj_event_manager)
                                trigger_event(UnknownEnum.Value_0, UnknownEnum.Value_0);
                        }
                        scr_loadscr_loadfunction scr_load()
{
    snd_free_all();
    filechoicebk = global.filechoice;
    scr_gamestart();
    global.filechoice = filechoicebk;
    file = "filech" + string(global.chapter) + "_" + string(global.filechoice);
    myfileid = ossafe_file_text_open_read(file);
    global.truename = ossafe_file_text_read_string(myfileid);
    ossafe_file_text_readln(myfileid);
    if (global.is_console)
    {
        var othername_list = scr_ds_list_read(myfileid);
        for (i = 0; i < ds_list_size(othername_list); i += 1)
            global.othername[i] = ds_list_find_value(othername_list, i);
        ds_list_destroy(othername_list);
        ossafe_file_text_readln(myfileid);
    }
    else
    {
        for (i = 0; i < 6; i += 1)
        {
            global.othername[i] = ossafe_file_text_read_string(myfileid);
            ossafe_file_text_readln(myfileid);
        }
    }
    global.char[0] = ossafe_file_text_read_real(myfileid);
    ossafe_file_text_readln(myfileid);
    global.char[1] = ossafe_file_text_read_real(myfileid);
    ossafe_file_text_readln(myfileid);
    global.char[2] = ossafe_file_text_read_real(myfileid);
    ossafe_file_text_readln(myfileid);
    global.gold = ossafe_file_text_read_real(myfileid);
    ossafe_file_text_readln(myfileid);
    global.xp = ossafe_file_text_read_real(myfileid);
    ossafe_file_text_readln(myfileid);
    global.lv = ossafe_file_text_read_real(myfileid);
    ossafe_file_text_readln(myfileid);
    global.inv = ossafe_file_text_read_real(myfileid);
    ossafe_file_text_readln(myfileid);
    global.invc = ossafe_file_text_read_real(myfileid);
    ossafe_file_text_readln(myfileid);
    global.darkzone = ossafe_file_text_read_real(myfileid);
    ossafe_file_text_readln(myfileid);
    if (global.is_console)
    {
        var hp_list = scr_ds_list_read(myfileid);
        for (i = 0; i < ds_list_size(hp_list); i += 1)
            global.hp[i] = ds_list_find_value(hp_list, i);
        ds_list_destroy(hp_list);
        ossafe_file_text_readln(myfileid);
        var maxhp_list = scr_ds_list_read(myfileid);
        for (i = 0; i < ds_list_size(maxhp_list); i += 1)
            global.maxhp[i] = ds_list_find_value(maxhp_list, i);
        ds_list_destroy(maxhp_list);
        ossafe_file_text_readln(myfileid);
        var at_list = scr_ds_list_read(myfileid);
        for (i = 0; i < ds_list_size(at_list); i += 1)
            global.at[i] = ds_list_find_value(at_list, i);
        ds_list_destroy(at_list);
        ossafe_file_text_readln(myfileid);
        var df_list = scr_ds_list_read(myfileid);
        for (i = 0; i < ds_list_size(df_list); i += 1)
            global.df[i] = ds_list_find_value(df_list, i);
        ds_list_destroy(df_list);
        ossafe_file_text_readln(myfileid);
        var mag_list = scr_ds_list_read(myfileid);
        for (i = 0; i < ds_list_size(mag_list); i += 1)
            global.mag[i] = ds_list_find_value(mag_list, i);
        ds_list_destroy(mag_list);
        ossafe_file_text_readln(myfileid);
        var guts_list = scr_ds_list_read(myfileid);
        for (i = 0; i < ds_list_size(guts_list); i += 1)
            global.guts[i] = ds_list_find_value(guts_list, i);
        ds_list_destroy(guts_list);
        ossafe_file_text_readln(myfileid);
        var charweapon_list = scr_ds_list_read(myfileid);
        for (i = 0; i < ds_list_size(charweapon_list); i += 1)
            global.charweapon[i] = ds_list_find_value(charweapon_list, i);
        ds_list_destroy(charweapon_list);
        ossafe_file_text_readln(myfileid);
        var chararmor1_list = scr_ds_list_read(myfileid);
        for (i = 0; i < ds_list_size(chararmor1_list); i += 1)
            global.chararmor1[i] = ds_list_find_value(chararmor1_list, i);
        ds_list_destroy(chararmor1_list);
        ossafe_file_text_readln(myfileid);
        var chararmor2_list = scr_ds_list_read(myfileid);
        for (i = 0; i < ds_list_size(chararmor2_list); i += 1)
            global.chararmor2[i] = ds_list_find_value(chararmor2_list, i);
        ds_list_destroy(chararmor2_list);
        ossafe_file_text_readln(myfileid);
        var weaponstyle_list = scr_ds_list_read(myfileid);
        for (i = 0; i < ds_list_size(weaponstyle_list); i += 1)
            global.weaponstyle[i] = ds_list_find_value(weaponstyle_list, i);
        ds_list_destroy(weaponstyle_list);
        ossafe_file_text_readln(myfileid);
    }
    for (i = 0; i < 5; i += 1)
    {
        if (!global.is_console)
        {
...();
                        exit;
                    }
                    if (MENU_NO == 11)
                    {
                        if (INCOMPLETE_LOAD == 0)
                        {
                            global.filechoice += 3;
                            scr_load_prev_chapter_filescr_load_prev_chapter_filefunction scr_load_prev_chapter_file(arg0 = 0)
{
    var _chapter = arg0;
    switch (_chapter)
    {
        case 1:
            scr_load_chapter1();
            break;
        case 2:
            scr_load_chapter2();
            break;
        case 3:
            scr_load_chapter3();
            break;
        case 4:
            scr_load_chapter4();
            break;
        default:
            break;
    }
}(global.chapter - 1);
                            global.filechoice -= 3;
                        }
                        else
                        {
                            scr_load_prev_chapter_filescr_load_prev_chapter_filefunction scr_load_prev_chapter_file(arg0 = 0)
{
    var _chapter = arg0;
    switch (_chapter)
    {
        case 1:
            scr_load_chapter1();
            break;
        case 2:
            scr_load_chapter2();
            break;
        case 3:
            scr_load_chapter3();
            break;
        case 4:
            scr_load_chapter4();
            break;
        default:
            break;
    }
}(global.chapter - 1);
                        }
                        if (os_type == os_ps5)
                        {
                            with (obj_event_manager)
                                trigger_event(UnknownEnum.Value_0, UnknownEnum.Value_0);
                        }
                        if (global.flag[914 chapter_started] == 0)
                            global.flag[914 chapter_started] = global.chapter - 1;
                        FILECHECK = -2;
                        STARTGAME = 1;
                    }
                }
                if (FILECHECK == 0)
                {
                    if (os_type == os_ps5)
                    {
                        with (obj_event_manager)
                            trigger_event(UnknownEnum.Value_0, UnknownEnum.Value_0);
                    }
                    global.filechoice = FILESLOT;
                    var namer = instance_create(0, 0, DEVICE_NAMER);
                    namer.REMMENU = MENU_NO;
                    REMMENU = MENU_NO;
                    MENU_NO = -1;
                }
                if (FILECHECK == -1)
                    snd_play(snd_error);
            }
            if (MENU_NO == 4)
            {
                var temp_comment_is_interesting = false;
                if (TYPE == 0)
                {
                    TEMPCOMMENT = stringsetloc(IT CONFORMED TO THE REFLECTION."IT CONFORMED TO THE REFLECTION.", "DEVICE_MENU_slash_Step_0_gml_74_0");
                    if (NAME[0] == NAME[1] && NAME[1] == NAME[2])
                    {
                        if (TIME[0] == TIME[1] && TIME[1] == TIME[2])
                        {
                            if (PLACE[0] == PLACE[1] && PLACE[1] == PLACE[2])
                            {
                                temp_comment_is_interesting = true;
                                TEMPCOMMENT = stringsetloc(WHAT AN INTERESTING BEHAVIOR."WHAT AN INTERESTING BEHAVIOR.", "DEVICE_MENU_slash_Step_0_gml_77_0");
                            }
                        }
                    }
                }
                event_user(5);
                if (TYPE == 0)
                {
                    if (NAME[0] == NAME[1] && NAME[1] == NAME[2])
                    {
                        if (TIME[0] == TIME[1] && TIME[1] == TIME[2])
                        {
                            if (PLACE[0] == PLACE[1] && PLACE[1] == PLACE[2] && !temp_comment_is_interesting)
                                TEMPCOMMENT = stringsetloc(PREPARATIONS ARE COMPLETE."PREPARATIONS ARE COMPLETE.", "DEVICE_MENU_slash_Step_0_gml_86_0");
                        }
                    }
                }
                if (TYPE == 1)
                    TEMPCOMMENT = stringsetloc(Copy complete."Copy complete.", "DEVICE_MENU_slash_Step_0_gml_91_0");
                MESSAGETIMER = 90;
                SELNOISE = 0;
                DEATHNOISE = 1;
                MENU_NO = 0;
            }
            if (MENU_NO == 7)
            {
                FILE[MENUCOORD[5]] = 0;
                NAME[MENUCOORD[5]] = stringsetloc([EMPTY]"[EMPTY]", "DEVICE_MENU_slash_Step_0_gml_105_0");
                TIME[MENUCOORD[5]] = 0;
                PLACE[MENUCOORD[5]] = "------------";
                LEVEL[MENUCOORD[5]] = 0;
                TIME_STRING[MENUCOORD[5]] = "--:--";
                ossafe_file_delete("filech" + string(global.chapter) + "_" + string(MENUCOORD[5]));
                iniwrite = ossafe_ini_open("dr.ini");
                ini_write_string(scr_ini_chapterscr_ini_chapterfunction scr_ini_chapter(arg0, arg1)
{
    if (arg0 >= 2)
        return "G_" + string(arg0) + "_" + string(arg1);
    else
        return "G" + string(arg1);
}(global.chapter, MENUCOORD[5]), "Name", "[EMPTY]");
                ini_write_real(scr_ini_chapterscr_ini_chapterfunction scr_ini_chapter(arg0, arg1)
{
    if (arg0 >= 2)
        return "G_" + string(arg0) + "_" + string(arg1);
    else
        return "G" + string(arg1);
}(global.chapter, MENUCOORD[5]), "Level", 0);
                ini_write_real(scr_ini_chapterscr_ini_chapterfunction scr_ini_chapter(arg0, arg1)
{
    if (arg0 >= 2)
        return "G_" + string(arg0) + "_" + string(arg1);
    else
        return "G" + string(arg1);
}(global.chapter, MENUCOORD[5]), "Love", 0);
                ini_write_real(scr_ini_chapterscr_ini_chapterfunction scr_ini_chapter(arg0, arg1)
{
    if (arg0 >= 2)
        return "G_" + string(arg0) + "_" + string(arg1);
    else
        return "G" + string(arg1);
}(global.chapter, MENUCOORD[5]), "Time", 0);
                ini_write_real(scr_ini_chapterscr_ini_chapterfunction scr_ini_chapter(arg0, arg1)
{
    if (arg0 >= 2)
        return "G_" + string(arg0) + "_" + string(arg1);
    else
        return "G" + string(arg1);
}(global.chapter, MENUCOORD[5]), "Room", 0);
                ini_write_real(scr_ini_chapterscr_ini_chapterfunction scr_ini_chapter(arg0, arg1)
{
    if (arg0 >= 2)
        return "G_" + string(arg0) + "_" + string(arg1);
    else
        return "G" + string(arg1);
}(global.chapter, MENUCOORD[5]), "Date", 0);
                ini_write_real(scr_ini_chapterscr_ini_chapterfunction scr_ini_chapter(arg0, arg1)
{
    if (arg0 >= 2)
        return "G_" + string(arg0) + "_" + string(arg1);
    else
        return "G" + string(arg1);
}(global.chapter, MENUCOORD[5]), "UraBoss", 0);
                ini_write_real(scr_ini_chapterscr_ini_chapterfunction scr_ini_chapter(arg0, arg1)
{
    if (arg0 >= 2)
        return "G_" + string(arg0) + "_" + string(arg1);
    else
        return "G" + string(arg1);
}(global.chapter, MENUCOORD[5]), "SideB", 0);
                ini_write_string(scr_ini_chapterscr_ini_chapterfunction scr_ini_chapter(arg0, arg1)
{
    if (arg0 >= 2)
        return "G_" + string(arg0) + "_" + string(arg1);
    else
        return "G" + string(arg1);
}(global.chapter, MENUCOORD[5]), "Version", "0");
                ossafe_ini_close();
                ossafe_savedata_save();
                if (ossafe_file_exists("keyconfig_" + string(MENUCOORD[5]) + ".ini"))
                    ossafe_file_delete("keyconfig_" + string(MENUCOORD[5]) + ".ini");
                TEMPCOMMENT = stringsetloc(IT WAS AS IF IT WAS NEVER THERE AT ALL."IT WAS AS IF IT WAS NEVER THERE AT ALL.", "DEVICE_MENU_slash_Step_0_gml_126_0");
                if (TYPE == 1)
                    TEMPCOMMENT = stringsetloc(Erase complete."Erase complete.", "DEVICE_MENU_slash_Step_0_gml_127_0");
                MESSAGETIMER = 90;
                SELNOISE = 0;
                DEATHNOISE = 1;
                MENU_NO = 0;
            }
            if (MENU_NO == 6)
            {
                THREAT += 1;
                MENU_NO = 7;
                MENUCOORD[7] = 0;
            }
        }
        if (MENU_NO >= 0)
        {
            if (MENUCOORD[MENU_NO] == 1)
            {
                if (MENU_NO == 4 && TYPE == 0)
                {
                    TEMPCOMMENT = stringsetloc(IT RETAINED ITS ORIGINAL SHAPE."IT RETAINED ITS ORIGINAL SHAPE.", "DEVICE_MENU_slash_Step_0_gml_149_0");
                    MESSAGETIMER = 90;
                }
                if (MENU_NO == 6 || MENU_NO == 7)
                {
                    if (TYPE == 0)
                    {
                        TEMPCOMMENT = stringsetloc(THEN IT WAS SPARED."THEN IT WAS SPARED.", "DEVICE_MENU_slash_Step_0_gml_156_0");
                        if (THREAT >= 10)
                        {
                            TEMPCOMMENT = stringsetloc(VERY INTERESTING."VERY INTERESTING.", "DEVICE_MENU_slash_Step_0_gml_159_0");
                            THREAT = 0;
                        }
                        MESSAGETIMER = 90;
                    }
                }
                if (MENU_NO == 11)
                    MENU_NO = 10;
                else
                    MENU_NO = 0;
            }
        }
    }
    if (button2_p() && TWOBUFFER < 0)
    {
        ONEBUFFER = 1;
        TWOBUFFER = 1;
        if (MENU_NO != 0)
            BACKNOISE = 1;
        if (MENU_NO == 1)
            MENU_NO = 0;
        else if (MENU_NO == 4)
            MENU_NO = 2;
        else if (MENU_NO == 6)
            MENU_NO = 5;
        else if (MENU_NO == 7)
            MENU_NO = 5;
        else if (MENU_NO == 11)
            MENU_NO = 10;
    }
}
if (MENU_NO == 2 || MENU_NO == 3 || MENU_NO == 5)
{
    if (down_p())
    {
        if (MENUCOORD[MENU_NO] < 3)
        {
            MENUCOORD[MENU_NO] += 1;
            MOVENOISE = 1;
        }
    }
    if (up_p())
    {
        if (MENUCOORD[MENU_NO] > 0)
        {
            MENUCOORD[MENU_NO] -= 1;
            MOVENOISE = 1;
        }
    }
    if (button1_p() && ONEBUFFER < 0)
    {
        if (MENUCOORD[MENU_NO] < 3)
        {
            if (MENU_NO == 3)
            {
                if (MENUCOORD[2] != MENUCOORD[3])
                {
                    if (FILE[MENUCOORD[MENU_NO]] == 1)
                    {
                        TWOBUFFER = 2;
                        ONEBUFFER = 2;
                        SELNOISE = 1;
                        MENUCOORD[4] = 0;
                        MENU_NO = 4;
                    }
                    else
                    {
                        TEMPCOMMENT = stringsetloc(THE DIVISION IS COMPLETE."THE DIVISION IS COMPLETE.", "DEVICE_MENU_slash_Step_0_gml_225_0");
                        MESSAGETIMER = 90;
                        if (TYPE == 1)
                            TEMPCOMMENT = stringsetloc(Copy complete."Copy complete.", "DEVICE_MENU_slash_Step_0_gml_227_0");
                        DEATHNOISE = 1;
                        MENU_NO = 0;
                        ONEBUFFER = 2;
                        TWOBUFFER = 2;
                        event_user(5);
                    }
                }
                else
                {
                    TEMPCOMMENT = stringsetloc(IT IS IMMUNE TO ITS OWN IMAGE."IT IS IMMUNE TO ITS OWN IMAGE.", "DEVICE_MENU_slash_Step_0_gml_238_0");
                    if (TYPE == 1)
                        TEMPCOMMENT = stringsetloc(You can't copy there."You can't copy there.", "DEVICE_MENU_slash_Step_0_gml_239_0");
                    MESSAGETIMER = 90;
                    TWOBUFFER = 2;
                    ONEBUFFER = 2;
                    BACKNOISE = 1;
                }
            }
            if (MENU_NO == 2)
            {
                if (FILE[MENUCOORD[MENU_NO]] == 1)
                {
                    TWOBUFFER = 2;
                    ONEBUFFER = 2;
                    SELNOISE = 1;
                    MENUCOORD[3] = 0;
                    MENU_NO = 3;
                }
                else
                {
                    TEMPCOMMENT = stringsetloc(IT IS BARREN AND CANNOT BE COPIED."IT IS BARREN AND CANNOT BE COPIED.", "DEVICE_MENU_slash_Step_0_gml_261_0");
                    if (FILE[0] == 0 && FILE[1] == 0 && FILE[2] == 0)
                        TEMPCOMMENT = stringsetloc(BUT THERE WAS NOTHING LEFT TO COPY."BUT THERE WAS NOTHING LEFT TO COPY.", "DEVICE_MENU_slash_Step_0_gml_264_0");
                    if (TYPE == 1)
                        TEMPCOMMENT = stringsetloc(It can't be copied."It can't be copied.", "DEVICE_MENU_slash_Step_0_gml_266_0");
                    MESSAGETIMER = 90;
                    BACKNOISE = 1;
                    TWOBUFFER = 2;
                    ONEBUFFER = 2;
                }
            }
            if (MENU_NO == 5)
            {
                if (FILE[MENUCOORD[MENU_NO]] == 1)
                {
                    TWOBUFFER = 2;
                    ONEBUFFER = 2;
                    SELNOISE = 1;
                    MENUCOORD[6] = 0;
                    MENU_NO = 6;
                }
                else
                {
                    TEMPCOMMENT = stringsetloc(BUT IT WAS ALREADY GONE."BUT IT WAS ALREADY GONE.", "DEVICE_MENU_slash_Step_0_gml_289_0");
                    if (FILE[0] == 0 && FILE[1] == 0 && FILE[2] == 0)
                        TEMPCOMMENT = stringsetloc(BUT THERE WAS NOTHING LEFT TO ERASE."BUT THERE WAS NOTHING LEFT TO ERASE.", "DEVICE_MENU_slash_Step_0_gml_292_0");
                    if (TYPE == 1)
                        TEMPCOMMENT = stringsetloc(There's nothing to erase."There's nothing to erase.", "DEVICE_MENU_slash_Step_0_gml_294_0");
                    MESSAGETIMER = 90;
                    TWOBUFFER = 2;
                    ONEBUFFER = 2;
                    BACKNOISE = 1;
                }
            }
        }
        if (MENUCOORD[MENU_NO] == 3)
        {
            TWOBUFFER = 2;
            ONEBUFFER = 2;
            SELNOISE = 1;
            MENU_NO = 0;
        }
    }
    if (button2_p() && TWOBUFFER < 0)
    {
        TWOBUFFER = 2;
        ONEBUFFER = 2;
        BACKNOISE = 1;
        if (MENU_NO == 2 || MENU_NO == 5)
            MENU_NO = 0;
        if (MENU_NO == 3)
            MENU_NO = 2;
    }
}
if (MENU_NO == 10)
{
    var M = MENU_NO;
    var MAXY = 3;
    if (down_p())
    {
        if (MENUCOORD[MENU_NO] < 3)
        {
            MENUCOORD[MENU_NO] += 1;
            MOVENOISE = 1;
        }
    }
    if (up_p())
    {
        if (MENUCOORD[MENU_NO] > 0)
        {
            MENUCOORD[MENU_NO] -= 1;
            MOVENOISE = 1;
        }
    }
    if (button1_p() && ONEBUFFER < 0)
    {
        MESSAGETIMER = -1;
        if (MENUCOORD[M] <= 2)
        {
            var FILECHECK = 1;
            if (INCOMPLETE_LOAD == 0 && COMPLETEFILE_PREV[MENUCOORD[M]] != 1)
                FILECHECK = 0;
            if (INCOMPLETE_LOAD == 1 && INCOMPLETEFILE_PREV[MENUCOORD[M]] != 1)
                FILECHECK = 0;
            if (FILECHECK)
            {
                MENUCOORD[M + 1] = 0;
                ONEBUFFER = 1;
                TWOBUFFER = 1;
                MENU_NO = M + 1;
                SELNOISE = 1;
            }
            else
            {
                ONEBUFFER = 4;
                snd_play(snd_error);
            }
        }
        if (MENUCOORD[MENU_NO] == 3)
        {
            TWOBUFFER = 2;
            ONEBUFFER = 2;
            SELNOISE = 1;
            MENU_NO = 0;
        }
    }
    if (button2_p() && TWOBUFFER < 0)
    {
        TWOBUFFER = 2;
        ONEBUFFER = 2;
        BACKNOISE = 1;
        MENU_NO = 0;
    }
}
if (MENU_NO == 0)
{
    var M = MENU_NO;
    var MAXY = 8;
    if (M == 10)
        MAXY = 3;
    if (down_p())
    {
        if (MENUCOORD[M] < MAXY)
        {
            if (MENUCOORD[M] < 3)
                MENUCOORD[M] += 1;
            else if (MENUCOORD[M] == 3)
                MENUCOORD[M] = 5;
            else if (MENUCOORD[M] == 4)
                MENUCOORD[M] = 6;
            else if (MENUCOORD[M] == 7 && CANQUIT == 1)
                MENUCOORD[M] = 8;
            MOVENOISE = 1;
        }
    }
    if (up_p())
    {
        if (MENUCOORD[M] > 0)
        {
            if (MENUCOORD[M] < 3)
                MENUCOORD[M] -= 1;
            else if (MENUCOORD[M] == 3 || MENUCOORD[M] == 4 || MENUCOORD[M] == 7)
                MENUCOORD[M] = 2;
            else if (MENUCOORD[M] == 5 || MENUCOORD[M] == 6)
                MENUCOORD[M] -= 2;
            else if (MENUCOORD[M] == 8)
                MENUCOORD[M] = 7;
            MOVENOISE = 1;
        }
    }
    if (right_p())
    {
        if (MENUCOORD[M] >= 3 && MENUCOORD[M] < 7)
        {
            MOVENOISE = 1;
            if (MENUCOORD[M] == 4)
                MENUCOORD[M] = 7;
            else if (MENUCOORD[M] == 6 && CANQUIT == 1)
                MENUCOORD[M] = 8;
            else
                MENUCOORD[M]++;
        }
    }
    if (left_p())
    {
        if (MENUCOORD[M] >= 4 && MENUCOORD[M] != 5)
        {
            if (MENUCOORD[M] == 7)
                MENUCOORD[M] = 4;
            else if (MENUCOORD[M] == 8)
                MENUCOORD[M] = 6;
            else
                MENUCOORD[M]--;
            MOVENOISE = 1;
        }
    }
    if (button1_p() && ONEBUFFER < 0)
    {
        MESSAGETIMER = -1;
        if (MENUCOORD[M] <= 2)
        {
            var FILECHECK = 1;
            if (MENU_NO == 10)
            {
                if (INCOMPLETE_LOAD == 0 && COMPLETEFILE_PREV[MENUCOORD[M]] != 1)
                    FILECHECK = 0;
                if (INCOMPLETE_LOAD == 1 && INCOMPLETEFILE_PREV[MENUCOORD[M]] != 1)
                    FILECHECK = 0;
            }
            if (FILECHECK)
            {
                MENUCOORD[M + 1] = 0;
                ONEBUFFER = 1;
                TWOBUFFER = 1;
                MENU_NO = M + 1;
                SELNOISE = 1;
            }
            else
            {
                ONEBUFFER = 4;
                snd_play(snd_error);
            }
        }
        if (MENUCOORD[M] == 3)
        {
            if (M == 0)
            {
                MENUCOORD[2] = 0;
                ONEBUFFER = 1;
                TWOBUFFER = 1;
                MENU_NO = 2;
                SELNOISE = 1;
            }
            else
            {
                MENUCOORD[0] = 5;
                ONEBUFFER = 1;
                TWOBUFFER = 1;
                MENU_NO = 0;
                SELNOISE = 1;
            }
        }
        if (MENUCOORD[M] == 4)
        {
            MENUCOORD[5] = 0;
            ONEBUFFER = 1;
            TWOBUFFER = 1;
            MENU_NO = 5;
            SELNOISE = 1;
        }
        if (MENUCOORD[M] == 5)
        {
            MENUCOORD[10] = 0;
            ONEBUFFER = 1;
            TWOBUFFER = 1;
            MENU_NO = 10;
            SELNOISE = 1;
        }
        if (MENUCOORD[M] == 6)
        {
            SELNOISE = 1;
            scr_change_languagescr_change_languagefunction scr_change_language()
{
    if (global.lang == "en")
        global.lang = "ja";
    else
        global.lang = "en";
    ossafe_ini_open("true_config.ini");
    ini_write_string("LANG", "LANG", global.lang);
    ossafe_ini_close();
    ossafe_savedata_save();
    scr_84_init_localization();
}();
            scr_84_load_iniscr_84_load_inifunction scr_84_load_ini()
{
    var CH = string(global.chapter);
    for (i = 0; i < 3; i += 1)
        FILE[i] = 0;
    for (i = 0; i < 3; i += 1)
    {
        FILE[i] = 0;
        NAME[i] = stringsetloc([EMPTY]"[EMPTY]", "scr_84_load_ini_slash_scr_84_load_ini_gml_13_0");
        TIME[i] = 0;
        PLACE[i] = "------------";
        LEVEL[i] = 0;
        TIME_STRING[i] = "--:--";
        INITLANG[i] = 0;
    }
    if (ossafe_file_exists("filech" + CH + "_0"))
    {
        FILE[0] = 1;
        NAME[0] = "FILE0";
    }
    if (ossafe_file_exists("filech" + CH + "_1"))
    {
        FILE[1] = 1;
        NAME[1] = "FILE1";
    }
    if (ossafe_file_exists("filech" + CH + "_2"))
    {
        FILE[2] = 1;
        NAME[2] = "FILE2";
    }
    if (ossafe_file_exists("dr.ini"))
    {
        ossafe_ini_open("dr.ini");
        for (i = 0; i < 3; i += 1)
        {
            if (FILE[i] == 1)
            {
                var room_id = ini_read_real(scr_ini_chapter(global.chapter, i), "Room", scr_get_id_by_room_index(room));
                var room_index = scr_get_room_by_id(room_id);
                PLACE[i] = scr_roomname(room_index);
                TIME[i] = ini_read_real(scr_ini_chapter(global.chapter, i), "Time", 0);
                NAME[i] = ini_read_string(scr_ini_chapter(global.chapter, i), "Name", "------");
                LEVEL[i] = 1;
                INITLANG[i] = ini_read_real(scr_ini_chapter(global.chapter, i), "InitLang", 0);
                TIME_SECONDS_TOTAL[i] = floor(TIME[i] / 30);
                TIME_MINUTES[i] = floor(TIME_SECONDS_TOTAL[i] / 60);
                TIME_SECONDS[i] = TIME_SECONDS_TOTAL[i] - (TIME_MINUTES[i] * 60);
                TIME_SECONDS_STRING[i] = string(TIME_SECONDS[i]);
                if (TIME_SECONDS[i] == 0)
                    TIME_SECONDS_STRING[i] = "00";
                if (TIME_SECONDS[i] < 10 && TIME_SECONDS[i] >= 1)
                    TIME_SECONDS_STRING[i] = "0" + string(TIME_SECONDS[i]);
                TIME_STRING[i] = scr_timedisp(TIME[i]);
            }
        }
        ossafe_ini_close();
        ossafe_savedata_save();
    }
}();
        }
        if (MENUCOORD[M] == 7)
        {
            input_enabled = false;
            SELNOISE = 1;
            snd_free_all();
            alarm[0] = 30;gml_Object_DEVICE_MENU_Alarm_0.gmlvar _target_chapter = 0;
if (global.is_console)
{
    var _loading = instance_create(0, 0, obj_screen_loading);
    _loading.show_loading_screen(_target_chapter, scr_chapterswitch);
    _loading.depth = -1000;
}
else
{
    scr_chapterswitch(_target_chapter);
}
        }
        if (MENUCOORD[M] == 8 && CANQUIT)
        {
            SELNOISE = 1;
            ossafe_game_end();
        }
    }
    if (button2_p() && TWOBUFFER < 0)
    {
        ONEBUFFER = 1;
        TWOBUFFER = 1;
        BACKNOISE = 1;
        if (MENU_NO == 10)
            MENU_NO = 0;
    }
}
if (OBMADE == 1)
{
    OB_DEPTH += 1;
    obacktimer += OBM;
    if (obacktimer >= 20)
    {
        DV = instance_create(0, 0, DEVICE_OBACK_4);
        DV.depth = 5 + OB_DEPTH;
        DV.OBSPEED = 0.01 * OBM;
        if (OB_DEPTH >= 60000)
            OB_DEPTH = 0;
        obacktimer = 0;
    }
}
if (MOVENOISE == 1)
{
    snd_play(snd_menumove);
    MOVENOISE = 0;
}
if (SELNOISE == 1)
{
    snd_play(snd_select);
    SELNOISE = 0;
}
if (BACKNOISE == 1)
{
    snd_play(snd_swing);
    BACKNOISE = 0;
}
if (DEATHNOISE == 1)
{
    snd_play(AUDIO_APPEARANCE);
    DEATHNOISE = 0;
}
ONEBUFFER -= 1;
TWOBUFFER -= 1;
if (STARTGAME == 1)
{
    snd_free_all();
    room_goto(room_krisroom );
}

enum UnknownEnum
{
    Value_0
}
1	`if (!input_enabled)`
2	`exit;`
3	`if (MENU_NO == 1 \|\| MENU_NO == 4 \|\| MENU_NO == 6 \|\| MENU_NO == 7 \|\| MENU_NO == 11)`
4	`{`
5	`if (left_p())`
6	`{`
7	`if (MENUCOORD[MENU_NO] == 1)`
8	`{`
9	`MENUCOORD[MENU_NO] = 0;`
10	`MOVENOISE = 1;`
11	`}`
12	`}`
13	`if (right_p())`
14	`{`
15	`if (MENUCOORD[MENU_NO] == 0)`
16	`{`
17	`MENUCOORD[MENU_NO] = 1;`
18	`MOVENOISE = 1;`
19	`}`
20	`}`
21	`if (button1_p() && ONEBUFFER < 0)`
22	`{`
23	`ONEBUFFER = 2;`
24	`TWOBUFFER = 2;`
25	`SELNOISE = 1;`
26	`if (MENUCOORD[MENU_NO] == 0)`
27	`{`
28	`if (MENU_NO == 1 \|\| MENU_NO == 11)`
29	`{`
30	`var FILECHECK = 0;`
31	`var FILESLOT = 0;`
32	`var DONAMING = 0;`
33	`if (MENU_NO == 1)`
34	`FILESLOT = MENUCOORD[0];`
35	`if (MENU_NO == 11)`
36	`FILESLOT = MENUCOORD[10];`
37	`if (MENU_NO == 1 && FILE[MENUCOORD[0]] == 1)`
38	`FILECHECK = 1;`
39	`if (MENU_NO == 11)`
40	`{`