Deltarune (Chapter 4) script viewer

var ___CX = camerax();

var ___CY = cameray();

if (!init)

{

    with (obj_genmarker)

    {

        if (string_pos("prop", extflag) != 0)

        {

            with (instance_create(x, y, obj_dw_church_prophecy))

            {

                extflag = "heroes2";

                active = 1;

                bonus = other.extflag;

                fade_edges = true;

                destroykind = 3;

            }

        }

    }

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

    init = true;

    if (con == 40)

    {

        with (obj_dw_church_magicalglass_breakable)

            instance_destroy();

        econ = 1;

        if (global.flag[encounterflag] == 1)

        {

            econ = 2;

            safe_delete(mynpc);

        }

    }

}

if (econ == 1)

{

    if (point_distance(obj_mainchara.x, obj_mainchara.y, mynpc.x, mynpc.y) < 180)

    {

        econ = 2;

        mynpc.visible = false;

        enemy = instance_create(mynpc.x, mynpc.y, obj_dw_church_organikchaser);

        enemy.encounterflag = encounterflag;

        enemy.encounterno = encounterno;

    }

}

if (
scr_debug
scr_debug

function 
scr_debug()
{
    if (global.debug == 1)
        return 1;
}
())

{

    if (keyboard_check(ord("W")) || global.tempflag[90] == 4 || global.tempflag[90] == 3)

    {

        if (keyboard_check_pressed(ord("1")) || global.tempflag[90] == 3)

        {

            global.tempflag[90] = 0;

            
scr_setparty
scr_setparty

function 
scr_setparty(arg0 = false, arg1 = false, arg2 = false)
{
    var kris = obj_mainchara;
    var slot = 0;
    var __make = true;
    if (!i_ex(kris))
        __make = false;
    
scr_losechar();
    safe_delete(obj_caterpillarchara);
    if (arg0 == true)
    {
        
scr_getchar(2);
        if (__make)
        {
            with (
scr_makecaterpillar(kris.x, kris.y, 2, slot))
            {
                halign = (global.darkzone == 0) ? 3 : 6;
                valign = (global.darkzone == 0) ? 6 : 16;
                x -= halign;
                y -= valign;
            }
        }
        slot++;
    }
    if (arg1 == true)
    {
        
scr_getchar(3);
        if (__make)
        {
            with (
scr_makecaterpillar(kris.x, kris.y, 3, slot))
            {
                halign = 2;
                valign = 12;
                x -= halign;
                y -= valign;
            }
        }
        slot++;
    }
    if (arg2 == true)
    {
        
scr_getchar(4);
        if (__make)
        {
            with (
scr_makecaterpillar(kris.x, kris.y, 4, slot))
            {
                halign = (global.darkzone == 0) ? 2 : 4;
                valign = (global.darkzone == 0) ? 9 : 18;
                x -= halign;
                y -= valign;
            }
        }
        slot++;
    }
}
(0);

            var pos = 
scr_heromarker
scr_heromarker

function 
scr_heromarker(arg0 = "", arg1 = "")
{
    var ____foundmarker = -4;
    var xpos = -1;
    var ypos = -1;
    var objindextocheck = 1365;
    if (string_pos("kr", arg0) != 0)
        objindextocheck = 544;
    if (string_pos("su", arg0) != 0)
        objindextocheck = 522;
    if (string_pos("ra", arg0) != 0)
        objindextocheck = 75;
    if (string_pos("no", arg0) != 0)
        objindextocheck = 933;
    if (string_pos("gen", arg0) != 0)
        objindextocheck = 1365;
    with (objindextocheck)
    {
        if (variable_instance_exists(id, "extflag"))
        {
            if (extflag == arg1)
                ____foundmarker = id;
        }
    }
    if (instance_exists(____foundmarker))
    {
        xpos = ____foundmarker.x;
        ypos = ____foundmarker.y;
    }
    if (____foundmarker == -4)
    {
        debug_message("
scr_heromarker(" + arg0 + "," + arg1 + ") Object Not Found");
        return [-4, -4, -4];
    }
    return [xpos, ypos, ____foundmarker];
}

function scr_genmarker(arg0 = "")
{
    var marker = -4;
    with (obj_genmarker)
    {
        if (extflag == arg0)
            marker = id;
    }
    return marker;
}
("kris", "debugwarp");

            instance_create(pos[0] + 20, pos[1] + 20, obj_climb_kris);

            pos = 
scr_heromarker
scr_heromarker

function 
scr_heromarker(arg0 = "", arg1 = "")
{
    var ____foundmarker = -4;
    var xpos = -1;
    var ypos = -1;
    var objindextocheck = 1365;
    if (string_pos("kr", arg0) != 0)
        objindextocheck = 544;
    if (string_pos("su", arg0) != 0)
        objindextocheck = 522;
    if (string_pos("ra", arg0) != 0)
        objindextocheck = 75;
    if (string_pos("no", arg0) != 0)
        objindextocheck = 933;
    if (string_pos("gen", arg0) != 0)
        objindextocheck = 1365;
    with (objindextocheck)
    {
        if (variable_instance_exists(id, "extflag"))
        {
            if (extflag == arg1)
                ____foundmarker = id;
        }
    }
    if (instance_exists(____foundmarker))
    {
        xpos = ____foundmarker.x;
        ypos = ____foundmarker.y;
    }
    if (____foundmarker == -4)
    {
        debug_message("
scr_heromarker(" + arg0 + "," + arg1 + ") Object Not Found");
        return [-4, -4, -4];
    }
    return [xpos, ypos, ____foundmarker];
}

function scr_genmarker(arg0 = "")
{
    var marker = -4;
    with (obj_genmarker)
    {
        if (extflag == arg0)
            marker = id;
    }
    return marker;
}
("susie", "debugwarp");

            with (instance_create(pos[0] - 8, pos[1] - 32, obj_climb_susie))

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

            con = 30;

            cutscene = 7;

            monologuecon = -1;

            snd_free_all();

            global.currentsong[0] = snd_init("ch4_battle.ogg");

            global.currentsong[1] = mus_loop_ext(global.currentsong[0], 0.7, 1);

            audio_sound_set_track_position(global.currentsong[1], 32);

            if (!instance_exists(obj_dw_chaseenemy_cloud))

                enemycloud = instance_create(2800, 4500, obj_dw_chaseenemy_cloud);

            with (enemycloud)

            {

                miny = 2360;

                active = 1;

                minspeed = -2;

                maxspeed = -15.5;

                minx = 0;

                miny = 2360;

                setxy(6640, 4500);

            }

        }

        if (keyboard_check_pressed(ord("2")) || global.tempflag[90] == 4)

        {

            global.tempflag[90] = 0;

            
scr_setparty
scr_setparty

function 
scr_setparty(arg0 = false, arg1 = false, arg2 = false)
{
    var kris = obj_mainchara;
    var slot = 0;
    var __make = true;
    if (!i_ex(kris))
        __make = false;
    
scr_losechar();
    safe_delete(obj_caterpillarchara);
    if (arg0 == true)
    {
        
scr_getchar(2);
        if (__make)
        {
            with (
scr_makecaterpillar(kris.x, kris.y, 2, slot))
            {
                halign = (global.darkzone == 0) ? 3 : 6;
                valign = (global.darkzone == 0) ? 6 : 16;
                x -= halign;
                y -= valign;
            }
        }
        slot++;
    }
    if (arg1 == true)
    {
        
scr_getchar(3);
        if (__make)
        {
            with (
scr_makecaterpillar(kris.x, kris.y, 3, slot))
            {
                halign = 2;
                valign = 12;
                x -= halign;
                y -= valign;
            }
        }
        slot++;
    }
    if (arg2 == true)
    {
        
scr_getchar(4);
        if (__make)
        {
            with (
scr_makecaterpillar(kris.x, kris.y, 4, slot))
            {
                halign = (global.darkzone == 0) ? 2 : 4;
                valign = (global.darkzone == 0) ? 9 : 18;
                x -= halign;
                y -= valign;
            }
        }
        slot++;
    }
}
(0);

            var pos = 
scr_heromarker
scr_heromarker

function 
scr_heromarker(arg0 = "", arg1 = "")
{
    var ____foundmarker = -4;
    var xpos = -1;
    var ypos = -1;
    var objindextocheck = 1365;
    if (string_pos("kr", arg0) != 0)
        objindextocheck = 544;
    if (string_pos("su", arg0) != 0)
        objindextocheck = 522;
    if (string_pos("ra", arg0) != 0)
        objindextocheck = 75;
    if (string_pos("no", arg0) != 0)
        objindextocheck = 933;
    if (string_pos("gen", arg0) != 0)
        objindextocheck = 1365;
    with (objindextocheck)
    {
        if (variable_instance_exists(id, "extflag"))
        {
            if (extflag == arg1)
                ____foundmarker = id;
        }
    }
    if (instance_exists(____foundmarker))
    {
        xpos = ____foundmarker.x;
        ypos = ____foundmarker.y;
    }
    if (____foundmarker == -4)
    {
        debug_message("
scr_heromarker(" + arg0 + "," + arg1 + ") Object Not Found");
        return [-4, -4, -4];
    }
    return [xpos, ypos, ____foundmarker];
}

function scr_genmarker(arg0 = "")
{
    var marker = -4;
    with (obj_genmarker)
    {
        if (extflag == arg0)
            marker = id;
    }
    return marker;
}
("kris", "top");

            setxy(pos[0], pos[1], 1049);

            pos = 
scr_heromarker
scr_heromarker

function 
scr_heromarker(arg0 = "", arg1 = "")
{
    var ____foundmarker = -4;
    var xpos = -1;
    var ypos = -1;
    var objindextocheck = 1365;
    if (string_pos("kr", arg0) != 0)
        objindextocheck = 544;
    if (string_pos("su", arg0) != 0)
        objindextocheck = 522;
    if (string_pos("ra", arg0) != 0)
        objindextocheck = 75;
    if (string_pos("no", arg0) != 0)
        objindextocheck = 933;
    if (string_pos("gen", arg0) != 0)
        objindextocheck = 1365;
    with (objindextocheck)
    {
        if (variable_instance_exists(id, "extflag"))
        {
            if (extflag == arg1)
                ____foundmarker = id;
        }
    }
    if (instance_exists(____foundmarker))
    {
        xpos = ____foundmarker.x;
        ypos = ____foundmarker.y;
    }
    if (____foundmarker == -4)
    {
        debug_message("
scr_heromarker(" + arg0 + "," + arg1 + ") Object Not Found");
        return [-4, -4, -4];
    }
    return [xpos, ypos, ____foundmarker];
}

function scr_genmarker(arg0 = "")
{
    var marker = -4;
    with (obj_genmarker)
    {
        if (extflag == arg0)
            marker = id;
    }
    return marker;
}
("susie", "top");

            sujumpoff = 
scr_marker_ext
scr_marker_ext

function 
scr_marker_ext(arg0, arg1, arg2, arg3 = 1, arg4 = 1, arg5 = 0, arg6 = 0, arg7 = 16777215, arg8 = depth, arg9 = false, arg10 = -1, arg11 = 1)
{
    var thismarker = instance_create(arg0, arg1, obj_marker);
    with (thismarker)
    {
        depth = arg8;
        sprite_index = arg2;
        image_speed = arg5;
        image_xscale = arg3;
        image_yscale = arg4;
        image_index = arg6;
        image_blend = arg7;
        image_alpha = arg11;
        if (arg9)
            
scr_depth_alt();
    }
    if (arg10 > 0)
        
scr_doom(thismarker, arg10);
    return thismarker;
}

function scr_marker_fromasset(arg0, arg1 = depth, arg2 = false)
{
    if (is_undefined(arg0))
    {
        debug_message("Warning: scr_marker_fromasset() sprite_instance didn't exist");
        return -4;
    }
    var sprite = layer_sprite_get_sprite(arg0);
    var index = layer_sprite_get_index(arg0);
    var imagespeed = layer_sprite_get_speed(arg0);
    var xscale = layer_sprite_get_xscale(arg0);
    var yscale = layer_sprite_get_yscale(arg0);
    var angle = layer_sprite_get_angle(arg0);
    var blend = layer_sprite_get_blend(arg0);
    var alpha = layer_sprite_get_alpha(arg0);
    var xloc = layer_sprite_get_x(arg0);
    var yloc = layer_sprite_get_y(arg0);
    var thismarker = instance_create_depth(xloc, yloc, arg1, obj_marker);
    with (thismarker)
    {
        sprite_index = sprite;
        image_index = index;
        image_speed = imagespeed;
        image_xscale = xscale;
        image_yscale = yscale;
        image_angle = angle;
        image_blend = blend;
        image_alpha = alpha;
        if (arg2)
            
scr_depth_alt(id, arg2);
    }
    return thismarker;
}

function scr_assetgetinfo(arg0)
{
    var sprite = layer_sprite_get_sprite(arg0);
    var index = layer_sprite_get_index(arg0);
    var xloc = layer_sprite_get_x(arg0);
    var yloc = layer_sprite_get_y(arg0);
    var xscale = layer_sprite_get_xscale(arg0);
    var yscale = layer_sprite_get_yscale(arg0);
    var angle = layer_sprite_get_angle(arg0);
    var blend = layer_sprite_get_blend(arg0);
    var alpha = layer_sprite_get_alpha(arg0);
    var imagespeed = layer_sprite_get_speed(arg0);
    return [sprite, index, xloc, yloc, xscale, yscale, angle, blend, alpha, imagespeed];
}
(pos[0], pos[1], spr_susie_walk_left_dw, 2, 2, undefined, undefined, undefined, undefined, 1);

            con = 32;

            suendcon = 1.5;

            scr_delay_var("suendcon", 2, 4);

            cutscene = 7;

            monologuecon = -1;

            with (obj_dw_church_prophecy)

                instance_destroy();

            snd_free_all();

            global.currentsong[0] = snd_init("ch4_battle.ogg");

            global.currentsong[1] = mus_loop_ext(global.currentsong[0], 0.7, 1);

            audio_sound_set_track_position(global.currentsong[1], 41);

            if (!instance_exists(obj_dw_chaseenemy_cloud))

                enemycloud = instance_create(2800, 4500, obj_dw_chaseenemy_cloud);

            with (enemycloud)

            {

                con = 0;

                element = 0;

                active = 1;

                minx = 0;

                miny = 2360;

                last_jumped_x = 999999;

                minspeed = -2;

                target = 0;

                tolerance = 32;

                destroyoffscreen = 0;

                damage = 30;

                hcount = 22;

                vcount = 7;

                maxspeed = -15.5;

                image_alpha = 1;

                image_angle = 0;

                image_blend = c_white;

                image_index = 2753;

                image_speed = 1;

                image_xscale = 1;

                image_yscale = 1;

                visible = 1;

                solid = 0;

                persistent = 0;

                depth = 30095;

                direction = 90;

                friction = 0;

                gravity = 0;

                gravity_direction = 270;

                hspeed = 0;

                vspeed = -5.73;

                speed = 5.73;

                x = 5400;

                y = 2394.42;

            }

        }

    }

}

if (cutscene == 1)

{

    scr_delay_var("cutscene", 2, 1);

    cutscene = -1;

}

if (cutscene == 2)

{

    cutscene = 3;

    global.interact = 1;

    var krpos1 = 
scr_heromarker
scr_heromarker

function 
scr_heromarker(arg0 = "", arg1 = "")
{
    var ____foundmarker = -4;
    var xpos = -1;
    var ypos = -1;
    var objindextocheck = 1365;
    if (string_pos("kr", arg0) != 0)
        objindextocheck = 544;
    if (string_pos("su", arg0) != 0)
        objindextocheck = 522;
    if (string_pos("ra", arg0) != 0)
        objindextocheck = 75;
    if (string_pos("no", arg0) != 0)
        objindextocheck = 933;
    if (string_pos("gen", arg0) != 0)
        objindextocheck = 1365;
    with (objindextocheck)
    {
        if (variable_instance_exists(id, "extflag"))
        {
            if (extflag == arg1)
                ____foundmarker = id;
        }
    }
    if (instance_exists(____foundmarker))
    {
        xpos = ____foundmarker.x;
        ypos = ____foundmarker.y;
    }
    if (____foundmarker == -4)
    {
        debug_message("
scr_heromarker(" + arg0 + "," + arg1 + ") Object Not Found");
        return [-4, -4, -4];
    }
    return [xpos, ypos, ____foundmarker];
}

function scr_genmarker(arg0 = "")
{
    var marker = -4;
    with (obj_genmarker)
    {
        if (extflag == arg0)
            marker = id;
    }
    return marker;
}
("kris", "landed");

    var supos1 = 
scr_heromarker
scr_heromarker

function 
scr_heromarker(arg0 = "", arg1 = "")
{
    var ____foundmarker = -4;
    var xpos = -1;
    var ypos = -1;
    var objindextocheck = 1365;
    if (string_pos("kr", arg0) != 0)
        objindextocheck = 544;
    if (string_pos("su", arg0) != 0)
        objindextocheck = 522;
    if (string_pos("ra", arg0) != 0)
        objindextocheck = 75;
    if (string_pos("no", arg0) != 0)
        objindextocheck = 933;
    if (string_pos("gen", arg0) != 0)
        objindextocheck = 1365;
    with (objindextocheck)
    {
        if (variable_instance_exists(id, "extflag"))
        {
            if (extflag == arg1)
                ____foundmarker = id;
        }
    }
    if (instance_exists(____foundmarker))
    {
        xpos = ____foundmarker.x;
        ypos = ____foundmarker.y;
    }
    if (____foundmarker == -4)
    {
        debug_message("
scr_heromarker(" + arg0 + "," + arg1 + ") Object Not Found");
        return [-4, -4, -4];
    }
    return [xpos, ypos, ____foundmarker];
}

function scr_genmarker(arg0 = "")
{
    var marker = -4;
    with (obj_genmarker)
    {
        if (extflag == arg0)
            marker = id;
    }
    return marker;
}
("susie", "landed");

    cutscene_master = 
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()
{
    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 cam1 = 
scr_heromarker
scr_heromarker

function 
scr_heromarker(arg0 = "", arg1 = "")
{
    var ____foundmarker = -4;
    var xpos = -1;
    var ypos = -1;
    var objindextocheck = 1365;
    if (string_pos("kr", arg0) != 0)
        objindextocheck = 544;
    if (string_pos("su", arg0) != 0)
        objindextocheck = 522;
    if (string_pos("ra", arg0) != 0)
        objindextocheck = 75;
    if (string_pos("no", arg0) != 0)
        objindextocheck = 933;
    if (string_pos("gen", arg0) != 0)
        objindextocheck = 1365;
    with (objindextocheck)
    {
        if (variable_instance_exists(id, "extflag"))
        {
            if (extflag == arg1)
                ____foundmarker = id;
        }
    }
    if (instance_exists(____foundmarker))
    {
        xpos = ____foundmarker.x;
        ypos = ____foundmarker.y;
    }
    if (____foundmarker == -4)
    {
        debug_message("
scr_heromarker(" + arg0 + "," + arg1 + ") Object Not Found");
        return [-4, -4, -4];
    }
    return [xpos, ypos, ____foundmarker];
}

function scr_genmarker(arg0 = "")
{
    var marker = -4;
    with (obj_genmarker)
    {
        if (extflag == arg0)
            marker = id;
    }
    return marker;
}
(undefined, "camstart");

    var cam2 = 
scr_heromarker
scr_heromarker

function 
scr_heromarker(arg0 = "", arg1 = "")
{
    var ____foundmarker = -4;
    var xpos = -1;
    var ypos = -1;
    var objindextocheck = 1365;
    if (string_pos("kr", arg0) != 0)
        objindextocheck = 544;
    if (string_pos("su", arg0) != 0)
        objindextocheck = 522;
    if (string_pos("ra", arg0) != 0)
        objindextocheck = 75;
    if (string_pos("no", arg0) != 0)
        objindextocheck = 933;
    if (string_pos("gen", arg0) != 0)
        objindextocheck = 1365;
    with (objindextocheck)
    {
        if (variable_instance_exists(id, "extflag"))
        {
            if (extflag == arg1)
                ____foundmarker = id;
        }
    }
    if (instance_exists(____foundmarker))
    {
        xpos = ____foundmarker.x;
        ypos = ____foundmarker.y;
    }
    if (____foundmarker == -4)
    {
        debug_message("
scr_heromarker(" + arg0 + "," + arg1 + ") Object Not Found");
        return [-4, -4, -4];
    }
    return [xpos, ypos, ____foundmarker];
}

function scr_genmarker(arg0 = "")
{
    var marker = -4;
    with (obj_genmarker)
    {
        if (extflag == arg0)
            marker = id;
    }
    return marker;
}
(undefined, "camstart2");

    var camdist = 
scr_returnwait_instance
scr_returnwait_instance

function 
scr_returnwait_instance(arg0, arg1, arg2)
{
    if (!instance_exists(arg0))
    {
        debug_print("Argument 1 does not exist");
        return 1;
    }
    if (!instance_exists(arg1))
    {
        debug_print("Argument 2 does not exist");
        return 1;
    }
    var dist = max(1, round(point_distance(arg0.x, arg0.y, arg1.x, arg1.y) / arg2));
    return dist;
}
(cam1[2], cam2[2], 2);

    
c_wait
c_wait

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

    
c_sel
c_sel

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

    
c_autowalk
c_autowalk

function 
c_autowalk(arg0)
{
    
c_cmd("autowalk", arg0, 0, 0, 0);
}
(0);

    
c_setxy
c_setxy

function 
c_setxy(arg0, arg1)
{
    
c_cmd("setxy", arg0, arg1, 0, 0);
}
(krpos1[0] - 8, krpos1[1] - 4);

    
c_sprite
c_sprite

function 
c_sprite(arg0)
{
    
c_cmd("sprite", arg0, 0, 0, 0);
}
(spr_kris_dw_landed);

    
c_sel
c_sel

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

    
c_autowalk
c_autowalk

function 
c_autowalk(arg0)
{
    
c_cmd("autowalk", arg0, 0, 0, 0);
}
(0);

    
c_setxy
c_setxy

function 
c_setxy(arg0, arg1)
{
    
c_cmd("setxy", arg0, arg1, 0, 0);
}
(supos1[0] - 10, supos1[1]);

    
c_sprite
c_sprite

function 
c_sprite(arg0)
{
    
c_cmd("sprite", arg0, 0, 0, 0);
}
(spr_susie_dw_landed);

    
c_pannable
c_pannable

function 
c_pannable(arg0)
{
    
c_cmd("pannable", arg0, 0, 0, 0);
}
(1);

    
c_pan
c_pan

function 
c_pan(arg0, arg1, arg2)
{
    
c_cmd("pan", arg0, arg1, arg2, 0);
}
(cam1[0], cam1[1], 1);

    
c_wait
c_wait

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

    
c_wait
c_wait

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

    
c_pan
c_pan

function 
c_pan(arg0, arg1, arg2)
{
    
c_cmd("pan", arg0, arg1, arg2, 0);
}
(cam2[0], cam2[1], camdist);

    
c_wait
c_wait

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

    
c_sel
c_sel

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

    
c_imageindex
c_imageindex

function 
c_imageindex(arg0)
{
    
c_cmd("imageindex", arg0, 0, 0, 0);
}
(1);

    
c_wait
c_wait

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

    
c_sel
c_sel

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

    
c_imageindex
c_imageindex

function 
c_imageindex(arg0)
{
    
c_cmd("imageindex", arg0, 0, 0, 0);
}
(1);

    
c_wait
c_wait

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

    
c_sel
c_sel

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

    
c_setxy
c_setxy

function 
c_setxy(arg0, arg1)
{
    
c_cmd("setxy", arg0, arg1, 0, 0);
}
(supos1[0], supos1[1]);

    
c_sprite
c_sprite

function 
c_sprite(arg0)
{
    
c_cmd("sprite", arg0, 0, 0, 0);
}
(spr_susie_walk_down_dw_unhappy);

    
c_imageindex
c_imageindex

function 
c_imageindex(arg0)
{
    
c_cmd("imageindex", arg0, 0, 0, 0);
}
(0);

    
c_wait
c_wait

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

    
c_sel
c_sel

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

    
c_setxy
c_setxy

function 
c_setxy(arg0, arg1)
{
    
c_cmd("setxy", arg0, arg1, 0, 0);
}
(krpos1[0], krpos1[1]);

    
c_sprite
c_sprite

function 
c_sprite(arg0)
{
    
c_cmd("sprite", arg0, 0, 0, 0);
}
(spr_krisd_dark);

    
c_imageindex
c_imageindex

function 
c_imageindex(arg0)
{
    
c_cmd("imageindex", arg0, 0, 0, 0);
}
(0);

    
c_wait
c_wait

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

    
c_sel
c_sel

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

    
c_sprite
c_sprite

function 
c_sprite(arg0)
{
    
c_cmd("sprite", arg0, 0, 0, 0);
}
(spr_susie_walk_right_dw_unhappy);

    
c_wait
c_wait

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

    
c_sel
c_sel

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

    
c_sprite
c_sprite

function 
c_sprite(arg0)
{
    
c_cmd("sprite", arg0, 0, 0, 0);
}
(spr_susie_walk_left_dw_unhappy);

    
c_wait
c_wait

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

    
c_sel
c_sel

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

    
c_facing
c_facing

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

    
c_wait
c_wait

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

    
c_sel
c_sel

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

    
c_sprite
c_sprite

function 
c_sprite(arg0)
{
    
c_cmd("sprite", arg0, 0, 0, 0);
}
(spr_susie_walk_up_dw);

    
c_speaker
c_speaker

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

    
c_msgsetloc
c_msgsetloc

function 
c_msgsetloc(arg0, arg1, arg2)
{
    var msg_index = arg0;
    var english = arg1;
    var localized_string_id = arg2;
    var str = english;
    if (!is_english())
        str = 
scr_84_get_lang_string(localized_string_id);
    
c_msgset(msg_index, str);
}
(0, 
Face D* ...It's a long way back up...Wait for inputClose Message
"\\ED* ...It's a long way back up.../%", "obj_dw_churchb_darkclimb_slash_Step_0_gml_245_0"
);

    
c_talk_wait
c_talk_wait

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

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

    
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 c_delay_customfunc(arg0, arg1, arg2 = -1)
{
    if (instance_exists(obj_cutscene_master))
        
c_cmd_x("delaycmd", arg0, "customfunc", arg2, arg1, 0, 0);
}
(function()

    {

        with (obj_savepoint)

            
scr_lerpvar
scr_lerpvar

function 
scr_lerpvar()
{
    if (argument_count < 6)
        ___lerpvar = 
scr_lerpvar_instance(id, argument[0], argument[1], argument[2], argument[3]);
    else
        ___lerpvar = 
scr_lerpvar_instance(id, argument[0], argument[1], argument[2], argument[3], argument[4], argument[5]);
    return ___lerpvar;
}

function scr_lerpvar_respect()
{
    if (argument_count < 6)
        ___lerpvar = 
scr_lerpvar_instance(id, argument[0], argument[1], argument[2], argument[3]);
    else
        ___lerpvar = 
scr_lerpvar_instance(id, argument[0], argument[1], argument[2], argument[3], argument[4], argument[5]);
    ___lerpvar.respectglobalinteract = true;
    return ___lerpvar;
}
("image_alpha", 0, 1, 12);

    });

    
c_panobj
c_panobj

function 
c_panobj(arg0, arg1)
{
    
c_cmd("panobj", arg0, arg1, 0, 0);
}
(kr_actor, 12);

    
c_wait
c_wait

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

    
c_sel
c_sel

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

    
c_facing
c_facing

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

    
c_sel
c_sel

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

    
c_facing
c_facing

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

    
c_pannable
c_pannable

function 
c_pannable(arg0)
{
    
c_cmd("pannable", arg0, 0, 0, 0);
}
(0);

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

    
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 c_delay_customfunc(arg0, arg1, arg2 = -1)
{
    if (instance_exists(obj_cutscene_master))
        
c_cmd_x("delaycmd", arg0, "customfunc", arg2, arg1, 0, 0);
}
(function()

    {

        global.interact = 0;

        cutscene = 0;

        
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()
{
    _newfacing = 
scr_facing_letter_to_number(
scr_get_cardinal_direction(point_direction(x, y, obj_mainchara.x, obj_mainchara.y)));
    remx[0] = obj_mainchara.x;
    remy[0] = obj_mainchara.y;
    facing[0] = _newfacing;
    for (_iaia = target; _iaia > 0; _iaia -= 1)
    {
        remx[_iaia] = lerp(obj_mainchara.x, x, _iaia / target);
        if (global.darkzone == 1)
            remy[_iaia] = lerp(obj_mainchara.y, y + 16, _iaia / target);
        else
            remy[_iaia] = lerp(obj_mainchara.y, y + 6, _iaia / target);
        facing[_iaia] = _newfacing;
    }
}
("susie");

        
scr_tempsave
scr_tempsave

function 
scr_tempsave()
{
    filechoicebk2 = global.filechoice;
    global.filechoice = 9;
    
scr_saveprocess(global.filechoice);
    global.filechoice = filechoicebk2;
}
();

    });

    
c_terminatekillactors
c_terminatekillactors

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

}

if (cutscene == 0)

{

    if (
scr_trigcheck
scr_trigcheck

function 
scr_trigcheck(arg0)
{
    var ____trig = 0;
    if (is_string(arg0))
    {
        with (obj_trigger)
        {
            if (extflag == arg0)
            {
                if (place_meeting(x, y, obj_mainchara))
                    ____trig++;
            }
        }
    }
    return ____trig;
}

function scr_trigcheck_ext(arg0, arg1 = id)
{
    var ____trig = 0;
    if (is_string(arg0))
    {
        with (obj_trigger)
        {
            if (extflag == arg0)
            {
                if (place_meeting(x, y, arg1))
                    ____trig++;
            }
        }
    }
    return ____trig;
}
("cutbegin"))

    {

        cutscene = 4;

        global.interact = 1;

    }

}

if (cutscene == 4)

{

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

    
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 c_delay_customfunc(arg0, arg1, arg2 = -1)
{
    if (instance_exists(obj_cutscene_master))
        
c_cmd_x("delaycmd", arg0, "customfunc", arg2, arg1, 0, 0);
}
(function()

    {

        with (obj_savepoint)

        {

            
scr_lerpvar
scr_lerpvar

function 
scr_lerpvar()
{
    if (argument_count < 6)
        ___lerpvar = 
scr_lerpvar_instance(id, argument[0], argument[1], argument[2], argument[3]);
    else
        ___lerpvar = 
scr_lerpvar_instance(id, argument[0], argument[1], argument[2], argument[3], argument[4], argument[5]);
    return ___lerpvar;
}

function scr_lerpvar_respect()
{
    if (argument_count < 6)
        ___lerpvar = 
scr_lerpvar_instance(id, argument[0], argument[1], argument[2], argument[3]);
    else
        ___lerpvar = 
scr_lerpvar_instance(id, argument[0], argument[1], argument[2], argument[3], argument[4], argument[5]);
    ___lerpvar.respectglobalinteract = true;
    return ___lerpvar;
}
("image_alpha", 1, 0, 12, 2, "out");

            
scr_doom
scr_doom

function 
scr_doom(arg0 = id, arg1)
{
    with (instance_create_depth(0, 0, 0, obj_doom))
    {
alarm[0]
        target = arg0;
        persistent = arg0.persistent;
    }
}
(id, 12);

        }

    });

    var krpos1 = 
scr_heromarker
scr_heromarker

function 
scr_heromarker(arg0 = "", arg1 = "")
{
    var ____foundmarker = -4;
    var xpos = -1;
    var ypos = -1;
    var objindextocheck = 1365;
    if (string_pos("kr", arg0) != 0)
        objindextocheck = 544;
    if (string_pos("su", arg0) != 0)
        objindextocheck = 522;
    if (string_pos("ra", arg0) != 0)
        objindextocheck = 75;
    if (string_pos("no", arg0) != 0)
        objindextocheck = 933;
    if (string_pos("gen", arg0) != 0)
        objindextocheck = 1365;
    with (objindextocheck)
    {
        if (variable_instance_exists(id, "extflag"))
        {
            if (extflag == arg1)
                ____foundmarker = id;
        }
    }
    if (instance_exists(____foundmarker))
    {
        xpos = ____foundmarker.x;
        ypos = ____foundmarker.y;
    }
    if (____foundmarker == -4)
    {
        debug_message("
scr_heromarker(" + arg0 + "," + arg1 + ") Object Not Found");
        return [-4, -4, -4];
    }
    return [xpos, ypos, ____foundmarker];
}

function scr_genmarker(arg0 = "")
{
    var marker = -4;
    with (obj_genmarker)
    {
        if (extflag == arg0)
            marker = id;
    }
    return marker;
}
("kr", "cut2walkto");

    var supos1 = 
scr_heromarker
scr_heromarker

function 
scr_heromarker(arg0 = "", arg1 = "")
{
    var ____foundmarker = -4;
    var xpos = -1;
    var ypos = -1;
    var objindextocheck = 1365;
    if (string_pos("kr", arg0) != 0)
        objindextocheck = 544;
    if (string_pos("su", arg0) != 0)
        objindextocheck = 522;
    if (string_pos("ra", arg0) != 0)
        objindextocheck = 75;
    if (string_pos("no", arg0) != 0)
        objindextocheck = 933;
    if (string_pos("gen", arg0) != 0)
        objindextocheck = 1365;
    with (objindextocheck)
    {
        if (variable_instance_exists(id, "extflag"))
        {
            if (extflag == arg1)
                ____foundmarker = id;
        }
    }
    if (instance_exists(____foundmarker))
    {
        xpos = ____foundmarker.x;
        ypos = ____foundmarker.y;
    }
    if (____foundmarker == -4)
    {
        debug_message("
scr_heromarker(" + arg0 + "," + arg1 + ") Object Not Found");
        return [-4, -4, -4];
    }
    return [xpos, ypos, ____foundmarker];
}

function scr_genmarker(arg0 = "")
{
    var marker = -4;
    with (obj_genmarker)
    {
        if (extflag == arg0)
            marker = id;
    }
    return marker;
}
("su", "cut2walkto");

    var krpos2 = 
scr_heromarker
scr_heromarker

function 
scr_heromarker(arg0 = "", arg1 = "")
{
    var ____foundmarker = -4;
    var xpos = -1;
    var ypos = -1;
    var objindextocheck = 1365;
    if (string_pos("kr", arg0) != 0)
        objindextocheck = 544;
    if (string_pos("su", arg0) != 0)
        objindextocheck = 522;
    if (string_pos("ra", arg0) != 0)
        objindextocheck = 75;
    if (string_pos("no", arg0) != 0)
        objindextocheck = 933;
    if (string_pos("gen", arg0) != 0)
        objindextocheck = 1365;
    with (objindextocheck)
    {
        if (variable_instance_exists(id, "extflag"))
        {
            if (extflag == arg1)
                ____foundmarker = id;
        }
    }
    if (instance_exists(____foundmarker))
    {
        xpos = ____foundmarker.x;
        ypos = ____foundmarker.y;
    }
    if (____foundmarker == -4)
    {
        debug_message("
scr_heromarker(" + arg0 + "," + arg1 + ") Object Not Found");
        return [-4, -4, -4];
    }
    return [xpos, ypos, ____foundmarker];
}

function scr_genmarker(arg0 = "")
{
    var marker = -4;
    with (obj_genmarker)
    {
        if (extflag == arg0)
            marker = id;
    }
    return marker;
}
("kr", "cut2backup");

    var supos2 = 
scr_heromarker
scr_heromarker

function 
scr_heromarker(arg0 = "", arg1 = "")
{
    var ____foundmarker = -4;
    var xpos = -1;
    var ypos = -1;
    var objindextocheck = 1365;
    if (string_pos("kr", arg0) != 0)
        objindextocheck = 544;
    if (string_pos("su", arg0) != 0)
        objindextocheck = 522;
    if (string_pos("ra", arg0) != 0)
        objindextocheck = 75;
    if (string_pos("no", arg0) != 0)
        objindextocheck = 933;
    if (string_pos("gen", arg0) != 0)
        objindextocheck = 1365;
    with (objindextocheck)
    {
        if (variable_instance_exists(id, "extflag"))
        {
            if (extflag == arg1)
                ____foundmarker = id;
        }
    }
    if (instance_exists(____foundmarker))
    {
        xpos = ____foundmarker.x;
        ypos = ____foundmarker.y;
    }
    if (____foundmarker == -4)
    {
        debug_message("
scr_heromarker(" + arg0 + "," + arg1 + ") Object Not Found");
        return [-4, -4, -4];
    }
    return [xpos, ypos, ____foundmarker];
}

function scr_genmarker(arg0 = "")
{
    var marker = -4;
    with (obj_genmarker)
    {
        if (extflag == arg0)
            marker = id;
    }
    return marker;
}
("su", "cut2backup");

    var krdist1 = 
scr_returnwait_instance
scr_returnwait_instance

function 
scr_returnwait_instance(arg0, arg1, arg2)
{
    if (!instance_exists(arg0))
    {
        debug_print("Argument 1 does not exist");
        return 1;
    }
    if (!instance_exists(arg1))
    {
        debug_print("Argument 2 does not exist");
        return 1;
    }
    var dist = max(1, round(point_distance(arg0.x, arg0.y, arg1.x, arg1.y) / arg2));
    return dist;
}
(kr_actor, krpos1[2], 4);

    var sudist1 = 
scr_returnwait_instance
scr_returnwait_instance

function 
scr_returnwait_instance(arg0, arg1, arg2)
{
    if (!instance_exists(arg0))
    {
        debug_print("Argument 1 does not exist");
        return 1;
    }
    if (!instance_exists(arg1))
    {
        debug_print("Argument 2 does not exist");
        return 1;
    }
    var dist = max(1, round(point_distance(arg0.x, arg0.y, arg1.x, arg1.y) / arg2));
    return dist;
}
(su_actor, supos1[2], 4);

    var krdist2 = 
scr_returnwait_instance
scr_returnwait_instance

function 
scr_returnwait_instance(arg0, arg1, arg2)
{
    if (!instance_exists(arg0))
    {
        debug_print("Argument 1 does not exist");
        return 1;
    }
    if (!instance_exists(arg1))
    {
        debug_print("Argument 2 does not exist");
        return 1;
    }
    var dist = max(1, round(point_distance(arg0.x, arg0.y, arg1.x, arg1.y) / arg2));
    return dist;
}
(krpos1[2], krpos2[2], 6);

    var sudist2 = 
scr_returnwait_instance
scr_returnwait_instance

function 
scr_returnwait_instance(arg0, arg1, arg2)
{
    if (!instance_exists(arg0))
    {
        debug_print("Argument 1 does not exist");
        return 1;
    }
    if (!instance_exists(arg1))
    {
        debug_print("Argument 2 does not exist");
        return 1;
    }
    var dist = max(1, round(point_distance(arg0.x, arg0.y, arg1.x, arg1.y) / arg2));
    return dist;
}
(supos1[2], supos2[2], 6);

    var campos1 = scr_genmarker("cut2cam1");

    var camdist = 
scr_returnwait
scr_returnwait

function 
scr_returnwait(arg0, arg1, arg2, arg3, arg4)
{
    return max(1, round(point_distance(arg0, arg1, arg2, arg3) / arg4));
}
(___CX, ___CY, campos1.x, campos1.y, 4);

    var wait1 = max(krdist1, sudist1, camdist);

    
c_pannable
c_pannable

function 
c_pannable(arg0)
{
    
c_cmd("pannable", arg0, 0, 0, 0);
}
(1);

    
c_pan
c_pan

function 
c_pan(arg0, arg1, arg2)
{
    
c_cmd("pan", arg0, arg1, arg2, 0);
}
(campos1.x, campos1.y, wait1);

    
c_sel
c_sel

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

    
c_walkdirect
c_walkdirect

function 
c_walkdirect(arg0, arg1, arg2)
{
    
c_cmd("walkdirect", arg0, arg1, arg2, 0);
}
(krpos1[0], krpos1[1], wait1);

    
c_sel
c_sel

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

    
c_walkdirect
c_walkdirect

function 
c_walkdirect(arg0, arg1, arg2)
{
    
c_cmd("walkdirect", arg0, arg1, arg2, 0);
}
(supos1[0], supos1[1], wait1);

    
c_wait
c_wait

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

    
c_wait
c_wait

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

    
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 c_delay_customfunc(arg0, arg1, arg2 = -1)
{
    if (instance_exists(obj_cutscene_master))
        
c_cmd_x("delaycmd", arg0, "customfunc", arg2, arg1, 0, 0);
}
(function()

    {

        
scr_shakescreen
scr_shakescreen

function 
scr_shakescreen(arg0 = 4, arg1 = 4)
{
    var shaker = instance_create(x, y, obj_shake);
    if (i_ex(shaker))
    {
        shaker.shakex = arg0;
        shaker.shakey = arg1;
    }
}
();

        shakecon = 1;

        var snd = snd_play(snd_rumble);

        
scr_script_delayed
scr_script_delayed

function 
scr_script_delayed()
{
    var __scriptdelay = instance_create(0, 0, obj_script_delayed);
    __scriptdelay.script = argument[0];
    __scriptdelay.alarm[0] = argument[1];
    __scriptdelay.target = id;
    for (var __i = 0; __i < (argument_count - 2); __i++)
        __scriptdelay.script_arg[__i] = argument[__i + 2];
    __scriptdelay.arg_count = argument_count - 2;
    return __scriptdelay;
}
(snd_volume, 6, snd, 0, 8);

    });

    
c_sel
c_sel

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

    
c_sprite
c_sprite

function 
c_sprite(arg0)
{
    
c_cmd("sprite", arg0, 0, 0, 0);
}
(spr_susie_walk_down_dw_unhappy);

    
c_sel
c_sel

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

    
c_facing
c_facing

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

    
c_wait
c_wait

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

    
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 c_delay_customfunc(arg0, arg1, arg2 = -1)
{
    if (instance_exists(obj_cutscene_master))
        
c_cmd_x("delaycmd", arg0, "customfunc", arg2, arg1, 0, 0);
}
(function()

    {

        shakecon = 0;

        siner = 0;

        
scr_lerpvar
scr_lerpvar

function 
scr_lerpvar()
{
    if (argument_count < 6)
        ___lerpvar = 
scr_lerpvar_instance(id, argument[0], argument[1], argument[2], argument[3]);
    else
        ___lerpvar = 
scr_lerpvar_instance(id, argument[0], argument[1], argument[2], argument[3], argument[4], argument[5]);
    return ___lerpvar;
}

function scr_lerpvar_respect()
{
    if (argument_count < 6)
        ___lerpvar = 
scr_lerpvar_instance(id, argument[0], argument[1], argument[2], argument[3]);
    else
        ___lerpvar = 
scr_lerpvar_instance(id, argument[0], argument[1], argument[2], argument[3], argument[4], argument[5]);
    ___lerpvar.respectglobalinteract = true;
    return ___lerpvar;
}
("shaketilex", shaketilex, 0, 3);

        
scr_lerpvar
scr_lerpvar

function 
scr_lerpvar()
{
    if (argument_count < 6)
        ___lerpvar = 
scr_lerpvar_instance(id, argument[0], argument[1], argument[2], argument[3]);
    else
        ___lerpvar = 
scr_lerpvar_instance(id, argument[0], argument[1], argument[2], argument[3], argument[4], argument[5]);
    return ___lerpvar;
}

function scr_lerpvar_respect()
{
    if (argument_count < 6)
        ___lerpvar = 
scr_lerpvar_instance(id, argument[0], argument[1], argument[2], argument[3]);
    else
        ___lerpvar = 
scr_lerpvar_instance(id, argument[0], argument[1], argument[2], argument[3], argument[4], argument[5]);
    ___lerpvar.respectglobalinteract = true;
    return ___lerpvar;
}
("shaketiley", shaketiley, 0, 3);

    });

    
c_wait
c_wait

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

    
c_speaker
c_speaker

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

    
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 E* ...Wait for inputClose Message
"\\EE* .../%", "obj_dw_churchb_darkclimb_slash_Step_0_gml_350_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);
}
(15);

    
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 c_delay_customfunc(arg0, arg1, arg2 = -1)
{
    if (instance_exists(obj_cutscene_master))
        
c_cmd_x("delaycmd", arg0, "customfunc", arg2, arg1, 0, 0);
}
(function()

    {

        
scr_shakescreen
scr_shakescreen

function 
scr_shakescreen(arg0 = 4, arg1 = 4)
{
    var shaker = instance_create(x, y, obj_shake);
    if (i_ex(shaker))
    {
        shaker.shakex = arg0;
        shaker.shakey = arg1;
    }
}
();

        shakecon = 1;

        rumblesnd = snd_loop(snd_rumble);

    });

    
c_wait
c_wait

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

    
c_sel
c_sel

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

    c_lerpvar_instance(su_actor, "x", supos1[0], supos2[0], 4, 2, "out");

    c_lerpvar_instance(su_actor, "y", supos1[1], supos2[1], 4, 2, "out");

    
c_sprite
c_sprite

function 
c_sprite(arg0)
{
    
c_cmd("sprite", arg0, 0, 0, 0);
}
(spr_susie_dw_landed);

    
c_imageindex
c_imageindex

function 
c_imageindex(arg0)
{
    
c_cmd("imageindex", arg0, 0, 0, 0);
}
(1);

    
c_delaycmd
c_delaycmd

function 
c_delaycmd(arg0, arg1, arg2)
{
    
c_cmd_x("delaycmd", arg0, arg1, arg2, 0, 0, 0);
}
(3, "imageindex", 0);

    
c_sel
c_sel

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

    c_lerpvar_instance(kr_actor, "x", krpos1[0], krpos2[0], 4, 2, "out");

    c_lerpvar_instance(kr_actor, "y", krpos1[1], krpos2[1], 4, 2, "out");

    
c_sprite
c_sprite

function 
c_sprite(arg0)
{
    
c_cmd("sprite", arg0, 0, 0, 0);
}
(spr_kris_dw_landed);

    
c_imageindex
c_imageindex

function 
c_imageindex(arg0)
{
    
c_cmd("imageindex", arg0, 0, 0, 0);
}
(0);

    
c_delaycmd
c_delaycmd

function 
c_delaycmd(arg0, arg1, arg2)
{
    
c_cmd_x("delaycmd", arg0, arg1, arg2, 0, 0, 0);
}
(3, "imageindex", 1);

    
c_wait
c_wait

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

    
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 c_delay_customfunc(arg0, arg1, arg2 = -1)
{
    if (instance_exists(obj_cutscene_master))
        
c_cmd_x("delaycmd", arg0, "customfunc", arg2, arg1, 0, 0);
}
(function()

    {

        
scr_shakescreen
scr_shakescreen

function 
scr_shakescreen(arg0 = 4, arg1 = 4)
{
    var shaker = instance_create(x, y, obj_shake);
    if (i_ex(shaker))
    {
        shaker.shakex = arg0;
        shaker.shakey = arg1;
    }
}
(0);

        shakecon = 2;

        snd_volume(rumblesnd, 0, 12);

        snd_play(snd_locker);

        
scr_script_delayed
scr_script_delayed

function 
scr_script_delayed()
{
    var __scriptdelay = instance_create(0, 0, obj_script_delayed);
    __scriptdelay.script = argument[0];
    __scriptdelay.alarm[0] = argument[1];
    __scriptdelay.target = id;
    for (var __i = 0; __i < (argument_count - 2); __i++)
        __scriptdelay.script_arg[__i] = argument[__i + 2];
    __scriptdelay.arg_count = argument_count - 2;
    return __scriptdelay;
}
(snd_stop, 30, 380);

    });

    
c_wait
c_wait

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

    
c_speaker
c_speaker

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

    
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 Z* The floor...Wait for input
"\\EZ* The floor.../", "obj_dw_churchb_darkclimb_slash_Step_0_gml_404_0"
);

    
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 Z* ...Delay 11 is...Delay 11 is something down there...?Wait for inputClose Message
"\\EZ* ..^1. is..^1. is something down there...?/%", "obj_dw_churchb_darkclimb_slash_Step_0_gml_405_0"
);

    
c_talk
c_talk

function 
c_talk()
{
    
c_cmd("talk", 0, 0, 0, 0);
}
();

    
c_wait_box
c_wait_box

function 
c_wait_box(arg0)
{
    
c_cmd("waitbox", arg0, 0, 0, 0);
}
(1);

    
c_sel
c_sel

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

    
c_imageindex
c_imageindex

function 
c_imageindex(arg0)
{
    
c_cmd("imageindex", arg0, 0, 0, 0);
}
(0);

    
c_addxy
c_addxy

function 
c_addxy(arg0, arg1)
{
    
c_cmd("addxy", arg0, arg1, 0, 0);
}
(4, 0);

    
c_sprite
c_sprite

function 
c_sprite(arg0)
{
    
c_cmd("sprite", arg0, 0, 0, 0);
}
(spr_susie_walk_down_dw_unhappy);

    
c_wait_talk
c_wait_talk

function 
c_wait_talk()
{
    
c_cmd("waitdialoguer", 0, 0, 0, 0);
}
();

    
c_wait
c_wait

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

    
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 c_delay_customfunc(arg0, arg1, arg2 = -1)
{
    if (instance_exists(obj_cutscene_master))
        
c_cmd_x("delaycmd", arg0, "customfunc", arg2, arg1, 0, 0);
}
(function()

    {

        var pos = 
scr_heromarker
scr_heromarker

function 
scr_heromarker(arg0 = "", arg1 = "")
{
    var ____foundmarker = -4;
    var xpos = -1;
    var ypos = -1;
    var objindextocheck = 1365;
    if (string_pos("kr", arg0) != 0)
        objindextocheck = 544;
    if (string_pos("su", arg0) != 0)
        objindextocheck = 522;
    if (string_pos("ra", arg0) != 0)
        objindextocheck = 75;
    if (string_pos("no", arg0) != 0)
        objindextocheck = 933;
    if (string_pos("gen", arg0) != 0)
        objindextocheck = 1365;
    with (objindextocheck)
    {
        if (variable_instance_exists(id, "extflag"))
        {
            if (extflag == arg1)
                ____foundmarker = id;
        }
    }
    if (instance_exists(____foundmarker))
    {
        xpos = ____foundmarker.x;
        ypos = ____foundmarker.y;
    }
    if (____foundmarker == -4)
    {
        debug_message("
scr_heromarker(" + arg0 + "," + arg1 + ") Object Not Found");
        return [-4, -4, -4];
    }
    return [xpos, ypos, ____foundmarker];
}

function scr_genmarker(arg0 = "")
{
    var marker = -4;
    with (obj_genmarker)
    {
        if (extflag == arg0)
            marker = id;
    }
    return marker;
}
(undefined, "enemycloud");

        var pos2 = scr_genmarker("cut2cam1");

        var snd = snd_play(snd_rumble);

        
scr_script_delayed
scr_script_delayed

function 
scr_script_delayed()
{
    var __scriptdelay = instance_create(0, 0, obj_script_delayed);
    __scriptdelay.script = argument[0];
    __scriptdelay.alarm[0] = argument[1];
    __scriptdelay.target = id;
    for (var __i = 0; __i < (argument_count - 2); __i++)
        __scriptdelay.script_arg[__i] = argument[__i + 2];
    __scriptdelay.arg_count = argument_count - 2;
    return __scriptdelay;
}
(snd_volume, 30, snd, 0, 8);

        enemycloud = instance_create(pos[0], pos2.y + 480, obj_dw_chaseenemy_cloud);

        with (enemycloud)

            
scr_lerpvar
scr_lerpvar

function 
scr_lerpvar()
{
    if (argument_count < 6)
        ___lerpvar = 
scr_lerpvar_instance(id, argument[0], argument[1], argument[2], argument[3]);
    else
        ___lerpvar = 
scr_lerpvar_instance(id, argument[0], argument[1], argument[2], argument[3], argument[4], argument[5]);
    return ___lerpvar;
}

function scr_lerpvar_respect()
{
    if (argument_count < 6)
        ___lerpvar = 
scr_lerpvar_instance(id, argument[0], argument[1], argument[2], argument[3]);
    else
        ___lerpvar = 
scr_lerpvar_instance(id, argument[0], argument[1], argument[2], argument[3], argument[4], argument[5]);
    ___lerpvar.respectglobalinteract = true;
    return ___lerpvar;
}
("y", y, pos2.y + 400, 30, 2, "out");

        
scr_shakescreen
scr_shakescreen

function 
scr_shakescreen(arg0 = 4, arg1 = 4)
{
    var shaker = instance_create(x, y, obj_shake);
    if (i_ex(shaker))
    {
        shaker.shakex = arg0;
        shaker.shakey = arg1;
    }
}
(8, 12);

    });

    
c_wait
c_wait

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

    
c_sel
c_sel

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

    
c_sprite
c_sprite

function 
c_sprite(arg0)
{
    
c_cmd("sprite", arg0, 0, 0, 0);
}
(spr_susie_shock);

    
c_shakeobj
c_shakeobj

function 
c_shakeobj()
{
    
c_cmd("shakeobj", 0, 0, 0, 0);
}
();

    c_sndplay(snd_wing);

    
c_wait
c_wait

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

    
c_speaker
c_speaker

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

    
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 Z* Guess that answers that!Wait for inputClose Message
"\\EZ* Guess that answers that!/%", "obj_dw_churchb_darkclimb_slash_Step_0_gml_443_0"
);

    
c_talk_wait
c_talk_wait

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

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

    var krpos = 
scr_heromarker
scr_heromarker

function 
scr_heromarker(arg0 = "", arg1 = "")
{
    var ____foundmarker = -4;
    var xpos = -1;
    var ypos = -1;
    var objindextocheck = 1365;
    if (string_pos("kr", arg0) != 0)
        objindextocheck = 544;
    if (string_pos("su", arg0) != 0)
        objindextocheck = 522;
    if (string_pos("ra", arg0) != 0)
        objindextocheck = 75;
    if (string_pos("no", arg0) != 0)
        objindextocheck = 933;
    if (string_pos("gen", arg0) != 0)
        objindextocheck = 1365;
    with (objindextocheck)
    {
        if (variable_instance_exists(id, "extflag"))
        {
            if (extflag == arg1)
                ____foundmarker = id;
        }
    }
    if (instance_exists(____foundmarker))
    {
        xpos = ____foundmarker.x;
        ypos = ____foundmarker.y;
    }
    if (____foundmarker == -4)
    {
        debug_message("
scr_heromarker(" + arg0 + "," + arg1 + ") Object Not Found");
        return [-4, -4, -4];
    }
    return [xpos, ypos, ____foundmarker];
}

function scr_genmarker(arg0 = "")
{
    var marker = -4;
    with (obj_genmarker)
    {
        if (extflag == arg0)
            marker = id;
    }
    return marker;
}
("kr", "bot");

    var supos = 
scr_heromarker
scr_heromarker

function 
scr_heromarker(arg0 = "", arg1 = "")
{
    var ____foundmarker = -4;
    var xpos = -1;
    var ypos = -1;
    var objindextocheck = 1365;
    if (string_pos("kr", arg0) != 0)
        objindextocheck = 544;
    if (string_pos("su", arg0) != 0)
        objindextocheck = 522;
    if (string_pos("ra", arg0) != 0)
        objindextocheck = 75;
    if (string_pos("no", arg0) != 0)
        objindextocheck = 933;
    if (string_pos("gen", arg0) != 0)
        objindextocheck = 1365;
    with (objindextocheck)
    {
        if (variable_instance_exists(id, "extflag"))
        {
            if (extflag == arg1)
                ____foundmarker = id;
        }
    }
    if (instance_exists(____foundmarker))
    {
        xpos = ____foundmarker.x;
        ypos = ____foundmarker.y;
    }
    if (____foundmarker == -4)
    {
        debug_message("
scr_heromarker(" + arg0 + "," + arg1 + ") Object Not Found");
        return [-4, -4, -4];
    }
    return [xpos, ypos, ____foundmarker];
}

function scr_genmarker(arg0 = "")
{
    var marker = -4;
    with (obj_genmarker)
    {
        if (extflag == arg0)
            marker = id;
    }
    return marker;
}
("su", "bot");

    
c_sel
c_sel

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

    
c_autofacing
c_autofacing

function 
c_autofacing(arg0)
{
    
c_cmd("autofacing", arg0, 0, 0, 0);
}
(1);

    
c_autowalk
c_autowalk

function 
c_autowalk(arg0)
{
    
c_cmd("autowalk", arg0, 0, 0, 0);
}
(1);

    
c_walkdirect
c_walkdirect

function 
c_walkdirect(arg0, arg1, arg2)
{
    
c_cmd("walkdirect", arg0, arg1, arg2, 0);
}
(krpos[0], krpos[1], 6);

    
c_sel
c_sel

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

    
c_autofacing
c_autofacing

function 
c_autofacing(arg0)
{
    
c_cmd("autofacing", arg0, 0, 0, 0);
}
(1);

    
c_autowalk
c_autowalk

function 
c_autowalk(arg0)
{
    
c_cmd("autowalk", arg0, 0, 0, 0);
}
(1);

    
c_walkdirect
c_walkdirect

function 
c_walkdirect(arg0, arg1, arg2)
{
    
c_cmd("walkdirect", arg0, arg1, arg2, 0);
}
(supos[0], supos[1], 6);

    
c_sel
c_sel

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

    
c_wait
c_wait

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

    
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 c_delay_customfunc(arg0, arg1, arg2 = -1)
{
    if (instance_exists(obj_cutscene_master))
        
c_cmd_x("delaycmd", arg0, "customfunc", arg2, arg1, 0, 0);
}
(function()

    {

        with (obj_dw_chaseenemy_cloud)

        {

            miny = 3040;

            minspeed = -0.3;

            maxspeed = -1.4;

        }

        cutscene = 5;

        
scr_setparty
scr_setparty

function 
scr_setparty(arg0 = false, arg1 = false, arg2 = false)
{
    var kris = obj_mainchara;
    var slot = 0;
    var __make = true;
    if (!i_ex(kris))
        __make = false;
    
scr_losechar();
    safe_delete(obj_caterpillarchara);
    if (arg0 == true)
    {
        
scr_getchar(2);
        if (__make)
        {
            with (
scr_makecaterpillar(kris.x, kris.y, 2, slot))
            {
                halign = (global.darkzone == 0) ? 3 : 6;
                valign = (global.darkzone == 0) ? 6 : 16;
                x -= halign;
                y -= valign;
            }
        }
        slot++;
    }
    if (arg1 == true)
    {
        
scr_getchar(3);
        if (__make)
        {
            with (
scr_makecaterpillar(kris.x, kris.y, 3, slot))
            {
                halign = 2;
                valign = 12;
                x -= halign;
                y -= valign;
            }
        }
        slot++;
    }
    if (arg2 == true)
    {
        
scr_getchar(4);
        if (__make)
        {
            with (
scr_makecaterpillar(kris.x, kris.y, 4, slot))
            {
                halign = (global.darkzone == 0) ? 2 : 4;
                valign = (global.darkzone == 0) ? 9 : 18;
                x -= halign;
                y -= valign;
            }
        }
        slot++;
    }
}
(0);

    });

    
c_actortokris
c_actortokris

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

    
c_terminatekillactors
c_terminatekillactors

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

}

if (cutscene == 5)

{

    with (obj_climbstartertrig)

    {

        if (exitmarkerflag == "bot")

        {

            global.interact = 1;

            myinteract = 3;

        }

    }

    var jumptime = 8;

    cutscene = -1;

    scr_delay_var("cutscene", 6, jumptime);

    var supos = 
scr_heromarker
scr_heromarker

function 
scr_heromarker(arg0 = "", arg1 = "")
{
    var ____foundmarker = -4;
    var xpos = -1;
    var ypos = -1;
    var objindextocheck = 1365;
    if (string_pos("kr", arg0) != 0)
        objindextocheck = 544;
    if (string_pos("su", arg0) != 0)
        objindextocheck = 522;
    if (string_pos("ra", arg0) != 0)
        objindextocheck = 75;
    if (string_pos("no", arg0) != 0)
        objindextocheck = 933;
    if (string_pos("gen", arg0) != 0)
        objindextocheck = 1365;
    with (objindextocheck)
    {
        if (variable_instance_exists(id, "extflag"))
        {
            if (extflag == arg1)
                ____foundmarker = id;
        }
    }
    if (instance_exists(____foundmarker))
    {
        xpos = ____foundmarker.x;
        ypos = ____foundmarker.y;
    }
    if (____foundmarker == -4)
    {
        debug_message("
scr_heromarker(" + arg0 + "," + arg1 + ") Object Not Found");
        return [-4, -4, -4];
    }
    return [xpos, ypos, ____foundmarker];
}

function scr_genmarker(arg0 = "")
{
    var marker = -4;
    with (obj_genmarker)
    {
        if (extflag == arg0)
            marker = id;
    }
    return marker;
}
("su", "bot");

    fakesu = 
scr_marker_ext
scr_marker_ext

function 
scr_marker_ext(arg0, arg1, arg2, arg3 = 1, arg4 = 1, arg5 = 0, arg6 = 0, arg7 = 16777215, arg8 = depth, arg9 = false, arg10 = -1, arg11 = 1)
{
    var thismarker = instance_create(arg0, arg1, obj_marker);
    with (thismarker)
    {
        depth = arg8;
        sprite_index = arg2;
        image_speed = arg5;
        image_xscale = arg3;
        image_yscale = arg4;
        image_index = arg6;
        image_blend = arg7;
        image_alpha = arg11;
        if (arg9)
            
scr_depth_alt();
    }
    if (arg10 > 0)
        
scr_doom(thismarker, arg10);
    return thismarker;
}

function scr_marker_fromasset(arg0, arg1 = depth, arg2 = false)
{
    if (is_undefined(arg0))
    {
        debug_message("Warning: scr_marker_fromasset() sprite_instance didn't exist");
        return -4;
    }
    var sprite = layer_sprite_get_sprite(arg0);
    var index = layer_sprite_get_index(arg0);
    var imagespeed = layer_sprite_get_speed(arg0);
    var xscale = layer_sprite_get_xscale(arg0);
    var yscale = layer_sprite_get_yscale(arg0);
    var angle = layer_sprite_get_angle(arg0);
    var blend = layer_sprite_get_blend(arg0);
    var alpha = layer_sprite_get_alpha(arg0);
    var xloc = layer_sprite_get_x(arg0);
    var yloc = layer_sprite_get_y(arg0);
    var thismarker = instance_create_depth(xloc, yloc, arg1, obj_marker);
    with (thismarker)
    {
        sprite_index = sprite;
        image_index = index;
        image_speed = imagespeed;
        image_xscale = xscale;
        image_yscale = yscale;
        image_angle = angle;
        image_blend = blend;
        image_alpha = alpha;
        if (arg2)
            
scr_depth_alt(id, arg2);
    }
    return thismarker;
}

function scr_assetgetinfo(arg0)
{
    var sprite = layer_sprite_get_sprite(arg0);
    var index = layer_sprite_get_index(arg0);
    var xloc = layer_sprite_get_x(arg0);
    var yloc = layer_sprite_get_y(arg0);
    var xscale = layer_sprite_get_xscale(arg0);
    var yscale = layer_sprite_get_yscale(arg0);
    var angle = layer_sprite_get_angle(arg0);
    var blend = layer_sprite_get_blend(arg0);
    var alpha = layer_sprite_get_alpha(arg0);
    var imagespeed = layer_sprite_get_speed(arg0);
    return [sprite, index, xloc, yloc, xscale, yscale, angle, blend, alpha, imagespeed];
}
(supos[0], supos[1], spr_susie_walk_up_dw, 2, 2, 0, 0, undefined, undefined, 1);

    with (fakesu)

    {

        x -= 2;

        y += 20;

        sprite_index = spr_susie_dw_jump_ball;

        image_speed = 0.25;

        var pos2 = scr_genmarker("suclimbstart");

        snd_play(snd_jump);

        
scr_jump_to_point
scr_jump_to_point

function 
scr_jump_to_point(arg0, arg1, arg2, arg3, arg4 = 0)
{
    var ___jump = 
scr_jump_to_point_sprite(arg0, arg1, arg2, arg3, 0, 0);
    with (___jump)
    {
        trackalpha = arg4;
        trackblend = arg4;
        trackindex = arg4;
        tracksprite = arg4;
        trackangle = arg4;
    }
    return ___jump;
}
(pos2.x, pos2.y, 8, jumptime, 1);

    }

}

if (cutscene == 6)

{

    global.currentsong[0] = snd_init("ch4_battle.ogg");

    global.currentsong[1] = mus_loop_ext(global.currentsong[0], 0.7, 1);

    var pos2 = scr_genmarker("suclimbstart");

    var climbsusie = instance_create(pos2.x - 8, pos2.y - 32, obj_climb_susie);

    
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, climbsusie);

    safe_delete(fakesu);

    cutscene = 7;

}

if (con == 20)

{

    timer += 1;

    if ((timer % 40) == 0)

    {

        with (obj_climb_susie)

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

    }

    var allKilled = true;

    with (obj_trigger)

    {

        if (extflag == "dontharasssusie")

        {

            if (i_ex(instance_place(x, y, obj_climb_setpathenemy)))

                allKilled = false;

        }

    }

    if (allKilled)

    {

        with (obj_climb_susie)

            waiteventid = 0;

        monologuecon = 2;

        con = 21;

        event_user(10);

    }

}

if (con == 21)

{

    if (obj_climb_kris.y <= 2840)

    {

        con = 22;

        obj_climb_kris.fall_speed_cap = 99;

        snd_play(snd_heavyswing);

        
scr_shakescreen
scr_shakescreen

function 
scr_shakescreen(arg0 = 4, arg1 = 4)
{
    var shaker = instance_create(x, y, obj_shake);
    if (i_ex(shaker))
    {
        shaker.shakex = arg0;
        shaker.shakey = arg1;
    }
}
(6, 0);

        with (instance_create(4820, 2680, obj_animation))

        {

            depth = 1000;

            sprite_index = spr_ch2_gimmick_explosion;

        }

        with (instance_create(4800, 2680, obj_climb_watergenerator))

        {

            image_xscale = 2;

            image_yscale = 2;

            timer = 10;

        }

        with (instance_create(4760, 3860, obj_climb_susie))

        {

            image_xscale = 2;

            image_yscale = 2;

        }

        with (obj_dw_chaseenemy_cloud)

        {

            miny = 4500;

            minspeed = 0;

            maxspeed = 0;

        }

    }

}

if (con == 22)

{

    if (obj_climb_kris.y <= 2520)

    {

        con = 23;

        timer = 0;

    }

}

if (con == 23)

{

    timer += 1;

    if (timer == 26)

    {

        snd_play(snd_heavyswing);

        
scr_shakescreen
scr_shakescreen

function 
scr_shakescreen(arg0 = 4, arg1 = 4)
{
    var shaker = instance_create(x, y, obj_shake);
    if (i_ex(shaker))
    {
        shaker.shakex = arg0;
        shaker.shakey = arg1;
    }
}
(6, 0);

        with (instance_create(4820, 2320, obj_animation))

        {

            depth = 1000;

            sprite_index = spr_ch2_gimmick_explosion;

        }

        with (instance_create(4800, 2320, obj_climb_watergenerator))

        {

            image_xscale = 2;

            image_yscale = 2;

            timer = 40;

        }

        con = 24;

    }

}

with (obj_climb_setpathenemy)

    damage = 38;

if (con > 21 && con <= 30)

{

    if (obj_climb_kris.x <= 4240 && obj_climb_kris.y <= 3500)

    {

        with (obj_dw_chaseenemy_cloud)

        {

            y = ___CY + 480 + 120;

            miny = 2360;

            minspeed = -2;

            maxspeed = -15.5;

        }

        con = 31;

    }

}

if (suendcon == 0)

{