Deltarune (Chapter 4) script viewer

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

{

    global.tempflag[90] = 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", "warp");

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

    with (obj_caterpillarchara)

    {

        var targx = pos[0] - global.tempflag[52];

        var targy = pos[1] - global.tempflag[53];

        setxy(targx, targy);

        global.tempflag[52] = 0;

        global.tempflag[53] = 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;
    }
}
("all");

}