Deltarune (Chapter 5) script viewer

if (
scr_debug
scr_debug

function 
scr_debug()
{
    return global.debug == 1;
}
())

{

    if (keyboard_check_pressed(ord("R")))

        room_restart();

    if (keyboard_check_pressed(vk_space))

    {

        con = 1;

        timer = 0;

    }

    if (mouse_x > x && mouse_x < (x + sprite_width) && mouse_y > y && mouse_y < (y + sprite_height))

    {

        if (con == 0)

        {

            con = 1;

            timer = 0;

        }

    }

}

if (con == 1)

{

    sprite_index = spr_dw_garden_cuttableflower_bloom;

    image_index = 0;

    image_speed = 0;

    var count = 8;

    var ang = random(33);

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

    {

        with (
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, arg12 = false)
{
    var objinst = 1238;
    if (arg12)
        objinst = 1496;
    var thismarker = instance_create(arg0, arg1, objinst);
    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, arg3 = 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 markertype = 1238;
    if (arg3)
        markertype = 1496;
    var thismarker = instance_create_depth(xloc, yloc, arg1, markertype);
    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];
}
(x + 20, y + 20, spr_dw_garden_cuttableflowerpetals))

        {

            var life = 6;

            speed = 8;

            direction = ((i / count) * 360) + ang;

            friction = 1;

            
scr_doom
scr_doom

function 
scr_doom(arg0, arg1)
{
    var _doom = instance_create_depth(0, 0, 0, obj_doom);
    with (_doom)
    {
alarm[0]
        target = arg0;
    }
    return _doom;
}
(id, life);

            image_speed = 0;

            
scr_size
scr_size

function 
scr_size(arg0 = image_xscale, arg1 = image_yscale, arg2 = id)
{
    with (arg2)
    {
        image_xscale = arg0;
        image_yscale = arg1;
    }
}
(2, 2);

            image_index = random(4);

            vspeed *= 0.95;

            
scr_lerpvar
scr_lerpvar

function 
scr_lerpvar()
{
    var _id = self;
    if (!is_struct(self))
        _id = id;
    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_lerpcol()
{
    if (argument_count < 6)
        ___lerpvar = scr_lerpcol_instance(id, argument[0], argument[1], argument[2], argument[3]);
    else
        ___lerpvar = scr_lerpcol_instance(id, argument[0], argument[1], argument[2], argument[3], argument[4], argument[5]);
    return ___lerpvar;
}
("image_alpha", 4, 0, life);

        }

    }

    con = 2;

    timer = 0;

}

if (con == 2)

{

    timer++;

    var resettime = 60;

    if (timer >= resettime)

    {

        con = 3;

        timer = 0;

    }

}

if (con == 3)

{

    timer++;

    image_index = timer * 0.2;

    if ((timer * 0.2) > (sprite_get_number(sprite_index) - 1))

    {

        sprite_index = spr_dw_garden_cuttableflower;

        image_index = 0;

        con = 0;

    }

}