Deltarune (Chapter 5) script viewer

← back to main script listing

gml_Object_obj_ch5_LWF_town_mid_Create_0

(view raw script w/o annotations or w/e)
1
if (!i_ex(obj_ch5_LWF02_bg))
2
    var bg = instance_create(0, 0, obj_ch5_LWF02_bg);
3
if (!snd_is_playing(global.currentsong[1]))
4
{
5
    global.currentsong[0] = snd_init("festival_night.ogg");
6
    global.currentsong[1] = mus_loop(global.currentsong[0]);
7
    mus_volume(global.currentsong[1], 0, 0);
8
    mus_volume(global.currentsong[1], 1, 30);
9
}
10
customcon = 0;
11
auto_mode = 
scr_flag_get
scr_flag_get

function
scr_flag_get(arg0)
{ return global.flag[arg0]; } function scr_flag_name_get(arg0) { var v = global.flagname[arg0]; return is_undefined(v) ? "*unknown flag*" : v; } function scr_flag_get_ext(arg0, arg1, arg2 = 1) { if (arg1 < 0)
scr_flag_get(arg0);
else return scr_get_bitmask_value(global.flag[arg0], arg1, arg2); }
(1804) == 2;
12
con = auto_mode ? 0 : 10;
13
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, -10, spr_pixel_white);
14
blackall.image_xscale = 999;
15
blackall.image_yscale = 999;
16
blackall.depth = 100;
17
blackall.image_blend = c_black;
18
blackall.visible = auto_mode ? 1 : 0;
19
_trigger_active = false;
20
_trigger = instance_create(700, 100, obj_trigger);
21
with (_trigger)
22
{
23
    extflag = "convo";
24
    image_yscale = 2;
25
    image_xscale = 30;
26
}
27
_door_trigger = instance_create(1878, 90, obj_readable_room1);
28
with (_door_trigger)
29
{
30
    extflag = "night_door";
31
    image_xscale = 1.1;
32
}
33
_alley_trigger = instance_create(1740, 90, obj_trigger);
34
with (_alley_trigger)
35
{
36
    extflag = "alley";
37
    image_yscale = 2;
38
    image_xscale = 10;
39
}
40
41
lose_control = function()
42
{
43
    global.interact = 1;
44
    if (!i_ex(obj_cutscene_master))
45
    {
46
        global.interact = 1;
47
        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; }
();
48
        
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; } } } }
();
49
        
c_waitcustom
c_waitcustom

function
c_waitcustom()
{
c_cmd("waitcustom", 0, 0, 0, 0);
}
();
50
    }
51
    kr_actor.x = obj_mainchara.x;
52
    kr_actor.y = obj_mainchara.y;
53
    kr_actor.sprite_index = obj_mainchara.sprite_index;
54
    var su_x = 0;
55
    var su_y = 0;
56
    var su_sprite = -4;
57
    with (obj_caterpillarchara)
58
    {
59
        if (name == "susie")
60
        {
61
            su_x = x;
62
            su_y = y;
63
            su_sprite = sprite_index;
64
        }
65
    }
66
    su_actor.x = su_x;
67
    su_actor.y = su_y;
68
    su_actor.sprite_index = su_sprite;
69
    with (obj_actor)
70
        visible = 1;
71
    with (obj_caterpillarchara)
72
        visible = 0;
73
    with (obj_mainchara)
74
        visible = 0;
75
};
76
77
regain_control = function()
78
{
79
    global.interact = 0;
80
    global.facing = 0;
81
    var kr_x = kr_actor.x;
82
    var kr_y = kr_actor.y;
83
    obj_mainchara.x = kr_x;
84
    obj_mainchara.y = kr_y;
85
    obj_mainchara.visible = 1;
86
    obj_mainchara.cutscene = 0;
87
    var su_x = su_actor.x;
88
    var su_y = su_actor.y;
89
    with (obj_caterpillarchara)
90
    {
91
        if (name == "susie")
92
        {
93
            x = su_x;
94
            y = su_y;
95
        }
96
        
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() { var _newfacing = direction_to_object_bbox(id, 1198, true); remx[0] = obj_mainchara.x; remy[0] = obj_mainchara.y; facing[0] = _newfacing; for (var _iaia = target; _iaia > 0; _iaia -= 1) { remx[_iaia] = lerp(obj_mainchara.x, x + halign, _iaia / target); remy[_iaia] = lerp(obj_mainchara.y, y + valign, _iaia / target); facing[_iaia] = _newfacing; } }
();
97
        visible = 1;
98
    }
99
    with (obj_actor)
100
        visible = 0;
101
};
102
103
show_convo = function(arg0)
104
{
105
    customcon = 0;
106
    
c_waitcustom_end
c_waitcustom_end

function
c_waitcustom_end()
{ with (obj_cutscene_master) { cs_wait_custom = 0; waiting = 0; } }
();
107
    switch (arg0)
108
    {
109
        case "convo":
110
            
scr_flag_set
scr_flag_set

function
scr_flag_set(arg0, arg1)
{ global.flag[arg0] = arg1; } function scr_flag_set_ext(arg0, arg1, arg2, arg3 = 1) { if (arg1 < 0)
scr_flag_set(arg0, arg2);
else global.flag[arg0] = scr_set_bitmask_value(global.flag[arg0], arg1, arg2, arg3); }
(1805, 2);
111
            
c_sel
c_sel

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

function
c_facing(arg0)
{
c_cmd("facing", arg0, 0, 0, 0);
}
("d");
113
            
c_sel
c_sel

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

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

function
c_sprite(arg0)
{
c_cmd("sprite", arg0, 0, 0, 0);
}
(spr_susie_look_down_left_neutral);
116
            
c_msgside
c_msgside

function
c_msgside(arg0)
{
c_cmd("msgside", arg0, 0, 0, 0);
}
("bottom");
117
            
c_speaker
c_speaker

function
c_speaker(arg0)
{
c_cmd("speaker", arg0, 0, 0, 0);
}
("susie");
118
            
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* So,Delay 11 uhhh...Delay 11 about what I wanted to say...Wait for input
"\\ED* So^1, uhhh..^1. about what I wanted to say.../", "obj_ch5_LWF_town_mid_slash_Create_0_gml_148_0"
);
119
            
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* ...Delay 11 it's like...Wait for input
"\\ES* ..^1. it's like.../", "obj_ch5_LWF_town_mid_slash_Create_0_gml_149_0"
);
120
            
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 T* ...Delay 11 y'know.Wait for inputClose Message
"\\ET* ..^1. y'know./%", "obj_ch5_LWF_town_mid_slash_Create_0_gml_150_0"
);
121
            
c_talk
c_talk

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

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

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

function
c_facing(arg0)
{
c_cmd("facing", arg0, 0, 0, 0);
}
("d");
125
            
c_wait_box
c_wait_box

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

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

function
c_sprite(arg0)
{
c_cmd("sprite", arg0, 0, 0, 0);
}
(spr_susie_walk_down_lw_look);
128
            
c_wait_talk
c_wait_talk

function
c_wait_talk()
{
c_cmd("waitdialoguer", 0, 0, 0, 0);
}
();
129
            break;
130
        case "alley":
131
            
c_sel
c_sel

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

function
c_setxy(arg0, arg1)
{
c_cmd("setxy", arg0, arg1, 0, 0);
}
(kr_actor.x, _alley_trigger.y - 2);
133
            
c_facing
c_facing

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

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

function
c_facing(arg0)
{
c_cmd("facing", arg0, 0, 0, 0);
}
("u");
136
            
c_speaker
c_speaker

function
c_speaker(arg0)
{
c_cmd("speaker", arg0, 0, 0, 0);
}
("susie");
137
            
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 S* ...Delay 11 not over there.Wait for inputClose Message
"\\ES* ..^1. not over there./%", "obj_ch5_LWF_town_mid_slash_Create_0_gml_174_0"
);
138
            
c_talk_wait
c_talk_wait

function
c_talk_wait()
{
c_talk();
c_waittalk();
} function c_talkwait() {
c_talk_wait();
}
();
139
            break;
140
    }
141
    if (!auto_mode)
142
        
c_waitcustom
c_waitcustom

function
c_waitcustom()
{
c_cmd("waitcustom", 0, 0, 0, 0);
}
();
143
};