Deltarune (Chapter 1) script viewer

← back to main script listing

gml_Object_obj_thrashafter_event_Step_0

(view raw script w/o annotations or w/e)
1
if (con == 1)
2
{
3
    if (obj_mainchara.x >= (x - 140) && global.interact == 0)
4
    {
5
        snd_free_all();
6
        global.facing = 1;
7
        global.interact = 1;
8
        sprite_index = spr_lancer_lt;
9
        exc = instance_create(x + 40, y - 20, obj_excblcon);
10
        scr_caterpillar_facing
scr_caterpillar_facing

function scr_caterpillar_facing(arg0) { with (obj_caterpillarchara) { for (i = 0; i < 25; i += 1) facing[i] = arg0; } }
(global.facing);
11
        con = 2;
12
        alarm[4] = 30;
13
    }
14
}
15
if (con == 3)
16
{
17
    global.fe = 6;
18
    global.fc = 5;
19
    global.typer = 32;
20
    global.msg[0] = 
* Y...Delay 11 You got past Thrash World!?Wait for input
scr_84_get_lang_string
scr_84_get_lang_string

function scr_84_get_lang_string(arg0) { return ds_map_find_value(global.lang_map, arg0); }
("obj_thrashafter_event_slash_Step_0_gml_22_0")
;
21
    global.msg[1] = 
\E7* Hng...Delay 11 Even with your help,Delay 11 I couldn't stop you...Wait for input
scr_84_get_lang_string
scr_84_get_lang_string

function scr_84_get_lang_string(arg0) { return ds_map_find_value(global.lang_map, arg0); }
("obj_thrashafter_event_slash_Step_0_gml_23_0")
;
22
    scr_ralface
scr_ralface

function scr_ralface(arg0, arg1) { global.msg[arg0] = scr_84_get_subst_string(
\TX \F0 \E~1 \FR \TR Close Message
scr_84_get_lang_string("scr_ralface_slash_scr_ralface_gml_1_0")
, string(arg1)); }
(2, 6);
23
    global.msg[3] = 
* Hey,Delay 11 it's alright,Delay 11 Lancer.Delay 11 It was a nice effort.Wait for input
scr_84_get_lang_string
scr_84_get_lang_string

function scr_84_get_lang_string(arg0) { return ds_map_find_value(global.lang_map, arg0); }
("obj_thrashafter_event_slash_Step_0_gml_25_0")
;
24
    scr_susface
scr_susface

function scr_susface(arg0, arg1) { global.msg[arg0] = scr_84_get_subst_string(
\TX \F0 \E~1 \FS \TS Close Message
scr_84_get_lang_string("scr_susface_slash_scr_susface_gml_1_0")
, string(arg1)); }
(4, 0);
25
    global.msg[5] = 
* Yeah,Delay 11 I mean,Delay 11 you gotta be realistic.Wait for input
scr_84_get_lang_string
scr_84_get_lang_string

function scr_84_get_lang_string(arg0) { return ds_map_find_value(global.lang_map, arg0); }
("obj_thrashafter_event_slash_Step_0_gml_27_0")
;
26
    global.msg[6] = 
\E2* Nothing can stop us.Delay 11 Not even ourselves.Wait for input
scr_84_get_lang_string
scr_84_get_lang_string

function scr_84_get_lang_string(arg0) { return ds_map_find_value(global.lang_map, arg0); }
("obj_thrashafter_event_slash_Step_0_gml_28_0")
;
27
    name = 
Guys
scr_84_get_lang_string
scr_84_get_lang_string

function scr_84_get_lang_string(arg0) { return ds_map_find_value(global.lang_map, arg0); }
("obj_thrashafter_event_slash_Step_0_gml_29_0")
;
28
    if (global.flag[214 team_name] == 1)
29
        name = 
The (Censored) Squad
scr_84_get_lang_string
scr_84_get_lang_string

function scr_84_get_lang_string(arg0) { return ds_map_find_value(global.lang_map, arg0); }
("obj_thrashafter_event_slash_Step_0_gml_30_0")
;
30
    if (global.flag[214 team_name] == 2)
31
        name = 
The Lancer Fan Club
scr_84_get_lang_string
scr_84_get_lang_string

function scr_84_get_lang_string(arg0) { return ds_map_find_value(global.lang_map, arg0); }
("obj_thrashafter_event_slash_Step_0_gml_31_0")
;
32
    if (global.flag[214 team_name] == 3)
33
        name = 
The Friendly Fun Gang
scr_84_get_lang_string
scr_84_get_lang_string

function scr_84_get_lang_string(arg0) { return ds_map_find_value(global.lang_map, arg0); }
("obj_thrashafter_event_slash_Step_0_gml_32_0")
;
34
    scr_lanface
scr_lanface

function scr_lanface(arg0, arg1) { global.msg[arg0] = scr_84_get_subst_string(
\TX \F0 \E~1 \FL \TL Close Message
scr_84_get_lang_string("scr_lanface_slash_scr_lanface_gml_1_0")
, string(arg1)); }
(7, 3);
35
    global.msg[8] = scr_84_get_subst_string
scr_84_get_subst_string

function scr_84_get_subst_string() { var str = argument[0]; var sub_id = 1; length = string_length(str); pos = 0; while (sub_id < argument_count) { var sub = "~" + string(sub_id); str = string_replace_all(str, sub, argument[sub_id]); sub_id = sub_id + 1; } return str; }
(
* That's right!!Delay 11
* The ~1!!Wait for input
scr_84_get_lang_string
scr_84_get_lang_string

function scr_84_get_lang_string(arg0) { return ds_map_find_value(global.lang_map, arg0); }
("obj_thrashafter_event_slash_Step_0_gml_34_0")
, name);
36
    global.msg[9] = 
* You crush everything that gets in your way!Wait for inputClose Message
scr_84_get_lang_string
scr_84_get_lang_string

function scr_84_get_lang_string(arg0) { return ds_map_find_value(global.lang_map, arg0); }
("obj_thrashafter_event_slash_Step_0_gml_35_0")
;
37
    instance_create(0, 0, obj_dialoguer);
38
    con = 4;
39
}
40
if (con == 4 && !d_ex())
41
{
42
    sprite_index = spr_lancer_rt_unhappy;
43
    hspeed = 4;
44
    con = 5;
45
    alarm[4] = 10;
46
}
47
if (con == 5)
48
{
49
    hspeed = 0;
50
    con = 6;
51
    alarm[4] = 20;
52
}
53
if (con == 7)
54
{
55
    global.fe = 7;
56
    global.msg[0] = 
* Hmmm...Delay 11 What am I supposed to do,Delay 11 then...Wait for input
scr_84_get_lang_string
scr_84_get_lang_string

function scr_84_get_lang_string(arg0) { return ds_map_find_value(global.lang_map, arg0); }
("obj_thrashafter_event_slash_Step_0_gml_59_0")
;
57
    global.msg[1] = 
\E4* If I can't stop you,Delay 11 then...Wait for input
scr_84_get_lang_string
scr_84_get_lang_string

function scr_84_get_lang_string(arg0) { return ds_map_find_value(global.lang_map, arg0); }
("obj_thrashafter_event_slash_Step_0_gml_60_0")
;
58
    global.msg[2] = 
\E5* Then,Delay 11 my dad will...Wait for inputClose Message
scr_84_get_lang_string
scr_84_get_lang_string

function scr_84_get_lang_string(arg0) { return ds_map_find_value(global.lang_map, arg0); }
("obj_thrashafter_event_slash_Step_0_gml_61_0")
;
59
    instance_create(0, 0, obj_dialoguer);
60
    con = 8;
61
}
62
if (con == 8 && !d_ex())
63
{
64
    con = 9;
65
    alarm[4] = 20;
66
}
67
if (con == 10)
68
{
69
    global.typer = 30;
70
    global.fe = 12;
71
    global.fc = 1;
72
    global.msg[0] = 
* ...Wait for input
scr_84_get_lang_string
scr_84_get_lang_string

function scr_84_get_lang_string(arg0) { return ds_map_find_value(global.lang_map, arg0); }
("obj_thrashafter_event_slash_Step_0_gml_77_0")
;
73
    global.msg[1] = 
* Well...Wait for input
scr_84_get_lang_string
scr_84_get_lang_string

function scr_84_get_lang_string(arg0) { return ds_map_find_value(global.lang_map, arg0); }
("obj_thrashafter_event_slash_Step_0_gml_78_0")
;
74
    global.msg[2] = 
\E2* Why don't you come with us...Wait for input
scr_84_get_lang_string
scr_84_get_lang_string

function scr_84_get_lang_string(arg0) { return ds_map_find_value(global.lang_map, arg0); }
("obj_thrashafter_event_slash_Step_0_gml_79_0")
;
75
    global.msg[3] = 
\E1* And maybe you'll think of how to stop us on the way.Wait for inputClose Message
scr_84_get_lang_string
scr_84_get_lang_string

function scr_84_get_lang_string(arg0) { return ds_map_find_value(global.lang_map, arg0); }
("obj_thrashafter_event_slash_Step_0_gml_80_0")
;
76
    con = 11;
77
    instance_create(0, 0, obj_dialoguer);
78
}
79
if (con == 11 && !d_ex())
80
{
81
    sprite_index = spr_lancer_lt;
82
    hspeed = -8;
83
    con = 12;
84
    alarm[4] = 10;
85
}
86
if (con == 13)
87
{
88
    scr_halt
scr_halt

function scr_halt() { image_index = 0; image_speed = 0; speed = 0; }
();
89
    con = 14;
90
    alarm[4] = 15;
91
}
92
if (con == 15)
93
{
94
    global.fc = 5;
95
    global.fe = 6;
96
    global.msg[0] = 
* R...Delay 11 Really!?Delay 11
* You'd let me tag along...!?Wait for input
scr_84_get_lang_string
scr_84_get_lang_string

function scr_84_get_lang_string(arg0) { return ds_map_find_value(global.lang_map, arg0); }
("obj_thrashafter_event_slash_Step_0_gml_104_0")
;
97
    scr_susface
scr_susface

function scr_susface(arg0, arg1) { global.msg[arg0] = scr_84_get_subst_string(
\TX \F0 \E~1 \FS \TS Close Message
scr_84_get_lang_string("scr_susface_slash_scr_susface_gml_1_0")
, string(arg1)); }
(1, 2);
98
    global.msg[2] = 
* Sure,Delay 11 why not.Delay 11 You can be an unofficial team member.Wait for input
scr_84_get_lang_string
scr_84_get_lang_string

function scr_84_get_lang_string(arg0) { return ds_map_find_value(global.lang_map, arg0); }
("obj_thrashafter_event_slash_Step_0_gml_106_0")
;
99
    scr_lanface
scr_lanface

function scr_lanface(arg0, arg1) { global.msg[arg0] = scr_84_get_subst_string(
\TX \F0 \E~1 \FL \TL Close Message
scr_84_get_lang_string("scr_lanface_slash_scr_lanface_gml_1_0")
, string(arg1)); }
(3, 3);
100
    global.msg[4] = scr_84_get_subst_string
scr_84_get_subst_string

function scr_84_get_subst_string() { var str = argument[0]; var sub_id = 1; length = string_length(str); pos = 0; while (sub_id < argument_count) { var sub = "~" + string(sub_id); str = string_replace_all(str, sub, argument[sub_id]); sub_id = sub_id + 1; } return str; }
(
* Wow!Delay 11 M...Delay 11 Me!?Delay 11 In the ~1!?Wait for input
scr_84_get_lang_string
scr_84_get_lang_string

function scr_84_get_lang_string(arg0) { return ds_map_find_value(global.lang_map, arg0); }
("obj_thrashafter_event_slash_Step_0_gml_108_0")
, name);
101
    global.msg[5] = 
\E4* W...Delay 11 Wait...Wait for inputClose Message
scr_84_get_lang_string
scr_84_get_lang_string

function scr_84_get_lang_string(arg0) { return ds_map_find_value(global.lang_map, arg0); }
("obj_thrashafter_event_slash_Step_0_gml_109_0")
;
102
    instance_create(0, 0, obj_dialoguer);
103
    con = 16;
104
}
105
if (con == 16 && !d_ex())
106
{
107
    sprite_index = spr_lancer_dt;
108
    con = 17;
109
    alarm[4] = 60;
110
}
111
if (con == 18)
112
{
113
    sprite_index = spr_lancer_lt;
114
    global.fe = 3;
115
    global.msg[0] = 
* Can we have monogrammed track jackets?Wait for input
scr_84_get_lang_string
scr_84_get_lang_string

function scr_84_get_lang_string(arg0) { return ds_map_find_value(global.lang_map, arg0); }
("obj_thrashafter_event_slash_Step_0_gml_125_0")
;
116
    scr_susface
scr_susface

function scr_susface(arg0, arg1) { global.msg[arg0] = scr_84_get_subst_string(
\TX \F0 \E~1 \FS \TS Close Message
scr_84_get_lang_string("scr_susface_slash_scr_susface_gml_1_0")
, string(arg1)); }
(1, 2);
117
    global.msg[2] = 
* Yeah.Delay 11
* Ralsei will make them.Wait for input
scr_84_get_lang_string
scr_84_get_lang_string

function scr_84_get_lang_string(arg0) { return ds_map_find_value(global.lang_map, arg0); }
("obj_thrashafter_event_slash_Step_0_gml_127_0")
;
118
    scr_ralface
scr_ralface

function scr_ralface(arg0, arg1) { global.msg[arg0] = scr_84_get_subst_string(
\TX \F0 \E~1 \FR \TR Close Message
scr_84_get_lang_string("scr_ralface_slash_scr_ralface_gml_1_0")
, string(arg1)); }
(3, 3);
119
    global.msg[4] = 
* H...Delay 11 Huh!?Wait for input
scr_84_get_lang_string
scr_84_get_lang_string

function scr_84_get_lang_string(arg0) { return ds_map_find_value(global.lang_map, arg0); }
("obj_thrashafter_event_slash_Step_0_gml_129_0")
;
120
    global.msg[5] = 
\E8* ... Okay,Delay 11 sure!Wait for input
scr_84_get_lang_string
scr_84_get_lang_string

function scr_84_get_lang_string(arg0) { return ds_map_find_value(global.lang_map, arg0); }
("obj_thrashafter_event_slash_Step_0_gml_130_0")
;
121
    scr_lanface
scr_lanface

function scr_lanface(arg0, arg1) { global.msg[arg0] = scr_84_get_subst_string(
\TX \F0 \E~1 \FL \TL Close Message
scr_84_get_lang_string("scr_lanface_slash_scr_lanface_gml_1_0")
, string(arg1)); }
(6, 8);
122
    global.msg[7] = 
* Ahahah!!!Delay 11
* Lancer joins the team!!!Wait for inputClose Message
scr_84_get_lang_string
scr_84_get_lang_string

function scr_84_get_lang_string(arg0) { return ds_map_find_value(global.lang_map, arg0); }
("obj_thrashafter_event_slash_Step_0_gml_132_0")
;
123
    instance_create(0, 0, obj_dialoguer);
124
    con = 19;
125
    global.currentsong[0] = snd_init("fanfare.ogg");
126
}
127
if (con == 19 && !d_ex())
128
{
129
    global.currentsong[1] = mus_play(global.currentsong[0]);
130
    global.fc = 0;
131
    global.typer = 51;
132
    global.msg[0] = 
* Lancer joined the party! Close MessageClose Message
scr_84_get_lang_string
scr_84_get_lang_string

function scr_84_get_lang_string(arg0) { return ds_map_find_value(global.lang_map, arg0); }
("obj_thrashafter_event_slash_Step_0_gml_144_0")
;
133
    d = instance_create(0, 0, obj_dialoguer);
134
    d.skippable = 0;
135
    con = 20;
136
    alarm[4] = 120;
137
}
138
if (con == 21)
139
{
140
    snd_free_all();
141
    with (obj_dialoguer)
142
        instance_destroy();
143
    with (obj_writer)
144
        instance_destroy();
145
    global.typer = 30;
146
    global.fe = 8;
147
    global.fc = 1;
148
    global.msg[0] = 
* No.Wait for inputClose Message
scr_84_get_lang_string
scr_84_get_lang_string

function scr_84_get_lang_string(arg0) { return ds_map_find_value(global.lang_map, arg0); }
("obj_thrashafter_event_slash_Step_0_gml_159_0")
;
149
    instance_create(0, 0, obj_dialoguer);
150
    con = 22;
151
}
152
if (con == 22 && !d_ex())
153
{
154
    sprite_index = spr_lancer_dt;
155
    vspeed = -8;
156
    con = 24;
157
    alarm[4] = 10;
158
}
159
if (con == 25 && !d_ex())
160
{
161
    npc = instance_create(x, y, obj_npc_room);
162
    npc.sprite_index = spr_lancer_dt;
163
    con = 26;
164
    global.interact = 0;
165
    global.flag[229 lancer_follow_progress] = 1;
166
    instance_destroy();
167
}