Deltarune (Chapter Select) script viewer

global.debug = 0;

global.is_console = scr_is_switch_os() || os_type == os_ps4 || os_type == os_ps5;

if (!variable_global_exists("bgm") || !audio_exists(global.bgm))

    global.bgm = -4;

scr_init
scr_init

function 
scr_init()
{
}

function create_choice(arg0, arg1) constructor
{
    choice_text = arg0;
    choice_value = arg1;
}

function get_chapter_confirm_sound(arg0)
{
    switch (arg0)
    {
        case UnknownEnum.Value_1:
            return 2;
            break;
        case UnknownEnum.Value_2:
            return 1;
            break;
        case UnknownEnum.Value_3:
            return 3;
            break;
        case UnknownEnum.Value_4:
            return 5;
            break;
        case UnknownEnum.Value_5:
            return 0;
            break;
        default:
            return 4;
            break;
    }
}

function get_chapter_title(arg0)
{
    switch (arg0)
    {
        case UnknownEnum.Value_1:
            return (global.lang == "en") ? "The Beginning" : "はじまり";
            break;
        case UnknownEnum.Value_2:
            return (global.lang == "en") ? "A Cyber's World" : "サイバーワールド";
            break;
        case UnknownEnum.Value_3:
            return (global.lang == "en") ? "Late Night" : "レイトナイト";
            break;
        case UnknownEnum.Value_4:
            return (global.lang == "en") ? "Prophecy" : "予言";
            break;
        case UnknownEnum.Value_5:
            return (global.lang == "en") ? "Festival Day" : "お祭り";
            break;
        default:
            return "- -";
            break;
    }
}

function get_version()
{
    var version = "v23";
    return version;
}

function get_chapter_icon_index(arg0)
{
    switch (arg0)
    {
        case UnknownEnum.Value_1:
            return UnknownEnum.Value_1;
            break;
        case UnknownEnum.Value_2:
            return UnknownEnum.Value_2;
            break;
        case UnknownEnum.Value_3:
            return scr_completed_chapter_any_slot(arg0) ? UnknownEnum.Value_4 : UnknownEnum.Value_3;
            break;
        case UnknownEnum.Value_4:
            return UnknownEnum.Value_5;
            break;
        case UnknownEnum.Value_5:
            return UnknownEnum.Value_6;
            break;
        default:
            return UnknownEnum.Value_0;
            break;
    }
}

function get_title()
{
    var title = "DELTARUNE";
    return title;
}

enum UnknownEnum
{
    Value_0,
    Value_1,
...
();

_current_state = UnknownEnum.Value_0;

_chapter_in_progress = 0;

_chapter_completed = 0;

_target_chapter = -1;

_restart_room = false;

_launch_data = 
scr_init_launch_parameters
scr_init_launch_parameters

function 
scr_init_launch_parameters()
{
    var param_data = new launch_parameters();
    var p_num = parameter_count();
    if (p_num > 0)
    {
        for (var i = 0; i < p_num; i += 1)
        {
            var param = parameter_string(i + 1);
            if (param == "launcher")
            {
                param_data.is_launcher = true;
            }
            else if (string_pos("switch_", param) != 0)
            {
                var param_parts = string_split(param, "_");
                param_data.switch_id = real(param_parts[1]);
            }
            else if (string_pos("returning_", param) != 0)
            {
                var param_parts = string_split(param, "_");
                param_data.returning = real(param_parts[1]);
            }
        }
    }
    return param_data;
}

function launch_parameters() constructor
{
    is_launcher = true;
    switch_id = -1;
    returning = 0;
}

function get_chapter_switch_parameters()
{
    var launch_data = new launch_parameters();
    if (scr_is_switch_os() && variable_global_exists("switchlogin"))
        launch_data.switch_id = global.switchlogin;
    var parameters = [];
    parameters[0] = "launcher";
    parameters[1] = "switch_" + string(launch_data.switch_id);
    parameters[2] = "returning_" + string(launch_data.returning);
    var param_formatted = "";
    for (var i = 0; i < array_length(parameters); i++)
        param_formatted += (" " + string(parameters[i]));
    return param_formatted;
}

function is_original_launcher(arg0)
{
    return arg0.returning == 0;
}
();

_pending_titles = [];

_pending_title = -4;

_load_type = UnknownEnum.Value_0;

init = function()

{

    var max_chapter = UnknownEnum.Value_7;

    var max_available_chapter = UnknownEnum.Value_5;

    _current_state = UnknownEnum.Value_1;

    for (var i = 0; i < max_available_chapter; i++)

    {

        var chapter = i + 1;

        if (
scr_chapter_save_file_exists
scr_chapter_save_file_exists

function 
scr_chapter_save_file_exists(arg0)
{
    var _exists = false;
    for (var i = 0; i < 3; i++)
    {
        _exists = ossafe_file_exists("filech" + string(arg0) + "_" + string(i));
        if (_exists == true)
            break;
    }
    return _exists;
}

function scr_chapter_save_file_exists_in_slot(arg0, arg1)
{
    var _exists = ossafe_file_exists("filech" + string(arg0) + "_" + string(arg1));
    return _exists;
}

function scr_completed_chapter_any_slot(arg0)
{
    var _file_exists = false;
    for (var i = 0; i < 3; i++)
    {
        if (ossafe_file_exists("filech" + string(arg0) + "_" + string(i + 3)))
        {
            _file_exists = true;
            break;
        }
    }
    return _file_exists;
}

function scr_completed_chapter_in_slot(arg0, arg1)
{
    var _file_exists = ossafe_file_exists("filech" + string(arg0) + "_" + string(arg1 + 3));
    return _file_exists;
}

function scr_fought_secret_boss_any_slot(arg0)
{
    var _fought = false;
    for (var i = 0; i < 3; i++)
    {
        var _slot = i;
        var _result = scr_get_ura_value(arg0, _slot);
        if (_result > 0)
        {
            _fought = true;
            break;
        }
    }
    return _fought;
}

function scr_get_ini_value(arg0, arg1, arg2)
{
    var _ini_file = ossafe_ini_open("dr.ini");
    var _ini_value = ini_read_real(
scr_ini_chapter(arg0, arg1), arg2, 0);
    ossafe_ini_close();
    return _ini_value;
}

function scr_set_ini_value(arg0, arg1, arg2, arg3)
{
    var iniwrite = ossafe_ini_open("dr.ini");
    ini_write_real(
scr_ini_chapter(arg0, arg1), arg2, arg3);
    ossafe_ini_close();
}

function scr_get_ini_value_all_slots(arg0, arg1)
{
    var _ini_file = ossafe_ini_open("dr.ini");
    var _list = [];
    for (var i = 0; i < 6; i++)
    {
        var _slot = i;
        var _value = ini_read_real(
scr_ini_chapter(arg0, _slot), arg1, 0);
        _list[i][0] = _slot;
        _list[i][1] = _value;
    }
    ossafe_ini_close();
    return _list;
}

function scr_is_chapter_revealed(arg0)
{
    if (arg0 == UnknownEnum.Value_1)
        return true;
    var completed_previous = scr_completed_chapter_any_slot(arg0 - 1);
    var completed_current = scr_completed_chapter_any_slot(arg0);
    var in_progress = 
scr_chapter_save_file_exists(arg0);
    return completed_previous || completed_current || in_progress;
}

function get_highest_revealed_chapter()
{
    var highest_revealed = UnknownEnum.Value_1;
    for (var i = 0; i < UnknownEnum.Value_5; i++)
    {
        var chapter = i + 1;
        if (!scr_is_chapter_revealed(chapter))
...
(chapter) && !scr_completed_chapter_any_slot(chapter))

            _chapter_in_progress = chapter;

    }

    if (_chapter_in_progress > 0)

        _current_state = UnknownEnum.Value_2;

    for (var i = 0; i < max_available_chapter; i++)

    {

        var chapter = i + 1;

        if (scr_completed_chapter_any_slot(chapter))

            _chapter_completed = chapter;

    }

    if (_chapter_completed > 0)

    {

        _current_state = UnknownEnum.Value_3;

        if (_chapter_in_progress > _chapter_completed)

        {

            _current_state = UnknownEnum.Value_2;

            if ((_chapter_in_progress - _chapter_completed) >= 2)

                _current_state = UnknownEnum.Value_4;

        }

        if (_chapter_completed >= max_available_chapter)

            _current_state = UnknownEnum.Value_4;

    }

    if (!is_original_launcher(_launch_data))

        _current_state = UnknownEnum.Value_4;

    change_state(_current_state);

};

change_state = function(arg0, arg1)

{

    _current_state = arg0;

    switch (_current_state)

    {

        case UnknownEnum.Value_4:

            with (obj_screen_start)

                clean_up();

            start_bgm();

            create_select_screen();

            break;

        case UnknownEnum.Value_1:

            stop_bgm();

            create_start_screen();

            break;

        case UnknownEnum.Value_2:

            stop_bgm();

            create_continue_screen();

            break;

        case UnknownEnum.Value_3:

            stop_bgm();

            create_start_next_screen();

            break;

        case UnknownEnum.Value_5:

            with (obj_screen_start)

                clean_up();

            _pending_titles = arg1;

            if (scr_is_switch_os())

            {

                if (array_length(_pending_titles) > 1)

                    _load_type = UnknownEnum.Value_1;

            }

            if (_load_type == UnknownEnum.Value_0)

            {

                _pending_title = _pending_titles[0];

                var adjusted_list = [];

                for (var i = 0; i < array_length(_pending_titles); i++)

                {

                    if (_pending_titles[i] == _pending_title)

                        continue;

                    adjusted_list[array_length(adjusted_list)] = _pending_titles[i];

                }

                _pending_titles = adjusted_list;

                create_load_prompt_screen(_pending_title.title);

            }

            else

            {

                create_load_prompt_multiple_screen(_pending_titles);

            }

            break;

        case UnknownEnum.Value_6:

            with (obj_screen_start)

                clean_up();

            create_load_deny_confirm_screen();

            break;

        case UnknownEnum.Value_0:

            with (obj_screen_start)

                clean_up();

            break;

    }

};

create_start_screen = function()

{

    var start_text = (global.lang == "en") ? "Would you like to start from Chapter 1?" : "Chapter 1から始めますか？";

    var yes_text = (global.lang == "en") ? "Yes" : "はい";

    var no_text = (global.lang == "en") ? "No" : "いいえ";

    var choices = [new create_choice(yes_text, UnknownEnum.Value_0), new create_choice(no_text, UnknownEnum.Value_1)];

    var choice_offset = (global.lang == "ja") ? -20 : 0;

    var start_screen = instance_create(0, 0, obj_screen_start);

    start_screen.init(id, start_text, choices, choice_offset);

    start_screen.fade_in();

};

create_continue_screen = function()

{

    var continue_text = "Continue from Chapter " + string(_chapter_in_progress) + "?";

    if (global.lang == "ja")

        continue_text = "Chapter " + string(_chapter_in_progress) + "から続けますか？";

    var yes_text = (global.lang == "en") ? "Yes" : "はい";

    var no_text = (global.lang == "en") ? "No" : "いいえ";

    var choices = [new create_choice(yes_text, UnknownEnum.Value_0), new create_choice(no_text, UnknownEnum.Value_1)];

    var choice_offset = (global.lang == "ja") ? -20 : 0;

    var start_screen = instance_create(0, 0, obj_screen_start);

    start_screen.init(id, continue_text, choices, choice_offset);

    start_screen.fade_in();

};

create_start_next_screen = function()

{

    var continue_text = "Chapter " + string(_chapter_completed) + " was completed.";

    if (global.lang == "ja")

        continue_text = "Chapter " + string(_chapter_completed) + "はクリア済みです。";

    var play_next_text = "Play Chapter " + string(_chapter_completed + 1);

    if (global.lang == "ja")

        play_next_text = "Chapter " + string(_chapter_completed + 1) + "をプレイ";

    var chapter_select_text = (global.lang == "en") ? "Chapter Select" : "チャプター選択";

    var choices = [new create_choice(play_next_text, UnknownEnum.Value_0), new create_choice(chapter_select_text, UnknownEnum.Value_1)];

    var start_screen = instance_create(0, 0, obj_screen_start);

    var choice_offset = (global.lang == "en") ? -70 : -100;

    start_screen.init(id, continue_text, choices, choice_offset);

    start_screen.fade_in();

};

create_select_screen = function()

{

    var select_screen = instance_create(0, 0, obj_screen_select);

    select_screen.init(id);

    select_screen.fade_in();

};

create_load_prompt_screen = function(arg0)

{

    var load_text = scr_get_app_title(arg0) + "Save Data found.\nImport this Save Data?\n(This will only be asked once.)";

    if (global.lang == "ja")

        load_text = scr_get_app_title(arg0) + "セーブデータを検出しました。\nこのセーブデータを取り込みますか？\n（この確認は一度しか行いません）";

    var yes_text = (global.lang == "en") ? "Yes" : "はい";

    var no_text = (global.lang == "en") ? "No" : "いいえ";

    var choices = [new create_choice(yes_text, UnknownEnum.Value_0), new create_choice(no_text, UnknownEnum.Value_1)];

    var choice_offset = (global.lang == "ja") ? -20 : 0;

    var start_screen = instance_create(0, 0, obj_screen_start);

    start_screen.init(id, load_text, choices, choice_offset);

    start_screen.fade_in();

};

create_load_prompt_multiple_screen = function(arg0)

{

    var load_text = "Multiple DELTARUNE Save Files found.\nWould you like to import one of these?\n(This will only be asked once.)\n \n ";

    if (global.lang == "ja")

        load_text = "複数の『DELTARUNE』セーブデータが存在します。\nどれか1つを取り込みますか？\n（この確認は一度しか行いません）\n \n ";

    var choices = [];

    for (var i = 0; i < array_length(arg0); i++)

    {

        var prev_title = arg0[i];

        var title_choice = scr_get_app_title_choice_text(prev_title.title);

        var new_choice = new create_choice(title_choice, prev_title);

        choices[array_length(choices)] = new_choice;

    }

    var do_not_text = (global.lang == "en") ? "Do Not Import" : "取り込まない";

    choices[array_length(choices)] = new create_choice(do_not_text, UnknownEnum.Value_1);

    var start_screen = instance_create(0, 0, obj_screen_start);

    start_screen.init(id, load_text, choices, 0, -32);

    start_screen.fade_in();

};

create_load_deny_confirm_screen = function()

{

    var deny_text = (global.lang == "en") ? "Proceed without importing?" : "取り込まずに進めますか？";

    var yes_text = (global.lang == "en") ? "Yes" : "はい";

    var no_text = (global.lang == "en") ? "No" : "いいえ";

    var choices = [new create_choice(yes_text, UnknownEnum.Value_0), new create_choice(no_text, UnknownEnum.Value_1)];

    var choice_offset = (global.lang == "ja") ? -20 : 0;

    var start_screen = instance_create(0, 0, obj_screen_start);

    start_screen.init(id, deny_text, choices, choice_offset);

    start_screen.fade_in();

};

trigger_event = function(arg0, arg1)

{

    var event_name = arg0;

    var event_value = arg1;

    switch (_current_state)

    {

        case UnknownEnum.Value_0:

            if (arg0 == "init_complete")

                init();

            else if (arg0 == "load_prompt")

                change_state(UnknownEnum.Value_5, arg1);

            break;

        case UnknownEnum.Value_5:

            if (event_value == UnknownEnum.Value_0)

            {

                global.savedata = _pending_title.save_data;

                _restart_room = true;

                change_state(UnknownEnum.Value_0);

                with (obj_init_console)

                    convert_loaded_file();

            }

            else if (event_value == UnknownEnum.Value_1)

            {

                if (_load_type == UnknownEnum.Value_0)

                {

                    if (array_length(_pending_titles) > 0)

                    {

                        change_state(UnknownEnum.Value_0);

                        trigger_event("load_prompt", _pending_titles);

                    }

                    else

                    {

                        change_state(UnknownEnum.Value_6);

                    }

                }

                else

                {

                    change_state(UnknownEnum.Value_6);

                }

            }

            else

            {

                _pending_title = event_value;

                global.savedata = _pending_title.save_data;

                _restart_room = true;

                change_state(UnknownEnum.Value_0);

                with (obj_init_console)

                    convert_loaded_file();

            }

            break;

        case UnknownEnum.Value_6:

            if (event_value == UnknownEnum.Value_0)

            {

                _restart_room = true;

                change_state(UnknownEnum.Value_0);

                with (obj_init_console)

                    create_new_save_file();

            }

            else

            {

                room_restart();

            }

            break;

        case UnknownEnum.Value_1:

            if (event_value == UnknownEnum.Value_0)

            {

                _target_chapter = UnknownEnum.Value_1;

                show_transition();

            }

            else

            {

                change_state(UnknownEnum.Value_4);

            }

            break;

        case UnknownEnum.Value_2:

            if (event_value == UnknownEnum.Value_0)

            {

                _target_chapter = _chapter_in_progress;

                show_transition();

            }

            else

            {

                change_state(UnknownEnum.Value_4);

            }

            break;

        case UnknownEnum.Value_3:

            if (event_value == UnknownEnum.Value_0)

            {

                _target_chapter = _chapter_completed + 1;

                show_transition();

            }

            else

            {

                change_state(UnknownEnum.Value_4);

            }

            break;

        case UnknownEnum.Value_4:

            if (event_name == "launch_game")

            {

                _target_chapter = event_value;

                show_transition();

            }

            else if (event_value == UnknownEnum.Value_4)

            {

                quit();

            }

            else if (event_value == UnknownEnum.Value_5)

            {

                toggle_language();

            }

            break;

    }

};

show_transition = function()

{

    if (instance_exists(obj_screen_transition))

        exit;

    if (global.bgm != -4)

        audio_sound_gain(global.bgm, 0, 500);

    var sound_file = get_chapter_confirm_sound(_target_chapter);

    var volume = 1;

    if (_target_chapter == 3)

        volume = 0.7;

    audio_play_sound(sound_file, 50, 0, volume);

    var delay = round(audio_sound_length(sound_file) * room_speed);

    var transition = instance_create(0, 0, obj_screen_transition);

    transition.init(id, _target_chapter, delay);

    transition.start(launch_game);

};

launch_game = function(arg0)

{

    audio_stop_all();

    var chapstring = string(_target_chapter);

    var parameters = get_chapter_switch_parameters();

    if (scr_is_switch_os())

    {

        game_change("rom:/chapter" + chapstring + "_switch/", parameters);

    }

    else

    {

        switch (os_type)

        {

            case os_windows:

                game_change("/chapter" + chapstring + "_windows", "-game data.win" + parameters);

                break;

            case os_ps4:

                game_change("", "-game /app0/games/chapter" + chapstring + "_ps4/game.win" + parameters);

                break;

            case os_ps5:

                game_change("", "-game /app0/games/chapter" + chapstring + "_ps5/game.win" + parameters);

                break;

            case os_macosx:

                game_change("chapter" + chapstring + "_mac", parameters);

                break;

        }

    }

};

quit = function()

{

    game_end();

};

toggle_language = function()

{

    if (_restart_room)

        exit;

    _restart_room = true;

    var target_lang = (global.lang == "en") ? "ja" : "en";

    global.lang = target_lang;

    ossafe_ini_open("true_config.ini");

    ini_write_string("LANG", "LANG", global.lang);

    ossafe_ini_close();

    ossafe_savedata_save();

    if (!global.is_console)

        room_restart();

};

start_bgm = function()

{

    if (global.bgm == -4 || !audio_is_playing(global.bgm))

        global.bgm = audio_play_sound(AUDIO_DRONE, 15, 1);

};

stop_bgm = function()

{

    if (global.bgm != -4)

    {

        audio_stop_sound(global.bgm);

        global.bgm = -4;

    }

};

if (global.is_console)

{

    var console_init = instance_create(0, 0, obj_init_console);

    console_init.init(id, _launch_data);

}

else

{

    var pc_init = instance_create(0, 0, obj_init_pc);

    pc_init.init(id, _launch_data);

}

enum UnknownEnum

{

    Value_0,

    Value_1,

    Value_2,

    Value_3,

    Value_4,

    Value_5,

    Value_6,

    Value_7

}