Deltarune (Chapter 5) script viewer

if (!instance_exists(obj_plat_player))

{

    
scr_flower_despwn
scr_flower_despwn

function 
scr_flower_despwn(arg0 = 0)
{
    arg0 = 0;
    hit = 0;
    with (instance_create_depth(x, y, depth, obj_plat_vfx))
    {
        sprite_index = spr_smokepuff;
        image_speed = 2;
    }
    with (instance_create_depth(x, y, 2450, obj_flower_despwn, 
    {
        image_blend: petal_color
    }))
        colored = true;
    var _spawner = instance_create_depth(x_home, y_home, 2450, obj_flower_spawner, 
    {
        image_blend: petal_color
    });
    _spawner._memory = {};
    _spawner.image_xscale = image_xscale;
    _spawner.scale = sign(image_xscale);
    _spawner.was_onscreen = true;
    _spawner.colored = true;
    _spawner.image_yscale = image_yscale;
    _spawner.image_angle = image_angle;
    _spawner.obj_index = object_index;
    _spawner.activate = activate;
    _spawner.enemy_wave = enemy_wave;
    var array = __vars;
    for (var i = 0; i < array_length(array); i++)
        variable_struct_set(_spawner._memory, array[i], variable_instance_get(id, array[i]));
    with (_spawner)
    {
        obj_index = other.object_index;
        hp = other.hp;
    }
    if (arg0 == 0)
    {
        instance_destroy();
    }
    else
    {
    }
    exit;
}
();

    exit;

}

if (global.pause_plat)

    exit;

onscreen = 
scr_onscreen
scr_onscreen

function 
scr_onscreen(arg0)
{
    __obj = arg0;
    var __cx = camera_get_view_x(view_camera[0]);
    var __cy = camera_get_view_y(view_camera[0]);
    if ((__obj.x + __obj.sprite_width) < __cx || __obj.x > (__cx + 640) || (__obj.y + __obj.sprite_height) < __cy || __obj.y > (__cy + 480))
        return false;
    else
        return true;
}
(id);

if (onscreen && state == 0)

{

    state = 1;

    vspeed = -6;

    sprite_index = spr_enemy_book_simple_freefall;

    image_speed = 0.5;

}

if (state == 1)

{

    vspeed += 0.25;

    scr_plat_depthcast();

    if (vspeed > -2)

        state = 2;

}

if (state == 2)

{

    var _yoff = sin(timer / 20) * 2;

    var _p = 910;

    if (instance_exists(_p))

        aim = point_direction(x, y, _p.x, _p.y - 5);

    var _dir = aim;

    timer++;

    direction = _dir;

    image_xscale = sign(-lengthdir_x(1, aim)) * 2;

    if (lengthdir_y(1, aim) > 0.5)

    {

        image_index = (timer / 2) % 2;

        sprite_index = spr_enemy_book_simple_freefall;

        speed = 
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);
    }
}
(speed, 7, 0.4);

    }

    else

    {

        y += _yoff;

        image_speed = 0.5;

        sprite_index = spr_enemy_book_simple;

        speed = 
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);
    }
}
(speed, onscreen ? 3 : 7, 0.4);

    }

    if (point_distance(0, 0, (x - _p.x) * 0.75, y - _p.y) <= 200)

        state_set(3);

}

if (state == 3)

{

    var _p = 910;

    if (instance_exists(_p))

    {

        aim = point_direction(x, y, _p.x, _p.y - 15) + random_range(-10, 10);

        dist = point_distance(x, y, _p.x, _p.y - 15);

    }

    var _dir = aim;

    sprite_index = spr_enemy_book_simple_freefall;

    if (timer >= 16)

    {

        image_index = 2;

    }

    else

    {

        image_speed = fallspeed / 8;

        if (image_index >= 2)

            image_index -= 2;

    }

    fallspeed = 
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);
    }
}
(fallspeed, 4, 0.2);

    y += fallspeed;

    if (timer != 16 || lengthdir_y(1, aim) <= 0)

        timer++;

    if (dist > 200)

        timer += 3;

    if (timer < 20)

        speed *= 0.8;

    if (timer == 16)

    {

        var _this = id;

        with (obj_plat_enm_book_simple)

        {

            if (state == 3 && timer >= 12 && timer < 16)

                timer = 12;

        }

    }

    if (timer >= 20)

    {

        state_set(4);

        image_speed = 0;

        var _xdir = lengthdir_x(1, aim);

        if (_xdir > 0)

            image_xscale = -abs(image_xscale);

        else if (_xdir < 0)

            image_xscale = abs(image_xscale);

        sprite_index = spr_enemy_book_simple;

        flash_hurt(16777215);

        snd_play(snd_wing, 0.6, 1.3);

    }

}

if (state == 4)

{

    var _dir = aim;

    var _duration = 40;

    var _prog = timer / _duration;

    if (substate == 0)

    {

        speed += 1.5;

        image_index = clamp01(speed / 6) * 2;

        if (speed >= 15)

            substate = 1;

    }

    else if (substate == 1)

    {

        speed -= 0.75;

        if (speed <= 0)

        {

            speed = 0;

            state_set(2);

            fallspeed = 1;

        }

        else if (speed < 4)

        {

            image_index = 0;

        }

        else if (speed < 8)

        {

            image_index = 3;

        }

    }

    y++;

    direction = _dir;

}

if (state == 10)

{

}