Deltarune (Chapter 4) script viewer

← back to main script listing

gml_Object_obj_room_castle_area_1_Step_0

(view raw script w/o annotations or w/e)
1
if (con < 0)
2
    exit;
3
if (con == 0)
4
{
5
    con = 1;
6
    global.facing = 0;
7
    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; }
();
8
    
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; } } } }
();
9
    
c_sel
c_sel

function
c_sel(arg0)
{
c_cmd("select", arg0, 0, 0, 0);
}
(kr);
10
    
c_setxy
c_setxy

function
c_setxy(arg0, arg1)
{
c_cmd("setxy", arg0, arg1, 0, 0);
}
(300, 180);
11
    
c_facing
c_facing

function
c_facing(arg0)
{
c_cmd("facing", arg0, 0, 0, 0);
}
("d");
12
    if (global.is_console)
13
        
c_var_instance
c_var_instance

function
c_var_instance(arg0, arg1, arg2)
{
c_cmd_x("var", arg0, arg1, arg2, 0, 0, 0);
}
(id, "border_change", true);
14
    
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);
}
(whiteall, "image_alpha", 1, 0, 30);
15
    
c_wait
c_wait

function
c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
}
(45);
16
    c_snd_play(snd_escaped);
17
    
c_wait
c_wait

function
c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
}
(30);
18
    c_snd_play(snd_locker);
19
    
c_wait
c_wait

function
c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
}
(30);
20
    
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()
21
    {
22
        sidenoise = snd_play(snd_dtrans_twinkle);
23
        snd_volume(sidenoise, 0.3, 0);
24
        snd_pitch(sidenoise, 0.6 + random(0.6));
25
    });
26
    
c_wait
c_wait

function
c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
}
(30);
27
    
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);
28
    
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()
29
    {
30
        with (obj_border_controller)
31
            show_border();
32
    });
33
    
c_wait
c_wait

function
c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
}
(30);
34
    
c_actortokris
c_actortokris

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

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

function
c_terminatekillactors()
{
c_cmd("terminatekillactors", 0, 0, 0, 0);
}
();
37
}
38
if (con == 1 && !i_ex(obj_cutscene_master))
39
{
40
    con = -1;
41
    global.interact = 0;
42
}
43
if (border_change)
44
{
45
    border_val = clamp(border_val + 0.04, 0, 1);
46
    var _val = border_val;
47
    with (obj_border_controller)
48
        overlay_color = merge_color(c_white, c_black, _val);
49
    if (border_val >= 1)
50
        border_change = false;
51
}