Deltarune (Chapter 2) script viewer

← back to main script listing

gml_Object_DEVICE_MENU_Create_0

(view raw script w/o annotations or w/e)
1
TYPE = 1;
2
SUBTYPE = 0;
3
CH = string(global.chapter);
4
if (ossafe_file_exists("filech" + CH + "_3"))
5
    SUBTYPE = 1;
6
if (ossafe_file_exists("filech" + CH + "_4"))
7
    SUBTYPE = 1;
8
if (ossafe_file_exists("filech" + CH + "_5"))
9
    SUBTYPE = 1;
10
COMPLETEFILE_PREV[0] = ossafe_file_exists("filech" + string(global.chapter - 1) + "_3");
11
COMPLETEFILE_PREV[1] = ossafe_file_exists("filech" + string(global.chapter - 1) + "_4");
12
COMPLETEFILE_PREV[2] = ossafe_file_exists("filech" + string(global.chapter - 1) + "_5");
13
INCOMPLETEFILE_PREV[0] = ossafe_file_exists("filech" + string(global.chapter - 1) + "_0");
14
INCOMPLETEFILE_PREV[1] = ossafe_file_exists("filech" + string(global.chapter - 1) + "_1");
15
INCOMPLETEFILE_PREV[2] = ossafe_file_exists("filech" + string(global.chapter - 1) + "_2");
16
INCOMPLETE_LOAD = 0;
17
if (global.is_console)
18
    global.chapter_return = -1;
19
if (TYPE == 0)
20
{
21
    
scr_windowcaption
scr_windowcaption

function
scr_windowcaption(arg0)
{ if (global.tempflag[10] != 1 && global.chapter == 1) window_set_caption(arg0); else window_set_caption("DELTARUNE Chapter " + string(global.chapter)); }
(stringsetloc(
CONTACT
"CONTACT", "DEVICE_MENU_slash_Create_0_gml_8_0"
));
22
    global.currentsong[0] = snd_init("AUDIO_DRONE.ogg");
23
    global.currentsong[1] = mus_loop(global.currentsong[0]);
24
}
25
if (TYPE == 1)
26
{
27
    instance_create(0, 0, obj_fadein);
28
    global.tempflag[10] = 1;
29
    
scr_windowcaption
scr_windowcaption

function
scr_windowcaption(arg0)
{ if (global.tempflag[10] != 1 && global.chapter == 1) window_set_caption(arg0); else window_set_caption("DELTARUNE Chapter " + string(global.chapter)); }
(stringsetloc(
DELTARUNE
"DELTARUNE", "DEVICE_MENU_slash_Create_0_gml_17_0"
));
30
    if (SUBTYPE == 0)
31
        global.currentsong[0] = snd_init("menu.ogg");
32
    if (SUBTYPE == 1)
33
        global.currentsong[0] = snd_init("AUDIO_STORY.ogg");
34
    if (SUBTYPE >= 1)
35
        global.tempflag[39] = 1;
36
    global.currentsong[1] = mus_loop_ext(global.currentsong[0], 1, 0.95);
37
}
38
BGMADE = 0;
39
BG_ALPHA = 0;
40
BG_SINER = 0;
41
OBMADE = 0;
42
OB_DEPTH = 0;
43
obacktimer = 0;
44
OBM = 0.5;
45
COL_A = c_green;
46
COL_B = c_lime;
47
COL_PLUS = merge_color(c_lime, c_white, 0.5);
48
jamod = 0;
49
if (TYPE == 1)
50
{
51
    BGSINER = 0;
52
    BGMAGNITUDE = 6;
53
    COL_A = merge_color(c_ltgray, c_navy, 0.2);
54
    COL_B = c_white;
55
    COL_PLUS = merge_color(c_yellow, c_white, 0.5);
56
    BGMADE = 1;
57
    BG_ALPHA = 0;
58
    ANIM_SINER = 0;
59
    ANIM_SINER_B = 0;
60
    TRUE_ANIM_SINER = 0;
61
    if (SUBTYPE == 0)
62
    {
63
        COL_A = merge_color(c_ltgray, c_maroon, 0.2);
64
        COL_B = c_white;
65
        COL_PLUS = merge_color(c_yellow, c_white, 0.4);
66
        BGMADE = 0;
67
    }
68
}
69
MENU_NO = 0;
70
for (i = 0; i < 12; i += 1)
71
    MENUCOORD[i] = 0;
72
XL = 210;
73
YL = 40;
74
YS = 5;
75
HEARTX = 75;
76
HEARTY = 110;
77
HEARTXCUR = 75;
78
HEARTYCUR = 75;
79
MOVENOISE = 0;
80
SELNOISE = 0;
81
BACKNOISE = 0;
82
DEATHNOISE = 0;
83
STARTGAME = 0;
84
REMMENU = 0;
85
CANQUIT = 1;
86
if (global.is_console == 1)
87
    CANQUIT = 0;
88
ONEBUFFER = 2;
89
TWOBUFFER = 0;
90
THREAT = 0;
91
TEMPMESSAGE = " ";
92
MESSAGETIMER = 0;
93
version_text = global.version;
94
for (i = 0; i < 3; i += 1)
95
    FILE[i] = 0;
96
for (i = 0; i < 3; i += 1)
97
{
98
    FILE[i] = 0;
99
    NAME[i] = stringsetloc(
[EMPTY]
"[EMPTY]", "DEVICE_MENU_slash_Create_0_gml_97_0"
);
100
    TIME[i] = 0;
101
    PLACE[i] = "------------";
102
    LEVEL[i] = 0;
103
    TIME_STRING[i] = "--:--";
104
    INITLANG[i] = 0;
105
}
106
if (ossafe_file_exists("filech" + CH + "_0"))
107
{
108
    FILE[0] = 1;
109
    NAME[0] = "FILE0";
110
}
111
if (ossafe_file_exists("filech" + CH + "_1"))
112
{
113
    FILE[1] = 1;
114
    NAME[1] = "FILE1";
115
}
116
if (ossafe_file_exists("filech" + CH + "_2"))
117
{
118
    FILE[2] = 1;
119
    NAME[2] = "FILE2";
120
}
121
if (ossafe_file_exists("dr.ini"))
122
{
123
    ossafe_ini_open("dr.ini");
124
    for (i = 0; i < 3; i += 1)
125
    {
126
        if (FILE[i] == 1)
127
        {
128
            var room_id = ini_read_real(
scr_ini_chapter
scr_ini_chapter

function
scr_ini_chapter(arg0, arg1)
{ if (arg0 >= 2) return "G_" + string(arg0) + "_" + string(arg1); else return "G" + string(arg1); }
(global.chapter, i), "Room", scr_get_id_by_room_index(room));
129
            var room_index = 
scr_get_valid_room
scr_get_valid_room

function
scr_get_valid_room(arg0, arg1, arg2 = 0)
{ var chapter = arg0; var room_id = arg1; var plot = arg2; var current_room = new scr_valid_room(
scr_get_room_by_id(room_id), plot);
var valid_rooms; if (chapter == 2) valid_rooms = [new scr_valid_room(18, 0), new scr_valid_room(61, 0), new scr_valid_room(62, 0), new scr_valid_room(75, 0), new scr_valid_room(78, 0), new scr_valid_room(83, 0), new scr_valid_room(89, 0), new scr_valid_room(112, 0), new scr_valid_room(115, 0), new scr_valid_room(126, 0), new scr_valid_room(121, 0), new scr_valid_room(128, 0), new scr_valid_room(133, 0), new scr_valid_room(152, 0), new scr_valid_room(157, 0), new scr_valid_room(187, 0), new scr_valid_room(193, 0), new scr_valid_room(171, 0), new scr_valid_room(196, 0), new scr_valid_room(199, 0)]; var is_valid = false; for (var i = 0; i < array_length_1d(valid_rooms); i++) { if (scr_get_id_by_room_index(current_room.room_index) == scr_get_id_by_room_index(valid_rooms[i].room_index)) { is_valid = true; break; } } if (!is_valid) { current_room.room_index++; for (var i = 0; i < array_length_1d(valid_rooms); i++) { if (scr_get_id_by_room_index(current_room.room_index) == scr_get_id_by_room_index(valid_rooms[i].room_index)) { is_valid = true; break; } } } if (!is_valid) current_room.room_index--; return current_room.room_index; } function scr_valid_room(arg0, arg1) constructor { room_index = arg0; plot = arg1; } function scr_add_valid_room(arg0, arg1, arg2) constructor { }
(global.chapter, room_id);
130
            PLACE[i] = 
scr_roomname
scr_roomname

function
scr_roomname(arg0)
{ roomname = stringsetloc(
Dark World?
"Dark World?", "scr_roomname_slash_scr_roomname_gml_1_0"
);
if (arg0 == 0) roomname = stringsetloc(
---
"---", "scr_roomname_slash_scr_roomname_gml_2_0"
);
if (arg0 == 18) roomname = stringsetloc(
Kris's Room
"Kris's Room", "scr_roomname_slash_scr_roomname_gml_3_0"
);
if (arg0 == 55) roomname = stringsetloc(
Castle Town
"Castle Town", "scr_roomname_slash_scr_roomname_gml_4_0"
);
if (arg0 == 61) roomname = stringsetloc(
Castle Town
"Castle Town", "scr_roomname_slash_scr_roomname_gml_5_0"
);
if (arg0 == 62) roomname = stringsetloc(
My Castle Town
"My Castle Town", "scr_roomname_slash_scr_roomname_gml_6_0"
);
if (arg0 == 78) roomname = stringsetloc(
Cyber Field - Entrance
"Cyber Field - Entrance", "scr_roomname_slash_scr_roomname_gml_7_0"
);
if (arg0 == 83) roomname = stringsetloc(
Cyber Field - Arcade Machine
"Cyber Field - Arcade Machine", "scr_roomname_slash_scr_roomname_gml_8_0"
);
if (arg0 == 89) roomname = stringsetloc(
Cyber Field - Music Shop
"Cyber Field - Music Shop", "scr_roomname_slash_scr_roomname_gml_9_0"
);
if (arg0 == 112) roomname = stringsetloc(
Cyber City - Entrance
"Cyber City - Entrance", "scr_roomname_slash_scr_roomname_gml_10_0"
);
if (arg0 == 115) roomname = stringsetloc(
Cyber City - First Alleyway
"Cyber City - First Alleyway", "scr_roomname_slash_scr_roomname_gml_11_0"
);
if (arg0 == 126) roomname = stringsetloc(
Cyber City - Mouse Alley
"Cyber City - Mouse Alley", "scr_roomname_slash_scr_roomname_gml_12_0_b"
);
if (arg0 == 121) roomname = stringsetloc(
Cyber City - Music Shop
"Cyber City - Music Shop", "scr_roomname_slash_scr_roomname_gml_12_0"
);
if (arg0 == 128) roomname = stringsetloc(
Cyber City - Second Alleyway
"Cyber City - Second Alleyway", "scr_roomname_slash_scr_roomname_gml_13_0"
);
if (arg0 == 133) roomname = stringsetloc(
Cyber City - Heights
"Cyber City - Heights", "scr_roomname_slash_scr_roomname_gml_16_0_b"
);
if (arg0 == 152) roomname = stringsetloc(
Queen's Mansion - Guest Hall
"Queen's Mansion - Guest Hall", "scr_roomname_slash_scr_roomname_gml_14_0"
);
if (arg0 == 157) roomname = stringsetloc(
Queen's Mansion - Entrance
"Queen's Mansion - Entrance", "scr_roomname_slash_scr_roomname_gml_15_0"
);
if (arg0 == 187) roomname = stringsetloc(
Queen's Mansion - 3F
"Queen's Mansion - 3F", "scr_roomname_slash_scr_roomname_gml_16_0"
);
if (arg0 == 193) roomname = stringsetloc(
Queen's Mansion - Acid Tunnel
"Queen's Mansion - Acid Tunnel", "scr_roomname_slash_scr_roomname_gml_17_0"
);
if (arg0 == 171) roomname = stringsetloc(
Queen's Mansion - Basement
"Queen's Mansion - Basement", "scr_roomname_slash_scr_roomname_gml_19_0"
);
if (arg0 == 196) roomname = stringsetloc(
Queen's Mansion - 4F
"Queen's Mansion - 4F", "scr_roomname_slash_scr_roomname_gml_20_0"
);
if (arg0 == 199 || arg0 == 200) roomname = stringsetloc(
Queen's Mansion - Rooftop
"Queen's Mansion - Rooftop", "scr_roomname_slash_scr_roomname_gml_23_0"
);
return roomname; }
(room_index);
131
            TIME[i] = ini_read_real(
scr_ini_chapter
scr_ini_chapter

function
scr_ini_chapter(arg0, arg1)
{ if (arg0 >= 2) return "G_" + string(arg0) + "_" + string(arg1); else return "G" + string(arg1); }
(global.chapter, i), "Time", 0);
132
            NAME[i] = ini_read_string(
scr_ini_chapter
scr_ini_chapter

function
scr_ini_chapter(arg0, arg1)
{ if (arg0 >= 2) return "G_" + string(arg0) + "_" + string(arg1); else return "G" + string(arg1); }
(global.chapter, i), "Name", "------");
133
            LEVEL[i] = 1;
134
            INITLANG[i] = ini_read_real(
scr_ini_chapter
scr_ini_chapter

function
scr_ini_chapter(arg0, arg1)
{ if (arg0 >= 2) return "G_" + string(arg0) + "_" + string(arg1); else return "G" + string(arg1); }
(global.chapter, i), "InitLang", 0);
135
            TIME_SECONDS_TOTAL[i] = floor(TIME[i] / 30);
136
            TIME_MINUTES[i] = floor(TIME_SECONDS_TOTAL[i] / 60);
137
            TIME_SECONDS[i] = TIME_SECONDS_TOTAL[i] - (TIME_MINUTES[i] * 60);
138
            TIME_SECONDS_STRING[i] = string(TIME_SECONDS[i]);
139
            if (TIME_SECONDS[i] == 0)
140
                TIME_SECONDS_STRING[i] = "00";
141
            if (TIME_SECONDS[i] < 10 && TIME_SECONDS[i] >= 1)
142
                TIME_SECONDS_STRING[i] = "0" + string(TIME_SECONDS[i]);
143
            TIME_STRING[i] = 
scr_timedisp
scr_timedisp

function
scr_timedisp(arg0)
{ var minutes = floor(arg0 / 1800); var remmins = minutes % 60; var hours = (minutes - remmins) / 60; var seconds = floor((arg0 / 30) - (minutes * 60)); var hourstring = string(hours) + ":"; var minstring = string(remmins) + ":"; if (remmins < 10) minstring = "0" + minstring; var secstring = string(floor(seconds)); if (seconds < 10) secstring = "0" + secstring; var timedisp = hourstring + minstring + secstring; return timedisp; }
(TIME[i]);
144
        }
145
    }
146
    var cadd = 3;
147
    if (INCOMPLETE_LOAD)
148
        cadd = 0;
149
    for (i = 0; i < 3; i++)
150
    {
151
        COMPLETEFILE_PREV_NAME[i] = stringsetloc(
NO DATA
"NO DATA", "DEVICE_MENU_slash_Create_0_gml_182_0"
);
152
        COMPLETEFILE_PREV_TIME[i] = 0;
153
        COMPLETEFILE_PREV_PLACE[i] = stringsetloc(
CHAPTER 1
"CHAPTER 1", "DEVICE_MENU_slash_Create_0_gml_221_0"
);
154
        INCOMPLETEFILE_PREV_NAME[i] = stringsetloc(
NO DATA
"NO DATA", "DEVICE_MENU_slash_Create_0_gml_185_0"
);
155
        INCOMPLETEFILE_PREV_TIME[i] = 0;
156
        var loadcompletion = 0;
157
        if (COMPLETEFILE_PREV[i] == 1 && INCOMPLETE_LOAD == 0)
158
            loadcompletion = 1;
159
        if (INCOMPLETEFILE_PREV[i] == 1 && INCOMPLETE_LOAD == 1)
160
            loadcompletion = 1;
161
        if (loadcompletion)
162
        {
163
            COMPLETEFILE_PREV_NAME[i] = stringsetloc(
UNKNOWN FILE
"UNKNOWN FILE", "DEVICE_MENU_slash_Create_0_gml_190_0"
);
164
            COMPLETEFILE_PREV_NAME[i] = ini_read_string(
scr_ini_chapter
scr_ini_chapter

function
scr_ini_chapter(arg0, arg1)
{ if (arg0 >= 2) return "G_" + string(arg0) + "_" + string(arg1); else return "G" + string(arg1); }
(global.chapter - 1, i + cadd), "Name", "------");
165
            COMPLETEFILE_PREV_TIME[i] = ini_read_real(
scr_ini_chapter
scr_ini_chapter

function
scr_ini_chapter(arg0, arg1)
{ if (arg0 >= 2) return "G_" + string(arg0) + "_" + string(arg1); else return "G" + string(arg1); }
(global.chapter - 1, i + cadd), "Time", 0);
166
            COMPLETEFILE_PREV_PLACE[i] = stringsetloc(
CHAPTER 1
"CHAPTER 1", "DEVICE_MENU_slash_Create_0_gml_237_0"
);
167
            COMPLETETIME_SECONDS_TOTAL[i] = floor(COMPLETEFILE_PREV_TIME[i] / 30);
168
            COMPLETETIME_MINUTES[i] = floor(COMPLETETIME_SECONDS_TOTAL[i] / 60);
169
            COMPLETETIME_SECONDS[i] = COMPLETETIME_SECONDS_TOTAL[i] - (COMPLETETIME_MINUTES[i] * 60);
170
            COMPLETETIME_SECONDS_STRING[i] = string(COMPLETETIME_SECONDS[i]);
171
            if (COMPLETETIME_SECONDS[i] == 0)
172
                COMPLETETIME_SECONDS_STRING[i] = "00";
173
            if (COMPLETETIME_SECONDS[i] < 10 && COMPLETETIME_SECONDS[i] >= 1)
174
                COMPLETETIME_SECONDS_STRING[i] = "0" + string(COMPLETETIME_SECONDS[i]);
175
            COMPLETETIME_STRING[i] = 
scr_timedisp
scr_timedisp

function
scr_timedisp(arg0)
{ var minutes = floor(arg0 / 1800); var remmins = minutes % 60; var hours = (minutes - remmins) / 60; var seconds = floor((arg0 / 30) - (minutes * 60)); var hourstring = string(hours) + ":"; var minstring = string(remmins) + ":"; if (remmins < 10) minstring = "0" + minstring; var secstring = string(floor(seconds)); if (seconds < 10) secstring = "0" + secstring; var timedisp = hourstring + minstring + secstring; return timedisp; }
(COMPLETEFILE_PREV_TIME[i]);
176
        }
177
        if (INCOMPLETEFILE_PREV[i])
178
        {
179
            INCOMPLETEFILE_PREV_NAME[i] = stringsetloc(
UNKNOWN FILE
"UNKNOWN FILE", "DEVICE_MENU_slash_Create_0_gml_205_0"
);
180
            INCOMPLETEFILE_PREV_NAME[i] = ini_read_string(
scr_ini_chapter
scr_ini_chapter

function
scr_ini_chapter(arg0, arg1)
{ if (arg0 >= 2) return "G_" + string(arg0) + "_" + string(arg1); else return "G" + string(arg1); }
(global.chapter - 1, i), "Name", "------");
181
            INCOMPLETEFILE_PREV_TIME[i] = ini_read_real(
scr_ini_chapter
scr_ini_chapter

function
scr_ini_chapter(arg0, arg1)
{ if (arg0 >= 2) return "G_" + string(arg0) + "_" + string(arg1); else return "G" + string(arg1); }
(global.chapter - 1, i), "Time", 0);
182
        }
183
    }
184
    ossafe_ini_close();
185
    ossafe_savedata_save();
186
}
187
var INITMENU = 0;
188
if (ossafe_file_exists("dr.ini"))
189
{
190
    if (FILE[0] == 0 && FILE[1] == 0 && FILE[2] == 0)
191
    {
192
        if (COMPLETEFILE_PREV[0] == 1 || COMPLETEFILE_PREV[1] == 1 || COMPLETEFILE_PREV[2] == 1)
193
            INITMENU = 10;
194
        if (INCOMPLETE_LOAD == 1)
195
            INITMENU = 10;
196
    }
197
}
198
MENU_NO = INITMENU;
199
depth = 5;
200
jamod = 0;
201
input_enabled = true;