Deltarune (Chapter 5) script viewer

if (!active)

    exit;

if (!
scr_onscreen_tolerance
scr_onscreen_tolerance

function 
scr_onscreen_tolerance(arg0, arg1)
{
    obj = arg0;
    spacer = arg1;
    var __cx = camera_get_view_x(view_camera[0]);
    var __cy = camera_get_view_y(view_camera[0]);
    if ((obj.x + obj.sprite_width + spacer) < __cx || (obj.x - spacer) > (__cx + 640) || (obj.y + obj.sprite_height + spacer) < __cy || (obj.y - spacer) > (__cy + 480))
        return false;
    else
        return true;
}
(id, 100))

    exit;

timer++;

if (strength > 1)

    strength = 
scr_movetowards
scr_movetowards

function 
scr_movetowards(arg0, arg1, arg2)
{
    if (arg0 == arg1)
        return arg0;
    else if (arg0 > arg1)
        return max(arg0 - arg2, arg1);
    else
        return min(arg0 + arg2, arg1);
}

function scr_obj_movetowards_obj(arg0, arg1, arg2 = 0, arg3 = 0)
{
    scr_obj_movetowards_point(arg0.x + arg2, arg0.y + arg3, arg1);
}

function scr_obj_movetowards_point(arg0, arg1, arg2)
{
    var _distance = point_distance(x, y, arg0, arg1);
    if (arg2 >= _distance)
    {
        x = arg0;
        y = arg1;
    }
    else
    {
        var _direction = point_direction(x, y, arg0, arg1);
        x += lengthdir_x(arg2, _direction);
        y += lengthdir_y(arg2, _direction);
    }
}
(strength, 3, 0.2);

ys = 
scr_platswap_yscale
scr_platswap_yscale

function 
scr_platswap_yscale()
{
    with (obj_platswap)
        return __transition_yscale;
    return [0, 1];
}
();

if (timer >= rate)

{

    var _leaf = ((count % 2) == 0) ? instance_create(x, y + 40, obj_whirlwind_particle) : instance_create(x, y + 40, obj_cliff_crater_leaf);

    _leaf.siner = random(62.83185307179586);

    _leaf.lifetime = lifetime;

    _leaf.style = style;

    _leaf.owner = id;

    _leaf.downward = true;

    _leaf.depth = depth;

    timer = 0;

    if (count >= next_trail)

    {

        var _windtrail = instance_create(x, y, obj_cliff_crater_windtrail);

        wind_direction += (180 + irandom_range(-30, 30));

        _windtrail.direction = wind_direction;

        _windtrail.owner = id;

        _windtrail.depth = depth;

        _windtrail.downward = true;

        if ((count % 2) == 0)

            count = -1;

        next_trail = count + 1 + irandom_range(10, 16);

    }

    count++;

}