Deltarune (Chapter 5) script viewer

← back to main script listing

gml_Object_obj_ch5_LWF_town_north_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
con = -1;
11
customcon = 0;
12
auto_mode = false;
13
blackall = -4;
14
_triggered_convos = [];
15
_trigger = instance_create(766, 0, obj_trigger);
16
with (_trigger)
17
{
18
    extflag = "convo";
19
    image_xscale = 2;
20
    image_yscale = 30;
21
}
22
_beach_trigger = instance_create(1690, 0, obj_trigger);
23
with (_beach_trigger)
24
{
25
    extflag = "beach";
26
    image_xscale = 2;
27
    image_yscale = 30;
28
}
29
_house_trigger = instance_create(350, 30, obj_trigger);
30
with (_house_trigger)
31
{
32
    extflag = "house";
33
    image_xscale = 30;
34
    image_yscale = 1;
35
}
36
_noelle_trigger = instance_create(315, 60, obj_trigger);
37
with (_noelle_trigger)
38
{
39
    extflag = "noelle";
40
    image_xscale = 1;
41
    image_yscale = 20;
42
}
43
44
enable = function()
45
{
46
    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;
47
    con = auto_mode ? 0 : 10;
48
};
49
50
disable = function()
51
{
52
    con = -1;
53
};
54
55
lose_control = function()
56
{
57
    global.interact = 1;
58
    kr_actor.x = obj_mainchara.x;
59
    kr_actor.y = obj_mainchara.y;
60
    kr_actor.sprite_index = obj_mainchara.sprite_index;
61
    var su_x = 0;
62
    var su_y = 0;
63
    var su_sprite = -4;
64
    with (obj_caterpillarchara)
65
    {
66
        if (name == "susie")
67
        {
68
            su_x = x;
69
            su_y = y;
70
            su_sprite = sprite_index;
71
        }
72
    }
73
    su_actor.x = su_x;
74
    su_actor.y = su_y;
75
    su_actor.sprite_index = su_sprite;
76
    with (obj_actor)
77
        visible = 1;
78
    with (obj_caterpillarchara)
79
        visible = 0;
80
    with (obj_mainchara)
81
        visible = 0;
82
};
83
84
regain_control = function()
85
{
86
    global.interact = 0;
87
    global.facing = 0;
88
    var kr_x = kr_actor.x;
89
    var kr_y = kr_actor.y;
90
    obj_mainchara.x = kr_x;
91
    obj_mainchara.y = kr_y;
92
    obj_mainchara.visible = 1;
93
    obj_mainchara.cutscene = 0;
94
    var su_x = su_actor.x;
95
    var su_y = su_actor.y;
96
    with (obj_caterpillarchara)
97
    {
98
        if (name == "susie")
99
        {
100
            x = su_x;
101
            y = su_y;
102
        }
103
        
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; } }
();
104
        visible = 1;
105
    }
106
    with (obj_actor)
107
        visible = 0;
108
};
109
110
show_convo = function(arg0)
111
{
112
    var times_triggered = 0;
113
    for (var i = 0; i < array_length(_triggered_convos); i++)
114
    {
115
        if (_triggered_convos[i] != arg0)
116
            continue;
117
        times_triggered++;
118
    }
119
    _triggered_convos[array_length(_triggered_convos)] = arg0;
120
    
c_waitcustom_end
c_waitcustom_end

function
c_waitcustom_end()
{ with (obj_cutscene_master) { cs_wait_custom = 0; waiting = 0; } }
();
121
    switch (arg0)
122
    {
123
        case "convo":
124
            
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, 1);
125
            
c_sel
c_sel

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

function
c_facing(arg0)
{
c_cmd("facing", arg0, 0, 0, 0);
}
("l");
127
            
c_sel
c_sel

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

function
c_sprite(arg0)
{
c_cmd("sprite", arg0, 0, 0, 0);
}
(spr_susie_head_turn_left);
129
            
c_speaker
c_speaker

function
c_speaker(arg0)
{
c_cmd("speaker", arg0, 0, 0, 0);
}
("susie");
130
            
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* ...Delay 11 hey,Delay 11 the lights are still up.Wait for input
"\\ED* ..^1. hey^1, the lights are still up./", "obj_ch5_LWF_town_north_slash_Create_0_gml_166_0"
);
131
            
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 kinda.Delay 11 Heh.Wait for inputClose Message
"\\ES* ..^1. kinda^1. Heh./%", "obj_ch5_LWF_town_north_slash_Create_0_gml_167_0"
);
132
            
c_talk
c_talk

function
c_talk()
{
c_cmd("talk", 0, 0, 0, 0);
}
();
133
            
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);
134
            
c_facing
c_facing

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

function
c_wait_talk()
{
c_cmd("waitdialoguer", 0, 0, 0, 0);
}
();
136
            break;
137
        case "beach":
138
            
c_sel
c_sel

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

function
c_setxy(arg0, arg1)
{
c_cmd("setxy", arg0, arg1, 0, 0);
}
(_beach_trigger.x - 20, kr_actor.y);
140
            
c_facing
c_facing

function
c_facing(arg0)
{
c_cmd("facing", arg0, 0, 0, 0);
}
("r");
141
            
c_sel
c_sel

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

function
c_facing(arg0)
{
c_cmd("facing", arg0, 0, 0, 0);
}
("r");
143
            
c_speaker
c_speaker

function
c_speaker(arg0)
{
c_cmd("speaker", arg0, 0, 0, 0);
}
("susie");
144
            
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* We...Delay 11 I mean,Delay 11 the two of us don't need to go there,Delay 11 right?Wait for input
"\\ES* We..^1. I mean^1, the two of us don't need to go there^1, right?/", "obj_ch5_LWF_town_north_slash_Create_0_gml_184_0"
);
145
            
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* Let's go.Wait for inputClose Message
"\\ET* Let's go./%", "obj_ch5_LWF_town_north_slash_Create_0_gml_185_0"
);
146
            if (times_triggered >= 1)
147
            {
148
                
c_speaker
c_speaker

function
c_speaker(arg0)
{
c_cmd("speaker", arg0, 0, 0, 0);
}
("susie");
149
                
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* Hey...Delay 11 we gotta go.Wait for inputClose Message
"\\ES* Hey..^1. we gotta go./%", "obj_ch5_LWF_town_north_slash_Create_0_gml_190_0"
);
150
            }
151
            
c_talk_wait
c_talk_wait

function
c_talk_wait()
{
c_talk();
c_waittalk();
} function c_talkwait() {
c_talk_wait();
}
();
152
            break;
153
        case "house":
154
            
c_sel
c_sel

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

function
c_setxy(arg0, arg1)
{
c_cmd("setxy", arg0, arg1, 0, 0);
}
(kr_actor.x, _house_trigger.y - 15);
156
            
c_facing
c_facing

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

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

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

function
c_speaker(arg0)
{
c_cmd("speaker", arg0, 0, 0, 0);
}
("susie");
160
            
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 heh,Delay 11 that's...Delay 11 not what I meant.Wait for input
"\\ES* ..^1. heh^1, that's..^1. not what I meant./", "obj_ch5_LWF_town_north_slash_Create_0_gml_204_0"
);
161
            
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* I mean,Delay 11 thanks,Delay 11 but...Wait for inputClose Message
"\\ET* I mean^1, thanks^1, but.../%", "obj_ch5_LWF_town_north_slash_Create_0_gml_205_0"
);
162
            if (times_triggered >= 1)
163
            {
164
                
c_speaker
c_speaker

function
c_speaker(arg0)
{
c_cmd("speaker", arg0, 0, 0, 0);
}
("susie");
165
                
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* Don't...Delay 11 worry about me staying over for a while.Wait for inputClose Message
"\\ES* Don't..^1. worry about me staying over for a while./%", "obj_ch5_LWF_town_north_slash_Create_0_gml_210_0"
);
166
            }
167
            
c_talk_wait
c_talk_wait

function
c_talk_wait()
{
c_talk();
c_waittalk();
} function c_talkwait() {
c_talk_wait();
}
();
168
            break;
169
        case "noelle":
170
            
c_sel
c_sel

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

function
c_setxy(arg0, arg1)
{
c_cmd("setxy", arg0, arg1, 0, 0);
}
(_noelle_trigger.x + 10, kr_actor.y);
172
            
c_facing
c_facing

function
c_facing(arg0)
{
c_cmd("facing", arg0, 0, 0, 0);
}
("l");
173
            
c_sel
c_sel

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

function
c_facing(arg0)
{
c_cmd("facing", arg0, 0, 0, 0);
}
("l");
175
            
c_speaker
c_speaker

function
c_speaker(arg0)
{
c_cmd("speaker", arg0, 0, 0, 0);
}
("susie");
176
            
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* Nah,Delay 11 I...Wait for input
"\\ES* Nah^1, I.../", "obj_ch5_LWF_town_north_slash_Create_0_gml_224_0"
);
177
            
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* I mean,Delay 11 it's not time for that,Delay 11 right.Wait for inputClose Message
"\\ET* I mean^1, it's not time for that^1, right./%", "obj_ch5_LWF_town_north_slash_Create_0_gml_225_0"
);
178
            
c_talk
c_talk

function
c_talk()
{
c_cmd("talk", 0, 0, 0, 0);
}
();
179
            
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);
180
            
c_sprite
c_sprite

function
c_sprite(arg0)
{
c_cmd("sprite", arg0, 0, 0, 0);
}
(spr_susie_head_down_left);
181
            
c_wait_talk
c_wait_talk

function
c_wait_talk()
{
c_cmd("waitdialoguer", 0, 0, 0, 0);
}
();
182
            break;
183
    }
184
    if (!auto_mode)
185
        
c_waitcustom
c_waitcustom

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