Undertale Yellow script viewer

function __background_set_element(arg0, arg1, arg2, arg3, arg4, arg5, arg6, arg7, arg8, arg9, arg10, arg11, arg12, arg13, arg14)

{

    var __bind = arg0;

    var __vis = arg1;

    var __fore = arg2;

    var __back = arg3;

    var __x = arg4;

    var __y = arg5;

    var __htiled = arg6;

    var __vtiled = arg7;

    var __xscale = arg8;

    var __yscale = arg9;

    var __stretch = arg10;

    var __hspeed = arg11;

    var __vspeed = arg12;

    var __blend = arg13;

    var __alpha = arg14;

    var __nearestdepth = 1000000000;

    var __farthestdepth = -1000000000;

    var __depthinc = 100;

    var __result;

    __result[0] = -1;

    __result[1] = -1;

    var __fgstring = "Compatibility_Foreground_";

    var __bgstring = "Compatibility_Background_";

    var __colstring = "Compatibility_Colour";

    var __fglen = string_length(__fgstring);

    var __bglen = string_length(__bgstring);

    var __layerlist = layer_get_all();

    var __layerlistlength = array_length_1d(__layerlist);

    var __collayer = -1;

    var __slots, __isforeground;

    for (var __i = 0; __i < 8; __i++)

    {

        __slots[__i] = -1;

        __isforeground[__i] = false;

    }

    var __slot, __layername;

    for (var __i = 0; __i < __layerlistlength; __i++)

    {

        __layername = layer_get_name(__layerlist[__i]);

        if (string_pos(__fgstring, __layername) > 0)

        {

            var __slotchr = string_char_at(__layername, __fglen + 1);

            if (__slotchr == "")

                continue;

            __slot = real(__slotchr);

            __slots[__slot] = __layerlist[__i];

            __isforeground[__slot] = true;

        }

        else if (string_pos(__bgstring, __layername) > 0)

        {

            var __slotchr = string_char_at(__layername, __bglen + 1);

            if (__slotchr == "")

                continue;

            __slot = real(__slotchr);

            __slots[__slot] = __layerlist[__i];

            __isforeground[__slot] = false;

        }

        else if (string_pos(__colstring, __layername) > 0)

        {

            __collayer = __layerlist[__i];

            layer_depth(__layerlist[__i], __farthestdepth);

        }

        else

        {

            var __currdepth = layer_get_depth(__layerlist[__i]);

            if (__currdepth < __nearestdepth)

                __nearestdepth = __currdepth;

            if (__currdepth > __farthestdepth)

                __farthestdepth = __currdepth;

        }

    }

    __farthestdepth += (__depthinc + 1000);

    __nearestdepth -= __depthinc;

    __farthestdepth = max(__farthestdepth, 2147483600);

    __nearestdepth = min(__nearestdepth, -2147482000);

    for (var __i = 0; __i < 8; __i++)

    {

        if (__slots[__i] != -1)

        {

            var __depth = 0;

            if (__isforeground[__i] == true)

                __depth = __nearestdepth - (__i * __depthinc);

            else

                __depth = __farthestdepth - __depthinc - (__slot * __depthinc);

            layer_depth(__slots[__i], __depth);

        }

    }

    if (__collayer != -1)

        layer_depth(__collayer, __farthestdepth);

    var __layerdepth;

    if (__bind == -1)

    {

        __layername = __colstring;

        __layerdepth = __farthestdepth;

    }

    else if (__fore == true)

    {

        __layername = __fgstring + string(__bind);

        __layerdepth = __nearestdepth - (__bind * __depthinc);

    }

    else

    {

        __layername = __bgstring + string(__bind);

        __layerdepth = __farthestdepth - __depthinc - (__bind * __depthinc);

    }

    var __layerid;

    if (__bind == -1)

        __layerid = __collayer;

    else

        __layerid = __slots[__bind];

    if (__layerid != -1)

        layer_destroy(__layerid);

    __layerid = layer_create(__layerdepth, __layername);

    layer_x(__layerid, __x);

    layer_y(__layerid, __y);

    layer_hspeed(__layerid, __hspeed);

    layer_vspeed(__layerid, __vspeed);

    var __backel = layer_background_create(__layerid, __back);

    layer_background_visible(__backel, __vis);

    layer_background_htiled(__backel, __htiled);

    layer_background_vtiled(__backel, __vtiled);

    layer_background_xscale(__backel, __xscale);

    layer_background_yscale(__backel, __yscale);

    layer_background_stretch(__backel, __stretch);

    layer_background_blend(__backel, __blend);

    layer_background_alpha(__backel, __alpha);

    __result[0] = __backel;

    __result[1] = __layerid;

    return __result;

}