Deltarune (Chapter 4) script viewer

var _x = l_region;

if (view_current == 0)

    siner++;

var count = round((width + margin) / 20);

if (makeindex == -2)

    makeindex = round(count / 2) + irandom_range(-4, 4);

for (var i = 0; i < count; i++)

{

    var xloc = _x + (sin(siner / 30) * 16) + (i * 20) + (margin / 2) + (sin((i + 1) / 4) * 8);

    var yloc = y + (cos((((i + 1) * 30) + siner) / 30) * 10);

    var bonusalph = clamp((240 - abs(obj_mainchara.x - xloc)) / 240, -0.25, 0.25);

    draw_sprite_ext(sprite_index, (siner + (i * 1.4) + 0) / 6, xloc + (sin((i + 1 + siner) / 16) * 16), yloc + (cos(siner / 12) * 8), 2, 2, 0, c_white, (0.05 + bonusalph) * image_alpha);

    draw_sprite_ext(sprite_index, (siner + (i * 1.4) + 1) / 6, xloc + (sin(siner / 2) * 2) + (sin((i + 1 + siner) / 16) * 16), yloc + (cos(siner / 12) * 8), 2, 2, 0, c_white, (0.025 + bonusalph) * image_alpha);

    if (i == makeindex)

    {

        if (chaser == 0)

        {

            snd_play(snd_ghostappear, 0.5, 2);

            chaser = 
scr_marker_ext
scr_marker_ext

function 
scr_marker_ext(arg0, arg1, arg2, arg3 = 1, arg4 = 1, arg5 = 0, arg6 = 0, arg7 = 16777215, arg8 = depth, arg9 = false, arg10 = -1, arg11 = 1)
{
    var thismarker = instance_create(arg0, arg1, obj_marker);
    with (thismarker)
    {
        depth = arg8;
        sprite_index = arg2;
        image_speed = arg5;
        image_xscale = arg3;
        image_yscale = arg4;
        image_index = arg6;
        image_blend = arg7;
        image_alpha = arg11;
        if (arg9)
            
scr_depth_alt();
    }
    if (arg10 > 0)
        
scr_doom(thismarker, arg10);
    return thismarker;
}

function scr_marker_fromasset(arg0, arg1 = depth, arg2 = false)
{
    if (is_undefined(arg0))
    {
        debug_message("Warning: scr_marker_fromasset() sprite_instance didn't exist");
        return -4;
    }
    var sprite = layer_sprite_get_sprite(arg0);
    var index = layer_sprite_get_index(arg0);
    var imagespeed = layer_sprite_get_speed(arg0);
    var xscale = layer_sprite_get_xscale(arg0);
    var yscale = layer_sprite_get_yscale(arg0);
    var angle = layer_sprite_get_angle(arg0);
    var blend = layer_sprite_get_blend(arg0);
    var alpha = layer_sprite_get_alpha(arg0);
    var xloc = layer_sprite_get_x(arg0);
    var yloc = layer_sprite_get_y(arg0);
    var thismarker = instance_create_depth(xloc, yloc, arg1, obj_marker);
    with (thismarker)
    {
        sprite_index = sprite;
        image_index = index;
        image_speed = imagespeed;
        image_xscale = xscale;
        image_yscale = yscale;
        image_angle = angle;
        image_blend = blend;
        image_alpha = alpha;
        if (arg2)
            
scr_depth_alt(id, arg2);
    }
    return thismarker;
}

function scr_assetgetinfo(arg0)
{
    var sprite = layer_sprite_get_sprite(arg0);
    var index = layer_sprite_get_index(arg0);
    var xloc = layer_sprite_get_x(arg0);
    var yloc = layer_sprite_get_y(arg0);
    var xscale = layer_sprite_get_xscale(arg0);
    var yscale = layer_sprite_get_yscale(arg0);
    var angle = layer_sprite_get_angle(arg0);
    var blend = layer_sprite_get_blend(arg0);
    var alpha = layer_sprite_get_alpha(arg0);
    var imagespeed = layer_sprite_get_speed(arg0);
    return [sprite, index, xloc, yloc, xscale, yscale, angle, blend, alpha, imagespeed];
}
(xloc, yloc, sprite_index, 2, 2, 0, (siner + (i * 1.4) + 1) / 6, undefined, 500);

            chaser.image_alpha = 0;

            chaser.alpha = 0;

            with (chaser)

                
scr_lerpvar
scr_lerpvar

function 
scr_lerpvar()
{
    if (argument_count < 6)
        ___lerpvar = 
scr_lerpvar_instance(id, argument[0], argument[1], argument[2], argument[3]);
    else
        ___lerpvar = 
scr_lerpvar_instance(id, argument[0], argument[1], argument[2], argument[3], argument[4], argument[5]);
    return ___lerpvar;
}

function scr_lerpvar_respect()
{
    if (argument_count < 6)
        ___lerpvar = 
scr_lerpvar_instance(id, argument[0], argument[1], argument[2], argument[3]);
    else
        ___lerpvar = 
scr_lerpvar_instance(id, argument[0], argument[1], argument[2], argument[3], argument[4], argument[5]);
    ___lerpvar.respectglobalinteract = true;
    return ___lerpvar;
}
("alpha", 0, 1, 20, 2, "out");

        }

        else

        {

            with (chaser)

            {

                if (other.con < 2)

                {

                    draw_sprite_ext(other.sprite_index, (other.siner + (i * 1.4) + 0) / 6, x, y + (cos(other.siner / 12) * 8), 2, 2, 0, image_blend, alpha);

                    draw_sprite_ext(other.sprite_index, (other.siner + (i * 1.4) + 1) / 6, x + (sin(other.siner / 2) * 2), y + (cos(other.siner / 12) * 8), 2, 2, 0, image_blend, alpha * 0.5);

                }

                else

                {

                    var prog = clamp(other.timer / 20, 0, 1);

                    sprite_index = spr_guei_idle_nowisp;

                    draw_sprite_ext(other.sprite_index, (other.siner + (i * 1.4) + 0) / 6, x, y + (cos(other.siner / 12) * 8), 2, 2, 0, image_blend, alpha - (prog * 2));

                    draw_sprite_ext(other.sprite_index, (other.siner + (i * 1.4) + 1) / 6, x + (sin(other.siner / 2) * 2), y + (cos(other.siner / 12) * 8), 2, 2, 0, image_blend, (alpha * 0.5) - (prog * 2));

                    draw_sprite_ext(sprite_index, other.siner / 4, x - (60 * (1 - prog)), y - (80 * (1 - prog)), 2, 2, 0, c_white, prog * 4);

                }

                draw_set_color(c_red);

                var _xloc = (x + 16) - 30;

                var _yloc = ((y + 30) - 44) + 12;

                draw_set_color(c_white);

            }

        }

    }

}

with (obj_mainchara)

{

}