Deltarune (Chapter 4) script viewer

init = 0;

timer = 0;

con = 0;

barrier1 = instance_create(600, 600, obj_solidblocksized);

barrier2 = instance_create(480, 480, obj_solidblocksized);

barrier3 = instance_create(600, 3560, obj_solidblocksized);

barrier4 = instance_create(480, 3680, obj_solidblocksized);

layer_set_visible("TILES_SLIDES", 0);

layer_set_visible("DEBUG_ASSETS", 0);

towercon = 10;

ialpha = 0;

if (
scr_debug
scr_debug

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

{

    if (keyboard_check(ord("P")))

        global.plot = 0;

    if (keyboard_check(ord("1")))

    {

        global.plot = 238.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++;
    }
}
(1);

    }

    if (keyboard_check(ord("2")))

        global.tempflag[90] = 0.1;

    if (global.tempflag[90] == 0.1)

    {

        global.plot = 238.61;

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

    }

}

if (global.plot < 238.5)

{

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

    global.plot = 238.5;

}

if (global.plot == 238.61)

    con = 2;

if (global.plot > 238.61)

    con = -1;

var lay_id = layer_get_id("BGCOLOR");

back_id = layer_background_get_id(lay_id);

susie_monologue = [[stringsetloc(
* Gotta be honest,Delay 11 Kris. I've never...Wait for input
"* Gotta be honest^1, Kris. I've never.../", "obj_dw_churchb_rotatingtower_slash_Create_0_gml_69_0"
), stringsetloc(
* I've never really gotten picked...Wait for input
"* I've never really gotten picked.../", "obj_dw_churchb_rotatingtower_slash_Create_0_gml_70_0"
), stringsetloc(
* ...Delay 11 for anything before.Wait for inputClose Message
"* ..^1. for anything before./%", "obj_dw_churchb_rotatingtower_slash_Create_0_gml_71_0"
)], [stringsetloc(
* No one ever wanted to be my partner in class.Wait for input
"* No one ever wanted to be my partner in class./", "obj_dw_churchb_rotatingtower_slash_Create_0_gml_74_0"
), stringsetloc(
* ...Delay 11 Even got chosen last in gym.Wait for inputClose Message
"* ..^1. Even got chosen last in gym./%", "obj_dw_churchb_rotatingtower_slash_Create_0_gml_75_0"
)], [stringsetloc(
* But this...?Wait for input
"* But this...?/", "obj_dw_churchb_rotatingtower_slash_Create_0_gml_78_0"
), stringsetloc(
* This is like...Delay 11 Something else,Delay 11 y'know?Wait for input
"* This is like..^1. Something else^1, y'know?/", "obj_dw_churchb_rotatingtower_slash_Create_0_gml_79_0"
), stringsetloc(
* Something...Delay 11 important.Wait for inputClose Message
"* Something..^1. important./%", "obj_dw_churchb_rotatingtower_slash_Create_0_gml_80_0"
)], [stringsetloc(
* Kris...Delay 11 before,Delay 11 I didn't think I could be a hero.Wait for input
"* Kris..^1. before^1, I didn't think I could be a hero./", "obj_dw_churchb_rotatingtower_slash_Create_0_gml_83_0"
), stringsetloc(
* I wasn't good enough. I mean,Delay 11 I was...Delay 11 bad.Wait for input
"* I wasn't good enough. I mean^1, I was..^1. bad./", "obj_dw_churchb_rotatingtower_slash_Create_0_gml_84_0"
), stringsetloc(
* I still kinda am bad. In some ways,Delay 11 I guess.Wait for inputClose Message
"* I still kinda am bad. In some ways^1, I guess./%", "obj_dw_churchb_rotatingtower_slash_Create_0_gml_85_0"
)], [stringsetloc(
* But now,Delay 11 I...Delay 11 I got hope crossed on my heart.Wait for input
"* But now^1, I..^1. I got hope crossed on my heart./", "obj_dw_churchb_rotatingtower_slash_Create_0_gml_88_0"
), stringsetloc(
* Hope,Delay 11 written in truth. Written somewhere...Wait for input
"* Hope^1, written in truth. Written somewhere.../", "obj_dw_churchb_rotatingtower_slash_Create_0_gml_89_0"
), stringsetloc(
* Written somewhere no one can erase!Wait for inputClose Messagej
"* Written somewhere no one can erase!/%j", "obj_dw_churchb_rotatingtower_slash_Create_0_gml_90_0"
)]];

monologue_writer = -4;

monologuecon = -1;

monowatch = 0;

monotime = 0;

monocon = 0;

roomglow = instance_create(x, y, obj_roomglow);

stayactive = 0;

fakesu = 0;

sucon = 0;

sutime = 0;

endsu = -4;

suactorshadow = -4;

var spritesArray = layer_get_all_elements("DEBUG_ASSETS");

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

{

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

        organiknpc = scr_makenpc_fromasset(spritesArray[i]);

}

organiknpc.chose = -1;