Deltarune (Chapter 5) script viewer

scr_populatechars
scr_populatechars

function 
scr_populatechars()
{
    if (!variable_instance_exists(id, "kris"))
        kris = 0;
    if (!variable_instance_exists(id, "ralsei"))
        ralsei = 0;
    if (!variable_instance_exists(id, "susie"))
        susie = 0;
    if (!variable_instance_exists(id, "noelle"))
        noelle = 0;
    if (kris == 0)
    {
        with (obj_mainchara)
            other.kris = id;
    }
    if (susie == 0)
    {
        with (obj_caterpillarchara)
        {
            if (name == "susie")
                other.susie = id;
        }
    }
    if (ralsei == 0)
    {
        with (obj_caterpillarchara)
        {
            if (name == "ralsei")
                other.ralsei = id;
        }
    }
    if (noelle == 0)
    {
        with (obj_caterpillarchara)
        {
            if (name == "noelle")
                other.noelle = id;
        }
    }
}
();

if (!init)

{

    doIdle = function()

    {

        with (ferroll.marker)

        {

            sprite_index = spr_npc_ferroll_idle;

            image_index = 0;

            image_speed = 1/15;

        }

    };

    powerup = function()

    {

        with (ferroll.marker)

        {

            sprite_index = spr_npc_ferroll_powerup;

            image_index = 0;

            image_speed = 0.35;

        }

    };

    dohammer = function(arg0 = true)

    {

        var fer = ferroll.marker;

        with (ferroll.marker)

        {

            var damagefunc = function()

            {

                with (instance_create(x + 112, y + 90, obj_dmgwriter))

                {

                    damage = 6;

                    snd_play(snd_hurt1);

                }

            };

            smashcount++;

            sprite_index = spr_npc_ferroll_hammer;

            image_index = 0;

            image_speed = 0;

            scr_delay_var("image_index", 1, 5);

            scr_delay_var("image_index", 2, 7);

            var pitch = 1;

            if ((smashcount % 2) == 0)

                pitch = 1.1;

            snd_play_delay(snd_squeaky, 6, 1, pitch);

            if (arg0)

            {

                delay_function(damagefunc, 6);

            }

            else

            {

                var smash = function()

                {

                    with (obj_dw_cliff_silver_hammer)

                    {

                        with (smashmarker)

                        {

                            image_index++;

                            
scr_debug_print
scr_debug_print

function 
scr_debug_print()
{
    if (!
scr_debug())
        exit;
}

function scr_debug_clear_all()
{
}
(image_index);

                        }

                    }

                };

                delay_function(smash, 7);

            }

            delay_function(scr_shakescreen, 7);

            scr_delay_var("image_index", 3, 9);

            scr_delay_var("image_index", 4, 11);

            scr_delay_var("image_index", 5, 13);

        }

    };

    smashparty = function()

    {

        con = 20;

        timer = 0;

    };

    smashmoney = function()

    {

        con = 40;

        timer = 0;

    };

    doIdle();

    init = 1;

}

var havemoney = (global.gold >= 50) ? true : false;

if (con == 0)

{

    if (ferroll.myinteract == 3)

    {

        scr_flag_set_ext(1762, 1, 1, 2);

        global.interact = 1;

        con = 1;

        ferroll.myinteract = 99;

        
scr_speaker
scr_speaker

function 
scr_speaker(arg0)
{
    _speaker = arg0;
    global.typer = 5;
    if (global.darkzone == 1)
        global.typer = 6;
    if (global.fighting == 1)
        global.typer = 4;
    global.fc = 0;
    global.fe = 0;
    if (_speaker == "silent" && global.darkzone == 0)
        global.typer = 2;
    if (_speaker == "silent" && global.darkzone == 1)
        global.typer = 36;
    if (_speaker == "balloon" || _speaker == "enemy")
        global.typer = 50;
    if (_speaker == "sans")
    {
        global.typer = 14;
        global.fc = 6;
    }
    if (_speaker == "undyne" || _speaker == "und")
    {
        global.typer = 17;
        global.fc = 9;
    }
    if (_speaker == "temmie" || _speaker == "tem")
        global.typer = 21;
    if (_speaker == "jevil")
        global.typer = 35;
    if (_speaker == "catti")
        global.fc = 13;
    if (_speaker == "jockington" || _speaker == "joc")
        global.fc = 14;
    if (_speaker == "catty" || _speaker == "caddy")
        global.fc = 16;
    if (_speaker == "bratty" || _speaker == "bra")
        global.fc = 17;
    if (_speaker == "rouxls" || _speaker == "rou")
        global.fc = 18;
    if (_speaker == "burgerpants" || _speaker == "bur")
        global.fc = 19;
    if (_speaker == "spamton")
    {
        if (global.fighting == 0)
            global.typer = 66;
        else
            global.typer = 68;
    }
    if (_speaker == "sneo")
        global.typer = 67;
    if (_speaker == "susie" || _speaker == "sus")
    {
        global.fc = 1;
        global.typer = 10;
        if (global.darkzone == 1)
        {
            global.typer = 30;
            if (global.fighting == 1)
                global.typer = 47;
        }
    }
    if (_speaker == "ralsei" || _speaker == "ral")
    {
        global.fc = 2;
        global.typer = 31;
        if (global.fighting == 1)
            global.typer = 45;
        if (global.flag[30 ralsei_hat_state] == 1)
            global.typer = 6;
    }
    if (_speaker == "noelle" || _speaker == "noe")
    {
        global.fc = 3;
        if (global.darkzone == 0)
            global.typer = 12;
        else
            global.typer = 56;
        if (global.fighting == 1)
            global.typer = 59;
    }
    if (_speaker == "toriel" || _speaker == "tor")
    {
        global.fc = 4;
        global.typer = 7;
    }
    if (_speaker == "asgore" || _speaker == "asg")
    {
        global.fc = 10;
        global.typer = 18;
        if (global.darkzone == 1)
            global.typer = 89;
    }
    if (_speaker == "king" || _speaker == "kin")
    {
        global.fc = 20;
        global.typer = 33;
        if (global.chapter == 1)
        {
            if (global.plot < 235)
                global.typer = 36;
...
("no_name");

        msgsetloc(0, 
* Achoo!Delay 11 I am the GREAT SMITH,Delay 11 FERROLL.Wait for input
"* Achoo^1! I am the GREAT SMITH^1, FERROLL./", "obj_dw_cliff_silver_hammer_slash_Step_0_gml_152_0"
);

        msgnextloc(
* Give me anything,Delay 11 and I'll show you my GREAT STRENGTH.Wait for input
"* Give me anything^1, and I'll show you my GREAT STRENGTH./", "obj_dw_cliff_silver_hammer_slash_Step_0_gml_153_0"
);

        var opt1 = stringsetloc(
#Give $50
"#Give $50", "obj_dw_cliff_silver_hammer_slash_Step_0_gml_154_0"
);

        var opt2 = stringsetloc(
#Massage
"#Massage", "obj_dw_cliff_silver_hammer_slash_Step_0_gml_155_0"
);

        var opt3 = stringsetloc(
Nothing
"Nothing", "obj_dw_cliff_silver_hammer_slash_Step_0_gml_156_0"
);

        if (!havemoney)

            opt3 = "#" + opt3;

        if (havemoney)

            
scr_readychoicer
scr_readychoicer

function 
scr_readychoicer(arg0 = "", arg1 = "", arg2 = "", arg3 = "", arg4 = -1, arg5 = -1)
{
    global.msc = -99;
    global.choice = -1;
    global.choicemsg = [arg0, arg1, arg2, arg3];
    var count = 2;
    if (arg2 != "")
        count++;
    if (arg3 != "")
        count++;
    var chooseString = "\\C" + string(count);
    if (arg4 == -1 && instance_exists(obj_cutscene_master))
        arg4 = true;
    if (arg5)
    {
        if (arg4)
            
c_msgset(0, chooseString);
        else
            msgset(0, chooseString);
    }
    else if (arg4)
    {
        
c_msgnext(chooseString);
    }
    else
    {
        msgnext(chooseString);
    }
}
(opt1, opt2, opt3);

        else

            
scr_readychoicer
scr_readychoicer

function 
scr_readychoicer(arg0 = "", arg1 = "", arg2 = "", arg3 = "", arg4 = -1, arg5 = -1)
{
    global.msc = -99;
    global.choice = -1;
    global.choicemsg = [arg0, arg1, arg2, arg3];
    var count = 2;
    if (arg2 != "")
        count++;
    if (arg3 != "")
        count++;
    var chooseString = "\\C" + string(count);
    if (arg4 == -1 && instance_exists(obj_cutscene_master))
        arg4 = true;
    if (arg5)
    {
        if (arg4)
            
c_msgset(0, chooseString);
        else
            msgset(0, chooseString);
    }
    else if (arg4)
    {
        
c_msgnext(chooseString);
    }
    else
    {
        msgnext(chooseString);
    }
}
(opt2, opt3);

        d_make(0);

    }

}

if (con == 1 && global.choice != -1)

{

    var shouldnt = stringsetloc(
* (You probably shouldn't.)Wait for inputClose Message
"* (You probably shouldn't.)/%", "obj_dw_cliff_silver_hammer_slash_Step_0_gml_167_0"
);

    if (havemoney && global.choice == 0)

    {

        if (!moneysmashed)

        {

            con = 4.1;

        }

        else

        {

            k_d(1);

            
scr_speaker
scr_speaker

function 
scr_speaker(arg0)
{
    _speaker = arg0;
    global.typer = 5;
    if (global.darkzone == 1)
        global.typer = 6;
    if (global.fighting == 1)
        global.typer = 4;
    global.fc = 0;
    global.fe = 0;
    if (_speaker == "silent" && global.darkzone == 0)
        global.typer = 2;
    if (_speaker == "silent" && global.darkzone == 1)
        global.typer = 36;
    if (_speaker == "balloon" || _speaker == "enemy")
        global.typer = 50;
    if (_speaker == "sans")
    {
        global.typer = 14;
        global.fc = 6;
    }
    if (_speaker == "undyne" || _speaker == "und")
    {
        global.typer = 17;
        global.fc = 9;
    }
    if (_speaker == "temmie" || _speaker == "tem")
        global.typer = 21;
    if (_speaker == "jevil")
        global.typer = 35;
    if (_speaker == "catti")
        global.fc = 13;
    if (_speaker == "jockington" || _speaker == "joc")
        global.fc = 14;
    if (_speaker == "catty" || _speaker == "caddy")
        global.fc = 16;
    if (_speaker == "bratty" || _speaker == "bra")
        global.fc = 17;
    if (_speaker == "rouxls" || _speaker == "rou")
        global.fc = 18;
    if (_speaker == "burgerpants" || _speaker == "bur")
        global.fc = 19;
    if (_speaker == "spamton")
    {
        if (global.fighting == 0)
            global.typer = 66;
        else
            global.typer = 68;
    }
    if (_speaker == "sneo")
        global.typer = 67;
    if (_speaker == "susie" || _speaker == "sus")
    {
        global.fc = 1;
        global.typer = 10;
        if (global.darkzone == 1)
        {
            global.typer = 30;
            if (global.fighting == 1)
                global.typer = 47;
        }
    }
    if (_speaker == "ralsei" || _speaker == "ral")
    {
        global.fc = 2;
        global.typer = 31;
        if (global.fighting == 1)
            global.typer = 45;
        if (global.flag[30 ralsei_hat_state] == 1)
            global.typer = 6;
    }
    if (_speaker == "noelle" || _speaker == "noe")
    {
        global.fc = 3;
        if (global.darkzone == 0)
            global.typer = 12;
        else
            global.typer = 56;
        if (global.fighting == 1)
            global.typer = 59;
    }
    if (_speaker == "toriel" || _speaker == "tor")
    {
        global.fc = 4;
        global.typer = 7;
    }
    if (_speaker == "asgore" || _speaker == "asg")
    {
        global.fc = 10;
        global.typer = 18;
        if (global.darkzone == 1)
            global.typer = 89;
    }
    if (_speaker == "king" || _speaker == "kin")
    {
        global.fc = 20;
        global.typer = 33;
        if (global.chapter == 1)
        {
            if (global.plot < 235)
                global.typer = 36;
...
("no_name");

            msgset(0, shouldnt);

            d_make(0);

            con = 99;

        }

    }

    else if ((!havemoney && global.choice == 0) || (havemoney && global.choice == 1))

    {

        if (!partysmashed)

        {

            k_d(3);

            
scr_speaker
scr_speaker

function 
scr_speaker(arg0)
{
    _speaker = arg0;
    global.typer = 5;
    if (global.darkzone == 1)
        global.typer = 6;
    if (global.fighting == 1)
        global.typer = 4;
    global.fc = 0;
    global.fe = 0;
    if (_speaker == "silent" && global.darkzone == 0)
        global.typer = 2;
    if (_speaker == "silent" && global.darkzone == 1)
        global.typer = 36;
    if (_speaker == "balloon" || _speaker == "enemy")
        global.typer = 50;
    if (_speaker == "sans")
    {
        global.typer = 14;
        global.fc = 6;
    }
    if (_speaker == "undyne" || _speaker == "und")
    {
        global.typer = 17;
        global.fc = 9;
    }
    if (_speaker == "temmie" || _speaker == "tem")
        global.typer = 21;
    if (_speaker == "jevil")
        global.typer = 35;
    if (_speaker == "catti")
        global.fc = 13;
    if (_speaker == "jockington" || _speaker == "joc")
        global.fc = 14;
    if (_speaker == "catty" || _speaker == "caddy")
        global.fc = 16;
    if (_speaker == "bratty" || _speaker == "bra")
        global.fc = 17;
    if (_speaker == "rouxls" || _speaker == "rou")
        global.fc = 18;
    if (_speaker == "burgerpants" || _speaker == "bur")
        global.fc = 19;
    if (_speaker == "spamton")
    {
        if (global.fighting == 0)
            global.typer = 66;
        else
            global.typer = 68;
    }
    if (_speaker == "sneo")
        global.typer = 67;
    if (_speaker == "susie" || _speaker == "sus")
    {
        global.fc = 1;
        global.typer = 10;
        if (global.darkzone == 1)
        {
            global.typer = 30;
            if (global.fighting == 1)
                global.typer = 47;
        }
    }
    if (_speaker == "ralsei" || _speaker == "ral")
    {
        global.fc = 2;
        global.typer = 31;
        if (global.fighting == 1)
            global.typer = 45;
        if (global.flag[30 ralsei_hat_state] == 1)
            global.typer = 6;
    }
    if (_speaker == "noelle" || _speaker == "noe")
    {
        global.fc = 3;
        if (global.darkzone == 0)
            global.typer = 12;
        else
            global.typer = 56;
        if (global.fighting == 1)
            global.typer = 59;
    }
    if (_speaker == "toriel" || _speaker == "tor")
    {
        global.fc = 4;
        global.typer = 7;
    }
    if (_speaker == "asgore" || _speaker == "asg")
    {
        global.fc = 10;
        global.typer = 18;
        if (global.darkzone == 1)
            global.typer = 89;
    }
    if (_speaker == "king" || _speaker == "kin")
    {
        global.fc = 20;
        global.typer = 33;
        if (global.chapter == 1)
        {
            if (global.plot < 235)
                global.typer = 36;
...
("no_name");

            msgsetloc(0, 
* That's right.Delay 11 Your body is a mountain as well.Wait for input
"* That's right^1. Your body is a mountain as well./", "obj_dw_cliff_silver_hammer_slash_Step_0_gml_191_0"
);

            msgnextloc(
* It must be rugged...Delay 11 powerful...Wait for input
"* It must be rugged..^1. powerful.../", "obj_dw_cliff_silver_hammer_slash_Step_0_gml_192_0"
);

            msgnextloc(
* And what better way to sculpt it,Delay 11 than the smashing of metal!?Wait for inputClose Message
"* And what better way to sculpt it^1, than the smashing of metal!?/%", "obj_dw_cliff_silver_hammer_slash_Step_0_gml_193_0"
);

            d_make(0);

            con = 1.2;

        }

        else

        {

            k_d(1);

            
scr_speaker
scr_speaker

function 
scr_speaker(arg0)
{
    _speaker = arg0;
    global.typer = 5;
    if (global.darkzone == 1)
        global.typer = 6;
    if (global.fighting == 1)
        global.typer = 4;
    global.fc = 0;
    global.fe = 0;
    if (_speaker == "silent" && global.darkzone == 0)
        global.typer = 2;
    if (_speaker == "silent" && global.darkzone == 1)
        global.typer = 36;
    if (_speaker == "balloon" || _speaker == "enemy")
        global.typer = 50;
    if (_speaker == "sans")
    {
        global.typer = 14;
        global.fc = 6;
    }
    if (_speaker == "undyne" || _speaker == "und")
    {
        global.typer = 17;
        global.fc = 9;
    }
    if (_speaker == "temmie" || _speaker == "tem")
        global.typer = 21;
    if (_speaker == "jevil")
        global.typer = 35;
    if (_speaker == "catti")
        global.fc = 13;
    if (_speaker == "jockington" || _speaker == "joc")
        global.fc = 14;
    if (_speaker == "catty" || _speaker == "caddy")
        global.fc = 16;
    if (_speaker == "bratty" || _speaker == "bra")
        global.fc = 17;
    if (_speaker == "rouxls" || _speaker == "rou")
        global.fc = 18;
    if (_speaker == "burgerpants" || _speaker == "bur")
        global.fc = 19;
    if (_speaker == "spamton")
    {
        if (global.fighting == 0)
            global.typer = 66;
        else
            global.typer = 68;
    }
    if (_speaker == "sneo")
        global.typer = 67;
    if (_speaker == "susie" || _speaker == "sus")
    {
        global.fc = 1;
        global.typer = 10;
        if (global.darkzone == 1)
        {
            global.typer = 30;
            if (global.fighting == 1)
                global.typer = 47;
        }
    }
    if (_speaker == "ralsei" || _speaker == "ral")
    {
        global.fc = 2;
        global.typer = 31;
        if (global.fighting == 1)
            global.typer = 45;
        if (global.flag[30 ralsei_hat_state] == 1)
            global.typer = 6;
    }
    if (_speaker == "noelle" || _speaker == "noe")
    {
        global.fc = 3;
        if (global.darkzone == 0)
            global.typer = 12;
        else
            global.typer = 56;
        if (global.fighting == 1)
            global.typer = 59;
    }
    if (_speaker == "toriel" || _speaker == "tor")
    {
        global.fc = 4;
        global.typer = 7;
    }
    if (_speaker == "asgore" || _speaker == "asg")
    {
        global.fc = 10;
        global.typer = 18;
        if (global.darkzone == 1)
            global.typer = 89;
    }
    if (_speaker == "king" || _speaker == "kin")
    {
        global.fc = 20;
        global.typer = 33;
        if (global.chapter == 1)
        {
            if (global.plot < 235)
                global.typer = 36;
...
("no_name");

            msgset(0, shouldnt);

            d_make(0);

            con = 99;

        }

    }

    else

    {

        k_d();

        con = 99;

    }

}

if (con == 4.1)

{

    global.facing = 2;

    global.interact = 1;

    snd_play(snd_item);

    smashmarker = scr_marker_fromasset(findsprite(spr_dw_cliff_silver_hammer_coinStack), undefined, 1);

    smashmarker.image_speed = 0;

    smashmarker.image_index = 0;

    global.gold -= 50;

    k_d(1);

    
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;
}
();

    
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;
            }
        }
    }
}
();

    var kr1 = kr_actor;

    var su1 = su_actor;

    var ra1 = ra_actor;

    var su2 = findspriteinfo(spr_susie_up_dw, "CUT1", undefined, undefined);

    var ra2 = findspriteinfo(spr_ralsei_walk_up, "CUT1", undefined, undefined);

    var kr2 = findspriteinfo(spr_krisu_dark, "CUT1", undefined, undefined);

    
c_sel
c_sel

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

    var wait1 = 
c_walkto_straight
c_walkto_straight

function 
c_walkto_straight(arg0 = 
{
    x: 0,
    y: 0
}, arg1 = 
{
    x: 40,
    y: 40
}, arg2 = 4, arg3 = 0, arg4 = "")
{
    var disth = max(round(abs(arg0.x - arg1.x) / arg2), 1);
    var distv = max(round(abs(arg0.y - arg1.y) / arg2), 1);
    if (arg3 == 0)
    {
        if (distv > 0)
            
c_walkdirect(arg0.x, arg1.y, distv);
        if (disth > 0)
            
c_delaywalkdirect(distv + 1, arg1.x, arg1.y, disth);
    }
    else
    {
        if (distv > 0)
            
c_walkdirect(arg1.x, arg0.y, disth);
        if (disth > 0)
            
c_delaywalkdirect(disth + 1, arg1.x, arg1.y, distv);
    }
    var toface = "-1";
    if (is_string(arg4))
    {
        if (arg4 == "u" || arg4 == "U" || arg4 == "r" || arg4 == "R" || arg4 == "d" || arg4 == "D" || arg4 == "l" || arg4 == "L")
            toface = string_lower(arg4);
    }
    else
    {
        switch (arg4)
        {
            case 0:
                toface = "d";
                break;
            case 1:
                toface = "r";
                break;
            case 2:
                toface = "u";
                break;
            case 3:
                toface = "l";
                break;
        }
    }
    if (toface != "-1")
        
c_delayfacing(disth + distv + 1, toface);
    return disth + distv;
}

function c_walktostraight_list(arg0, arg1 = [], arg2 = "-1", arg3 = 4)
{
    var totalwait = 0;
    for (var i = 0; i < array_length(arg1); i++)
    {
        var pref = "h";
        if (variable_struct_exists(arg1[i], "pref"))
        {
            if ((is_string(arg1[i].pref) && (arg1[i].pref == "v" || arg1[i].pref == "V")) || arg1[i].pref == 0)
                pref = "v";
        }
        var st = arg0;
        if (i > 0)
            st = arg1[i - 1].inst;
        var ed = arg1[i].inst;
        var thisspd = arg3;
        if (variable_struct_exists(arg1[i], "spd"))
            thisspd = arg1[i].spd;
        var disth = max(round(abs(st.x - ed.x) / thisspd), 0);
        var distv = max(round(abs(st.y - ed.y) / thisspd), 0);
        if (pref == "h")
        {
            if (disth > 0)
            {
                if (totalwait == 0)
                    
c_walkdirect(ed.x, st.y, disth);
                else
                    
c_delaywalkdirect(totalwait, ed.x, st.y, disth);
                totalwait += disth;
                show_debug_message_concat(i, ", distv=", disth);
            }
            if (distv > 0)
            {
                if (totalwait == 0)
                    
c_walkdirect(ed.x, ed.y, distv);
                else
                    
c_delaywalkdirect(totalwait, ed.x, ed.y, distv);
                totalwait += distv;
            }
        }
        else
        {
            if (distv > 0)
            {
                if (totalwait == 0)
                    
c_walkdirect(st.x, ed.y, distv);
...
(kr1, kr2, 4, undefined, "u");

    
c_sel
c_sel

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

    var wait2 = 
c_walkto_straight
c_walkto_straight

function 
c_walkto_straight(arg0 = 
{
    x: 0,
    y: 0
}, arg1 = 
{
    x: 40,
    y: 40
}, arg2 = 4, arg3 = 0, arg4 = "")
{
    var disth = max(round(abs(arg0.x - arg1.x) / arg2), 1);
    var distv = max(round(abs(arg0.y - arg1.y) / arg2), 1);
    if (arg3 == 0)
    {
        if (distv > 0)
            
c_walkdirect(arg0.x, arg1.y, distv);
        if (disth > 0)
            
c_delaywalkdirect(distv + 1, arg1.x, arg1.y, disth);
    }
    else
    {
        if (distv > 0)
            
c_walkdirect(arg1.x, arg0.y, disth);
        if (disth > 0)
            
c_delaywalkdirect(disth + 1, arg1.x, arg1.y, distv);
    }
    var toface = "-1";
    if (is_string(arg4))
    {
        if (arg4 == "u" || arg4 == "U" || arg4 == "r" || arg4 == "R" || arg4 == "d" || arg4 == "D" || arg4 == "l" || arg4 == "L")
            toface = string_lower(arg4);
    }
    else
    {
        switch (arg4)
        {
            case 0:
                toface = "d";
                break;
            case 1:
                toface = "r";
                break;
            case 2:
                toface = "u";
                break;
            case 3:
                toface = "l";
                break;
        }
    }
    if (toface != "-1")
        
c_delayfacing(disth + distv + 1, toface);
    return disth + distv;
}

function c_walktostraight_list(arg0, arg1 = [], arg2 = "-1", arg3 = 4)
{
    var totalwait = 0;
    for (var i = 0; i < array_length(arg1); i++)
    {
        var pref = "h";
        if (variable_struct_exists(arg1[i], "pref"))
        {
            if ((is_string(arg1[i].pref) && (arg1[i].pref == "v" || arg1[i].pref == "V")) || arg1[i].pref == 0)
                pref = "v";
        }
        var st = arg0;
        if (i > 0)
            st = arg1[i - 1].inst;
        var ed = arg1[i].inst;
        var thisspd = arg3;
        if (variable_struct_exists(arg1[i], "spd"))
            thisspd = arg1[i].spd;
        var disth = max(round(abs(st.x - ed.x) / thisspd), 0);
        var distv = max(round(abs(st.y - ed.y) / thisspd), 0);
        if (pref == "h")
        {
            if (disth > 0)
            {
                if (totalwait == 0)
                    
c_walkdirect(ed.x, st.y, disth);
                else
                    
c_delaywalkdirect(totalwait, ed.x, st.y, disth);
                totalwait += disth;
                show_debug_message_concat(i, ", distv=", disth);
            }
            if (distv > 0)
            {
                if (totalwait == 0)
                    
c_walkdirect(ed.x, ed.y, distv);
                else
                    
c_delaywalkdirect(totalwait, ed.x, ed.y, distv);
                totalwait += distv;
            }
        }
        else
        {
            if (distv > 0)
            {
                if (totalwait == 0)
                    
c_walkdirect(st.x, ed.y, distv);
...
(ra1, ra2, 4, undefined, "u");

    
c_sel
c_sel

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

    var wait3 = 
c_walkto_straight
c_walkto_straight

function 
c_walkto_straight(arg0 = 
{
    x: 0,
    y: 0
}, arg1 = 
{
    x: 40,
    y: 40
}, arg2 = 4, arg3 = 0, arg4 = "")
{
    var disth = max(round(abs(arg0.x - arg1.x) / arg2), 1);
    var distv = max(round(abs(arg0.y - arg1.y) / arg2), 1);
    if (arg3 == 0)
    {
        if (distv > 0)
            
c_walkdirect(arg0.x, arg1.y, distv);
        if (disth > 0)
            
c_delaywalkdirect(distv + 1, arg1.x, arg1.y, disth);
    }
    else
    {
        if (distv > 0)
            
c_walkdirect(arg1.x, arg0.y, disth);
        if (disth > 0)
            
c_delaywalkdirect(disth + 1, arg1.x, arg1.y, distv);
    }
    var toface = "-1";
    if (is_string(arg4))
    {
        if (arg4 == "u" || arg4 == "U" || arg4 == "r" || arg4 == "R" || arg4 == "d" || arg4 == "D" || arg4 == "l" || arg4 == "L")
            toface = string_lower(arg4);
    }
    else
    {
        switch (arg4)
        {
            case 0:
                toface = "d";
                break;
            case 1:
                toface = "r";
                break;
            case 2:
                toface = "u";
                break;
            case 3:
                toface = "l";
                break;
        }
    }
    if (toface != "-1")
        
c_delayfacing(disth + distv + 1, toface);
    return disth + distv;
}

function c_walktostraight_list(arg0, arg1 = [], arg2 = "-1", arg3 = 4)
{
    var totalwait = 0;
    for (var i = 0; i < array_length(arg1); i++)
    {
        var pref = "h";
        if (variable_struct_exists(arg1[i], "pref"))
        {
            if ((is_string(arg1[i].pref) && (arg1[i].pref == "v" || arg1[i].pref == "V")) || arg1[i].pref == 0)
                pref = "v";
        }
        var st = arg0;
        if (i > 0)
            st = arg1[i - 1].inst;
        var ed = arg1[i].inst;
        var thisspd = arg3;
        if (variable_struct_exists(arg1[i], "spd"))
            thisspd = arg1[i].spd;
        var disth = max(round(abs(st.x - ed.x) / thisspd), 0);
        var distv = max(round(abs(st.y - ed.y) / thisspd), 0);
        if (pref == "h")
        {
            if (disth > 0)
            {
                if (totalwait == 0)
                    
c_walkdirect(ed.x, st.y, disth);
                else
                    
c_delaywalkdirect(totalwait, ed.x, st.y, disth);
                totalwait += disth;
                show_debug_message_concat(i, ", distv=", disth);
            }
            if (distv > 0)
            {
                if (totalwait == 0)
                    
c_walkdirect(ed.x, ed.y, distv);
                else
                    
c_delaywalkdirect(totalwait, ed.x, ed.y, distv);
                totalwait += distv;
            }
        }
        else
        {
            if (distv > 0)
            {
                if (totalwait == 0)
                    
c_walkdirect(st.x, ed.y, distv);
...
(su1, su2, 4, undefined, "u");

    
c_wait
c_wait

function 
c_wait(arg0)
{
    
c_cmd("wait", arg0, 0, 0, 0);
}
(max(wait1, wait2, wait3) + 1);

    
c_speaker
c_speaker

function 
c_speaker(arg0)
{
    
c_cmd("speaker", arg0, 0, 0, 0);
}
("no_name");

    
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, 
* Achoo!Delay 11 Behold my technique!Wait for inputClose Message
"* Achoo^1! Behold my technique!/%", "obj_dw_cliff_silver_hammer_slash_Step_0_gml_244_0"
);

    
c_talk_wait
c_talk_wait

function 
c_talk_wait()
{
    
c_talk();
    
c_waittalk();
}

function c_talkwait()
{
    
c_talk_wait();
}
();

    
c_wait
c_wait

function 
c_wait(arg0)
{
    
c_cmd("wait", arg0, 0, 0, 0);
}
(1);

    
c_actortokris
c_actortokris

function 
c_actortokris()
{
    
c_cmd("actortokris", 0, 0, 0, 0);
}
();

    
c_actortocaterpillar
c_actortocaterpillar

function 
c_actortocaterpillar()
{
    
c_cmd("actortocaterpillar", 0, 0, 0, 0);
}

function c_actortocaterpillarstill()
{
    
c_cmd("actortocaterpillarstill", 0, 0, 0, 0);
}
();

    
c_customfunc
c_customfunc

function 
c_customfunc(arg0, arg1 = -1)
{
    if (instance_exists(obj_cutscene_master))
    {
        with (obj_cutscene_master)
            array_push(customfuncs, arg0);
        
c_cmd("customfunc", arg1, 0, 0, 0);
    }
}
(function()

    {

        
scr_caterpillar_facing
scr_caterpillar_facing

function 
scr_caterpillar_facing(arg0)
{
    with (obj_caterpillarchara)
    {
        for (i = 0; i < 25; i += 1)
            facing[i] = arg0;
    }
}
("ralsei", "u");

        
scr_caterpillar_facing
scr_caterpillar_facing

function 
scr_caterpillar_facing(arg0)
{
    with (obj_caterpillarchara)
    {
        for (i = 0; i < 25; i += 1)
            facing[i] = arg0;
    }
}
("susie", "u");

    });

    
c_terminatekillactors
c_terminatekillactors

function 
c_terminatekillactors()
{
    
c_cmd("terminatekillactors", 0, 0, 0, 0);
}
();

    
scr_caterpillar_facing_single
scr_caterpillar_facing_single

function 
scr_caterpillar_facing_single(arg0, arg1)
{
    with (obj_caterpillarchara)
    {
        if (name == arg0)
        {
            for (i = 0; i < 25; i += 1)
                facing[i] = 
scr_facing_letter_to_number(arg1);
        }
    }
}
("ralsei", "u");

    
scr_caterpillar_facing_single
scr_caterpillar_facing_single

function 
scr_caterpillar_facing_single(arg0, arg1)
{
    with (obj_caterpillarchara)
    {
        if (name == arg0)
        {
            for (i = 0; i < 25; i += 1)
                facing[i] = 
scr_facing_letter_to_number(arg1);
        }
    }
}
("susie", "u");

    con = 1.1;

}

if (con == 1.1 && !instance_exists(obj_cutscene_master))

{

    coincon = 1;

    timer = 0;

    con = -1;

}

if (con == 1.2 && !d_ex())

{

    global.facing = 2;

    global.interact = 1;

    k_d(1);

    
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;
}
();

    
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;
            }
        }
    }
}
();

    var kr1 = kr_actor;

    var su1 = su_actor;

    var ra1 = ra_actor;

    var su2 = findspriteinfo(spr_susie_up_dw, "CUT1", undefined, undefined);

    var ra2 = findspriteinfo(spr_ralsei_walk_up, "CUT1", undefined, undefined);

    var kr2 = findspriteinfo(spr_krisu_dark, "CUT1", undefined, undefined);

    
c_sel
c_sel

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

    var wait1 = 
c_walkto_straight
c_walkto_straight

function 
c_walkto_straight(arg0 = 
{
    x: 0,
    y: 0
}, arg1 = 
{
    x: 40,
    y: 40
}, arg2 = 4, arg3 = 0, arg4 = "")
{
    var disth = max(round(abs(arg0.x - arg1.x) / arg2), 1);
    var distv = max(round(abs(arg0.y - arg1.y) / arg2), 1);
    if (arg3 == 0)
    {
        if (distv > 0)
            
c_walkdirect(arg0.x, arg1.y, distv);
        if (disth > 0)
            
c_delaywalkdirect(distv + 1, arg1.x, arg1.y, disth);
    }
    else
    {
        if (distv > 0)
            
c_walkdirect(arg1.x, arg0.y, disth);
        if (disth > 0)
            
c_delaywalkdirect(disth + 1, arg1.x, arg1.y, distv);
    }
    var toface = "-1";
    if (is_string(arg4))
    {
        if (arg4 == "u" || arg4 == "U" || arg4 == "r" || arg4 == "R" || arg4 == "d" || arg4 == "D" || arg4 == "l" || arg4 == "L")
            toface = string_lower(arg4);
    }
    else
    {
        switch (arg4)
        {
            case 0:
                toface = "d";
                break;
            case 1:
                toface = "r";
                break;
            case 2:
                toface = "u";
                break;
            case 3:
                toface = "l";
                break;
        }
    }
    if (toface != "-1")
        
c_delayfacing(disth + distv + 1, toface);
    return disth + distv;
}

function c_walktostraight_list(arg0, arg1 = [], arg2 = "-1", arg3 = 4)
{
    var totalwait = 0;
    for (var i = 0; i < array_length(arg1); i++)
    {
        var pref = "h";
        if (variable_struct_exists(arg1[i], "pref"))
        {
            if ((is_string(arg1[i].pref) && (arg1[i].pref == "v" || arg1[i].pref == "V")) || arg1[i].pref == 0)
                pref = "v";
        }
        var st = arg0;
        if (i > 0)
            st = arg1[i - 1].inst;
        var ed = arg1[i].inst;
        var thisspd = arg3;
        if (variable_struct_exists(arg1[i], "spd"))
            thisspd = arg1[i].spd;
        var disth = max(round(abs(st.x - ed.x) / thisspd), 0);
        var distv = max(round(abs(st.y - ed.y) / thisspd), 0);
        if (pref == "h")
        {
            if (disth > 0)
            {
                if (totalwait == 0)
                    
c_walkdirect(ed.x, st.y, disth);
                else
                    
c_delaywalkdirect(totalwait, ed.x, st.y, disth);
                totalwait += disth;
                show_debug_message_concat(i, ", distv=", disth);
            }
            if (distv > 0)
            {
                if (totalwait == 0)
                    
c_walkdirect(ed.x, ed.y, distv);
                else
                    
c_delaywalkdirect(totalwait, ed.x, ed.y, distv);
                totalwait += distv;
            }
        }
        else
        {
            if (distv > 0)
            {
                if (totalwait == 0)
                    
c_walkdirect(st.x, ed.y, distv);
...
(kr1, kr2, 4, undefined, "u");

    
c_sel
c_sel

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

    var wait2 = 
c_walkto_straight
c_walkto_straight

function 
c_walkto_straight(arg0 = 
{
    x: 0,
    y: 0
}, arg1 = 
{
    x: 40,
    y: 40
}, arg2 = 4, arg3 = 0, arg4 = "")
{
    var disth = max(round(abs(arg0.x - arg1.x) / arg2), 1);
    var distv = max(round(abs(arg0.y - arg1.y) / arg2), 1);
    if (arg3 == 0)
    {
        if (distv > 0)
            
c_walkdirect(arg0.x, arg1.y, distv);
        if (disth > 0)
            
c_delaywalkdirect(distv + 1, arg1.x, arg1.y, disth);
    }
    else
    {
        if (distv > 0)
            
c_walkdirect(arg1.x, arg0.y, disth);
        if (disth > 0)
            
c_delaywalkdirect(disth + 1, arg1.x, arg1.y, distv);
    }
    var toface = "-1";
    if (is_string(arg4))
    {
        if (arg4 == "u" || arg4 == "U" || arg4 == "r" || arg4 == "R" || arg4 == "d" || arg4 == "D" || arg4 == "l" || arg4 == "L")
            toface = string_lower(arg4);
    }
    else
    {
        switch (arg4)
        {
            case 0:
                toface = "d";
                break;
            case 1:
                toface = "r";
                break;
            case 2:
                toface = "u";
                break;
            case 3:
                toface = "l";
                break;
        }
    }
    if (toface != "-1")
        
c_delayfacing(disth + distv + 1, toface);
    return disth + distv;
}

function c_walktostraight_list(arg0, arg1 = [], arg2 = "-1", arg3 = 4)
{
    var totalwait = 0;
    for (var i = 0; i < array_length(arg1); i++)
    {
        var pref = "h";
        if (variable_struct_exists(arg1[i], "pref"))
        {
            if ((is_string(arg1[i].pref) && (arg1[i].pref == "v" || arg1[i].pref == "V")) || arg1[i].pref == 0)
                pref = "v";
        }
        var st = arg0;
        if (i > 0)
            st = arg1[i - 1].inst;
        var ed = arg1[i].inst;
        var thisspd = arg3;
        if (variable_struct_exists(arg1[i], "spd"))
            thisspd = arg1[i].spd;
        var disth = max(round(abs(st.x - ed.x) / thisspd), 0);
        var distv = max(round(abs(st.y - ed.y) / thisspd), 0);
        if (pref == "h")
        {
            if (disth > 0)
            {
                if (totalwait == 0)
                    
c_walkdirect(ed.x, st.y, disth);
                else
                    
c_delaywalkdirect(totalwait, ed.x, st.y, disth);
                totalwait += disth;
                show_debug_message_concat(i, ", distv=", disth);
            }
            if (distv > 0)
            {
                if (totalwait == 0)
                    
c_walkdirect(ed.x, ed.y, distv);
                else
                    
c_delaywalkdirect(totalwait, ed.x, ed.y, distv);
                totalwait += distv;
            }
        }
        else
        {
            if (distv > 0)
            {
                if (totalwait == 0)
                    
c_walkdirect(st.x, ed.y, distv);
...
(ra1, ra2, 4, undefined, "u");

    
c_sel
c_sel

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

    var wait3 = 
c_walkto_straight
c_walkto_straight

function 
c_walkto_straight(arg0 = 
{
    x: 0,
    y: 0
}, arg1 = 
{
    x: 40,
    y: 40
}, arg2 = 4, arg3 = 0, arg4 = "")
{
    var disth = max(round(abs(arg0.x - arg1.x) / arg2), 1);
    var distv = max(round(abs(arg0.y - arg1.y) / arg2), 1);
    if (arg3 == 0)
    {
        if (distv > 0)
            
c_walkdirect(arg0.x, arg1.y, distv);
        if (disth > 0)
            
c_delaywalkdirect(distv + 1, arg1.x, arg1.y, disth);
    }
    else
    {
        if (distv > 0)
            
c_walkdirect(arg1.x, arg0.y, disth);
        if (disth > 0)
            
c_delaywalkdirect(disth + 1, arg1.x, arg1.y, distv);
    }
    var toface = "-1";
    if (is_string(arg4))
    {
        if (arg4 == "u" || arg4 == "U" || arg4 == "r" || arg4 == "R" || arg4 == "d" || arg4 == "D" || arg4 == "l" || arg4 == "L")
            toface = string_lower(arg4);
    }
    else
    {
        switch (arg4)
        {
            case 0:
                toface = "d";
                break;
            case 1:
                toface = "r";
                break;
            case 2:
                toface = "u";
                break;
            case 3:
                toface = "l";
                break;
        }
    }
    if (toface != "-1")
        
c_delayfacing(disth + distv + 1, toface);
    return disth + distv;
}

function c_walktostraight_list(arg0, arg1 = [], arg2 = "-1", arg3 = 4)
{
    var totalwait = 0;
    for (var i = 0; i < array_length(arg1); i++)
    {
        var pref = "h";
        if (variable_struct_exists(arg1[i], "pref"))
        {
            if ((is_string(arg1[i].pref) && (arg1[i].pref == "v" || arg1[i].pref == "V")) || arg1[i].pref == 0)
                pref = "v";
        }
        var st = arg0;
        if (i > 0)
            st = arg1[i - 1].inst;
        var ed = arg1[i].inst;
        var thisspd = arg3;
        if (variable_struct_exists(arg1[i], "spd"))
            thisspd = arg1[i].spd;
        var disth = max(round(abs(st.x - ed.x) / thisspd), 0);
        var distv = max(round(abs(st.y - ed.y) / thisspd), 0);
        if (pref == "h")
        {
            if (disth > 0)
            {
                if (totalwait == 0)
                    
c_walkdirect(ed.x, st.y, disth);
                else
                    
c_delaywalkdirect(totalwait, ed.x, st.y, disth);
                totalwait += disth;
                show_debug_message_concat(i, ", distv=", disth);
            }
            if (distv > 0)
            {
                if (totalwait == 0)
                    
c_walkdirect(ed.x, ed.y, distv);
                else
                    
c_delaywalkdirect(totalwait, ed.x, ed.y, distv);
                totalwait += distv;
            }
        }
        else
        {
            if (distv > 0)
            {
                if (totalwait == 0)
                    
c_walkdirect(st.x, ed.y, distv);
...
(su1, su2, 4, undefined, "u");

    
c_wait
c_wait

function 
c_wait(arg0)
{
    
c_cmd("wait", arg0, 0, 0, 0);
}
(max(wait1, wait2, wait3) + 1);

    
c_wait
c_wait

function 
c_wait(arg0)
{
    
c_cmd("wait", arg0, 0, 0, 0);
}
(1);

    
c_actortokris
c_actortokris

function 
c_actortokris()
{
    
c_cmd("actortokris", 0, 0, 0, 0);
}
();

    
c_actortocaterpillar
c_actortocaterpillar

function 
c_actortocaterpillar()
{
    
c_cmd("actortocaterpillar", 0, 0, 0, 0);
}

function c_actortocaterpillarstill()
{
    
c_cmd("actortocaterpillarstill", 0, 0, 0, 0);
}
();

    
c_customfunc
c_customfunc

function 
c_customfunc(arg0, arg1 = -1)
{
    if (instance_exists(obj_cutscene_master))
    {
        with (obj_cutscene_master)
            array_push(customfuncs, arg0);
        
c_cmd("customfunc", arg1, 0, 0, 0);
    }
}
(function()

    {

        
scr_caterpillar_facing
scr_caterpillar_facing

function 
scr_caterpillar_facing(arg0)
{
    with (obj_caterpillarchara)
    {
        for (i = 0; i < 25; i += 1)
            facing[i] = arg0;
    }
}
("ralsei", "u");

        
scr_caterpillar_facing
scr_caterpillar_facing

function 
scr_caterpillar_facing(arg0)
{
    with (obj_caterpillarchara)
    {
        for (i = 0; i < 25; i += 1)
            facing[i] = arg0;
    }
}
("susie", "u");

    });

    
c_terminatekillactors
c_terminatekillactors

function 
c_terminatekillactors()
{
    
c_cmd("terminatekillactors", 0, 0, 0, 0);
}
();

    
scr_caterpillar_facing_single
scr_caterpillar_facing_single

function 
scr_caterpillar_facing_single(arg0, arg1)
{
    with (obj_caterpillarchara)
    {
        if (name == arg0)
        {
            for (i = 0; i < 25; i += 1)
                facing[i] = 
scr_facing_letter_to_number(arg1);
        }
    }
}
("ralsei", "u");

    
scr_caterpillar_facing_single
scr_caterpillar_facing_single

function 
scr_caterpillar_facing_single(arg0, arg1)
{
    with (obj_caterpillarchara)
    {
        if (name == arg0)
        {
            for (i = 0; i < 25; i += 1)
                facing[i] = 
scr_facing_letter_to_number(arg1);
        }
    }
}
("susie", "u");

    con = 1.22;

}

var fedamagefunc = function()

{

    
scr_shakescreen
scr_shakescreen

function 
scr_shakescreen(arg0 = 4)
{
    with (instance_create(x, y, obj_shake))
    {
        shakex = arg0;
        shakey = arg0;
    }
}
();

    with (ferroll)

    {

        with (marker)

        {

            snd_play(snd_horriblemetalclang);

            with (instance_create(x + 112, y + 90, obj_dmgwriter))

            {

                damage = 6;

                snd_play(snd_hurt1);

            }

        }

    }

};

if (con == 1.22 && !instance_exists(obj_cutscene_master))

{

    var fe = ferroll.marker;

    var kr1 = findspriteinfo(spr_krisu_dark, "CUT1");

    var su1 = findspriteinfo(spr_susie_up_dw, "CUT1");

    var ra1 = findspriteinfo(spr_ralsei_walk_up, "CUT1");

    var kr2 = findspriteinfo(spr_krisd_dark, "SMASH_ASSETS");

    var su2 = findspriteinfo(spr_susie_shock_r, "SMASH_ASSETS");

    var ra2 = findspriteinfo(spr_ralsei_shocked_right, "SMASH_ASSETS");

    timer++;

    if (timer == 1)

        sprite_set(fe, 3234, 0, 0.35);

    if (timer == 15)

    {

        snd_play(snd_item);

        var l = findsprite(spr_krisd_dark, "SMASH_ASSETS");

        kris_marker = scr_marker_fromasset(l, fe.depth + 1);

        with (obj_mainchara)

            visible = false;

    }

    if (timer == 25)

        sprite_set(fe, 6017, 0, 0);

    if (timer == 30)

        sprite_set(fe, 6017, 1, 0);

    if (timer == 33)

    {

        sprite_set(fe, 6017, 2, 0);

        fedamagefunc();

        
scr_shakeobj
scr_shakeobj

function 
scr_shakeobj()
{
    var _shakeobj = instance_create(x, y, obj_shakeobj);
    _shakeobj.target = id;
    if (argument_count >= 1)
    {
        if (i_ex(argument0))
            _shakeobj.target = argument0;
    }
    if (argument_count >= 2)
    {
        if (argument1 != -1)
            _shakeobj.shakeamt = argument1;
    }
    if (argument_count >= 3)
    {
        if (argument2 != -1)
            _shakeobj.shakereduct = argument2;
    }
    with (_shakeobj)
        event_user(0);
}
(kris_marker);

        kris_marker.sprite_index = spr_kris_splat;

    }

    if (timer == 35)

        sprite_set(fe, 6017, 3, 0);

    if (timer == 37)

        sprite_set(fe, 6017, 4, 0);

    if (timer == 39)

        sprite_set(fe, 6017, 5, 0);

    if (timer == 54)

    {

        sprite_set(fe, 6017, 0, 0);

        setxy(kr1.x, kr1.y, kris_marker);

        sprite_set(fe, 3234, 0, 0.35);

        var l = findsprite(spr_susie_shock_r, "SMASH_ASSETS");

        susie_marker = scr_marker_fromasset(l, fe.depth + 1, undefined, true);

        with (obj_caterpillarchara)

        {

            if (name == "susie")

                visible = false;

        }

        snd_play(snd_item);

    }

    var subump = 39;

    if (timer == (subump + 25))

        sprite_set(fe, 6017, 0, 0);

    if (timer == (subump + 25 + 5))

        sprite_set(fe, 6017, 1, 0);

    if (timer == (subump + 25 + 5 + 3))

    {

        sprite_set(fe, 6017, 2, 0);

        fedamagefunc();

        
scr_shakeobj
scr_shakeobj

function 
scr_shakeobj()
{
    var _shakeobj = instance_create(x, y, obj_shakeobj);
    _shakeobj.target = id;
    if (argument_count >= 1)
    {
        if (i_ex(argument0))
            _shakeobj.target = argument0;
    }
    if (argument_count >= 2)
    {
        if (argument1 != -1)
            _shakeobj.shakeamt = argument1;
    }
    if (argument_count >= 3)
    {
        if (argument2 != -1)
            _shakeobj.shakereduct = argument2;
    }
    with (_shakeobj)
        event_user(0);
}
(susie_marker);

        susie_marker.sprite_index = spr_susie_splat;

    }

    if (timer == (subump + 25 + 5 + 3 + 2))

        sprite_set(fe, 6017, 3, 0);

    if (timer == (subump + 25 + 5 + 3 + 2 + 2))

        sprite_set(fe, 6017, 4, 0);

    if (timer == (subump + 25 + 5 + 3 + 2 + 2 + 2))

        sprite_set(fe, 6017, 5, 0);

    if (timer == (subump + 25 + 5 + 3 + 2 + 2 + 2 + 15))

    {

        sprite_set(fe, 6017, 0, 0);

        setxy(su1.x, su1.y, susie_marker);

        susie_marker.x += 4;

        susie_marker.y += -4;

        sprite_set(fe, 3234, 0, 0.35);

        snd_play(snd_item);

        var l = findsprite(spr_ralsei_shocked_right, "SMASH_ASSETS");

        ralsei_marker = scr_marker_fromasset(l, fe.depth + 1);

        with (obj_caterpillarchara)

        {

            if (name == "ralsei")

                visible = false;

        }

    }

    var rabump = subump + 25 + 5 + 3 + 2 + 2 + 2;

    if (timer == (rabump + 25))

        sprite_set(fe, 6017, 0, 0);

    if (timer == (rabump + 25 + 5))

        sprite_set(fe, 6017, 1, 0);

    if (timer == (rabump + 25 + 5 + 3))

    {

        sprite_set(fe, 6017, 2, 0);

        fedamagefunc();

        ralsei_marker.sprite_index = spr_ralsei_splat;

        ralsei_marker.x -= 36;

        ralsei_marker.y += 32;

        
scr_shakeobj
scr_shakeobj

function 
scr_shakeobj()
{
    var _shakeobj = instance_create(x, y, obj_shakeobj);
    _shakeobj.target = id;
    if (argument_count >= 1)
    {
        if (i_ex(argument0))
            _shakeobj.target = argument0;
    }
    if (argument_count >= 2)
    {
        if (argument1 != -1)
            _shakeobj.shakeamt = argument1;
    }
    if (argument_count >= 3)
    {
        if (argument2 != -1)
            _shakeobj.shakereduct = argument2;
    }
    with (_shakeobj)
        event_user(0);
}
(ralsei_marker);

    }

    if (timer == (rabump + 25 + 5 + 3 + 2))

        sprite_set(fe, 6017, 3, 0);

    if (timer == (rabump + 25 + 5 + 3 + 2 + 2))

        sprite_set(fe, 6017, 4, 0);

    if (timer == (rabump + 25 + 5 + 3 + 2 + 2 + 2))

        sprite_set(fe, 6017, 5, 0);

    if (timer == (rabump + 25 + 5 + 3 + 2 + 2 + 2 + 15))

    {

        sprite_set(fe, 6362, 0, 0);

        setxy(ra1.x - 36, ra1.y + 32, ralsei_marker);

        ralsei_marker.x += 18;

        ralsei_marker.y += 8;

        ralsei_marker.depth = susie_marker.depth - 1;

    }

    if (timer == (rabump + 25 + 5 + 3 + 2 + 2 + 2 + 15 + 30))

    {

        con = 21;

        timer = 0;

    }

}

if (con == 20)

{

    timer++;

    var poweruptime = 25;

    var hammertime = 18;

    if (timer == 1)

        powerup();

    if (timer == poweruptime)

    {

        with (obj_caterpillarchara)

        {

            if (name == "ralsei")

                visible = false;

        }

        safe_delete(smashmarker);

        smashmarker = scr_marker_fromasset(findsprite(spr_ralsei_shocked_right, "SMASH_ASSETS"), ferroll.marker.depth + 10);

        dohammer();

    }

    if (timer == (poweruptime + (hammertime * 1)))

        dohammer();

    if (timer == (poweruptime + (hammertime * 2)))

    {

        dohammer();

        with (obj_caterpillarchara)

        {

            if (name == "ralsei")

                visible = true;

        }

        with (obj_caterpillarchara)

        {

            if (name == "susie")

                visible = false;

        }

        safe_delete(smashmarker);

        smashmarker = scr_marker_fromasset(findsprite(spr_susie_shock_r, "SMASH_ASSETS"), ferroll.marker.depth + 10);

    }

    if (timer == (poweruptime + (hammertime * 3)))

        dohammer();

    if (timer == (poweruptime + (hammertime * 4)))

    {

        dohammer();

        with (obj_caterpillarchara)

        {

            if (name == "susie")

                visible = true;

        }

        obj_mainchara.visible = false;

        safe_delete(smashmarker);

        smashmarker = scr_marker_fromasset(findsprite(spr_krisd_dark, "SMASH_ASSETS"), ferroll.marker.depth + 10);

    }

    if (timer == (poweruptime + (hammertime * 5)))

        dohammer();

    if (timer == (poweruptime + (hammertime * 6)))

    {

        obj_mainchara.visible = true;

        safe_delete(smashmarker);

        con++;

    }

}

if (con == 21)

{

    partysmashed = 1;

    updateSmashed();

    
scr_speaker
scr_speaker

function 
scr_speaker(arg0)
{
    _speaker = arg0;
    global.typer = 5;
    if (global.darkzone == 1)
        global.typer = 6;
    if (global.fighting == 1)
        global.typer = 4;
    global.fc = 0;
    global.fe = 0;
    if (_speaker == "silent" && global.darkzone == 0)
        global.typer = 2;
    if (_speaker == "silent" && global.darkzone == 1)
        global.typer = 36;
    if (_speaker == "balloon" || _speaker == "enemy")
        global.typer = 50;
    if (_speaker == "sans")
    {
        global.typer = 14;
        global.fc = 6;
    }
    if (_speaker == "undyne" || _speaker == "und")
    {
        global.typer = 17;
        global.fc = 9;
    }
    if (_speaker == "temmie" || _speaker == "tem")
        global.typer = 21;
    if (_speaker == "jevil")
        global.typer = 35;
    if (_speaker == "catti")
        global.fc = 13;
    if (_speaker == "jockington" || _speaker == "joc")
        global.fc = 14;
    if (_speaker == "catty" || _speaker == "caddy")
        global.fc = 16;
    if (_speaker == "bratty" || _speaker == "bra")
        global.fc = 17;
    if (_speaker == "rouxls" || _speaker == "rou")
        global.fc = 18;
    if (_speaker == "burgerpants" || _speaker == "bur")
        global.fc = 19;
    if (_speaker == "spamton")
    {
        if (global.fighting == 0)
            global.typer = 66;
        else
            global.typer = 68;
    }
    if (_speaker == "sneo")
        global.typer = 67;
    if (_speaker == "susie" || _speaker == "sus")
    {
        global.fc = 1;
        global.typer = 10;
        if (global.darkzone == 1)
        {
            global.typer = 30;
            if (global.fighting == 1)
                global.typer = 47;
        }
    }
    if (_speaker == "ralsei" || _speaker == "ral")
    {
        global.fc = 2;
        global.typer = 31;
        if (global.fighting == 1)
            global.typer = 45;
        if (global.flag[30 ralsei_hat_state] == 1)
            global.typer = 6;
    }
    if (_speaker == "noelle" || _speaker == "noe")
    {
        global.fc = 3;
        if (global.darkzone == 0)
            global.typer = 12;
        else
            global.typer = 56;
        if (global.fighting == 1)
            global.typer = 59;
    }
    if (_speaker == "toriel" || _speaker == "tor")
    {
        global.fc = 4;
        global.typer = 7;
    }
    if (_speaker == "asgore" || _speaker == "asg")
    {
        global.fc = 10;
        global.typer = 18;
        if (global.darkzone == 1)
            global.typer = 89;
    }
    if (_speaker == "king" || _speaker == "kin")
    {
        global.fc = 20;
        global.typer = 33;
        if (global.chapter == 1)
        {
            if (global.plot < 235)
                global.typer = 36;
...
("no_name");

    msgsetloc(0, 
* ...Wait for input
"* .../", "obj_dw_cliff_silver_hammer_slash_Step_0_gml_537_0"
);

    msgnextloc(
* So,Delay 11 uh...Delay 11 who got healed from that?Wait for input
"* So^1, uh..^1. who got healed from that?/", "obj_dw_cliff_silver_hammer_slash_Step_0_gml_538_0"
);

    msgnextloc(
* ...Wait for input
"* .../", "obj_dw_cliff_silver_hammer_slash_Step_0_gml_539_0"
);

    msgnextloc(
* I see...Delay 11 perhaps it's not my best work...Wait for inputClose Message
"* I see..^1. perhaps it's not my best work.../%", "obj_dw_cliff_silver_hammer_slash_Step_0_gml_540_0"
);

    d_make(0);

    con = 99.1;

    for (var i = 0; i < array_length(global.hp); i++)

        global.hp[i] = max(global.hp[i] - 6, 1);

    
scr_msgno_func
scr_msgno_func

function 
scr_msgno_func(arg0, arg1, arg2 = 0, arg3 = 0, arg4 = 30, arg5 = -4)
{
    var __watcher = instance_create_depth(0, 0, 0, obj_msgno_func);
    __watcher.msgno = arg0;
    __watcher.dothing = arg1;
    __watcher.when = arg2;
    __watcher.functiontime = arg3;
    __watcher.doomer = arg4;
    __watcher.target = arg5;
    return __watcher;
}

function scr_msgfunc(arg0, arg1 = 0, arg2 = 0, arg3 = 30, arg4 = -4)
{
    var __watcher = instance_create_depth(0, 0, 0, obj_msgno_func);
    __watcher.msgno = global.msgno;
    __watcher.dothing = arg0;
    __watcher.when = arg1;
    __watcher.functiontime = arg2;
    __watcher.doomer = arg3;
    __watcher.target = arg4;
    return __watcher;
}
(1, function()

    {

        sprite_set(ferroll.marker, 81, 0, 0);

    });

    
scr_msgno_func
scr_msgno_func

function 
scr_msgno_func(arg0, arg1, arg2 = 0, arg3 = 0, arg4 = 30, arg5 = -4)
{
    var __watcher = instance_create_depth(0, 0, 0, obj_msgno_func);
    __watcher.msgno = arg0;
    __watcher.dothing = arg1;
    __watcher.when = arg2;
    __watcher.functiontime = arg3;
    __watcher.doomer = arg4;
    __watcher.target = arg5;
    return __watcher;
}

function scr_msgfunc(arg0, arg1 = 0, arg2 = 0, arg3 = 30, arg4 = -4)
{
    var __watcher = instance_create_depth(0, 0, 0, obj_msgno_func);
    __watcher.msgno = global.msgno;
    __watcher.dothing = arg0;
    __watcher.when = arg1;
    __watcher.functiontime = arg2;
    __watcher.doomer = arg3;
    __watcher.target = arg4;
    return __watcher;
}
(3, function()

    {

        sprite_set(ferroll.marker, 543, 0, 0);

    });

}

if (con == 40)

{

    timer++;

    var poweruptime = 25;

    var hammertime = 18;

    if (timer == 1)

        powerup();

    if (timer == poweruptime)

        dohammer(false);

    if (timer == (poweruptime + (hammertime * 1)))

        dohammer(false);

    if (timer == (poweruptime + (hammertime * 2)))

    {

        safe_delete(smashmarker);

        con = 41;

    }

}

if (con == 99 && !d_ex())

{

    global.interact = 0;

    con = 0;

    with (ferroll)

        myinteract = 0;

    doIdle();

}

if (con == 99.1 && !d_ex())

{

    with (kris_marker)

        instance_destroy();

    with (susie_marker)

        instance_destroy();

    with (ralsei_marker)

        instance_destroy();

    with (obj_mainchara)

        visible = true;

    with (obj_caterpillarchara)

        visible = true;

    
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;
    }
}
();

    with (obj_caterpillarchara)

        
scr_caterpillar_facing
scr_caterpillar_facing

function 
scr_caterpillar_facing(arg0)
{
    with (obj_caterpillarchara)
    {
        for (i = 0; i < 25; i += 1)
            facing[i] = arg0;
    }
}
(3);

    global.interact = 0;

    con = 0;

    with (ferroll)

        myinteract = 0;

    doIdle();

}

makecoin = function(arg0)

{

    with (scr_marker_fancy(240, 290, 4700))

    {

        gravity = random_range(1, 1.1);

        
scr_size
scr_size

function 
scr_size(arg0 = image_xscale, arg1 = image_yscale, arg2 = id)
{
    with (arg2)
    {
        image_xscale = arg0;
        image_yscale = arg1;
    }
}
(2, 2);

        spd = random_range(15, 25);

        hspeed = lengthdir_x(spd, arg0);

        vspeed = lengthdir_y(spd, arg0);

        endy = 
scr_even
scr_even

function 
scr_even(arg0)
{
    return round(arg0 / 2) * 2;
}
(ystart + random_range(6, 20));

        depth = 100000 - ((endy * 10) + (sprite_height * 10));

        bouncecount = 0;

        dying = 0;

        timer = 0;

        end_step_func = function()

        {

            if (dying)

            {

                timer++;

                if (timer > 50)

                    image_alpha = lerp_out_cubic(1, 0, (timer - 50) / 10);

                if (timer == 60)

                    instance_destroy();

            }

            if (y > endy && vspeed > 0)

            {

                hspeed *= 0.7;

                y = endy;

                vspeed = -vspeed * 0.4;

                var vol = lerp(0, 0.3, abs(vspeed) / 8);

                if (vol > 0.1)

                    snd_play(snd_coin, vol, 1.2);

                if (dying == 0)

                {

                    dying = 1;

                    
scr_doom
scr_doom

function 
scr_doom(arg0, arg1)
{
    var _doom = instance_create_depth(0, 0, 0, obj_doom);
    with (_doom)
    {
        alarm[0] = arg1;
        target = arg0;
    }
    return _doom;
}
(id, 80);

                }

            }

            var _left = 128;

            var _right = 352;

            if (x < _left || x > _right)

            {

                x = clamp(x, _left, _right);

                hspeed = -hspeed * 0.5;

                var vol = lerp(0, 0.3, abs(hspeed) / 8);

                if (vol > 0.1)

                    snd_play(snd_coin, vol, 1.2);

            }

            image_angle -= (hspeed * 30);

        };

    }

};

if (coincon == 1)

{

    var fe = ferroll.marker;

    timer++;

    if (timer == 1)

    {

        with (fe)

        {

            sprite_index = spr_npc_ferroll_idle;

            image_index = 0;

            image_speed = 1/15;

        }

    }

    if (timer == 15)

        sprite_set(fe, 3234, 0, 0.35);

    if (timer == 40)

        sprite_set(fe, 6017, 0, 0);

    if (timer == 42)

        sprite_set(fe, 6017, 1, 0);

    if (timer == 44)

    {

        sprite_set(fe, 6017, 2, 0);

        snd_play(snd_horriblemetalclang);

        var range = 30;

        var count = 25;

        for (var i = 0; i < count; i++)

            makecoin(lerp(90 + range, 90 - range, i / count) + random_range(-4, 4));

        
scr_shakescreen
scr_shakescreen

function 
scr_shakescreen(arg0 = 4)
{
    with (instance_create(x, y, obj_shake))
    {
        shakex = arg0;
        shakey = arg0;
    }
}
();

    }

    if (timer == 46)

        sprite_set(fe, 6017, 3, 0);

    if (timer == 48)

        sprite_set(fe, 6017, 4, 0);

    if (timer == 50)

    {

        sprite_set(fe, 6017, 5, 0);

        with (smashmarker)

            image_index = 1;

    }

    if (timer == 80)

    {

        timer = 0;

        coincon = 2;

    }

}

if (coincon == 2)

{

    var fe = ferroll.marker;

    timer++;

    if (timer == 1)

        sprite_set(fe, 6017, 0, 0);

    if (timer == 19)

    {

        with (smashmarker)

            instance_destroy();

        sprite_set(fe, 6017, 2, 0);

        snd_play(snd_horriblemetalclang);

        var range = 30;

        var count = 24;

        for (var i = 0; i < count; i++)

            makecoin(lerp(90 + range, 90 - range, i / count) + random_range(-6, 6));

        
scr_shakescreen
scr_shakescreen

function 
scr_shakescreen(arg0 = 4)
{
    with (instance_create(x, y, obj_shake))
    {
        shakex = arg0;
        shakey = arg0;
    }
}
();

    }

    if (timer == 21)

        sprite_set(fe, 6017, 3, 0);

    if (timer == 23)

        sprite_set(fe, 6017, 4, 0);

    if (timer == 25)

        sprite_set(fe, 6017, 5, 0);

    if (timer == 55)

        sprite_set(fe, 6362, 0, 0);

    if (timer == 115)

    {

        timer = 0;

        coincon = 3;

    }

}

if (coincon == 3)

{

    moneysmashed = 1;

    updateSmashed();

    
scr_speaker
scr_speaker

function 
scr_speaker(arg0)
{
    _speaker = arg0;
    global.typer = 5;
    if (global.darkzone == 1)
        global.typer = 6;
    if (global.fighting == 1)
        global.typer = 4;
    global.fc = 0;
    global.fe = 0;
    if (_speaker == "silent" && global.darkzone == 0)
        global.typer = 2;
    if (_speaker == "silent" && global.darkzone == 1)
        global.typer = 36;
    if (_speaker == "balloon" || _speaker == "enemy")
        global.typer = 50;
    if (_speaker == "sans")
    {
        global.typer = 14;
        global.fc = 6;
    }
    if (_speaker == "undyne" || _speaker == "und")
    {
        global.typer = 17;
        global.fc = 9;
    }
    if (_speaker == "temmie" || _speaker == "tem")
        global.typer = 21;
    if (_speaker == "jevil")
        global.typer = 35;
    if (_speaker == "catti")
        global.fc = 13;
    if (_speaker == "jockington" || _speaker == "joc")
        global.fc = 14;
    if (_speaker == "catty" || _speaker == "caddy")
        global.fc = 16;
    if (_speaker == "bratty" || _speaker == "bra")
        global.fc = 17;
    if (_speaker == "rouxls" || _speaker == "rou")
        global.fc = 18;
    if (_speaker == "burgerpants" || _speaker == "bur")
        global.fc = 19;
    if (_speaker == "spamton")
    {
        if (global.fighting == 0)
            global.typer = 66;
        else
            global.typer = 68;
    }
    if (_speaker == "sneo")
        global.typer = 67;
    if (_speaker == "susie" || _speaker == "sus")
    {
        global.fc = 1;
        global.typer = 10;
        if (global.darkzone == 1)
        {
            global.typer = 30;
            if (global.fighting == 1)
                global.typer = 47;
        }
    }
    if (_speaker == "ralsei" || _speaker == "ral")
    {
        global.fc = 2;
        global.typer = 31;
        if (global.fighting == 1)
            global.typer = 45;
        if (global.flag[30 ralsei_hat_state] == 1)
            global.typer = 6;
    }
    if (_speaker == "noelle" || _speaker == "noe")
    {
        global.fc = 3;
        if (global.darkzone == 0)
            global.typer = 12;
        else
            global.typer = 56;
        if (global.fighting == 1)
            global.typer = 59;
    }
    if (_speaker == "toriel" || _speaker == "tor")
    {
        global.fc = 4;
        global.typer = 7;
    }
    if (_speaker == "asgore" || _speaker == "asg")
    {
        global.fc = 10;
        global.typer = 18;
        if (global.darkzone == 1)
            global.typer = 89;
    }
    if (_speaker == "king" || _speaker == "kin")
    {
        global.fc = 20;
        global.typer = 33;
        if (global.chapter == 1)
        {
            if (global.plot < 235)
                global.typer = 36;
...
("no_name");

    msgsetloc(0, 
* ...Wait for input
"* .../", "obj_dw_cliff_silver_hammer_slash_Step_0_gml_772_0"
);

    msgnextloc(
* All right.Delay 11 Maybe it wasn't my best work...Wait for input
"* All right^1. Maybe it wasn't my best work.../", "obj_dw_cliff_silver_hammer_slash_Step_0_gml_773_0"
);

    msgnextloc(
* I blame my pollen allergies...Delay 11 ACHOO!Wait for inputClose Message
"* I blame my pollen allergies..^1. ACHOO!/%", "obj_dw_cliff_silver_hammer_slash_Step_0_gml_774_0"
);

    d_make(0);

    coincon = 4;

    
scr_msgno_func
scr_msgno_func

function 
scr_msgno_func(arg0, arg1, arg2 = 0, arg3 = 0, arg4 = 30, arg5 = -4)
{
    var __watcher = instance_create_depth(0, 0, 0, obj_msgno_func);
    __watcher.msgno = arg0;
    __watcher.dothing = arg1;
    __watcher.when = arg2;
    __watcher.functiontime = arg3;
    __watcher.doomer = arg4;
    __watcher.target = arg5;
    return __watcher;
}

function scr_msgfunc(arg0, arg1 = 0, arg2 = 0, arg3 = 30, arg4 = -4)
{
    var __watcher = instance_create_depth(0, 0, 0, obj_msgno_func);
    __watcher.msgno = global.msgno;
    __watcher.dothing = arg0;
    __watcher.when = arg1;
    __watcher.functiontime = arg2;
    __watcher.doomer = arg3;
    __watcher.target = arg4;
    return __watcher;
}
(1, function()

    {

        sprite_set(ferroll.marker, 81, 0, 0);

    });

    
scr_msgno_func
scr_msgno_func

function 
scr_msgno_func(arg0, arg1, arg2 = 0, arg3 = 0, arg4 = 30, arg5 = -4)
{
    var __watcher = instance_create_depth(0, 0, 0, obj_msgno_func);
    __watcher.msgno = arg0;
    __watcher.dothing = arg1;
    __watcher.when = arg2;
    __watcher.functiontime = arg3;
    __watcher.doomer = arg4;
    __watcher.target = arg5;
    return __watcher;
}

function scr_msgfunc(arg0, arg1 = 0, arg2 = 0, arg3 = 30, arg4 = -4)
{
    var __watcher = instance_create_depth(0, 0, 0, obj_msgno_func);
    __watcher.msgno = global.msgno;
    __watcher.dothing = arg0;
    __watcher.when = arg1;
    __watcher.functiontime = arg2;
    __watcher.doomer = arg3;
    __watcher.target = arg4;
    return __watcher;
}
(2, function()

    {

        sprite_set(ferroll.marker, 543, 0, 0);

    });

}

if (coincon == 4 && !d_ex())

{

    
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;
    }
}
("all");

    global.facing = 0;

    con = 99;

    coincon = 0;

}