Deltarune (Chapter 4) script viewer

← back to main script listing

gml_Object_obj_dw_church_organ_Step_0

(view raw script w/o annotations or w/e)
1
var kractor = -4;
2
with (obj_actor)
3
{
4
    if (name == "kris")
5
        kractor = id;
6
}
7
if (
scr_debug
scr_debug

function
scr_debug()
{ if (global.debug == 1) return 1; }
())
8
{
9
    if (keyboard_check_pressed(ord("B")))
10
    {
11
        solved = !solved;
12
        printval("solved");
13
    }
14
    if (keyboard_check_pressed(ord("N")))
15
        endlessplaylog = "";
16
}
17
var usedsheetmusic = global.flag[847];
18
var diffroom = false;
19
if (instance_exists(obj_dw_church_organpuzzle))
20
    diffroom = true;
21
var roomoffset = 0;
22
if (diffroom)
23
    roomoffset = 560;
24
playloganswer = "aoamcdbaaoaebcdeeeeeacbnaaocdeeeeefghgfecaoamcdbaklji";
25
if (buffer > -10)
26
    buffer--;
27
if (engaged == true)
28
{
29
    if ((button2_h() && buffer < 0) || forceend == 1)
30
    {
31
        kractor.auto_walk = true;
32
        endtimer++;
33
        if (i_ex(obj_dw_church_organpuzzle))
34
        {
35
            if (obj_dw_church_organpuzzle.con != 0)
36
                endtimer = 0;
37
        }
38
        if (endtimer >= endtime || forceend)
39
        {
40
            endlessplaylog = "";
41
            forceend = false;
42
            engaged = false;
43
            endtimer = 0;
44
            var quittype = 0;
45
            if (global.plot < 175)
46
                quittype = 1;
47
            if (global.plot >= 180 && !solved)
48
                quittype = 10;
49
            switch (quittype)
50
            {
51
                case 0:
52
                    play_cancel();
53
                    break;
54
                case 1:
55
                    con = 40;
56
                    global.interact = 0;
57
                    break;
58
                case 10:
59
                    global.interact = 1;
60
                    con = 50;
61
                    kractor.sprite_index = spr_krisu_dark;
62
                    break;
63
            }
64
        }
65
    }
66
    else
67
    {
68
        endtimer = 0;
69
    }
70
    soundtoplay = 0;
71
    if (left_h() && !down_h() && !right_h() && !up_h())
72
        soundtoplay = 1;
73
    if ((left_h() && down_h()) && !up_h() && !right_h())
74
        soundtoplay = 2;
75
    if (down_h() && !left_h() && !right_h() && !up_h())
76
        soundtoplay = 3;
77
    if ((down_h() && right_h()) && !left_h() && !up_h())
78
        soundtoplay = 4;
79
    if (right_h() && !left_h() && !down_h() && !up_h())
80
        soundtoplay = 5;
81
    if ((up_h() && right_h()) && !down_h() && !left_h())
82
        soundtoplay = 7;
83
    if (up_h() && !left_h() && !down_h() && !right_h())
84
        soundtoplay = 7;
85
    if ((up_h() && left_h()) && !down_h() && !right_h())
86
        soundtoplay = 8;
87
    makenote = false;
88
    if (buffer < 0 && con == 0)
89
    {
90
        kractor.auto_walk = false;
91
        kractor.sprite_index = spr_kris_piano_loop_1;
92
        kractor.image_index = 3;
93
        if (button1_p() && !button2_h())
94
        {
95
            makenote = true;
96
            var mysound = 0;
97
            var myinstrument = 13;
98
            var myinstrument2 = 338;
99
            var lowpitch = 0;
100
            if (button3_h())
101
                lowpitch = -6;
102
            var thispitch = power(2, (lowpitch + soundtoplay) / 12);
103
            thispitch = 1;
104
            var passentry = "";
105
            switch (soundtoplay)
106
            {
107
                case 0:
108
                    if (!button3_h())
109
                    {
110
                        thispitch = 1;
111
                        passentry = "a";
112
                    }
113
                    else
114
                    {
115
                        thispitch = 0.5;
116
                        passentry = "i";
117
                    }
118
                    break;
119
                case 5:
120
                    if (!button3_h())
121
                    {
122
                        thispitch = 1.125;
123
                        passentry = "b";
124
                    }
125
                    else
126
                    {
127
                        thispitch = 0.5625;
128
                        passentry = "j";
129
                    }
130
                    break;
131
                case 4:
132
                    if (!button3_h())
133
                    {
134
                        thispitch = 1.25;
135
                        passentry = "c";
136
                    }
137
                    else
138
                    {
139
                        thispitch = 0.625;
140
                        passentry = "k";
141
                    }
142
                    break;
143
                case 3:
144
                    if (!button3_h())
145
                    {
146
                        thispitch = 4/3;
147
                        passentry = "d";
148
                    }
149
                    else
150
                    {
151
                        thispitch = 2/3;
152
                        passentry = "l";
153
                    }
154
                    break;
155
                case 2:
156
                    if (!button3_h())
157
                    {
158
                        thispitch = 1.5;
159
                        passentry = "e";
160
                    }
161
                    else
162
                    {
163
                        thispitch = 0.75;
164
                        passentry = "m";
165
                    }
166
                    break;
167
                case 1:
168
                    if (!button3_h())
169
                    {
170
                        thispitch = 1.6666666666666667;
171
                        passentry = "f";
172
                    }
173
                    else
174
                    {
175
                        thispitch = 0.8333333333333334;
176
                        passentry = "n";
177
                    }
178
                    break;
179
                case 8:
180
                    if (!button3_h())
181
                    {
182
                        thispitch = 1.875;
183
                        passentry = "g";
184
                    }
185
                    else
186
                    {
187
                        thispitch = 0.9375;
188
                        passentry = "o";
189
                    }
190
                    break;
191
                case 7:
192
                    if (!button3_h())
193
                    {
194
                        thispitch = 2;
195
                        passentry = "h";
196
                    }
197
                    else
198
                    {
199
                        thispitch = 1;
200
                        passentry = "a";
201
                    }
202
                    break;
203
            }
204
            snd_play(myinstrument, 0.8, thispitch);
205
            buffer = 0;
206
            endlessplaylog += passentry;
207
            if (!solved)
208
            {
209
                var checkcorrect = false;
210
                if (string_length(endlessplaylog) > 2)
211
                    checkcorrect = true;
212
                if (checkcorrect == true)
213
                {
214
                    var checkstring = string_copy(playloganswer, 0, string_length(endlessplaylog));
215
                    var killstring = string_copy(playloganswer, 0, string_length(playloganswer));
216
                    if (checkstring != endlessplaylog || endlessplaylog == killstring)
217
                    {
218
                        forceend = true;
219
                        checkcorrect = false;
220
                        snd_stop(myinstrument);
221
                        snd_stop(myinstrument2);
222
                        snd_play(snd_pianonoise);
223
                        if (endlessplaylog == killstring)
224
                        {
225
                            snd_stop(snd_pianonoise);
226
                            snd_play(snd_pianonoise, undefined, 0.8);
227
                            debug_print("correct but not allowed");
228
                        }
229
                        endlessplaylog = "";
230
                    }
231
                }
232
            }
233
            else
234
            {
235
                var checkstrings = [];
236
                array_push(checkstrings, "mbamooamamooa");
237
                array_push(checkstrings, "ccdecddebm");
238
                array_push(checkstrings, "adefddcdbadedcdd");
239
                array_push(checkstrings, "nachgebc");
240
                array_push(checkstrings, "cdeeeeeacbbbbbbcbaaaaaaghgec");
241
                array_push(checkstrings, "nacghecfoaeoa");
242
                array_push(checkstrings, "caonnfedcbabc");
243
                array_push(checkstrings, "edbcab");
244
                array_push(checkstrings, "naoannoaec");
245
                array_push(checkstrings, "cecfeafhfhe");
246
                array_push(checkstrings, "ddddddddccccccccgggggfghhhhgf");
247
                array_push(checkstrings, "aaaaonoabccccbabcd");
248
                array_push(checkstrings, "mebaem");
249
                array_push(checkstrings, "naebababebab");
250
                array_push(checkstrings, "nnfc");
251
                array_push(checkstrings, "aoamcdbaaoaebcdeeeeeacbnaaocdeeeeefghgfecaoamcdbaklji");
252
                array_push(checkstrings, "agaecdbaagaebcdeeeeeacbfaagcdeeeeefghgfecagaecdbacdba");
253
                for (var i = 0; i < array_length(checkstrings); i++)
254
                {
255
                    var checkstring = checkstrings[i];
256
                    if (string_pos(checkstring, endlessplaylog))
257
                    {
258
                        endlessplaylog = "";
259
                        obj_dw_church_organpuzzle.con = 1;
260
                        obj_dw_church_organpuzzle.playedfun = i + 1;
261
                        con = 999;
262
                    }
263
                }
264
            }
265
        }
266
    }
267
}
268
if (is_canceled)
269
{
270
    if (!i_ex(obj_cutscene_master))
271
    {
272
        is_canceled = false;
273
        con = 0;
274
        global.interact = 0;
275
        global.facing = 0;
276
        with (obj_mainchara)
277
            cutscene = 0;
278
    }
279
}
280
if (con == 1)
281
{
282
    obj_mainchara.fun = false;
283
    engaged = false;
284
    global.facing = 0;
285
    buffer = 4;
286
    con = 2;
287
}
288
if (con == 2)
289
{
290
    timer++;
291
    if (timer == 15)
292
    {
293
        con = 40;
294
        global.interact = 0;
295
        timer = 0;
296
        playlog[0] = 0;
297
        playindex = -1;
298
    }
299
}
300
if (con == 99)
301
{
302
    snd_play(snd_wing);
303
    engaged = false;
304
    baselight = 0;
305
    global.facing = 3;
306
    con = 51;
307
    customcon = 1;
308
    
scr_flag_set
scr_flag_set

function
scr_flag_set(arg0, arg1)
{ global.flag[arg0] = arg1; if (
scr_debug())
show_debug_message("*** flag [" + string(arg0) + "] updated: " + string(arg1) + " | " + scr_flag_name_get(arg0)); } function scr_setflag(arg0, arg1) {
scr_flag_set(arg0, arg1);
}
(848, 1);
309
    if (
scr_flag_get
scr_flag_get

function
scr_flag_get(arg0)
{ var flag_value = global.flag[arg0]; return flag_value; } function scr_flag_name_get(arg0) { if (!global.is_console) { var v = global.flagname[arg0]; return is_undefined(v) ? "*unknown flag*" : v; } else { return ""; } } function scr_getflag(arg0) { return
scr_flag_get(arg0);
}
(847) == 0)
310
        
scr_flag_set
scr_flag_set

function
scr_flag_set(arg0, arg1)
{ global.flag[arg0] = arg1; if (
scr_debug())
show_debug_message("*** flag [" + string(arg0) + "] updated: " + string(arg1) + " | " + scr_flag_name_get(arg0)); } function scr_setflag(arg0, arg1) {
scr_flag_set(arg0, arg1);
}
(848, 2);
311
}
312
var conthirtytrig = 0;
313
if (con == 30 && global.interact == 0 && !d_ex())
314
{
315
    if (
scr_trigcheck
scr_trigcheck

function
scr_trigcheck(arg0)
{ var ____trig = 0; if (is_string(arg0)) { with (obj_trigger) { if (extflag == arg0) { if (place_meeting(x, y, obj_mainchara)) ____trig++; } } } return ____trig; } function scr_trigcheck_ext(arg0, arg1 = id) { var ____trig = 0; if (is_string(arg0)) { with (obj_trigger) { if (extflag == arg0) { if (place_meeting(x, y, arg1)) ____trig++; } } } return ____trig; }
("conthirtytrig"))
316
        conthirtytrig = 1;
317
}
318
if (conthirtytrig)
319
{
320
    con = 35;
321
    global.interact = 1;
322
    
scr_speaker
scr_speaker

function
scr_speaker(arg0)
{ _speaker = arg0; global.typer = 5; if (global.darkzone == 1) global.typer = 6; if (global.fighting == 1) global.typer = 4; global.fc = 0; global.fe = 0; if (_speaker == "silent" && global.darkzone == 0) global.typer = 2; if (_speaker == "silent" && global.darkzone == 1) global.typer = 36; if (_speaker == "balloon" || _speaker == "enemy") global.typer = 50; if (_speaker == "sans") { global.typer = 14; global.fc = 6; } if (_speaker == "undyne" || _speaker == "und") { global.typer = 17; global.fc = 9; } if (_speaker == "temmie" || _speaker == "tem") global.typer = 21; if (_speaker == "jevil") global.typer = 35; if (_speaker == "catti") global.fc = 13; if (_speaker == "jockington" || _speaker == "joc") global.fc = 14; if (_speaker == "catty" || _speaker == "caddy") global.fc = 16; if (_speaker == "bratty" || _speaker == "bra") global.fc = 17; if (_speaker == "rouxls" || _speaker == "rou") global.fc = 18; if (_speaker == "burgerpants" || _speaker == "bur") global.fc = 19; if (_speaker == "spamton") { if (global.fighting == 0) global.typer = 66; else global.typer = 68; } if (_speaker == "sneo") global.typer = 67; if (_speaker == "gerson" || _speaker == "ger" || _speaker == "gers") global.typer = 85; if (_speaker == "susie" || _speaker == "sus") { global.fc = 1; global.typer = 10; if (global.darkzone == 1) { global.typer = 30; if (global.fighting == 1) global.typer = 47; } } if (_speaker == "ralsei" || _speaker == "ral") { global.fc = 2; global.typer = 31; if (global.fighting == 1) global.typer = 45; if (global.flag[30 ralsei_hat_state] == 1) global.typer = 6; } if (_speaker == "noelle" || _speaker == "noe") { global.fc = 3; if (global.darkzone == 0) global.typer = 12; else global.typer = 56; if (global.fighting == 1) global.typer = 59; } if (_speaker == "toriel" || _speaker == "tor") { global.fc = 4; global.typer = 7; } if (_speaker == "asgore" || _speaker == "asg") { global.fc = 10; global.typer = 18; } if (_speaker == "king" || _speaker == "kin") { global.fc = 20; global.typer = 33; if (global.chapter == 1) { if (global.plot < 235) global.typer = 36; ...
("susie");
323
    msgsetloc(0, 
Face 2* Alright Kris,Delay 11 with this,Delay 11 we got it in the bag.Wait for inputClose Message
"\\E2* Alright Kris^1, with this^1, we got it in the bag./%", "obj_dw_church_organ_slash_Step_0_gml_415_0"
);
324
    var d = d_make(undefined, undefined, undefined, 1);
325
    d.stay = 5;
326
}
327
if (con == 35 && !d_ex())
328
{
329
    con = 41;
330
    
scr_keyitemget
scr_keyitemget

function
scr_keyitemget(arg0)
{ i = 0; loop = 1; noroom = 0; global.item[12] = 999; while (loop == 1) { if (global.keyitem[i] == 0) { global.keyitem[i] = arg0; break; } if (i == 12) { noroom = 1; break; } i += 1; } script_execute(scr_keyiteminfo_all); }
(30);
331
    snd_play(snd_item);
332
    
scr_speaker
scr_speaker

function
scr_speaker(arg0)
{ _speaker = arg0; global.typer = 5; if (global.darkzone == 1) global.typer = 6; if (global.fighting == 1) global.typer = 4; global.fc = 0; global.fe = 0; if (_speaker == "silent" && global.darkzone == 0) global.typer = 2; if (_speaker == "silent" && global.darkzone == 1) global.typer = 36; if (_speaker == "balloon" || _speaker == "enemy") global.typer = 50; if (_speaker == "sans") { global.typer = 14; global.fc = 6; } if (_speaker == "undyne" || _speaker == "und") { global.typer = 17; global.fc = 9; } if (_speaker == "temmie" || _speaker == "tem") global.typer = 21; if (_speaker == "jevil") global.typer = 35; if (_speaker == "catti") global.fc = 13; if (_speaker == "jockington" || _speaker == "joc") global.fc = 14; if (_speaker == "catty" || _speaker == "caddy") global.fc = 16; if (_speaker == "bratty" || _speaker == "bra") global.fc = 17; if (_speaker == "rouxls" || _speaker == "rou") global.fc = 18; if (_speaker == "burgerpants" || _speaker == "bur") global.fc = 19; if (_speaker == "spamton") { if (global.fighting == 0) global.typer = 66; else global.typer = 68; } if (_speaker == "sneo") global.typer = 67; if (_speaker == "gerson" || _speaker == "ger" || _speaker == "gers") global.typer = 85; if (_speaker == "susie" || _speaker == "sus") { global.fc = 1; global.typer = 10; if (global.darkzone == 1) { global.typer = 30; if (global.fighting == 1) global.typer = 47; } } if (_speaker == "ralsei" || _speaker == "ral") { global.fc = 2; global.typer = 31; if (global.fighting == 1) global.typer = 45; if (global.flag[30 ralsei_hat_state] == 1) global.typer = 6; } if (_speaker == "noelle" || _speaker == "noe") { global.fc = 3; if (global.darkzone == 0) global.typer = 12; else global.typer = 56; if (global.fighting == 1) global.typer = 59; } if (_speaker == "toriel" || _speaker == "tor") { global.fc = 4; global.typer = 7; } if (_speaker == "asgore" || _speaker == "asg") { global.fc = 10; global.typer = 18; } if (_speaker == "king" || _speaker == "kin") { global.fc = 20; global.typer = 33; if (global.chapter == 1) { if (global.plot < 235) global.typer = 36; ...
("no_name");
333
    msgsetloc(0, 
* (SheetMusic was added to your KEY ITEMS.)Wait for inputClose Message
"* (SheetMusic was added to your KEY ITEMS.)/%", "obj_dw_church_organ_slash_Step_0_gml_428_0"
);
334
    d_make();
335
}
336
if (con == 40 && global.interact == 0 && !d_ex())
337
{
338
    con = -1;
339
    global.interact = 1;
340
    if (
scr_flag_get
scr_flag_get

function
scr_flag_get(arg0)
{ var flag_value = global.flag[arg0]; return flag_value; } function scr_flag_name_get(arg0) { if (!global.is_console) { var v = global.flagname[arg0]; return is_undefined(v) ? "*unknown flag*" : v; } else { return ""; } } function scr_getflag(arg0) { return
scr_flag_get(arg0);
}
(847) == 0)
341
    {
342
        if (global.plot < 175)
343
        {
344
            global.plot = 175;
345
            con = 42;
346
            with (obj_caterpillarchara)
347
                facing[target] = 2;
348
            
scr_speaker
scr_speaker

function
scr_speaker(arg0)
{ _speaker = arg0; global.typer = 5; if (global.darkzone == 1) global.typer = 6; if (global.fighting == 1) global.typer = 4; global.fc = 0; global.fe = 0; if (_speaker == "silent" && global.darkzone == 0) global.typer = 2; if (_speaker == "silent" && global.darkzone == 1) global.typer = 36; if (_speaker == "balloon" || _speaker == "enemy") global.typer = 50; if (_speaker == "sans") { global.typer = 14; global.fc = 6; } if (_speaker == "undyne" || _speaker == "und") { global.typer = 17; global.fc = 9; } if (_speaker == "temmie" || _speaker == "tem") global.typer = 21; if (_speaker == "jevil") global.typer = 35; if (_speaker == "catti") global.fc = 13; if (_speaker == "jockington" || _speaker == "joc") global.fc = 14; if (_speaker == "catty" || _speaker == "caddy") global.fc = 16; if (_speaker == "bratty" || _speaker == "bra") global.fc = 17; if (_speaker == "rouxls" || _speaker == "rou") global.fc = 18; if (_speaker == "burgerpants" || _speaker == "bur") global.fc = 19; if (_speaker == "spamton") { if (global.fighting == 0) global.typer = 66; else global.typer = 68; } if (_speaker == "sneo") global.typer = 67; if (_speaker == "gerson" || _speaker == "ger" || _speaker == "gers") global.typer = 85; if (_speaker == "susie" || _speaker == "sus") { global.fc = 1; global.typer = 10; if (global.darkzone == 1) { global.typer = 30; if (global.fighting == 1) global.typer = 47; } } if (_speaker == "ralsei" || _speaker == "ral") { global.fc = 2; global.typer = 31; if (global.fighting == 1) global.typer = 45; if (global.flag[30 ralsei_hat_state] == 1) global.typer = 6; } if (_speaker == "noelle" || _speaker == "noe") { global.fc = 3; if (global.darkzone == 0) global.typer = 12; else global.typer = 56; if (global.fighting == 1) global.typer = 59; } if (_speaker == "toriel" || _speaker == "tor") { global.fc = 4; global.typer = 7; } if (_speaker == "asgore" || _speaker == "asg") { global.fc = 10; global.typer = 18; } if (_speaker == "king" || _speaker == "kin") { global.fc = 20; global.typer = 33; if (global.chapter == 1) { if (global.plot < 235) global.typer = 36; ...
("susie");
349
            msgsetloc(0, 
Face 0* ...Delay 11 hm,Delay 11 we don't know the notes you've gotta play,Delay 11 right?Wait for input
"\\E0* ..^1. hm^1, we don't know the notes you've gotta play^1, right?/", "obj_dw_church_organ_slash_Step_0_gml_454_0"
);
350
            msgnextloc(
Face 1* Maybe the answer's somewhere around here...?Wait for inputClose Message
"\\E1* Maybe the answer's somewhere around here...?/%", "obj_dw_church_organ_slash_Step_0_gml_455_0"
);
351
            var d = d_make();
352
            d.runcheck = 1;
353
            d.preventcskip = 1;
354
            d.side = 0;
355
        }
356
        else
357
        {
358
            play_cancel();
359
        }
360
    }
361
    else if (global.plot < 185)
362
    {
363
        con = 50;
364
    }
365
    else
366
    {
367
        play_cancel();
368
    }
369
}
370
if (con == 41 && !d_ex())
371
{
372
    con = 0;
373
    global.interact = 0;
374
    global.facing = 0;
375
}
376
if (con == 42 && !d_ex())
377
{
378
    con = 0;
379
    play_cancel();
380
}
381
if (con == 50 && !d_ex() && customcon == 1)
382
{
383
    con = 51;
384
    customcon = 0;
385
    
c_waitcustom_end
c_waitcustom_end

function
c_waitcustom_end()
{ with (obj_cutscene_master) { cs_wait_custom = 0; waiting = 0; } }
();
386
    
c_wait
c_wait

function
c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
}
(30);
387
    
c_msgside
c_msgside

function
c_msgside(arg0)
{
c_cmd("msgside", arg0, 0, 0, 0);
}
("top");
388
    
c_speaker
c_speaker

function
c_speaker(arg0)
{
c_cmd("speaker", arg0, 0, 0, 0);
}
("susie");
389
    
c_msgsetloc
c_msgsetloc

function
c_msgsetloc(arg0, arg1, arg2)
{ var msg_index = arg0; var english = arg1; var localized_string_id = arg2; var str = english; if (!is_english()) str =
scr_84_get_lang_string(localized_string_id);
c_msgset(msg_index, str);
}
(0,
Face 0* ...Wait for input
"\\E0* .../", "obj_dw_church_organ_slash_Step_0_gml_532_0"
);
390
    
c_facenext
c_facenext

function
c_facenext(arg0, arg1)
{
c_cmd("msgfacenext", arg0, arg1, 0, 0);
}
("ralsei", 26);
391
    
c_msgnextloc
c_msgnextloc

function
c_msgnextloc(arg0, arg1)
{ var str = arg0; var localized_string_id = arg1; if (!is_english()) str =
scr_84_get_lang_string(localized_string_id);
c_msgnext(str);
}
(
Face Q* Umm,Delay 11 Kris,Delay 11 maybe I could give it a try? I think I...Wait for input
"\\EQ* Umm^1, Kris^1, maybe I could give it a try? I think I.../", "obj_dw_church_organ_slash_Step_0_gml_534_0"
);
392
    
c_facenext
c_facenext

function
c_facenext(arg0, arg1)
{
c_cmd("msgfacenext", arg0, arg1, 0, 0);
}
("susie", 1);
393
    
c_msgnextloc
c_msgnextloc

function
c_msgnextloc(arg0, arg1)
{ var str = arg0; var localized_string_id = arg1; if (!is_english()) str =
scr_84_get_lang_string(localized_string_id);
c_msgnext(str);
}
(
Face 1* Ralsei,Delay 11 wait a sec.Wait for inputClose Message
"\\E1* Ralsei^1, wait a sec./%", "obj_dw_church_organ_slash_Step_0_gml_536_0"
);
394
    
c_talk
c_talk

function
c_talk()
{
c_cmd("talk", 0, 0, 0, 0);
}
();
395
    
c_wait_box
c_wait_box

function
c_wait_box(arg0)
{
c_cmd("waitbox", arg0, 0, 0, 0);
}
(2);
396
    
c_sel
c_sel

function
c_sel(arg0)
{
c_cmd("select", arg0, 0, 0, 0);
}
(ra);
397
    
c_walk
c_walk

function
c_walk(arg0, arg1, arg2)
{
c_cmd("walk", arg0, arg1, arg2, 0);
}
("u", 2, 6);
398
    
c_wait_box
c_wait_box

function
c_wait_box(arg0)
{
c_cmd("waitbox", arg0, 0, 0, 0);
}
(4);
399
    
c_sel
c_sel

function
c_sel(arg0)
{
c_cmd("select", arg0, 0, 0, 0);
}
(su);
400
    
c_facing
c_facing

function
c_facing(arg0)
{
c_cmd("facing", arg0, 0, 0, 0);
}
("l");
401
    
c_wait_talk
c_wait_talk

function
c_wait_talk()
{
c_cmd("waitdialoguer", 0, 0, 0, 0);
}
();
402
    
c_sel
c_sel

function
c_sel(arg0)
{
c_cmd("select", arg0, 0, 0, 0);
}
(ra);
403
    
c_autowalk
c_autowalk

function
c_autowalk(arg0)
{
c_cmd("autowalk", arg0, 0, 0, 0);
}
(0);
404
    
c_imagespeed
c_imagespeed

function
c_imagespeed(arg0)
{
c_cmd("imagespeed", arg0, 0, 0, 0);
}
(0.2);
405
    
c_walk
c_walk

function
c_walk(arg0, arg1, arg2)
{
c_cmd("walk", arg0, arg1, arg2, 0);
}
("d", 2, 6);
406
    
c_delaycmd
c_delaycmd

function
c_delaycmd(arg0, arg1, arg2)
{
c_cmd_x("delaycmd", arg0, arg1, arg2, 0, 0, 0);
}
(7, "imagespeed", 0);
407
    
c_sel
c_sel

function
c_sel(arg0)
{
c_cmd("select", arg0, 0, 0, 0);
}
(su);
408
    
c_facing
c_facing

function
c_facing(arg0)
{
c_cmd("facing", arg0, 0, 0, 0);
}
("u");
409
    
c_wait
c_wait

function
c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
}
(30);
410
    
c_speaker
c_speaker

function
c_speaker(arg0)
{
c_cmd("speaker", arg0, 0, 0, 0);
}
("susie");
411
    
c_msgsetloc
c_msgsetloc

function
c_msgsetloc(arg0, arg1, arg2)
{ var msg_index = arg0; var english = arg1; var localized_string_id = arg2; var str = english; if (!is_english()) str =
scr_84_get_lang_string(localized_string_id);
c_msgset(msg_index, str);
}
(0,
Face 0* Kris...Delay 11 today in church,Delay 11 when you were asleep...Wait for input
"\\E0* Kris..^1. today in church^1, when you were asleep.../", "obj_dw_church_organ_slash_Step_0_gml_562_0"
);
412
    
c_msgnextloc
c_msgnextloc

function
c_msgnextloc(arg0, arg1)
{ var str = arg0; var localized_string_id = arg1; if (!is_english()) str =
scr_84_get_lang_string(localized_string_id);
c_msgnext(str);
}
(
Face D* Your mom...Delay 11 said you used to play good.Wait for input
"\\ED* Your mom..^1. said you used to play good./", "obj_dw_church_organ_slash_Step_0_gml_563_0"
);
413
    
c_msgnextloc
c_msgnextloc

function
c_msgnextloc(arg0, arg1)
{ var str = arg0; var localized_string_id = arg1; if (!is_english()) str =
scr_84_get_lang_string(localized_string_id);
c_msgnext(str);
}
(
Face D* I dunno why you're pretending you can't now.Wait for input
"\\ED* I dunno why you're pretending you can't now./", "obj_dw_church_organ_slash_Step_0_gml_564_0"
);
414
    
c_msgnextloc
c_msgnextloc

function
c_msgnextloc(arg0, arg1)
{ var str = arg0; var localized_string_id = arg1; if (!is_english()) str =
scr_84_get_lang_string(localized_string_id);
c_msgnext(str);
}
(
Face S* Maybe you're like...Delay 11 embarrassed or something?Wait for input
"\\ES* Maybe you're like..^1. embarrassed or something?/", "obj_dw_church_organ_slash_Step_0_gml_565_0"
);
415
    
c_msgnextloc
c_msgnextloc

function
c_msgnextloc(arg0, arg1)
{ var str = arg0; var localized_string_id = arg1; if (!is_english()) str =
scr_84_get_lang_string(localized_string_id);
c_msgnext(str);
}
(
Face D* But like...Delay 11 y'know...Wait for inputClose Message
"\\ED* But like..^1. y'know.../%", "obj_dw_church_organ_slash_Step_0_gml_566_0"
);
416
    
c_talk
c_talk

function
c_talk()
{
c_cmd("talk", 0, 0, 0, 0);
}
();
417
    
c_wait_box
c_wait_box

function
c_wait_box(arg0)
{
c_cmd("waitbox", arg0, 0, 0, 0);
}
(1);
418
    
c_sel
c_sel

function
c_sel(arg0)
{
c_cmd("select", arg0, 0, 0, 0);
}
(su);
419
    
c_facing
c_facing

function
c_facing(arg0)
{
c_cmd("facing", arg0, 0, 0, 0);
}
("r");
420
    
c_wait_box
c_wait_box

function
c_wait_box(arg0)
{
c_cmd("waitbox", arg0, 0, 0, 0);
}
(2);
421
    
c_sel
c_sel

function
c_sel(arg0)
{
c_cmd("select", arg0, 0, 0, 0);
}
(su);
422
    
c_autowalk
c_autowalk

function
c_autowalk(arg0)
{
c_cmd("autowalk", arg0, 0, 0, 0);
}
(0);
423
    
c_sprite
c_sprite

function
c_sprite(arg0)
{
c_cmd("sprite", arg0, 0, 0, 0);
}
(spr_susie_head_scratch_dw);
424
    
c_imagespeed
c_imagespeed

function
c_imagespeed(arg0)
{
c_cmd("imagespeed", arg0, 0, 0, 0);
}
(0.2);
425
    
c_addxy
c_addxy

function
c_addxy(arg0, arg1)
{
c_cmd("addxy", arg0, arg1, 0, 0);
}
(0, -6);
426
    
c_wait_box
c_wait_box

function
c_wait_box(arg0)
{
c_cmd("waitbox", arg0, 0, 0, 0);
}
(4);
427
    
c_sel
c_sel

function
c_sel(arg0)
{
c_cmd("select", arg0, 0, 0, 0);
}
(su);
428
    
c_halt
c_halt

function
c_halt()
{
c_cmd("halt", 0, 0, 0, 0);
}
();
429
    
c_facing
c_facing

function
c_facing(arg0)
{
c_cmd("facing", arg0, 0, 0, 0);
}
("u");
430
    
c_addxy
c_addxy

function
c_addxy(arg0, arg1)
{
c_cmd("addxy", arg0, arg1, 0, 0);
}
(0, 6);
431
    
c_wait_talk
c_wait_talk

function
c_wait_talk()
{
c_cmd("waitdialoguer", 0, 0, 0, 0);
}
();
432
    
c_wait
c_wait

function
c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
}
(30);
433
    
c_speaker
c_speaker

function
c_speaker(arg0)
{
c_cmd("speaker", arg0, 0, 0, 0);
}
("susie");
434
    
c_msgsetloc
c_msgsetloc

function
c_msgsetloc(arg0, arg1, arg2)
{ var msg_index = arg0; var english = arg1; var localized_string_id = arg2; var str = english; if (!is_english()) str =
scr_84_get_lang_string(localized_string_id);
c_msgset(msg_index, str);
}
(0,
Face D* ...Wait for input
"\\ED* .../", "obj_dw_church_organ_slash_Step_0_gml_591_0"
);
435
    
c_msgnextloc
c_msgnextloc

function
c_msgnextloc(arg0, arg1)
{ var str = arg0; var localized_string_id = arg1; if (!is_english()) str =
scr_84_get_lang_string(localized_string_id);
c_msgnext(str);
}
(
Face 2* Kris,Delay 11 you should play.Wait for inputClose Message
"\\E2* Kris^1, you should play./%", "obj_dw_church_organ_slash_Step_0_gml_592_0"
);
436
    
c_talk
c_talk

function
c_talk()
{
c_cmd("talk", 0, 0, 0, 0);
}
();
437
    
c_wait_box
c_wait_box

function
c_wait_box(arg0)
{
c_cmd("waitbox", arg0, 0, 0, 0);
}
(1);
438
    
c_sel
c_sel

function
c_sel(arg0)
{
c_cmd("select", arg0, 0, 0, 0);
}
(su);
439
    
c_autowalk
c_autowalk

function
c_autowalk(arg0)
{
c_cmd("autowalk", arg0, 0, 0, 0);
}
(1);
440
    
c_walk
c_walk

function
c_walk(arg0, arg1, arg2)
{
c_cmd("walk", arg0, arg1, arg2, 0);
}
("u", 2, 6);
441
    
c_wait_talk
c_wait_talk

function
c_wait_talk()
{
c_cmd("waitdialoguer", 0, 0, 0, 0);
}
();
442
    
c_wait
c_wait

function
c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
}
(30);
443
    
c_sel
c_sel

function
c_sel(arg0)
{
c_cmd("select", arg0, 0, 0, 0);
}
(su);
444
    
c_autowalk
c_autowalk

function
c_autowalk(arg0)
{
c_cmd("autowalk", arg0, 0, 0, 0);
}
(0);
445
    
c_imagespeed
c_imagespeed

function
c_imagespeed(arg0)
{
c_cmd("imagespeed", arg0, 0, 0, 0);
}
(0.2);
446
    
c_walk
c_walk

function
c_walk(arg0, arg1, arg2)
{
c_cmd("walk", arg0, arg1, arg2, 0);
}
("d", 2, 6);
447
    
c_delaycmd
c_delaycmd

function
c_delaycmd(arg0, arg1, arg2)
{
c_cmd_x("delaycmd", arg0, arg1, arg2, 0, 0, 0);
}
(7, "imagespeed", 0);
448
    
c_sel
c_sel

function
c_sel(arg0)
{
c_cmd("select", arg0, 0, 0, 0);
}
(kr);
449
    
c_facing
c_facing

function
c_facing(arg0)
{
c_cmd("facing", arg0, 0, 0, 0);
}
("u");
450
    
c_wait
c_wait

function
c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
}
(60);
451
    
c_autowalk
c_autowalk

function
c_autowalk(arg0)
{
c_cmd("autowalk", arg0, 0, 0, 0);
}
(0);
452
    
c_sprite
c_sprite

function
c_sprite(arg0)
{
c_cmd("sprite", arg0, 0, 0, 0);
}
(spr_kris_piano_sit);
453
    
c_halt
c_halt

function
c_halt()
{
c_cmd("halt", 0, 0, 0, 0);
}
();
454
    c_snd_play(snd_wing);
455
    
c_var_lerp
c_var_lerp

function
c_var_lerp()
{ if (argument_count < 5)
c_cmd_x("var", 0, argument[0], argument[1], argument[2], argument[3], 0);
else if (argument_count == 5)
c_cmd_x("var", 0, argument[0], argument[1], argument[2], argument[3], argument[4]);
else
c_cmd_x("var", 0, argument[0], argument[1], argument[2], argument[3], string(argument[4]) + string(argument[5]));
}
("image_index", 0, 4, 20);
456
    
c_wait_if
c_wait_if

function
c_wait_if(arg0, arg1, arg2, arg3)
{
c_cmd("waitif", arg0, arg1, arg2, arg3);
}
(kr_actor, "image_index", ">=", 2);
457
    
c_autodepth
c_autodepth

function
c_autodepth(arg0)
{
c_cmd("autodepth", arg0, 0, 0, 0);
}
(0);
458
    
c_depth
c_depth

function
c_depth(arg0)
{
c_cmd("depth", arg0, 0, 0, 0);
}
(90000);
459
    
c_wait
c_wait

function
c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
}
(30);
460
    
c_speaker
c_speaker

function
c_speaker(arg0)
{
c_cmd("speaker", arg0, 0, 0, 0);
}
("no_name");
461
    
c_msgsetloc
c_msgsetloc

function
c_msgsetloc(arg0, arg1, arg2)
{ var msg_index = arg0; var english = arg1; var localized_string_id = arg2; var str = english; if (!is_english()) str =
scr_84_get_lang_string(localized_string_id);
c_msgset(msg_index, str);
}
(0,
* (You thought about Susie's words and took a deep breath.)Wait for inputClose Message
"* (You thought about Susie's words and took a deep breath.)/%", "obj_dw_church_organ_slash_Step_0_gml_634_0"
);
462
    
c_talk_wait
c_talk_wait

function
c_talk_wait()
{
c_talk();
c_waittalk();
} function c_talkwait() {
c_talk_wait();
}
();
463
    
c_wait
c_wait

function
c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
}
(15);
464
    
c_var_lerp
c_var_lerp

function
c_var_lerp()
{ if (argument_count < 5)
c_cmd_x("var", 0, argument[0], argument[1], argument[2], argument[3], 0);
else if (argument_count == 5)
c_cmd_x("var", 0, argument[0], argument[1], argument[2], argument[3], argument[4]);
else
c_cmd_x("var", 0, argument[0], argument[1], argument[2], argument[3], string(argument[4]) + string(argument[5]));
}
("image_index", 5, 9, 30);
465
    
c_wait
c_wait

function
c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
}
(45);
466
    
c_speaker
c_speaker

function
c_speaker(arg0)
{
c_cmd("speaker", arg0, 0, 0, 0);
}
("no_name");
467
    
c_msgsetloc
c_msgsetloc

function
c_msgsetloc(arg0, arg1, arg2)
{ var msg_index = arg0; var english = arg1; var localized_string_id = arg2; var str = english; if (!is_english()) str =
scr_84_get_lang_string(localized_string_id);
c_msgset(msg_index, str);
}
(0,
* (Your hands began to move on their own...)Wait for inputClose Message
"* (Your hands began to move on their own...)/%", "obj_dw_church_organ_slash_Step_0_gml_644_0"
);
468
    
c_talk_wait
c_talk_wait

function
c_talk_wait()
{
c_talk();
c_waittalk();
} function c_talkwait() {
c_talk_wait();
}
();
469
    
c_wait
c_wait

function
c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
}
(15);
470
    
c_var_instance
c_var_instance

function
c_var_instance(arg0, arg1, arg2)
{
c_cmd_x("var", arg0, arg1, arg2, 0, 0, 0);
}
(id, "kris_play", true);
471
    
c_wait
c_wait

function
c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
}
(30);
472
    
c_sel
c_sel

function
c_sel(arg0)
{
c_cmd("select", arg0, 0, 0, 0);
}
(kr);
473
    
c_autowalk
c_autowalk

function
c_autowalk(arg0)
{
c_cmd("autowalk", arg0, 0, 0, 0);
}
(0);
474
    
c_sprite
c_sprite

function
c_sprite(arg0)
{
c_cmd("sprite", arg0, 0, 0, 0);
}
(spr_kris_piano_full);
475
    
c_imageindex
c_imageindex

function
c_imageindex(arg0)
{
c_cmd("imageindex", arg0, 0, 0, 0);
}
(524);
476
    
c_wait_if
c_wait_if

function
c_wait_if(arg0, arg1, arg2, arg3)
{
c_cmd("waitif", arg0, arg1, arg2, arg3);
}
(id, "kris_play", "=", false);
477
    
c_waitcustom
c_waitcustom

function
c_waitcustom()
{
c_cmd("waitcustom", 0, 0, 0, 0);
}
();
478
}
479
if (con == 51 && !d_ex() && customcon == 1)
480
{
481
    con = 55;
482
    customcon = 0;
483
    blackall = 
scr_dark_marker
scr_dark_marker

function
scr_dark_marker(arg0, arg1, arg2)
{ thismarker = instance_create(arg0, arg1, obj_marker); with (thismarker) { sprite_index = arg2; image_speed = 0; image_xscale = 2; image_yscale = 2; } return thismarker; }
(-10, -100, spr_pixel_white);
484
    blackall.image_xscale = room_width;
485
    blackall.image_yscale = room_height;
486
    blackall.depth = 100;
487
    blackall.image_alpha = 0;
488
    blackall.image_blend = c_black;
489
    
c_waitcustom_end
c_waitcustom_end

function
c_waitcustom_end()
{ with (obj_cutscene_master) { cs_wait_custom = 0; waiting = 0; } }
();
490
    
c_pannable
c_pannable

function
c_pannable(arg0)
{
c_cmd("pannable", arg0, 0, 0, 0);
}
(1);
491
    
c_panspeed
c_panspeed

function
c_panspeed(arg0, arg1, arg2)
{
c_cmd("panspeed", arg0, arg1, arg2, 0);
}
(0, -4, 120);
492
    
c_mus2
c_mus2

function
c_mus2(arg0, arg1, arg2)
{
c_cmd("mus", arg0, arg1, arg2, 0);
}
("volume", 0, 90);
493
    
c_var_lerp_instance
c_var_lerp_instance

function
c_var_lerp_instance()
{ if (argument_count < 6)
c_cmd_x("var", argument[0], argument[1], argument[2], argument[3], argument[4], 0);
else if (argument_count == 6)
c_cmd_x("var", argument[0], argument[1], argument[2], argument[3], argument[4], argument[5]);
else if (argument_count == 7)
c_cmd_x("var", argument[0], argument[1], argument[2], argument[3], argument[4], string(argument[5]) + string(argument[6]));
} function c_lerp_var_instance() { if (argument_count >= 6)
c_var_lerp_instance(argument0, argument1, argument2, argument3, argument4, argument5);
else if (argument_count >= 7)
c_var_lerp_instance(argument0, argument1, argument2, argument3, argument4, argument5, argument6);
else
c_var_lerp_instance(argument0, argument1, argument2, argument3, argument4);
} function c_lerpvar_instance() { if (argument_count >= 6)
c_var_lerp_instance(argument0, argument1, argument2, argument3, argument4, argument5);
else if (argument_count >= 7)
c_var_lerp_instance(argument0, argument1, argument2, argument3, argument4, argument5, argument6);
else
c_var_lerp_instance(argument0, argument1, argument2, argument3, argument4);
}
(blackall, "image_alpha", 0, 1, 60);
494
    
c_customfunc
c_customfunc

function
c_customfunc(arg0, arg1 = -1)
{ if (instance_exists(obj_cutscene_master)) { with (obj_cutscene_master) array_push(customfuncs, arg0);
c_cmd("customfunc", arg1, 0, 0, 0);
} } function c_delay_customfunc(arg0, arg1, arg2 = -1) { if (instance_exists(obj_cutscene_master))
c_cmd_x("delaycmd", arg0, "customfunc", arg2, arg1, 0, 0);
}
(function()
495
    {
496
        with (obj_border_controller)
497
            hide_border(0.025);
498
    });
499
    
c_wait
c_wait

function
c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
}
(60);
500
    
c_mus2
c_mus2

function
c_mus2(arg0, arg1, arg2)
{
c_cmd("mus", arg0, arg1, arg2, 0);
}
("initloop", "pianpian.ogg", 0);
501
    
c_wait
c_wait

function
c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
}
(130);
502
    
c_waitcustom
c_waitcustom

function
c_waitcustom()
{
c_cmd("waitcustom", 0, 0, 0, 0);
}
();
503
}
504
if (con == 55 && customcon == 1)
505
{
506
    con = 60;
507
    global.tempflag[94] = 1;
508
    room_persistent = true;
509
    room_goto(room_dw_church_gersonstudy);
510
    exit;
511
}
512
if (con == 60 && customcon == 1 && !d_ex())
513
{
514
    con = 70;
515
    global.tempflag[94] = 0;
516
    if (
scr_flag_get
scr_flag_get

function
scr_flag_get(arg0)
{ var flag_value = global.flag[arg0]; return flag_value; } function scr_flag_name_get(arg0) { if (!global.is_console) { var v = global.flagname[arg0]; return is_undefined(v) ? "*unknown flag*" : v; } else { return ""; } } function scr_getflag(arg0) { return
scr_flag_get(arg0);
}
(847) == 3)
517
        con = 72;
518
    customcon = 0;
519
    room_persistent = false;
520
    
c_waitcustom_end
c_waitcustom_end

function
c_waitcustom_end()
{ with (obj_cutscene_master) { cs_wait_custom = 0; waiting = 0; } }
();
521
    
c_pan
c_pan

function
c_pan(arg0, arg1, arg2)
{
c_cmd("pan", arg0, arg1, arg2, 0);
}
(roomoffset, 0, 1);
522
    
c_wait
c_wait

function
c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
}
(1);
523
    
c_waitcustom
c_waitcustom

function
c_waitcustom()
{
c_cmd("waitcustom", 0, 0, 0, 0);
}
();
524
}
525
if (con == 70 && customcon == 1)
526
{
527
    con = 71;
528
    customcon = 0;
529
    
c_waitcustom_end
c_waitcustom_end

function
c_waitcustom_end()
{ with (obj_cutscene_master) { cs_wait_custom = 0; waiting = 0; } }
();
530
    
c_wait
c_wait

function
c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
}
(90);
531
    
c_sel
c_sel

function
c_sel(arg0)
{
c_cmd("select", arg0, 0, 0, 0);
}
(kr);
532
    
c_autodepth
c_autodepth

function
c_autodepth(arg0)
{
c_cmd("autodepth", arg0, 0, 0, 0);
}
(1);
533
    
c_autowalk
c_autowalk

function
c_autowalk(arg0)
{
c_cmd("autowalk", arg0, 0, 0, 0);
}
(1);
534
    
c_facing
c_facing

function
c_facing(arg0)
{
c_cmd("facing", arg0, 0, 0, 0);
}
("u");
535
    
c_wait
c_wait

function
c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
}
(60);
536
    
c_waitcustom
c_waitcustom

function
c_waitcustom()
{
c_cmd("waitcustom", 0, 0, 0, 0);
}
();
537
}
538
if (con == 71 && customcon == 1)
539
    con = 72;
540
if (con == 72 && customcon == 1)
541
{
542
    con = 75;
543
    customcon = 0;
544
    
c_waitcustom_end
c_waitcustom_end

function
c_waitcustom_end()
{ with (obj_cutscene_master) { cs_wait_custom = 0; waiting = 0; } }
();
545
    
c_customfunc
c_customfunc

function
c_customfunc(arg0, arg1 = -1)
{ if (instance_exists(obj_cutscene_master)) { with (obj_cutscene_master) array_push(customfuncs, arg0);
c_cmd("customfunc", arg1, 0, 0, 0);
} } function c_delay_customfunc(arg0, arg1, arg2 = -1) { if (instance_exists(obj_cutscene_master))
c_cmd_x("delaycmd", arg0, "customfunc", arg2, arg1, 0, 0);
}
(function()
546
    {
547
        with (obj_border_controller)
548
            show_border(1);
549
    });
550
    
c_wait
c_wait

function
c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
}
(1);
551
    
c_mus
c_mus

function
c_mus(arg0)
{
c_cmd("mus", arg0, 0, 0, 0);
}
("free_all");
552
    c_sound_play(snd_pianonoise);
553
    
c_var_instance
c_var_instance

function
c_var_instance(arg0, arg1, arg2)
{
c_cmd_x("var", arg0, arg1, arg2, 0, 0, 0);
}
(blackall, "image_alpha", 0);
554
    
c_wait
c_wait

function
c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
}
(30);
555
    
c_sel
c_sel

function
c_sel(arg0)
{
c_cmd("select", arg0, 0, 0, 0);
}
(su);
556
    
c_autowalk
c_autowalk

function
c_autowalk(arg0)
{
c_cmd("autowalk", arg0, 0, 0, 0);
}
(0);
557
    
c_imagespeed
c_imagespeed

function
c_imagespeed(arg0)
{
c_cmd("imagespeed", arg0, 0, 0, 0);
}
(0.2);
558
    
c_sprite
c_sprite

function
c_sprite(arg0)
{
c_cmd("sprite", arg0, 0, 0, 0);
}
(spr_susie_head_scratch_dw);
559
    
c_addxy
c_addxy

function
c_addxy(arg0, arg1)
{
c_cmd("addxy", arg0, arg1, 0, 0);
}
(0, -6);
560
    
c_msgside
c_msgside

function
c_msgside(arg0)
{
c_cmd("msgside", arg0, 0, 0, 0);
}
("top");
561
    
c_speaker
c_speaker

function
c_speaker(arg0)
{
c_cmd("speaker", arg0, 0, 0, 0);
}
("susie");
562
    
c_msgsetloc
c_msgsetloc

function
c_msgsetloc(arg0, arg1, arg2)
{ var msg_index = arg0; var english = arg1; var localized_string_id = arg2; var str = english; if (!is_english()) str =
scr_84_get_lang_string(localized_string_id);
c_msgset(msg_index, str);
}
(0,
Face 6* Hey,Delay 11 why'd you stop? That was cool.Wait for input
"\\E6* Hey^1, why'd you stop? That was cool./", "obj_dw_church_organ_slash_Step_0_gml_790_0"
);
563
    
c_msgnextloc
c_msgnextloc

function
c_msgnextloc(arg0, arg1)
{ var str = arg0; var localized_string_id = arg1; if (!is_english()) str =
scr_84_get_lang_string(localized_string_id);
c_msgnext(str);
}
(
Face N* ...Delay 11 You should,Delay 11 uh,Delay 11 play more.Wait for inputClose Message
"\\EN* ..^1. You should^1, uh^1, play more./%", "obj_dw_church_organ_slash_Step_0_gml_791_0"
);
564
    
c_talk
c_talk

function
c_talk()
{
c_cmd("talk", 0, 0, 0, 0);
}
();
565
    
c_wait_box
c_wait_box

function
c_wait_box(arg0)
{
c_cmd("waitbox", arg0, 0, 0, 0);
}
(1);
566
    
c_sel
c_sel

function
c_sel(arg0)
{
c_cmd("select", arg0, 0, 0, 0);
}
(su);
567
    
c_autowalk
c_autowalk

function
c_autowalk(arg0)
{
c_cmd("autowalk", arg0, 0, 0, 0);
}
(1);
568
    
c_facing
c_facing

function
c_facing(arg0)
{
c_cmd("facing", arg0, 0, 0, 0);
}
("u");
569
    
c_halt
c_halt

function
c_halt()
{
c_cmd("halt", 0, 0, 0, 0);
}
();
570
    
c_addxy
c_addxy

function
c_addxy(arg0, arg1)
{
c_cmd("addxy", arg0, arg1, 0, 0);
}
(0, 6);
571
    
c_wait_talk
c_wait_talk

function
c_wait_talk()
{
c_cmd("waitdialoguer", 0, 0, 0, 0);
}
();
572
    
c_wait
c_wait

function
c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
}
(30);
573
    
c_sel
c_sel

function
c_sel(arg0)
{
c_cmd("select", arg0, 0, 0, 0);
}
(su);
574
    
c_sprite
c_sprite

function
c_sprite(arg0)
{
c_cmd("sprite", arg0, 0, 0, 0);
}
(spr_susie_hand_up);
575
    
c_addxy
c_addxy

function
c_addxy(arg0, arg1)
{
c_cmd("addxy", arg0, arg1, 0, 0);
}
(0, -4);
576
    
c_speaker
c_speaker

function
c_speaker(arg0)
{
c_cmd("speaker", arg0, 0, 0, 0);
}
("susie");
577
    
c_msgsetloc
c_msgsetloc

function
c_msgsetloc(arg0, arg1, arg2)
{ var msg_index = arg0; var english = arg1; var localized_string_id = arg2; var str = english; if (!is_english()) str =
scr_84_get_lang_string(localized_string_id);
c_msgset(msg_index, str);
}
(0,
Face M* Seriously,Delay 11 you're an idiot if you quit playing.Wait for input
"\\EM* Seriously^1, you're an idiot if you quit playing./", "obj_dw_church_organ_slash_Step_0_gml_811_0"
);
578
    
c_facenext
c_facenext

function
c_facenext(arg0, arg1)
{
c_cmd("msgfacenext", arg0, arg1, 0, 0);
}
("ralsei", 2);
579
    
c_msgnextloc
c_msgnextloc

function
c_msgnextloc(arg0, arg1)
{ var str = arg0; var localized_string_id = arg1; if (!is_english()) str =
scr_84_get_lang_string(localized_string_id);
c_msgnext(str);
}
(
Face 2* (...Delay 11 Susie...Delay 11 is nice,Delay 11 isn't she,Delay 11 Kris.)Wait for inputClose Message
"\\E2* (..^1. Susie..^1. is nice^1, isn't she^1, Kris.)/%", "obj_dw_church_organ_slash_Step_0_gml_813_0"
);
580
    
c_talk
c_talk

function
c_talk()
{
c_cmd("talk", 0, 0, 0, 0);
}
();
581
    
c_wait_box
c_wait_box

function
c_wait_box(arg0)
{
c_cmd("waitbox", arg0, 0, 0, 0);
}
(2);
582
    
c_sel
c_sel

function
c_sel(arg0)
{
c_cmd("select", arg0, 0, 0, 0);
}
(su);
583
    
c_autowalk
c_autowalk

function
c_autowalk(arg0)
{
c_cmd("autowalk", arg0, 0, 0, 0);
}
(1);
584
    
c_facing
c_facing

function
c_facing(arg0)
{
c_cmd("facing", arg0, 0, 0, 0);
}
("u");
585
    
c_halt
c_halt

function
c_halt()
{
c_cmd("halt", 0, 0, 0, 0);
}
();
586
    
c_addxy
c_addxy

function
c_addxy(arg0, arg1)
{
c_cmd("addxy", arg0, arg1, 0, 0);
}
(0, 4);
587
    
c_sel
c_sel

function
c_sel(arg0)
{
c_cmd("select", arg0, 0, 0, 0);
}
(ra);
588
    
c_sprite
c_sprite

function
c_sprite(arg0)
{
c_cmd("sprite", arg0, 0, 0, 0);
}
(spr_ralsei_turn_right_subtle);
589
    
c_wait_talk
c_wait_talk

function
c_wait_talk()
{
c_cmd("waitdialoguer", 0, 0, 0, 0);
}
();
590
    
c_sel
c_sel

function
c_sel(arg0)
{
c_cmd("select", arg0, 0, 0, 0);
}
(ra);
591
    
c_facing
c_facing

function
c_facing(arg0)
{
c_cmd("facing", arg0, 0, 0, 0);
}
("u");
592
    
c_wait
c_wait

function
c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
}
(15);
593
    
c_var_instance
c_var_instance

function
c_var_instance(arg0, arg1, arg2)
{
c_cmd_x("var", arg0, arg1, arg2, 0, 0, 0);
}
(id, "solved", true);
594
    
c_waitcustom
c_waitcustom

function
c_waitcustom()
{
c_cmd("waitcustom", 0, 0, 0, 0);
}
();
595
}
596
if (con == 72 && customcon == 1 && !d_ex())
597
{
598
    con = 75;
599
    customcon = 0;
600
    
c_waitcustom_end
c_waitcustom_end

function
c_waitcustom_end()
{ with (obj_cutscene_master) { cs_wait_custom = 0; waiting = 0; } }
();
601
    
c_var_lerp_instance
c_var_lerp_instance

function
c_var_lerp_instance()
{ if (argument_count < 6)
c_cmd_x("var", argument[0], argument[1], argument[2], argument[3], argument[4], 0);
else if (argument_count == 6)
c_cmd_x("var", argument[0], argument[1], argument[2], argument[3], argument[4], argument[5]);
else if (argument_count == 7)
c_cmd_x("var", argument[0], argument[1], argument[2], argument[3], argument[4], string(argument[5]) + string(argument[6]));
} function c_lerp_var_instance() { if (argument_count >= 6)
c_var_lerp_instance(argument0, argument1, argument2, argument3, argument4, argument5);
else if (argument_count >= 7)
c_var_lerp_instance(argument0, argument1, argument2, argument3, argument4, argument5, argument6);
else
c_var_lerp_instance(argument0, argument1, argument2, argument3, argument4);
} function c_lerpvar_instance() { if (argument_count >= 6)
c_var_lerp_instance(argument0, argument1, argument2, argument3, argument4, argument5);
else if (argument_count >= 7)
c_var_lerp_instance(argument0, argument1, argument2, argument3, argument4, argument5, argument6);
else
c_var_lerp_instance(argument0, argument1, argument2, argument3, argument4);
}
(blackall, "image_alpha", 1, 0, 30);
602
    
c_wait
c_wait

function
c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
}
(30);
603
    
c_waitcustom
c_waitcustom

function
c_waitcustom()
{
c_cmd("waitcustom", 0, 0, 0, 0);
}
();
604
}
605
if (con == 75 && customcon == 1 && !d_ex())
606
{
607
    con = 80;
608
    customcon = 0;
609
    
c_waitcustom_end
c_waitcustom_end

function
c_waitcustom_end()
{ with (obj_cutscene_master) { cs_wait_custom = 0; waiting = 0; } }
();
610
    
c_sel
c_sel

function
c_sel(arg0)
{
c_cmd("select", arg0, 0, 0, 0);
}
(kr);
611
    
c_walkdirect
c_walkdirect

function
c_walkdirect(arg0, arg1, arg2)
{
c_cmd("walkdirect", arg0, arg1, arg2, 0);
}
(kr_actor.x - 50, kr_actor.y, 12);
612
    
c_delaywalkdirect
c_delaywalkdirect

function
c_delaywalkdirect(arg0, arg1, arg2, arg3)
{
c_cmd_x("delaycmd", arg0, "walkdirect", arg1, arg2, arg3, 0);
}
(13, kr_actor.x - 50, kr_actor.y + 40, 12);
613
    
c_delaywalkdirect
c_delaywalkdirect

function
c_delaywalkdirect(arg0, arg1, arg2, arg3)
{
c_cmd_x("delaycmd", arg0, "walkdirect", arg1, arg2, arg3, 0);
}
(26, kr_actor.x, kr_actor.y + 40, 12);
614
    
c_delayfacing
c_delayfacing

function
c_delayfacing(arg0, arg1)
{
c_cmd_x("delaycmd", arg0, "facing", arg1, 0, 0, 0);
}
(39, "d");
615
    
c_wait
c_wait

function
c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
}
(44);
616
    
c_var_instance
c_var_instance

function
c_var_instance(arg0, arg1, arg2)
{
c_cmd_x("var", arg0, arg1, arg2, 0, 0, 0);
}
(id, "set_party", true);
617
    
c_mus
c_mus

function
c_mus(arg0)
{
c_cmd("mus", arg0, 0, 0, 0);
}
("free_all");
618
    
c_mus2
c_mus2

function
c_mus2(arg0, arg1, arg2)
{
c_cmd("mus", arg0, arg1, arg2, 0);
}
("initloop", "bell_ambience.ogg", 0);
619
    
c_mus2
c_mus2

function
c_mus2(arg0, arg1, arg2)
{
c_cmd("mus", arg0, arg1, arg2, 0);
}
("volume", 0, 0);
620
    
c_mus2
c_mus2

function
c_mus2(arg0, arg1, arg2)
{
c_cmd("mus", arg0, arg1, arg2, 0);
}
("volume", 1, 120);
621
    
c_panobj
c_panobj

function
c_panobj(arg0, arg1)
{
c_cmd("panobj", arg0, arg1, 0, 0);
}
(kr_actor, 30);
622
    
c_wait
c_wait

function
c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
}
(31);
623
    
c_pannable
c_pannable

function
c_pannable(arg0)
{
c_cmd("pannable", arg0, 0, 0, 0);
}
(0);
624
    
c_actortokris
c_actortokris

function
c_actortokris()
{
c_cmd("actortokris", 0, 0, 0, 0);
}
();
625
    
c_actortocaterpillar
c_actortocaterpillar

function
c_actortocaterpillar()
{
c_cmd("actortocaterpillar", 0, 0, 0, 0);
}
();
626
    
c_terminatekillactors
c_terminatekillactors

function
c_terminatekillactors()
{
c_cmd("terminatekillactors", 0, 0, 0, 0);
}
();
627
}
628
if (con == 80 && !i_ex(obj_cutscene_master))
629
{
630
    con = 0;
631
    global.interact = 0;
632
    global.facing = 0;
633
    global.plot = 185;
634
    event_user(1);
635
    doalpha = 0;
636
    realpha = 0;
637
    mialpha = 0;
638
    faalpha = 0;
639
    soalpha = 0;
640
    laalpha = 0;
641
    tialpha = 0;
642
    doaalpha = 0;
643
    playalpha = 0;
644
    pitchalpha = 0;
645
    playlog = [];
646
    playlog[0] = 0;
647
    playindex = -1;
648
    timer = 0;
649
    buffer = 0;
650
    soundtoplay = 0;
651
    with (obj_caterpillarchara)
652
    {
653
        follow = 1;
654
        fun = 0;
655
        
scr_caterpillar_interpolate
scr_caterpillar_interpolate

function
scr_caterpillar_interpolate(arg0 = "none")
{ if (arg0 == "all") { with (obj_caterpillarchara) scr_caterpillar_interpolate_old(); } else if (arg0 == "none") { if (object_index == obj_caterpillarchara) scr_caterpillar_interpolate_old(); } else { with (obj_caterpillarchara) { if (name == arg0) scr_caterpillar_interpolate_old(); } } } function scr_caterinterp(arg0 = "none") {
scr_caterpillar_interpolate(arg0);
} function scr_caterpillar_interpolate_old() { _newfacing =
scr_facing_letter_to_number(
scr_get_cardinal_direction(point_direction(x, y, obj_mainchara.x, obj_mainchara.y)));
remx[0] = obj_mainchara.x; remy[0] = obj_mainchara.y; facing[0] = _newfacing; for (_iaia = target; _iaia > 0; _iaia -= 1) { remx[_iaia] = lerp(obj_mainchara.x, x, _iaia / target); if (global.darkzone == 1) remy[_iaia] = lerp(obj_mainchara.y, y + 16, _iaia / target); else remy[_iaia] = lerp(obj_mainchara.y, y + 6, _iaia / target); facing[_iaia] = _newfacing; } }
();
656
    }
657
    global.currentroom = room;
658
    
scr_tempsave
scr_tempsave

function
scr_tempsave()
{ filechoicebk2 = global.filechoice; global.filechoice = 9;
scr_saveprocess(global.filechoice);
global.filechoice = filechoicebk2; }
();
659
}
660
if (con == 1000 && !button3_h())
661
    con = 1001;
662
if (con == 1001 && !d_ex())
663
{
664
    play_cancel();
665
    con = 0;
666
}
667
if (set_party)
668
{
669
    set_party = false;
670
    
scr_setparty
scr_setparty

function
scr_setparty(arg0 = false, arg1 = false, arg2 = false)
{ var kris = obj_mainchara; var slot = 0; var __make = true; if (!i_ex(kris)) __make = false;
scr_losechar();
safe_delete(obj_caterpillarchara); if (arg0 == true) {
scr_getchar(2);
if (__make) { with (
scr_makecaterpillar(kris.x, kris.y, 2, slot))
{ halign = (global.darkzone == 0) ? 3 : 6; valign = (global.darkzone == 0) ? 6 : 16; x -= halign; y -= valign; } } slot++; } if (arg1 == true) {
scr_getchar(3);
if (__make) { with (
scr_makecaterpillar(kris.x, kris.y, 3, slot))
{ halign = 2; valign = 12; x -= halign; y -= valign; } } slot++; } if (arg2 == true) {
scr_getchar(4);
if (__make) { with (
scr_makecaterpillar(kris.x, kris.y, 4, slot))
{ halign = (global.darkzone == 0) ? 2 : 4; valign = (global.darkzone == 0) ? 9 : 18; x -= halign; y -= valign; } } slot++; } }
(1, 1, 0);
671
    var sus_x = su_actor.x;
672
    var sus_y = su_actor.y;
673
    var ral_x = ra_actor.x;
674
    var ral_y = ra_actor.y;
675
    with (obj_caterpillarchara)
676
    {
677
        follow = 0;
678
        fun = 1;
679
        if (name == "susie")
680
        {
681
            x = sus_x;
682
            y = sus_y;
683
        }
684
        else
685
        {
686
            x = ral_x;
687
            y = ral_y;
688
        }
689
        visible = 1;
690
        sprite_index = usprite;
691
    }
692
}
693
if (kris_play)
694
{
695
    if (piano_player == -4)
696
    {
697
        piano_player = instance_create(kr_actor.x, kr_actor.y, obj_ch4_DCA09_piano);
698
        kr_actor.visible = 0;
699
    }
700
    else if (piano_player.piano_finish)
701
    {
702
        kris_play = false;
703
        with (piano_player)
704
        {
705
            with (kris_marker)
706
                instance_destroy();
707
            instance_destroy();
708
        }
709
        kr_actor.visible = 1;
710
    }
711
    else
712
    {
713
    }
714
}
715
if (
scr_debug
scr_debug

function
scr_debug()
{ if (global.debug == 1) return 1; }
())
716
{
717
    if (keyboard_check_pressed(vk_backspace))
718
        endlessplaylog = "";
719
    if (keyboard_check_pressed(ord("O")))
720
        clipboard_set_text(endlessplaylog);
721
    if (keyboard_check(vk_up))
722
    {
723
        if (keyboard_check_pressed(ord("H")))
724
        {
725
            var inp = "";
726
            var answer = "";
727
            var hint = get_string("Insert String, Receive Combo", "");
728
            debug_print("stringLength=" + string(string_length(hint)));
729
            for (var i = 1; i < (string_length(hint) + 1); i++)
730
            {
731
                var curcode = string_char_at(hint, i);
732
                var newcode = "";
733
                switch (curcode)
734
                {
735
                    case "a":
736
                        newcode = "⚪";
737
                        break;
738
                    case "i":
739
                        newcode = "ⓞ";
740
                        break;
741
                    case "b":
742
                        newcode = "→";
743
                        break;
744
                    case "j":
745
                        newcode = "⇨";
746
                        break;
747
                    case "c":
748
                        newcode = "↘";
749
                        break;
750
                    case "k":
751
                        newcode = "⇘";
752
                        break;
753
                    case "d":
754
                        newcode = "↓";
755
                        break;
756
                    case "l":
757
                        newcode = "⇩";
758
                        break;
759
                    case "e":
760
                        newcode = "↙";
761
                        break;
762
                    case "m":
763
                        newcode = "⇙";
764
                        break;
765
                    case "f":
766
                        newcode = "←";
767
                        break;
768
                    case "n":
769
                        newcode = "⇦";
770
                        break;
771
                    case "g":
772
                        newcode = "↖";
773
                        break;
774
                    case "o":
775
                        newcode = "⇖";
776
                        break;
777
                    case "h":
778
                        newcode = "↑";
779
                        break;
780
                    default:
781
                        newcode = "invalid answer: " + string_char_at(hint, i) + ",";
782
                        break;
783
                }
784
                inp = inp + newcode;
785
            }
786
            debug_message(inp);
787
            clipboard_set_text(hint + "=" + inp);
788
        }
789
    }
790
}