Deltarune (Chapter 1) script viewer

← back to main script listing

gml_Object_DEVICE_MENU_Step_0

(view raw script w/o annotations or w/e)
1
if (!input_enabled)
2
    exit;
3
if (MENU_NO == 1 || MENU_NO == 4 || MENU_NO == 6 || MENU_NO == 7)
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)
29
            {
30
                if (FILE[MENUCOORD[0]] == 1)
31
                {
32
                    global.filechoice = MENUCOORD[0];
33
                    
scr_windowcaption
scr_windowcaption

function
scr_windowcaption(arg0)
{ if (global.tempflag[10] == 1) window_set_caption(
DELTARUNE
scr_84_get_lang_string("scr_windowcaption_slash_scr_windowcaption_gml_1_0")
);
else window_set_caption(arg0); }
(
THE DARK
scr_84_get_lang_string
scr_84_get_lang_string

function
scr_84_get_lang_string(arg0)
{ return ds_map_find_value(global.lang_map, arg0); }
("DEVICE_MENU_slash_Step_0_gml_35_0")
);
34
                    snd_free_all();
35
                    obj_loadscreen.loaded = true;
36
                    input_enabled = false;
37
                    if (ossafe_file_exists("keyconfig_" + string(global.filechoice) + ".ini"))
38
                    {
39
                        ossafe_ini_open("keyconfig_" + string(global.filechoice) + ".ini");
40
                        for (var i = 0; i < 10; i += 1)
41
                        {
42
                            readval = ini_read_real("KEYBOARD_CONTROLS", string(i), -1);
43
                            if (readval != -1)
44
                                global.input_k[i] = readval;
45
                        }
46
                        for (var i = 0; i < 10; i += 1)
47
                        {
48
                            readval = ini_read_real("GAMEPAD_CONTROLS", string(i), -1);
49
                            if (readval != -1)
50
                                global.input_g[i] = readval;
51
                        }
52
                        readval = ini_read_real("SHOULDERLB_REASSIGN", "SHOULDERLB_REASSIGN", obj_gamecontroller.gamepad_shoulderlb_reassign);
53
                        if (readval != -1)
54
                            obj_gamecontroller.gamepad_shoulderlb_reassign = readval;
55
                        global.button0 = global.input_g[4];
56
                        global.button1 = global.input_g[5];
57
                        global.button2 = global.input_g[6];
58
                        if (global.is_console)
59
                        {
60
                            global.screen_border_id = ini_read_string("BORDER", "TYPE", "Dynamic");
61
                            var _disable_border = global.screen_border_id == "None" || global.screen_border_id == "なし";
62
                            
scr_enable_screen_border
scr_enable_screen_border

function
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);
63
                        }
64
                        ossafe_ini_close();
65
                        ossafe_savedata_save();
66
                    }
67
                    else if (ossafe_file_exists("config_" + string(global.filechoice) + ".ini"))
68
                    {
69
                        ossafe_ini_open("config_" + string(global.filechoice) + ".ini");
70
                        for (var i = 0; i < 10; i += 1)
71
                        {
72
                            readval = ini_read_real("KEYBOARD_CONTROLS", string(i), -1);
73
                            if (readval != -1)
74
                                global.input_k[i] = readval;
75
                        }
76
                        for (var i = 0; i < 10; i += 1)
77
                        {
78
                            readval = ini_read_real("GAMEPAD_CONTROLS", string(i), -1);
79
                            if (readval != -1)
80
                                global.input_g[i] = readval;
81
                        }
82
                        readval = ini_read_real("SHOULDERLB_REASSIGN", "SHOULDERLB_REASSIGN", obj_gamecontroller.gamepad_shoulderlb_reassign);
83
                        if (readval != -1)
84
                            obj_gamecontroller.gamepad_shoulderlb_reassign = readval;
85
                        global.input_g[0] = gp_padd;
86
                        global.input_g[1] = gp_padr;
87
                        global.input_g[2] = gp_padu;
88
                        global.input_g[3] = gp_padl;
89
                        global.input_g[4] = global.button0;
90
                        global.input_g[5] = global.button1;
91
                        global.input_g[6] = global.button2;
92
                        global.input_g[7] = 999;
93
                        global.input_g[8] = 999;
94
                        global.input_g[9] = 999;
95
                        global.button0 = global.input_g[4];
96
                        global.button1 = global.input_g[5];
97
                        global.button2 = global.input_g[6];
98
                        if (global.is_console)
99
                        {
100
                            global.screen_border_id = ini_read_string("BORDER", "TYPE", "Dynamic");
101
                            var _disable_border = global.screen_border_id == "None" || global.screen_border_id == "なし";
102
                            
scr_enable_screen_border
scr_enable_screen_border

function
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);
103
                        }
104
                        ossafe_ini_close();
105
                        ossafe_savedata_save();
106
                        if (!global.is_console)
107
                        {
108
                            ossafe_ini_open("keyconfig_" + string(global.filechoice) + ".ini");
109
                            for (var i = 0; i < 10; i++)
110
                                ini_write_real("KEYBOARD_CONTROLS", string(i), global.input_k[i]);
111
                            for (var i = 0; i < 10; i++)
112
                                ini_write_real("GAMEPAD_CONTROLS", string(i), global.input_g[i]);
113
                            ini_write_real("SHOULDERLB_REASSIGN", "SHOULDERLB_REASSIGN", obj_gamecontroller.gamepad_shoulderlb_reassign);
114
                            ossafe_ini_close();
115
                        }
116
                    }
117
                    if (os_type == os_ps5)
118
                    {
119
                        with (obj_event_manager)
120
                            trigger_event(UnknownEnum.Value_2, UnknownEnum.Value_0);
121
                    }
122
                }
123
                if (FILE[MENUCOORD[0]] == 0)
124
                {
125
                    if (os_type == os_ps5)
126
                    {
127
                        with (obj_event_manager)
128
                            trigger_event(UnknownEnum.Value_2, UnknownEnum.Value_0);
129
                    }
130
                    global.filechoice = MENUCOORD[0];
131
                    snd_free_all();
132
                    room_goto(PLACE_CONTACT );
133
                }
134
            }
135
            if (MENU_NO == 4)
136
            {
137
                if (TYPE == 0)
138
                {
139
                    TEMPCOMMENT = 
IT CONFORMED TO THE REFLECTION.
scr_84_get_lang_string
scr_84_get_lang_string

function
scr_84_get_lang_string(arg0)
{ return ds_map_find_value(global.lang_map, arg0); }
("DEVICE_MENU_slash_Step_0_gml_74_0")
;
140
                    if (NAME[0] == NAME[1] && NAME[1] == NAME[2])
141
                    {
142
                        if (TIME[0] == TIME[1] && TIME[1] == TIME[2])
143
                        {
144
                            if (PLACE[0] == PLACE[1] && PLACE[1] == PLACE[2])
145
                                TEMPCOMMENT = 
WHAT AN INTERESTING BEHAVIOR.
scr_84_get_lang_string
scr_84_get_lang_string

function
scr_84_get_lang_string(arg0)
{ return ds_map_find_value(global.lang_map, arg0); }
("DEVICE_MENU_slash_Step_0_gml_77_0")
;
146
                        }
147
                    }
148
                }
149
                event_user(5);
150
                if (TYPE == 0)
151
                {
152
                    if (NAME[0] == NAME[1] && NAME[1] == NAME[2])
153
                    {
154
                        if (TIME[0] == TIME[1] && TIME[1] == TIME[2])
155
                        {
156
                            if (PLACE[0] == PLACE[1] && PLACE[1] == PLACE[2] && TEMPCOMMENT != 
WHAT AN INTERESTING BEHAVIOR.
scr_84_get_lang_string
scr_84_get_lang_string

function
scr_84_get_lang_string(arg0)
{ return ds_map_find_value(global.lang_map, arg0); }
("DEVICE_MENU_slash_Step_0_gml_86_0")
)
157
                                TEMPCOMMENT = 
PREPARATIONS ARE COMPLETE.
scr_84_get_lang_string
scr_84_get_lang_string

function
scr_84_get_lang_string(arg0)
{ return ds_map_find_value(global.lang_map, arg0); }
("DEVICE_MENU_slash_Step_0_gml_86_1")
;
158
                        }
159
                    }
160
                }
161
                if (TYPE == 1)
162
                    TEMPCOMMENT = 
Copy complete.
scr_84_get_lang_string
scr_84_get_lang_string

function
scr_84_get_lang_string(arg0)
{ return ds_map_find_value(global.lang_map, arg0); }
("DEVICE_MENU_slash_Step_0_gml_91_0")
;
163
                MESSAGETIMER = 90;
164
                SELNOISE = 0;
165
                DEATHNOISE = 1;
166
                MENU_NO = 0;
167
            }
168
            if (MENU_NO == 7)
169
            {
170
                FILE[MENUCOORD[5]] = 0;
171
                NAME[MENUCOORD[5]] = 
[EMPTY]
scr_84_get_lang_string
scr_84_get_lang_string

function
scr_84_get_lang_string(arg0)
{ return ds_map_find_value(global.lang_map, arg0); }
("DEVICE_MENU_slash_Step_0_gml_105_0")
;
172
                TIME[MENUCOORD[5]] = 0;
173
                PLACE[MENUCOORD[5]] = "------------";
174
                LEVEL[MENUCOORD[5]] = 0;
175
                TIME_STRING[MENUCOORD[5]] = "--:--";
176
                ossafe_file_delete("filech1_" + string(MENUCOORD[5]));
177
                iniwrite = ossafe_ini_open("dr.ini");
178
                ini_write_string("G" + string(MENUCOORD[5]), "Name", "[EMPTY]");
179
                ini_write_real("G" + string(MENUCOORD[5]), "Level", 0);
180
                ini_write_real("G" + string(MENUCOORD[5]), "Love", 0);
181
                ini_write_real("G" + string(MENUCOORD[5]), "Time", 0);
182
                ini_write_real("G" + string(MENUCOORD[5]), "Room", 0);
183
                ini_write_real("G" + string(MENUCOORD[5]), "Date", 0);
184
                ini_write_real("G" + string(MENUCOORD[5]), "UraBoss", 0);
185
                ini_write_string("G" + string(MENUCOORD[5]), "Version", "0");
186
                ossafe_ini_close();
187
                ossafe_savedata_save();
188
                if (ossafe_file_exists("keyconfig_" + string(MENUCOORD[5]) + ".ini"))
189
                    ossafe_file_delete("keyconfig_" + string(MENUCOORD[5]) + ".ini");
190
                TEMPCOMMENT = 
IT WAS AS IF IT WAS NEVER THERE AT ALL.
scr_84_get_lang_string
scr_84_get_lang_string

function
scr_84_get_lang_string(arg0)
{ return ds_map_find_value(global.lang_map, arg0); }
("DEVICE_MENU_slash_Step_0_gml_126_0")
;
191
                if (TYPE == 1)
192
                    TEMPCOMMENT = 
Erase complete.
scr_84_get_lang_string
scr_84_get_lang_string

function
scr_84_get_lang_string(arg0)
{ return ds_map_find_value(global.lang_map, arg0); }
("DEVICE_MENU_slash_Step_0_gml_127_0")
;
193
                MESSAGETIMER = 90;
194
                SELNOISE = 0;
195
                DEATHNOISE = 1;
196
                MENU_NO = 0;
197
                with (obj_event_manager)
198
                    trigger_event(UnknownEnum.Value_0, UnknownEnum.Value_29);
199
            }
200
            if (MENU_NO == 6)
201
            {
202
                THREAT += 1;
203
                MENU_NO = 7;
204
                MENUCOORD[7] = 0;
205
            }
206
        }
207
        if (MENUCOORD[MENU_NO] == 1)
208
        {
209
            if (MENU_NO == 4 && TYPE == 0)
210
            {
211
                TEMPCOMMENT = 
IT RETAINED ITS ORIGINAL SHAPE.
scr_84_get_lang_string
scr_84_get_lang_string

function
scr_84_get_lang_string(arg0)
{ return ds_map_find_value(global.lang_map, arg0); }
("DEVICE_MENU_slash_Step_0_gml_149_0")
;
212
                MESSAGETIMER = 90;
213
            }
214
            if (MENU_NO == 6 || MENU_NO == 7)
215
            {
216
                if (TYPE == 0)
217
                {
218
                    TEMPCOMMENT = 
THEN IT WAS SPARED.
scr_84_get_lang_string
scr_84_get_lang_string

function
scr_84_get_lang_string(arg0)
{ return ds_map_find_value(global.lang_map, arg0); }
("DEVICE_MENU_slash_Step_0_gml_156_0")
;
219
                    if (THREAT >= 10)
220
                    {
221
                        TEMPCOMMENT = 
VERY INTERESTING.
scr_84_get_lang_string
scr_84_get_lang_string

function
scr_84_get_lang_string(arg0)
{ return ds_map_find_value(global.lang_map, arg0); }
("DEVICE_MENU_slash_Step_0_gml_159_0")
;
222
                        THREAT = 0;
223
                    }
224
                    MESSAGETIMER = 90;
225
                }
226
            }
227
            MENU_NO = 0;
228
        }
229
    }
230
    if (button2_p() && TWOBUFFER < 0)
231
    {
232
        ONEBUFFER = 1;
233
        TWOBUFFER = 1;
234
        BACKNOISE = 1;
235
        if (MENU_NO == 1)
236
            MENU_NO = 0;
237
        if (MENU_NO == 4)
238
            MENU_NO = 2;
239
        if (MENU_NO == 6)
240
            MENU_NO = 5;
241
        if (MENU_NO == 7)
242
            MENU_NO = 5;
243
    }
244
}
245
if (MENU_NO == 2 || MENU_NO == 3 || MENU_NO == 5)
246
{
247
    if (down_p())
248
    {
249
        if (MENUCOORD[MENU_NO] < 3)
250
        {
251
            MENUCOORD[MENU_NO] += 1;
252
            MOVENOISE = 1;
253
        }
254
    }
255
    if (up_p())
256
    {
257
        if (MENUCOORD[MENU_NO] > 0)
258
        {
259
            MENUCOORD[MENU_NO] -= 1;
260
            MOVENOISE = 1;
261
        }
262
    }
263
    if (button1_p() && ONEBUFFER < 0)
264
    {
265
        if (MENUCOORD[MENU_NO] < 3)
266
        {
267
            if (MENU_NO == 3)
268
            {
269
                if (MENUCOORD[2] != MENUCOORD[3])
270
                {
271
                    if (FILE[MENUCOORD[MENU_NO]] == 1)
272
                    {
273
                        TWOBUFFER = 2;
274
                        ONEBUFFER = 2;
275
                        SELNOISE = 1;
276
                        MENUCOORD[4] = 0;
277
                        MENU_NO = 4;
278
                    }
279
                    else
280
                    {
281
                        TEMPCOMMENT = 
THE DIVISION IS COMPLETE.
scr_84_get_lang_string
scr_84_get_lang_string

function
scr_84_get_lang_string(arg0)
{ return ds_map_find_value(global.lang_map, arg0); }
("DEVICE_MENU_slash_Step_0_gml_225_0")
;
282
                        MESSAGETIMER = 90;
283
                        if (TYPE == 1)
284
                            TEMPCOMMENT = 
Copy complete.
scr_84_get_lang_string
scr_84_get_lang_string

function
scr_84_get_lang_string(arg0)
{ return ds_map_find_value(global.lang_map, arg0); }
("DEVICE_MENU_slash_Step_0_gml_227_0")
;
285
                        DEATHNOISE = 1;
286
                        MENU_NO = 0;
287
                        ONEBUFFER = 2;
288
                        TWOBUFFER = 2;
289
                        event_user(5);
290
                    }
291
                }
292
                else
293
                {
294
                    TEMPCOMMENT = 
IT IS IMMUNE TO ITS OWN IMAGE.
scr_84_get_lang_string
scr_84_get_lang_string

function
scr_84_get_lang_string(arg0)
{ return ds_map_find_value(global.lang_map, arg0); }
("DEVICE_MENU_slash_Step_0_gml_238_0")
;
295
                    if (TYPE == 1)
296
                        TEMPCOMMENT = 
You can't copy there.
scr_84_get_lang_string
scr_84_get_lang_string

function
scr_84_get_lang_string(arg0)
{ return ds_map_find_value(global.lang_map, arg0); }
("DEVICE_MENU_slash_Step_0_gml_239_0")
;
297
                    MESSAGETIMER = 90;
298
                    TWOBUFFER = 2;
299
                    ONEBUFFER = 2;
300
                    BACKNOISE = 1;
301
                }
302
            }
303
            if (MENU_NO == 2)
304
            {
305
                if (FILE[MENUCOORD[MENU_NO]] == 1)
306
                {
307
                    TWOBUFFER = 2;
308
                    ONEBUFFER = 2;
309
                    SELNOISE = 1;
310
                    MENUCOORD[3] = 0;
311
                    MENU_NO = 3;
312
                }
313
                else
314
                {
315
                    TEMPCOMMENT = 
IT IS BARREN AND CANNOT BE COPIED.
scr_84_get_lang_string
scr_84_get_lang_string

function
scr_84_get_lang_string(arg0)
{ return ds_map_find_value(global.lang_map, arg0); }
("DEVICE_MENU_slash_Step_0_gml_261_0")
;
316
                    if (FILE[0] == 0 && FILE[1] == 0 && FILE[2] == 0)
317
                        TEMPCOMMENT = 
BUT THERE WAS NOTHING LEFT TO COPY.
scr_84_get_lang_string
scr_84_get_lang_string

function
scr_84_get_lang_string(arg0)
{ return ds_map_find_value(global.lang_map, arg0); }
("DEVICE_MENU_slash_Step_0_gml_264_0")
;
318
                    if (TYPE == 1)
319
                        TEMPCOMMENT = 
It can't be copied.
scr_84_get_lang_string
scr_84_get_lang_string

function
scr_84_get_lang_string(arg0)
{ return ds_map_find_value(global.lang_map, arg0); }
("DEVICE_MENU_slash_Step_0_gml_266_0")
;
320
                    MESSAGETIMER = 90;
321
                    BACKNOISE = 1;
322
                    TWOBUFFER = 2;
323
                    ONEBUFFER = 2;
324
                }
325
            }
326
            if (MENU_NO == 5)
327
            {
328
                if (FILE[MENUCOORD[MENU_NO]] == 1)
329
                {
330
                    TWOBUFFER = 2;
331
                    ONEBUFFER = 2;
332
                    SELNOISE = 1;
333
                    MENUCOORD[6] = 0;
334
                    MENU_NO = 6;
335
                }
336
                else
337
                {
338
                    TEMPCOMMENT = 
BUT IT WAS ALREADY GONE.
scr_84_get_lang_string
scr_84_get_lang_string

function
scr_84_get_lang_string(arg0)
{ return ds_map_find_value(global.lang_map, arg0); }
("DEVICE_MENU_slash_Step_0_gml_289_0")
;
339
                    if (FILE[0] == 0 && FILE[1] == 0 && FILE[2] == 0)
340
                        TEMPCOMMENT = 
BUT THERE WAS NOTHING LEFT TO ERASE.
scr_84_get_lang_string
scr_84_get_lang_string

function
scr_84_get_lang_string(arg0)
{ return ds_map_find_value(global.lang_map, arg0); }
("DEVICE_MENU_slash_Step_0_gml_292_0")
;
341
                    if (TYPE == 1)
342
                        TEMPCOMMENT = 
There's nothing to erase.
scr_84_get_lang_string
scr_84_get_lang_string

function
scr_84_get_lang_string(arg0)
{ return ds_map_find_value(global.lang_map, arg0); }
("DEVICE_MENU_slash_Step_0_gml_294_0")
;
343
                    MESSAGETIMER = 90;
344
                    TWOBUFFER = 2;
345
                    ONEBUFFER = 2;
346
                    BACKNOISE = 1;
347
                }
348
            }
349
        }
350
        if (MENUCOORD[MENU_NO] == 3)
351
        {
352
            TWOBUFFER = 2;
353
            ONEBUFFER = 2;
354
            SELNOISE = 1;
355
            MENU_NO = 0;
356
        }
357
    }
358
    if (button2_p() && TWOBUFFER < 0)
359
    {
360
        TWOBUFFER = 2;
361
        ONEBUFFER = 2;
362
        BACKNOISE = 1;
363
        if (MENU_NO == 2 || MENU_NO == 5)
364
            MENU_NO = 0;
365
        if (MENU_NO == 3)
366
            MENU_NO = 2;
367
    }
368
}
369
if (MENU_NO == 0)
370
{
371
    var memloc = MENUCOORD[0];
372
    if (down_p())
373
    {
374
        if (MENUCOORD[0] < 3)
375
        {
376
            MENUCOORD[0] += 1;
377
            MOVENOISE = 1;
378
        }
379
        else if (MENUCOORD[0] == 3 || MENUCOORD[0] == 4)
380
        {
381
            MENUCOORD[0] = 6;
382
            MOVENOISE = 1;
383
        }
384
        else if (MENUCOORD[0] == 5)
385
        {
386
            MENUCOORD[0] = 7;
387
            MOVENOISE = 1;
388
        }
389
    }
390
    if (up_p())
391
    {
392
        if (MENUCOORD[0] > 0)
393
        {
394
            if (MENUCOORD[0] < 3)
395
                MENUCOORD[0] -= 1;
396
            else if (MENUCOORD[0] == 3 || MENUCOORD[0] == 4 || MENUCOORD[0] == 5)
397
                MENUCOORD[0] = 2;
398
            else if (MENUCOORD[0] == 6)
399
                MENUCOORD[0] = 4;
400
            else if (MENUCOORD[0] == 7)
401
                MENUCOORD[0] = 5;
402
            MOVENOISE = 1;
403
        }
404
    }
405
    if (right_p())
406
    {
407
        if (MENUCOORD[0] >= 3 && MENUCOORD[0] < 5)
408
        {
409
            MOVENOISE = 1;
410
            MENUCOORD[0] += 1;
411
        }
412
        else if (MENUCOORD[0] == 5)
413
        {
414
            MOVENOISE = 1;
415
            MENUCOORD[0] = 3;
416
        }
417
        else if (MENUCOORD[0] == 6)
418
        {
419
            MOVENOISE = 1;
420
            MENUCOORD[0] = 7;
421
        }
422
        else if (MENUCOORD[0] == 7)
423
        {
424
            MOVENOISE = 1;
425
            MENUCOORD[0] = 6;
426
        }
427
    }
428
    if (left_p())
429
    {
430
        if (MENUCOORD[0] >= 3 && MENUCOORD[0] <= 5)
431
        {
432
            MOVENOISE = 1;
433
            MENUCOORD[0] -= 1;
434
            if (MENUCOORD[0] < 3)
435
                MENUCOORD[0] = 5;
436
        }
437
        else if (MENUCOORD[0] == 6)
438
        {
439
            MOVENOISE = 1;
440
            MENUCOORD[0] = 7;
441
        }
442
        else if (MENUCOORD[0] == 7)
443
        {
444
            MOVENOISE = 1;
445
            MENUCOORD[0] = 6;
446
        }
447
    }
448
    if (global.is_console)
449
    {
450
        if (MENUCOORD[0] == 7)
451
        {
452
            MENUCOORD[0] = memloc;
453
            MOVENOISE = false;
454
        }
455
    }
456
    if (button1_p() && ONEBUFFER < 0)
457
    {
458
        MESSAGETIMER = -1;
459
        if (MENUCOORD[0] <= 2)
460
        {
461
            MENUCOORD[1] = 0;
462
            ONEBUFFER = 1;
463
            TWOBUFFER = 1;
464
            MENU_NO = 1;
465
            SELNOISE = 1;
466
        }
467
        if (MENUCOORD[0] == 3)
468
        {
469
            MENUCOORD[2] = 0;
470
            ONEBUFFER = 1;
471
            TWOBUFFER = 1;
472
            MENU_NO = 2;
473
            SELNOISE = 1;
474
        }
475
        if (MENUCOORD[0] == 4)
476
        {
477
            MENUCOORD[5] = 0;
478
            ONEBUFFER = 1;
479
            TWOBUFFER = 1;
480
            MENU_NO = 5;
481
            SELNOISE = 1;
482
        }
483
        if (MENUCOORD[0] == 5)
484
        {
485
            input_enabled = false;
486
            SELNOISE = 1;
487
            snd_free_all();
488
            alarm[0]
 = 30;
gml_Object_DEVICE_MENU_Alarm_0.gml

var _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);
}
489
        }
490
        if (MENUCOORD[0] == 6)
491
        {
492
            
scr_change_language
scr_change_language

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

function
scr_84_load_ini()
{ for (i = 0; i < 3; i += 1) FILE[i] = 0; for (i = 0; i < 3; i += 1) { FILE[i] = 0; NAME[i] =
[EMPTY]
scr_84_get_lang_string("DEVICE_MENU_slash_Create_0_gml_97_0")
;
TIME[i] = 0; PLACE[i] = "------------"; LEVEL[i] = 0; TIME_STRING[i] = "--:--"; INITLANG[i] = 0; } if (ossafe_file_exists("filech1_0")) { FILE[0] = 1; NAME[0] =
FILE0
scr_84_get_lang_string("DEVICE_MENU_slash_Create_0_gml_107_0")
;
} if (ossafe_file_exists("filech1_1")) { FILE[1] = 1; NAME[1] =
FILE1
scr_84_get_lang_string("DEVICE_MENU_slash_Create_0_gml_112_0")
;
} if (ossafe_file_exists("filech1_2")) { FILE[2] = 1; NAME[2] =
FILE2
scr_84_get_lang_string("DEVICE_MENU_slash_Create_0_gml_117_0")
;
} 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));
if (room_id < 10000) { var valid_room_index =
scr_get_valid_room(global.chapter, room_id);
room_id = scr_get_id_by_room_index(valid_room_index); } var room_index =
scr_get_room_by_id(room_id);
PLACE[i] =
scr_roomname(room_index);
TIME[i] = ini_read_real("G" + string(i), "Time", 0); NAME[i] = ini_read_string("G" + string(i), "Name", "------"); LEVEL[i] = 1; INITLANG[i] = ini_read_real("G" + string(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(); } }
();
494
            ONEBUFFER = 2;
495
            TWOBUFFER = 2;
496
            SELNOISE = 1;
497
        }
498
        if (MENUCOORD[0] == 7)
499
        {
500
            ONEBUFFER = 2;
501
            TWOBUFFER = 2;
502
            SELNOISE = 1;
503
            game_end();
504
        }
505
    }
506
}
507
if (OBMADE == 1)
508
{
509
    OB_DEPTH += 1;
510
    obacktimer += OBM;
511
    if (obacktimer >= 20)
512
    {
513
        DV = instance_create(0, 0, DEVICE_OBACK_4);
514
        DV.depth = 5 + OB_DEPTH;
515
        DV.OBSPEED = 0.01 * OBM;
516
        if (OB_DEPTH >= 60000)
517
            OB_DEPTH = 0;
518
        obacktimer = 0;
519
    }
520
}
521
if (MOVENOISE == 1)
522
{
523
    snd_play(snd_menumove);
524
    MOVENOISE = 0;
525
}
526
if (SELNOISE == 1)
527
{
528
    snd_play(snd_select);
529
    SELNOISE = 0;
530
}
531
if (BACKNOISE == 1)
532
{
533
    snd_play(snd_swing);
534
    BACKNOISE = 0;
535
}
536
if (DEATHNOISE == 1)
537
{
538
    snd_play(AUDIO_APPEARANCE);
539
    DEATHNOISE = 0;
540
}
541
ONEBUFFER -= 1;
542
TWOBUFFER -= 1;
543
544
enum UnknownEnum
545
{
546
    Value_0,
547
    Value_2 = 2,
548
    Value_29 = 29
549
}