Deltarune (Chapter 5) script viewer

← back to main script listing

gml_Object_obj_ch5_LWF_town_school_Step_0

(view raw script w/o annotations or w/e)
1
if (con < 0)
2
    exit;
3
if (auto_mode)
4
{
5
    if (con == 0 && !i_ex(obj_cutscene_master))
6
    {
7
        con = 5;
8
        global.interact = 1;
9
        alarm[0]
 = 1;
gml_Object_obj_ch5_LWF_town_school_Alarm_0.gml

con++;
10
    }
11
    if (con == 6)
12
    {
13
        con = 7;
14
        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; }
();
15
        
scr_maincharacters_actors
scr_maincharacters_actors

function
scr_maincharacters_actors()
{ if (i_ex(obj_plat_player)) { scr_maincharacters_actors_plat(); exit; } 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; } } } }
();
16
        
c_sel
c_sel

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

function
c_setxy(arg0, arg1)
{
c_cmd("setxy", arg0, arg1, 0, 0);
}
(360, 200);
18
        
c_facing
c_facing

function
c_facing(arg0)
{
c_cmd("facing", arg0, 0, 0, 0);
}
("krislight_balloon");
19
        
c_sel
c_sel

function
c_sel(arg0)
{
c_cmd("select", arg0, 0, 0, 0);
}
(su);
20
        
c_setxy
c_setxy

function
c_setxy(arg0, arg1)
{
c_cmd("setxy", arg0, arg1, 0, 0);
}
(380, 194);
21
        
c_facing
c_facing

function
c_facing(arg0)
{
c_cmd("facing", arg0, 0, 0, 0);
}
("susieunhappy");
22
        
c_pannable
c_pannable

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

function
c_pan(arg0, arg1, arg2)
{
c_cmd("pan", arg0, arg1, arg2, 0);
}
(200, cameray(), 1);
24
        
c_wait
c_wait

function
c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
}
(1);
25
        
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);
26
        
c_sel
c_sel

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

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

function
c_sprite(arg0)
{
c_cmd("sprite", arg0, 0, 0, 0);
}
(spr_krisu_walk_balloon);
29
        
c_imagespeed
c_imagespeed

function
c_imagespeed(arg0)
{
c_cmd("imagespeed", arg0, 0, 0, 0);
} function c_image_speed(arg0) {
c_cmd("imagespeed", arg0, 0, 0, 0);
}
(0.1);
30
        
c_walkdirect_speed
c_walkdirect_speed

function
c_walkdirect_speed(arg0, arg1, arg2)
{
c_cmd("walkdirect", arg0, arg1, -arg2, 0);
}
(360, 160, 1);
31
        
c_sel
c_sel

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

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

function
c_sprite(arg0)
{
c_cmd("sprite", arg0, 0, 0, 0);
}
(spr_susie_walk_up_lw);
34
        
c_imagespeed
c_imagespeed

function
c_imagespeed(arg0)
{
c_cmd("imagespeed", arg0, 0, 0, 0);
} function c_image_speed(arg0) {
c_cmd("imagespeed", arg0, 0, 0, 0);
}
(0.1);
35
        
c_walkdirect_speed_wait
c_walkdirect_speed_wait

function
c_walkdirect_speed_wait(arg0, arg1, arg2)
{
c_cmd("walkdirect", arg0, arg1, -arg2, 1);
}
(380, 154, 1);
36
        
c_halt
c_halt

function
c_halt()
{
c_cmd("halt", 0, 0, 0, 0);
}
();
37
        
c_sel
c_sel

function
c_sel(arg0)
{
c_cmd("select", arg0, 0, 0, 0);
}
(kr);
38
        
c_halt
c_halt

function
c_halt()
{
c_cmd("halt", 0, 0, 0, 0);
}
();
39
        
c_wait
c_wait

function
c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
}
(30);
40
        
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()
41
        {
42
            show_convo("convo");
43
        });
44
    }
45
    if (con == 9 && customcon == 1 && !d_ex())
46
    {
47
        con = -1;
48
        customcon = 0;
49
        
c_waitcustom_end
c_waitcustom_end

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

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

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

function
c_sprite(arg0)
{
c_cmd("sprite", arg0, 0, 0, 0);
}
(spr_krisu_walk_balloon);
53
        
c_imagespeed
c_imagespeed

function
c_imagespeed(arg0)
{
c_cmd("imagespeed", arg0, 0, 0, 0);
} function c_image_speed(arg0) {
c_cmd("imagespeed", arg0, 0, 0, 0);
}
(0.1);
54
        
c_walkdirect_speed
c_walkdirect_speed

function
c_walkdirect_speed(arg0, arg1, arg2)
{
c_cmd("walkdirect", arg0, arg1, -arg2, 0);
}
(kr_actor.x, kr_actor.y - 50, 1);
55
        
c_sel
c_sel

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

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

function
c_sprite(arg0)
{
c_cmd("sprite", arg0, 0, 0, 0);
}
(spr_susie_walk_up_lw);
58
        
c_imagespeed
c_imagespeed

function
c_imagespeed(arg0)
{
c_cmd("imagespeed", arg0, 0, 0, 0);
} function c_image_speed(arg0) {
c_cmd("imagespeed", arg0, 0, 0, 0);
}
(0.1);
59
        
c_walkdirect_speed
c_walkdirect_speed

function
c_walkdirect_speed(arg0, arg1, arg2)
{
c_cmd("walkdirect", arg0, arg1, -arg2, 0);
}
(su_actor.x, su_actor.y - 50, 1);
60
        
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, 30);
61
        
c_wait
c_wait

function
c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
}
(60);
62
        
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()
63
        {
64
            instance_create(0, 0, obj_persistentfadein);
65
            room_goto(room_schoollobby );
66
        });
67
        
c_waitcustom
c_waitcustom

function
c_waitcustom()
{
c_cmd("waitcustom", 0, 0, 0, 0);
}
();
68
    }
69
}
70
else
71
{
72
    if (con == 10)
73
    {
74
        var triggered = false;
75
        var convo_flag = "";
76
        with (obj_trigger)
77
        {
78
            if (place_meeting(x, y, obj_mainchara))
79
            {
80
                if (extflag == "")
81
                    exit;
82
                triggered = true;
83
                convo_flag = extflag;
84
            }
85
        }
86
        if (triggered && !i_ex(obj_cutscene_master) && global.interact == 0)
87
        {
88
            con = 11;
89
            global.interact = 1;
90
            customcon = 0;
91
            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; }
();
92
            
scr_maincharacters_actors
scr_maincharacters_actors

function
scr_maincharacters_actors()
{ if (i_ex(obj_plat_player)) { scr_maincharacters_actors_plat(); exit; } 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; } } } }
();
93
            var kr_x_pos = 360;
94
            var kr_y_pos = 160;
95
            var kr_walktime = 
scr_calculate_move_distance
scr_calculate_move_distance

function
scr_calculate_move_distance(arg0, arg1, arg2, arg3, arg4 = 6)
{ var move_time = 1; var distance_time = round(point_distance(arg0, arg1, arg2, arg3) / arg4); if (distance_time > move_time) move_time = distance_time; return move_time; }
(kr_actor.x, kr_actor.y, kr_x_pos, kr_y_pos, 2);
96
            
c_sel
c_sel

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

function
c_walkdirect(arg0, arg1, arg2)
{
c_cmd("walkdirect", arg0, arg1, arg2, 0);
}
(kr_x_pos, kr_y_pos, kr_walktime);
98
            
c_delayfacing
c_delayfacing

function
c_delayfacing(arg0, arg1)
{
c_cmd_x("delaycmd", arg0, "facing", arg1, 0, 0, 0);
}
(kr_walktime + 1, "u");
99
            var su_x_pos = 380;
100
            var su_y_pos = 154;
101
            var su_walktime = 
scr_calculate_move_distance
scr_calculate_move_distance

function
scr_calculate_move_distance(arg0, arg1, arg2, arg3, arg4 = 6)
{ var move_time = 1; var distance_time = round(point_distance(arg0, arg1, arg2, arg3) / arg4); if (distance_time > move_time) move_time = distance_time; return move_time; }
(su_actor.x, su_actor.y, su_x_pos, su_y_pos, 2);
102
            
c_sel
c_sel

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

function
c_walkdirect(arg0, arg1, arg2)
{
c_cmd("walkdirect", arg0, arg1, arg2, 0);
}
(su_x_pos, su_y_pos, su_walktime);
104
            
c_delayfacing
c_delayfacing

function
c_delayfacing(arg0, arg1)
{
c_cmd_x("delaycmd", arg0, "facing", arg1, 0, 0, 0);
}
(su_walktime + 1, "u");
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);
}
(220, 40, kr_walktime);
107
            
c_wait
c_wait

function
c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
}
(su_walktime + 1);
108
            
c_wait
c_wait

function
c_wait(arg0)
{
c_cmd("wait", arg0, 0, 0, 0);
}
(30);
109
            
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()
110
            {
111
                show_convo("convo");
112
            });
113
        }
114
    }
115
    if (con == 11 && !d_ex() && customcon == 1)
116
    {
117
        con = -1;
118
        regain_control();
119
    }
120
}