Deltarune (Chapter 4) script viewer

if (
scr_debug
scr_debug

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

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

layer_set_visible("BGCOLOR_DEBUG", 0);

layer_set_visible("TILES_BG", 0);

init = 0;

riparea = instance_create(0, 0, obj_church_ripple_area);

scr_sizeexact
scr_sizeexact

function 
scr_sizeexact(arg0, arg1, arg2 = id)
{
    with (arg2)
    {
        if (!sprite_exists(sprite_index))
        {
            debug_message("Can't size, no sprite");
            exit;
        }
        var _w = sprite_get_width(sprite_index);
        var _h = sprite_get_width(sprite_index);
        image_xscale = arg0 / _w;
        image_yscale = arg1 / _h;
    }
}
(room_width, room_height, riparea);

ripplemanager = instance_create(0, 0, obj_church_ripple_area_manager);

ripplemanager.active = true;

ripple = -4;

bellint = 0;

domove = 0;

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

con = 0;

spawn = 0;

scr_musicer
scr_musicer

function 
scr_musicer(arg0 = "dogcheck.ogg", arg1 = 0.7, arg2 = 1, arg3 = 0, arg4 = -1)
{
    var musicer = instance_create_depth(0, 0, 0, obj_musicer_gen);
    musicer.song = arg0;
    musicer.volume = arg1;
    musicer.pitch = arg2;
    musicer.delay = arg3;
    musicer.fadein = arg4;
    return musicer;
}
("darkchurch_intro.ogg", 0.7);

layerarray = layer_get_all();

shelvesinit = 0;

sprite_array_size = -1;

layersprite = [];

for (var i = 0; i < array_length(layerarray); i++)

{

    if (layer_get_name(layerarray[i]) == "CREATURES")

    {

        elements = layer_get_all_elements(layerarray[i]);

        for (var j = 0; j < array_length(elements); j++)

        {

            if (layer_get_element_type(elements[j]) == 4)

            {

                sprite_array_size++;

                layersprite[sprite_array_size] = instance_create(layer_sprite_get_x(elements[j]), layer_sprite_get_y(elements[j]), obj_marker);

                layersprite[sprite_array_size].sprite_index = layer_sprite_get_sprite(elements[j]);

                layersprite[sprite_array_size].image_speed = 0;

                layersprite[sprite_array_size].image_index = layer_sprite_get_index(elements[j]);

                layersprite[sprite_array_size].image_xscale = layer_sprite_get_xscale(elements[j]);

                layersprite[sprite_array_size].image_yscale = 2;

                with (layersprite[sprite_array_size])

                {

                    image_index = (x / 40) + (y / 40);

                    image_speed = 0.25;

                    
scr_depth
scr_depth

function 
scr_depth(arg0 = id, arg1 = 0)
{
    with (arg0)
        depth = 100000 - ((y * 10) + (sprite_height * 10) + (arg1 * 10));
}
();

                    setxy(
scr_even
scr_even

function 
scr_even(arg0)
{
    return round(arg0 / 2) * 2;
}
(x), 
scr_even
scr_even

function 
scr_even(arg0)
{
    return round(arg0 / 2) * 2;
}
(y));

                }

                layer_sprite_destroy(elements[j]);

            }

        }

        break;

    }

}

layer_set_visible("DEBUG_ASSETS", false);

blocker = -4;

if (global.plot >= 242)

{

    var spritesArray = layer_get_all_elements("DEBUG_ASSETS");

    for (var i = 0; i < array_length(spritesArray); i++)

    {

        if (layer_sprite_get_sprite(spritesArray[i]) == 4343)

            blocker = scr_makenpc_fromasset(spritesArray[i]);

    }

}

with (obj_border_controller)

    hide_border(0.025);