Deltarune (Chapter 4) script viewer

function 
scr_endcombat
scr_endcombat

function 
scr_endcombat()
{
    global.fighting = 0;
    if (global.specialbattle == 0 || global.specialbattle == 2 || global.specialbattle == 3)
    {
        if (global.specialbattle == 2)
        {
            with (obj_mainchara)
            {
                cutscene = 1;
                x = global.charinstance[0].x;
                y = global.charinstance[0].y;
            }
            with (global.cinstance[0])
            {
                x = global.charinstance[1].x;
                y = global.charinstance[1].y;
            }
            with (global.cinstance[1])
            {
                x = global.charinstance[2].x;
                y = global.charinstance[2].y;
            }
            with (obj_caterpillarchara)
                
scr_caterpillar_interpolate();
            
scr_pan_to_obj(obj_mainchara, 30);
            with (obj_mainchara)
                visible = 1;
            with (obj_caterpillarchara)
                visible = 1;
        }
        instance_create(0, 0, obj_endbattle);
        with (obj_monsterparent)
            instance_destroy();
        with (obj_bulletparent)
            instance_destroy();
        with (obj_heroparent)
            instance_destroy();
        global.charinstance[0] = obj_mainchara;
        global.charinstance[1] = global.cinstance[0];
        global.charinstance[2] = global.cinstance[1];
        instance_destroy();
    }
}
()

{

    global.fighting = 0;

    if (global.specialbattle == 0 || global.specialbattle == 2 || global.specialbattle == 3)

    {

        if (global.specialbattle == 2)

        {

            with (obj_mainchara)

            {

                cutscene = 1;

                x = global.charinstance[0].x;

                y = global.charinstance[0].y;

            }

            with (global.cinstance[0])

            {

                x = global.charinstance[1].x;

                y = global.charinstance[1].y;

            }

            with (global.cinstance[1])

            {

                x = global.charinstance[2].x;

                y = global.charinstance[2].y;

            }

            with (obj_caterpillarchara)

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

            
scr_pan_to_obj
scr_pan_to_obj

function 
scr_pan_to_obj(arg0, arg1)
{
    _panx = arg0.x - floor((__view_get(e__VW.WView, 0) / 2) - (arg0.sprite_width / 2));
    _pany = arg0.y - floor((__view_get(e__VW.HView, 0) / 2) - (arg0.sprite_height / 2));
    if (_panx < 0)
        _panx = 0;
    if (_panx >= (room_width - __view_get(e__VW.WView, 0)))
        _panx = room_width - __view_get(e__VW.WView, 0);
    if (_pany < 0)
        _pany = 0;
    if (_pany >= (room_height - __view_get(e__VW.HView, 0)))
        _pany = room_height - __view_get(e__VW.HView, 0);
    
scr_pan_lerp(_panx, _pany, arg1);
}

enum e__VW
{
    XView,
    YView,
    WView,
    HView,
    Angle,
    HBorder,
    VBorder,
    HSpeed,
    VSpeed,
    Object,
    Visible,
    XPort,
    YPort,
    WPort,
    HPort,
    Camera,
    SurfaceID
}
(obj_mainchara, 30);

            with (obj_mainchara)

                visible = 1;

            with (obj_caterpillarchara)

                visible = 1;

        }

        instance_create(0, 0, obj_endbattle);

        with (obj_monsterparent)

            instance_destroy();

        with (obj_bulletparent)

            instance_destroy();

        with (obj_heroparent)

            instance_destroy();

        global.charinstance[0] = obj_mainchara;

        global.charinstance[1] = global.cinstance[0];

        global.charinstance[2] = global.cinstance[1];

        instance_destroy();

    }

}