Deltarune (Chapter 2) script viewer

con = -1;

if (global.plot < 50)

{

    
scr_losechar
scr_losechar

function 
scr_losechar()
{
    global.char[2] = 0;
    global.char[1] = 0;
    with (obj_darkcontroller)
    {
        chartotal = 0;
        havechar[0] = 0;
        havechar[1] = 0;
        havechar[2] = 0;
        havechar[3] = 0;
        for (i = 0; i < 3; i += 1)
        {
            global.faceaction[i] = 0;
            if (global.char[i] != 0)
                chartotal += 1;
            if (global.char[i] == 1)
            {
                havechar[0] = 1;
                charpos[0] = i;
            }
            if (global.char[i] == 2)
            {
                havechar[1] = 1;
                charpos[1] = i;
            }
            if (global.char[i] == 3)
            {
                havechar[2] = 1;
                charpos[2] = i;
            }
            if (global.char[i] == 4)
            {
                havechar[3] = 1;
                charpos[3] = i;
            }
        }
    }
    global.submenu = 0;
    global.charselect = -1;
    for (i = 0; i < 36; i += 1)
        global.submenucoord[i] = 0;
}
();

    if (instance_exists(obj_caterpillarchara))

        instance_destroy(obj_caterpillarchara);

    
scr_getchar
scr_getchar

function 
scr_getchar(arg0)
{
    getchar = 0;
    if (global.char[0] == 0)
    {
        global.char[0] = arg0;
        getchar = 1;
    }
    if (global.char[1] == 0 && getchar == 0)
    {
        global.char[1] = arg0;
        getchar = 1;
    }
    if (global.char[2] == 0 && getchar == 0)
    {
        global.char[2] = arg0;
        getchar = 1;
    }
    with (obj_darkcontroller)
    {
        chartotal = 0;
        havechar[0] = 0;
        havechar[1] = 0;
        havechar[2] = 0;
        havechar[3] = 0;
        for (i = 0; i < 3; i += 1)
        {
            global.faceaction[i] = 0;
            if (global.char[i] != 0)
                chartotal += 1;
            if (global.char[i] == 1)
            {
                havechar[0] = 1;
                charpos[0] = i;
            }
            if (global.char[i] == 2)
            {
                havechar[1] = 1;
                charpos[1] = i;
            }
            if (global.char[i] == 3)
            {
                havechar[2] = 1;
                charpos[2] = i;
            }
            if (global.char[i] == 4)
            {
                havechar[3] = 1;
                charpos[3] = i;
            }
        }
    }
}
(2);

    if (global.tempflag[38] == 0)

    {

        con = 1;

        
scr_makecaterpillar
scr_makecaterpillar

function 
scr_makecaterpillar(arg0, arg1, arg2, arg3)
{
    global.cinstance[arg3] = instance_create(arg0, arg1, obj_caterpillarchara);
    global.cinstance[arg3].target = 12 + (arg3 * 12);
    if (arg2 == 3)
    {
        with (global.cinstance[arg3])
        {
            usprite = spr_ralseiu;
            dsprite = spr_ralseid;
            rsprite = spr_ralseir;
            lsprite = spr_ralseil;
            if (global.chapter >= 2)
            {
                name = "ralsei";
                usprite = spr_ralsei_walk_up;
                dsprite = spr_ralsei_walk_down;
                rsprite = spr_ralsei_walk_right;
                lsprite = spr_ralsei_walk_left;
            }
        }
    }
    if (arg2 == 4)
    {
        with (global.cinstance[arg3])
        {
            name = "noelle";
            usprite = spr_noelle_walk_up_dw;
            dsprite = spr_noelle_walk_down_dw;
            rsprite = spr_noelle_walk_right_dw;
            lsprite = spr_noelle_walk_left_dw;
            if (global.chapter == 2 && global.plot == 95)
            {
                dsprite = spr_noelle_walk_down_blush_dw;
                rsprite = spr_noelle_walk_right_blush_dw;
                lsprite = spr_noelle_walk_left_blush_dw;
            }
        }
    }
    if (arg2 == 5)
    {
        with (global.cinstance[arg3])
        {
            name = "berdly";
            usprite = spr_berdly_walk_up_dw;
            dsprite = spr_berdly_walk_down_dw;
            rsprite = spr_berdly_walk_right_dw;
            lsprite = spr_berdly_walk_left_dw;
        }
    }
    if (arg2 == 6)
    {
        with (global.cinstance[arg3])
        {
            name = "starwalker";
            usprite = spr_npc_originalstarwalker;
            dsprite = spr_npc_originalstarwalker;
            rsprite = spr_npc_originalstarwalker;
            lsprite = spr_npc_originalstarwalker;
        }
    }
    return global.cinstance[arg3];
}
(obj_mainchara.x - 40, obj_mainchara.y, 2, 0);

    }

    else

    {

        global.plot = 50;

        global.interact = 0;

    }

}

else

{

    instance_destroy();

}