Deltarune (Chapter 5) script viewer

← back to main script listing

gml_Object_obj_ch5_LWF_town_south_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 = instance_create(700, 100, obj_trigger);
20
with (_trigger)
21
{
22
    extflag = "convo";
23
    image_yscale = 2;
24
    image_xscale = 30;
25
}
26
_church_trigger = instance_create(785, 225, obj_trigger);
27
with (_church_trigger)
28
{
29
    extflag = "church";
30
    image_xscale = 11;
31
}
32
33
lose_control = function()
34
{
35
    global.interact = 1;
36
    kr_actor.x = obj_mainchara.x;
37
    kr_actor.y = obj_mainchara.y;
38
    kr_actor.sprite_index = obj_mainchara.sprite_index;
39
    var su_x = 0;
40
    var su_y = 0;
41
    var su_sprite = -4;
42
    with (obj_caterpillarchara)
43
    {
44
        if (name == "susie")
45
        {
46
            su_x = x;
47
            su_y = y;
48
            su_sprite = sprite_index;
49
        }
50
    }
51
    su_actor.x = su_x;
52
    su_actor.y = su_y;
53
    su_actor.sprite_index = su_sprite;
54
    with (obj_actor)
55
        visible = 1;
56
    with (obj_caterpillarchara)
57
        visible = 0;
58
    with (obj_mainchara)
59
        visible = 0;
60
};
61
62
regain_control = function()
63
{
64
    global.interact = 0;
65
    global.facing = 0;
66
    var kr_x = kr_actor.x;
67
    var kr_y = kr_actor.y;
68
    obj_mainchara.x = kr_x;
69
    obj_mainchara.y = kr_y;
70
    obj_mainchara.visible = 1;
71
    obj_mainchara.cutscene = 0;
72
    var su_x = su_actor.x;
73
    var su_y = su_actor.y;
74
    with (obj_caterpillarchara)
75
    {
76
        if (name == "susie")
77
        {
78
            x = su_x;
79
            y = su_y;
80
        }
81
        
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; } }
();
82
        visible = 1;
83
    }
84
    with (obj_actor)
85
        visible = 0;
86
};
87
88
show_convo = function(arg0)
89
{
90
    
c_waitcustom_end
c_waitcustom_end

function
c_waitcustom_end()
{ with (obj_cutscene_master) { cs_wait_custom = 0; waiting = 0; } }
();
91
    switch (arg0)
92
    {
93
        case "convo":
94
            
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, 3);
95
            
c_sel
c_sel

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

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

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

function
c_facing(arg0)
{
c_cmd("facing", arg0, 0, 0, 0);
}
("d");
99
            if (auto_mode)
100
                
c_msgside
c_msgside

function
c_msgside(arg0)
{
c_cmd("msgside", arg0, 0, 0, 0);
}
("top");
101
            else
102
                
c_msgside
c_msgside

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

function
c_speaker(arg0)
{
c_cmd("speaker", arg0, 0, 0, 0);
}
("susie");
104
            
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* I guess...Wait for input
"\\ES* I guess.../", "obj_ch5_LWF_town_south_slash_Create_0_gml_128_0"
);
105
            
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 o* You and me...Delay 11 make a pretty good team,Delay 11 right?Wait for input
"\\Eo* You and me..^1. make a pretty good team^1, right?/", "obj_ch5_LWF_town_south_slash_Create_0_gml_129_0"
);
106
            
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* I've...Delay 11 just been thinking about that.Wait for input
"\\ES* I've..^1. just been thinking about that./", "obj_ch5_LWF_town_south_slash_Create_0_gml_130_0"
);
107
            
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* Thinking about...Delay 11 us.Wait for inputClose Message
"\\ET* Thinking about..^1. us./%", "obj_ch5_LWF_town_south_slash_Create_0_gml_131_0"
);
108
            
c_talk
c_talk

function
c_talk()
{
c_cmd("talk", 0, 0, 0, 0);
}
();
109
            
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);
110
            
c_sel
c_sel

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

function
c_sprite(arg0)
{
c_cmd("sprite", arg0, 0, 0, 0);
}
(spr_susie_walk_down_lw);
112
            
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);
113
            
c_sel
c_sel

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

function
c_facing(arg0)
{
c_cmd("facing", arg0, 0, 0, 0);
}
("d");
115
            
c_wait_talk
c_wait_talk

function
c_wait_talk()
{
c_cmd("waitdialoguer", 0, 0, 0, 0);
}
();
116
            break;
117
        case "church":
118
            
c_sel
c_sel

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

function
c_facing(arg0)
{
c_cmd("facing", arg0, 0, 0, 0);
}
("d");
120
            
c_setxy
c_setxy

function
c_setxy(arg0, arg1)
{
c_cmd("setxy", arg0, arg1, 0, 0);
}
(kr_actor.x, _church_trigger.y - 40);
121
            
c_sel
c_sel

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

function
c_facing(arg0)
{
c_cmd("facing", arg0, 0, 0, 0);
}
("d");
123
            
c_msgside
c_msgside

function
c_msgside(arg0)
{
c_cmd("msgside", arg0, 0, 0, 0);
}
("top");
124
            
c_speaker
c_speaker

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

function
c_talk_wait()
{
c_talk();
c_waittalk();
} function c_talkwait() {
c_talk_wait();
}
();
127
            break;
128
    }
129
    if (!auto_mode)
130
        
c_waitcustom
c_waitcustom

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