if (!i_ex(obj_ch5_LWF02_bg))
    var bg = instance_create(0, 0, obj_ch5_LWF02_bg);
if (!snd_is_playing(global.currentsong[1]))
{
    global.currentsong[0] = snd_init("festival_night.ogg");
    global.currentsong[1] = mus_loop(global.currentsong[0]);
    mus_volume(global.currentsong[1], 0, 0);
    mus_volume(global.currentsong[1], 1, 30);
}
con = -1;
customcon = 0;
auto_mode = false;
blackall = -4;
_triggered_convos = [];
_trigger = instance_create(766, 0, obj_trigger);
with (_trigger)
{
    extflag = "convo";
    image_xscale = 2;
    image_yscale = 30;
}
_beach_trigger = instance_create(1690, 0, obj_trigger);
with (_beach_trigger)
{
    extflag = "beach";
    image_xscale = 2;
    image_yscale = 30;
}
_house_trigger = instance_create(350, 30, obj_trigger);
with (_house_trigger)
{
    extflag = "house";
    image_xscale = 30;
    image_yscale = 1;
}
_noelle_trigger = instance_create(315, 60, obj_trigger);
with (_noelle_trigger)
{
    extflag = "noelle";
    image_xscale = 1;
    image_yscale = 20;
}

enable = function()
{
    auto_mode = scr_flag_get(1804) == 2;
    con = auto_mode ? 0 : 10;
};

disable = function()
{
    con = -1;
};

lose_control = function()
{
    global.interact = 1;
    kr_actor.x = obj_mainchara.x;
    kr_actor.y = obj_mainchara.y;
    kr_actor.sprite_index = obj_mainchara.sprite_index;
    var su_x = 0;
    var su_y = 0;
    var su_sprite = -4;
    with (obj_caterpillarchara)
    {
        if (name == "susie")
        {
            su_x = x;
            su_y = y;
            su_sprite = sprite_index;
        }
    }
    su_actor.x = su_x;
    su_actor.y = su_y;
    su_actor.sprite_index = su_sprite;
    with (obj_actor)
        visible = 1;
    with (obj_caterpillarchara)
        visible = 0;
    with (obj_mainchara)
        visible = 0;
};

regain_control = function()
{
    global.interact = 0;
    global.facing = 0;
    var kr_x = kr_actor.x;
    var kr_y = kr_actor.y;
    obj_mainchara.x = kr_x;
    obj_mainchara.y = kr_y;
    obj_mainchara.visible = 1;
    obj_mainchara.cutscene = 0;
    var su_x = su_actor.x;
    var su_y = su_actor.y;
    with (obj_caterpillarchara)
    {
        if (name == "susie")
        {
            x = su_x;
            y = su_y;
        }
        scr_caterpillar_interpolate();
        visible = 1;
    }
    with (obj_actor)
        visible = 0;
};

show_convo = function(arg0)
{
    var times_triggered = 0;
    for (var i = 0; i < array_length(_triggered_convos); i++)
    {
        if (_triggered_convos[i] != arg0)
            continue;
        times_triggered++;
    }
    _triggered_convos[array_length(_triggered_convos)] = arg0;
    c_waitcustom_end();
    switch (arg0)
    {
        case "convo":
            scr_flag_set(1805, 1);
            c_sel(kr);
            c_facing("l");
            c_sel(su);
            c_sprite(spr_susie_head_turn_left);
            c_speaker("susie");
            c_msgsetloc(0, "\\ED* ..^1. hey^1, the lights are still up./", "obj_ch5_LWF_town_north_slash_Create_0_gml_166_0");
            c_msgnextloc("\\ES* ..^1. kinda^1. Heh./%", "obj_ch5_LWF_town_north_slash_Create_0_gml_167_0");
            c_talk();
            c_wait_box(1);
            c_facing("l");
            c_wait_talk();
            break;
        case "beach":
            c_sel(kr);
            c_setxy(_beach_trigger.x - 20, kr_actor.y);
            c_facing("r");
            c_sel(su);
            c_facing("r");
            c_speaker("susie");
            c_msgsetloc(0, "\\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");
            c_msgnextloc("\\ET* Let's go./%", "obj_ch5_LWF_town_north_slash_Create_0_gml_185_0");
            if (times_triggered >= 1)
            {
                c_speaker("susie");
                c_msgsetloc(0, "\\ES* Hey..^1. we gotta go./%", "obj_ch5_LWF_town_north_slash_Create_0_gml_190_0");
            }
            c_talk_wait();
            break;
        case "house":
            c_sel(kr);
            c_setxy(kr_actor.x, _house_trigger.y - 15);
            c_facing("u");
            c_sel(su);
            c_facing("u");
            c_speaker("susie");
            c_msgsetloc(0, "\\ES* ..^1. heh^1, that's..^1. not what I meant./", "obj_ch5_LWF_town_north_slash_Create_0_gml_204_0");
            c_msgnextloc("\\ET* I mean^1, thanks^1, but.../%", "obj_ch5_LWF_town_north_slash_Create_0_gml_205_0");
            if (times_triggered >= 1)
            {
                c_speaker("susie");
                c_msgsetloc(0, "\\ES* Don't..^1. worry about me staying over for a while./%", "obj_ch5_LWF_town_north_slash_Create_0_gml_210_0");
            }
            c_talk_wait();
            break;
        case "noelle":
            c_sel(kr);
            c_setxy(_noelle_trigger.x + 10, kr_actor.y);
            c_facing("l");
            c_sel(su);
            c_facing("l");
            c_speaker("susie");
            c_msgsetloc(0, "\\ES* Nah^1, I.../", "obj_ch5_LWF_town_north_slash_Create_0_gml_224_0");
            c_msgnextloc("\\ET* I mean^1, it's not time for that^1, right./%", "obj_ch5_LWF_town_north_slash_Create_0_gml_225_0");
            c_talk();
            c_wait_box(1);
            c_sprite(spr_susie_head_down_left);
            c_wait_talk();
            break;
    }
    if (!auto_mode)
        c_waitcustom();
};