Deltarune (Chapter 4) script viewer

← back to main script listing

gml_Object_obj_dw_church_organ_Create_0

(view raw script w/o annotations or w/e)
1
siner = 0;
2
notes = instance_create(x, y, obj_dw_church_organ_notes);
3
notes.depth = 500;
4
if (
scr_debug
scr_debug

function
scr_debug()
{ if (global.debug == 1) return 1; }
())
5
{
6
    
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);
7
    if (keyboard_check(ord("1")))
8
    {
9
        debug_print("Came here for the first time.");
10
        
scr_keyitemremove
scr_keyitemremove

function
scr_keyitemremove(arg0)
{ removed = 0;
scr_keyitemcheck(arg0);
if (haveit == 1) { loc = 0; skip = 0; if (global.keyitem[0] == arg0 && skip == 0) { loc = 0; skip = 1; } if (global.keyitem[1] == arg0 && skip == 0) { loc = 1; skip = 1; } if (global.keyitem[2] == arg0 && skip == 0) { loc = 2; skip = 1; } if (global.keyitem[3] == arg0 && skip == 0) { loc = 3; skip = 1; } if (global.keyitem[4] == arg0 && skip == 0) { loc = 4; skip = 1; } if (global.keyitem[5] == arg0 && skip == 0) { loc = 5; skip = 1; } if (global.keyitem[6] == arg0 && skip == 0) { loc = 6; skip = 1; } if (global.keyitem[7] == arg0 && skip == 0) { loc = 7; skip = 1; } if (global.keyitem[8] == arg0 && skip == 0) { loc = 8; skip = 1; } if (global.keyitem[9] == arg0 && skip == 0) { loc = 9; skip = 1; } if (global.keyitem[10] == arg0 && skip == 0) { loc = 10; skip = 1; } if (global.keyitem[11] == arg0 && skip == 0) { loc = 11; skip = 1; }
scr_keyitemshift(loc, 0);
removed = 1; } } function scr_keyitemremove_all(arg0) { var count = 0; for (var i = 0; i < array_length(global.keyitem); i++) { if (global.keyitem[i] == arg0) count++; } repeat (count)
scr_keyitemremove(arg0);
}
(30);
11
        global.flag[847] = 0;
12
        global.plot = 170;
13
    }
14
    if (keyboard_check(ord("2")))
15
    {
16
        debug_print("Returned here after closing eyes with ralsei.");
17
        setxy(1200, 252, 1049);
18
        
scr_keyitemremove
scr_keyitemremove

function
scr_keyitemremove(arg0)
{ removed = 0;
scr_keyitemcheck(arg0);
if (haveit == 1) { loc = 0; skip = 0; if (global.keyitem[0] == arg0 && skip == 0) { loc = 0; skip = 1; } if (global.keyitem[1] == arg0 && skip == 0) { loc = 1; skip = 1; } if (global.keyitem[2] == arg0 && skip == 0) { loc = 2; skip = 1; } if (global.keyitem[3] == arg0 && skip == 0) { loc = 3; skip = 1; } if (global.keyitem[4] == arg0 && skip == 0) { loc = 4; skip = 1; } if (global.keyitem[5] == arg0 && skip == 0) { loc = 5; skip = 1; } if (global.keyitem[6] == arg0 && skip == 0) { loc = 6; skip = 1; } if (global.keyitem[7] == arg0 && skip == 0) { loc = 7; skip = 1; } if (global.keyitem[8] == arg0 && skip == 0) { loc = 8; skip = 1; } if (global.keyitem[9] == arg0 && skip == 0) { loc = 9; skip = 1; } if (global.keyitem[10] == arg0 && skip == 0) { loc = 10; skip = 1; } if (global.keyitem[11] == arg0 && skip == 0) { loc = 11; skip = 1; }
scr_keyitemshift(loc, 0);
removed = 1; } } function scr_keyitemremove_all(arg0) { var count = 0; for (var i = 0; i < array_length(global.keyitem); i++) { if (global.keyitem[i] == arg0) count++; } repeat (count)
scr_keyitemremove(arg0);
}
(30);
19
        global.flag[847] = 0;
20
        global.plot = 180;
21
    }
22
    if (keyboard_check(ord("3")))
23
    {
24
        debug_print("Returned here after getting the music sheet.");
25
        setxy(1200, 252, 1049);
26
        
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);
27
        global.plot = 180;
28
    }
29
    if (keyboard_check(ord("4")))
30
    {
31
        debug_print("Returned here after using the music sheet.");
32
        setxy(1200, 252, 1049);
33
        
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);
34
        global.flag[847] = 1;
35
        global.plot = 180;
36
    }
37
    with (obj_border_controller)
38
    {
39
        stop_custom_effect();
40
        set_border(border_dw_church_a, 1);
41
        show_border(1);
42
    }
43
}
44
engaged = false;
45
con = 0;
46
if (global.plot == 180 && !
scr_keyitemcheck
scr_keyitemcheck

function
scr_keyitemcheck(arg0)
{ haveit = 0; itemcount = 0; for (i = 0; i < 12; i += 1) { if (global.keyitem[i] == arg0) haveit = 1; if (global.keyitem[i] == arg0) itemcount += 1; } return haveit; }
(30))
47
    con = 30;
48
customcon = 0;
49
buffer = 0;
50
soundtoplay = 0;
51
depth = 999990;
52
arrows = 1229;
53
baselight = 0.25;
54
arrowsalpha = baselight;
55
doalpha = 0;
56
realpha = 0;
57
mialpha = 0;
58
faalpha = 0;
59
soalpha = 0;
60
laalpha = 0;
61
tialpha = 0;
62
doaalpha = 0;
63
playalpha = 0;
64
pitchalpha = 0;
65
playlog[0] = 0;
66
playlogstring = "";
67
playloganswer = "313249864843218454218";
68
playindex = -1;
69
timer = 0;
70
solved = 0;
71
endtimer = 0;
72
endtime = 15;
73
makenote = false;
74
masteralpha = 0;
75
set_party = false;
76
kris_play = false;
77
piano_player = -4;
78
piano_track = false;
79
endless = 0;
80
if (room == room_debug_pianotest)
81
    endless = true;
82
if (room == room_test_pianoGimmick)
83
    endless = true;
84
chair_marker = 
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; }
(848, 290, spr_dw_church_organ_large_chair);
85
with (chair_marker)
86
    
scr_depth
scr_depth

function
scr_depth(arg0 = id, arg1 = 0)
{ with (arg0) depth = 100000 - ((y * 10) + (sprite_height * 10) + (arg1 * 10)); }
();
87
organ_block = instance_create(x + 20, y + 240, obj_solidblockDark);
88
with (organ_block)
89
    image_xscale = 7;
90
is_canceled = false;
91
fail_counter = 0;
92
max_fail_count = string_length(playloganswer) + 8;
93
forceend = false;
94
95
move_to_position = function(arg0)
96
{
97
    global.interact = 1;
98
    playlogstring = "";
99
    is_canceled = false;
100
    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 && global.plot < 185)
101
        max_fail_count = 2;
102
    cutscene_master = 
scr_cutscene_make
scr_cutscene_make

function
scr_cutscene_make()
{ _cutscene_master = instance_create(0, 0, obj_cutscene_master); _cutscene_master.master_object = id; return _cutscene_master; }
();
103
    
scr_maincharacters_actors
scr_maincharacters_actors

function
scr_maincharacters_actors()
{ actor_count = 0; kr = 0; kr_actor = instance_create(obj_mainchara.x, obj_mainchara.y, obj_actor);
scr_actor_setup(kr, kr_actor, "kris");
kr_actor.sprite_index = obj_mainchara.sprite_index; kr_actor.depth = obj_mainchara.depth; with (obj_mainchara) visible = 0; for (__jj = 0; __jj < array_length_1d(global.cinstance); __jj++) { if (i_ex(global.cinstance[__jj])) { if (global.cinstance[__jj].name == "susie") { actor_count++; su = __jj + 1; su_actor = instance_create(global.cinstance[__jj].x, global.cinstance[__jj].y, obj_actor);
scr_actor_setup(su, su_actor, "susie");
su_actor.sprite_index = global.cinstance[__jj].sprite_index; su_actor.depth = global.cinstance[__jj].depth; with (global.cinstance[__jj]) visible = 0; } if (global.cinstance[__jj].name == "ralsei") { actor_count++; ra = __jj + 1; ra_actor = instance_create(global.cinstance[__jj].x, global.cinstance[__jj].y, obj_actor);
scr_actor_setup(ra, ra_actor, "ralsei");
ra_actor.sprite_index = global.cinstance[__jj].sprite_index; ra_actor.depth = global.cinstance[__jj].depth; with (global.cinstance[__jj]) visible = 0; } if (global.cinstance[__jj].name == "noelle") { actor_count++; no = __jj + 1; no_actor = instance_create(global.cinstance[__jj].x, global.cinstance[__jj].y, obj_actor);
scr_actor_setup(no, no_actor, "noelle");
no_actor.sprite_index = global.cinstance[__jj].sprite_index; no_actor.depth = global.cinstance[__jj].depth; with (global.cinstance[__jj]) visible = 0; } } } }
();
104
    
c_mus2
c_mus2

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

function
c_pannable(arg0)
{
c_cmd("pannable", arg0, 0, 0, 0);
}
(1);
106
    
c_pan
c_pan

function
c_pan(arg0, arg1, arg2)
{
c_cmd("pan", arg0, arg1, arg2, 0);
}
(560, cameray(), 15);
107
    
c_sel
c_sel

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

function
c_walkdirect(arg0, arg1, arg2)
{
c_cmd("walkdirect", arg0, arg1, arg2, 0);
}
(250 + arg0, kr_actor.y, 12);
109
    
c_delaywalkdirect
c_delaywalkdirect

function
c_delaywalkdirect(arg0, arg1, arg2, arg3)
{
c_cmd_x("delaycmd", arg0, "walkdirect", arg1, arg2, arg3, 0);
}
(13, 250 + arg0, 226, 12);
110
    
c_delaywalkdirect
c_delaywalkdirect

function
c_delaywalkdirect(arg0, arg1, arg2, arg3)
{
c_cmd_x("delaycmd", arg0, "walkdirect", arg1, arg2, arg3, 0);
}
(26, 302 + arg0, 226, 12);
111
    
c_delayfacing
c_delayfacing

function
c_delayfacing(arg0, arg1)
{
c_cmd_x("delaycmd", arg0, "facing", arg1, 0, 0, 0);
}
(39, "u");
112
    
c_sel
c_sel

function
c_sel(arg0)
{
c_cmd("select", arg0, 0, 0, 0);
}
(su);
113
    
c_walkdirect
c_walkdirect

function
c_walkdirect(arg0, arg1, arg2)
{
c_cmd("walkdirect", arg0, arg1, arg2, 0);
}
(344 + arg0, 272, 12);
114
    
c_sel
c_sel

function
c_sel(arg0)
{
c_cmd("select", arg0, 0, 0, 0);
}
(ra);
115
    
c_walkdirect_wait
c_walkdirect_wait

function
c_walkdirect_wait(arg0, arg1, arg2)
{
c_walkdirect(arg0, arg1, arg2);
c_wait(arg2);
}
(250 + arg0, 276, 12);
116
    
c_facing
c_facing

function
c_facing(arg0)
{
c_cmd("facing", arg0, 0, 0, 0);
}
("u");
117
    
c_sel
c_sel

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

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

function
c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
}
(30);
120
    
c_var_instance
c_var_instance

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

function
c_waitcustom()
{
c_cmd("waitcustom", 0, 0, 0, 0);
}
();
122
};
123
124
play_cancel = function()
125
{
126
    global.facing = 0;
127
    doalpha = 0;
128
    realpha = 0;
129
    mialpha = 0;
130
    faalpha = 0;
131
    soalpha = 0;
132
    laalpha = 0;
133
    tialpha = 0;
134
    doaalpha = 0;
135
    playalpha = 0;
136
    pitchalpha = 0;
137
    playlog = [];
138
    playlog[0] = 0;
139
    playindex = -1;
140
    timer = 0;
141
    buffer = 0;
142
    soundtoplay = 0;
143
    
c_waitcustom_end
c_waitcustom_end

function
c_waitcustom_end()
{ with (obj_cutscene_master) { cs_wait_custom = 0; waiting = 0; } }
();
144
    
c_mus
c_mus

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

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

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

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

function
c_sel(arg0)
{
c_cmd("select", arg0, 0, 0, 0);
}
(kr);
149
    
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);
150
    
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);
151
    
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);
152
    
c_delayfacing
c_delayfacing

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

function
c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
}
(44);
154
    
c_pannable
c_pannable

function
c_pannable(arg0)
{
c_cmd("pannable", arg0, 0, 0, 0);
}
(1);
155
    
c_panobj
c_panobj

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

function
c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
}
(16);
157
    
c_var_instance
c_var_instance

function
c_var_instance(arg0, arg1, arg2)
{
c_cmd_x("var", arg0, arg1, arg2, 0, 0, 0);
}
(id, "is_canceled", true);
158
    
c_actortokris
c_actortokris

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

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

function
c_terminatekillactors()
{
c_cmd("terminatekillactors", 0, 0, 0, 0);
}
();
161
};
162
163
if (!i_ex(obj_tutorial_text))
164
    instance_create(x, y, obj_tutorial_text);
165
if (global.plot >= 185)
166
    solved = 1;
167
depth = 900700;
168
endlessplaylog = "";