Deltarune (Chapter 5) script viewer

← back to main script listing
gml_Object_obj_climb_susie_Step_0

(view raw script w/o annotations or w/e)
if (init == 0)
    init = 1;
event_inherited();
if (caterpillartarget == -4)
    depth = 31000;
else
    scr_depthscr_depthfunction scr_depth(arg0 = id, arg1 = 0)
{
    with (arg0)
        depth = 100000 - ((y * 10) + (sprite_height * 10) + (arg1 * 10));
}();
if (con == 0)
{
    sprite_index = climbsprite;
    image_index = climbindex;
    if (reachcon >= 10)
    {
        con = 4;
        exit;
    }
    if (reachcon > 0)
    {
        con = 3;
        exit;
    }
    var _dir = dir;
    if (followmode == 1)
    {
        if (i_ex(obj_climb_kris))
        {
            if (obj_climb_kris.y < y)
                climb_direction = 1;
            else
                climb_direction = -1;
            _dir = -1;
            if ((obj_climb_kris.y - y) > 80 || (obj_climb_kris.y - y) < -20)
            {
                if (dir >= 0)
                {
                    con = 1;
                    climbcon = -startdelay;
                }
            }
        }
    }
    if (followmode == 2)
    {
        _dir = -1;
        if (i_ex(obj_climb_kris))
        {
            if (obj_climb_kris.climbcon == 2 && obj_climb_kris.climbtimer >= 1)
            {
                con = 1;
                dir = obj_climb_kris.dir_memory;
                climbcon = 0;
                if (obj_climb_kris.jumping)
                    con = 2;
            }
        }
    }
    if (followmode == 3)
    {
        _dir = -1;
        if (array_length(instruction_queue) > 0)
        {
            var next_instruction = instruction_queue[0];
            if (((current_time / 30) - startdelay) > next_instruction[2])
            {
                array_delete(instruction_queue, 0, 1);
                con = 1;
                climbcon = 0;
                if (next_instruction[1] < 0)
                    dir = 2;
                if (next_instruction[1] > 0)
                    dir = 0;
                if (next_instruction[0] > 0)
                    dir = 1;
                if (next_instruction[0] < 0)
                    dir = 3;
                if (next_instruction[3])
                {
                    con = 2;
                    xclimb = next_instruction[0];
                    yclimb = next_instruction[1];
                }
            }
        }
        if (con == 0)
            climbmomentum *= 0.5;
    }
    if (waiteventid > 0)
        exit;
    if (caterpillartarget != -4)
    {
        dir = -1;
        var evade = false;
        var yy = caterpillartarget.y;
        if (caterpillartarget.jumping)
            yy = caterpillartarget.y + caterpillartarget.yclimb;
        if (x > (caterpillartarget.x + 60) && y > (yy + 30))
        {
            if (y > (yy + 50) && can_caterpillar_to(x, y - 40))
            {
                dir = 2;
            }
            else
            {
                var xx = x;
                for (var i = 0; i < 3; i++)
                {
                    xx = scr_approachscr_approachfunction scr_approach(arg0, arg1, arg2)
{
    if (arg0 < arg1)
    {
        arg0 += arg2;
        if (arg0 > arg1)
            return arg1;
    }
    else
    {
        arg0 -= arg2;
        if (arg0 < arg1)
            return arg1;
    }
    return arg0;
}(xx, caterpillartarget.x, 40);
                    if (can_caterpillar_to(xx, y, true) && !place_meeting(xx, y - 40, caterpillartarget) && !place_meeting(xx, y + 40, caterpillartarget))
                    {
                        forcejump = i > 0;
                        xclimb = 0;
                        yclimb = 0;
                        dir = 3;
                        break;
                    }
                }
            }
        }
        else if (x < (caterpillartarget.x - 60) && y > (yy + 30))
        {
            var xx = scr_approachscr_approachfunction scr_approach(arg0, arg1, arg2)
{
    if (arg0 < arg1)
    {
        arg0 += arg2;
        if (arg0 > arg1)
            return arg1;
    }
    else
    {
        arg0 -= arg2;
        if (arg0 < arg1)
            return arg1;
    }
    return arg0;
}(x, caterpillartarget.x, 40);
            if (y > (yy + 50) && can_caterpillar_to(x, y - 40))
            {
                dir = 2;
            }
            else
            {
                xx = x;
                for (var i = 0; i < 3; i++)
                {
                    xx = scr_approachscr_approachfunction scr_approach(arg0, arg1, arg2)
{
    if (arg0 < arg1)
    {
        arg0 += arg2;
        if (arg0 > arg1)
            return arg1;
    }
    else
    {
        arg0 -= arg2;
        if (arg0 < arg1)
            return arg1;
    }
    return arg0;
}(xx, caterpillartarget.x, 40);
                    if (can_caterpillar_to(xx, y, true) && !place_meeting(xx, y - 40, caterpillartarget) && !place_meeting(xx, y + 40, caterpillartarget))
                    {
                        forcejump = i > 0;
                        xclimb = 0;
                        yclimb = 0;
                        dir = 1;
                        break;
                    }
                }
            }
        }
        else if (y > (yy + 170) && can_caterpillar_to(x, y - 120))
        {
            forcejump = 1;
            xclimb = 0;
            yclimb = 0;
            dir = 2;
        }
        else if (y > (yy + 130) && can_caterpillar_to(x, y - 80))
        {
            forcejump = 1;
            xclimb = 0;
            yclimb = 0;
            dir = 2;
        }
        else if (y > (yy + 90) && can_caterpillar_to(x, y - 40))
        {
            dir = 2;
        }
        else if (y < (yy + 50))
        {
            evade = true;
        }
        if (evade || force_evade)
        {
            var evaded = false;
            if (y < (yy + 50) && can_caterpillar_to(x, y + 40))
            {
                dir = 0;
                evaded = true;
            }
            else if (y < (yy + 50) && (can_caterpillar_to(x, y + 80) || can_caterpillar_to(x, y + 120)))
            {
                dir = 0;
                forcejump = true;
                xclimb = 0;
                yclimb = 0;
                evaded = true;
            }
            if (!evaded && (abs(x - caterpillartarget.x) < 20 || abs(x - obj_climb_kris.x) < 20))
            {
                if (y < (yy + 50) && can_caterpillar_to(x, y + 40))
                {
                    dir = 0;
                    evaded = true;
                }
                else if (y < (yy + 50) && (can_caterpillar_to(x, y + 80) || can_caterpillar_to(x, y + 120)))
                {
                    dir = 0;
                    forcejump = true;
                    xclimb = 0;
                    yclimb = 0;
                    evaded = true;
                }
            }
            var ydiff = y - yy;
            var wanted_distance = 80;
            if (scr_trigcheck_ext("softevade", id))
            {
                wanted_distance = 60;
                if (!evaded && abs(y - obj_climb_kris.y) < 10 && abs(x - obj_climb_kris.x) < 10)
                {
                    if (can_caterpillar_to(x + 40, y, true))
                    {
                        dir = 1;
                        evaded = true;
                    }
                    else if (can_caterpillar_to(x - 40, y, true))
                    {
                        dir = 3;
                        evaded = true;
                    }
                }
            }
            if (!evaded && sign(x - caterpillartarget.x) >= 0 && abs(caterpillartarget.x - x) < (wanted_distance - ydiff) && ydiff < 70)
            {
                if (can_caterpillar_to(x + 40, y))
                {
                    dir = 1;
                    evaded = true;
                }
                else if (can_caterpillar_to(x + 80, y) || can_caterpillar_to(x + 120, y))
                {
                    dir = 1;
                    forcejump = true;
                    xclimb = 0;
                    yclimb = 0;
                    evaded = true;
                }
                else if (place_meeting(x, y, obj_solidenemy_2) && can_caterpillar_to(x - 40, y))
                {
                    dir = 3;
                    evaded = true;
                }
            }
            if (!evaded && sign(x - caterpillartarget.x) <= 0 && abs(caterpillartarget.x - x) < (wanted_distance - ydiff) && ydiff < 70)
            {
                if (can_caterpillar_to(x - 40, y))
                {
                    dir = 3;
                    evaded = true;
                }
                else if (can_caterpillar_to(x - 80, y) || can_caterpillar_to(x - 120, y))
                {
                    dir = 3;
                    forcejump = true;
                    xclimb = 0;
                    yclimb = 0;
                    evaded = true;
                }
                else if (place_meeting(x, y, obj_solidenemy_2) && can_caterpillar_to(x + 40, y))
                {
                    dir = 1;
                    evaded = true;
                }
            }
            if (!evaded && force_evade)
            {
                if (can_caterpillar_to(x, y + 40))
                {
                    dir = 0;
                    evaded = true;
                }
                else if (can_caterpillar_to(x, y + 80) || can_caterpillar_to(x, y + 120))
                {
                    dir = 0;
                    forcejump = true;
                    xclimb = 0;
                    yclimb = 0;
                    evaded = true;
                }
            }
        }
        else if (y > (yy + 50) && x > (caterpillartarget.x + 20) && can_caterpillar_to(x - 40, y))
        {
            dir = 3;
        }
        else if (y > (yy + 50) && x < (caterpillartarget.x - 20) && can_caterpillar_to(x + 40, y))
        {
            dir = 1;
        }
        _dir = dir;
    }
    remx = x;
    remy = y;
    if (forcejump)
    {
        con = 2;
        timer = 0;
        forcejump = 0;
        force_evade = false;
        exit;
    }
    if (_dir >= 0)
    {
        force_evade = false;
        con = 1;
        climbcon = 0;
    }
}
if (con == 1)
{
    if (climbcon < 0)
        climbcon++;
    if (climbcon == 0)
    {
        yclimb = 0;
        xclimb = 0;
        var _dir = dir;
        if (climb_direction == -1 && (_dir % 2) == 0)
            _dir = (_dir + 2) % 4;
        if (_dir == 2)
            yclimb = -40;
        else if (_dir == 3)
            xclimb = -40;
        else if (_dir == 1)
            xclimb = 40;
        else
            yclimb = 40;
        sprite_index = climbsprite;
        if (climbindex == 0)
            climbindex = 2;
        else
            climbindex = 0;
        climbcon = 1;
    }
    if (climbcon == 1)
    {
        var draw_dust = !onrotatingtower || tile_vis == 1;
        if (timer == 0 && draw_dust)
        {
            var dust_amount = 1;
            if (jumping)
                dust_amount = 5;
            for (var i = 0; i < dust_amount; i++)
            {
                var dust = instance_create(x, y + 40, obj_animation);
                dust.sprite_index = spr_climb_dust_small;
                dust.depth = depth + 10;
                if (jumping)
                {
                    dust.x = dust.x + random_range(-10, 10);
                    dust.y = dust.y + random_range(-10, 10);
                }
                else if (yclimb < 0)
                {
                    dust.x = (dust.x - 10) + (10 * climbindex);
                }
                else if (yclimb > 0)
                {
                    dust.x = (dust.x - 15) + (15 * climbindex);
                }
                else
                {
                    dust.y = dust.y + 10;
                }
                if (i_ex(obj_rotating_tower_controller_new) && i_ex(obj_climb_kris))
                {
                    dust.x = tower_x;
                    dust.depth = obj_rotating_tower_controller_new.depth - 4;
                }
                dust.image_xscale = 2;
                dust.image_yscale = 2;
                dust.image_speed = 0.5;
                dust.vspeed += -1;
            }
        }
        drawoffsety = 0;
        var newx, newy, climbrate;
        if (jumping == 0)
        {
            if (climbspeed < climbspeedmultiplier)
                climbspeed = climbspeedmultiplier;
            climbrate = 10;
            if (followmode == 2)
            {
                climbspeed = obj_climb_kris.climbspeed;
                climbmomentum = obj_climb_kris.climbmomentum;
                if (obj_climb_kris.climbcon == 10)
                {
                    climbspeed = 0;
                    climbmomentum = 0;
                }
            }
            if (caterpillartarget != -4)
            {
                climbrate = 10;
                timer += (obj_climb_kris.climbspeed + obj_climb_kris.climbmomentum);
                if (obj_climb_kris.jumping)
                    climbrate = 5;
            }
            else
            {
                timer += (climbspeed + climbmomentum);
            }
            if (timer >= climbrate)
                timer = climbrate;
            newx = lerp_ease_inout(remx, remx + xclimb, timer / climbrate, 2);
            newy = lerp_ease_inout(remy, remy + yclimb, timer / climbrate, 2);
            image_index = climbindex;
            if (abs(newx - remx) > 3 || abs(newy - remy) > 3)
                image_index = 1 + climbindex;
        }
        x = newx;
        y = newy;
        if (timer >= climbrate)
        {
            jumping = 0;
            climbcon = 0;
            jumpchargeamount = 0;
            x = remx + xclimb;
            y = remy + yclimb;
            if (onrotatingtower && x > obj_rotating_tower_controller_new.tower_circumference)
                x -= obj_rotating_tower_controller_new.tower_circumference;
            if (onrotatingtower && x < 0)
                x += obj_rotating_tower_controller_new.tower_circumference;
            con = 0;
            timer = 0;
        }
    }
    if (followmode == 2)
        image_index = obj_climb_kris.image_index;
}
if (con == 3 || con == 4)
{
    sprite_index = spr_susie_climb_throw_right;
    if (con == 3)
        sprite_index = spr_susie_climb_throw;
    image_speed = 0;
    if (timer == 0)
    {
        image_index = 1;
        if (instance_place(x + 35, y, obj_climb_kris) && (obj_climb_kris.climbcon == 2 || obj_climb_kris.neutralcon == 1 || obj_climb_kris.fallingcon > 0))
        {
            snd_play(snd_noise);
            with (obj_climb_kris)
            {
                image_alpha = 0;
                fallingcon = 0;
                jumping = 0;
                climbcon = 0;
                neutralcon = 1;
                if (other.onrotatingtower)
                    visible = 0;
            }
            if (onrotatingtower)
                con = 5;
            global.interact = 1;
            timer++;
        }
    }
    if (timer > 0)
    {
        timer++;
        var delay = (con * 10) - 10;
        if (timer < delay)
        {
            image_index = 2 + min(4, floor(timer / 4));
        }
        else
        {
            image_index = 6 + min(3, floor((timer - delay) / 4));
            if (timer == (delay + 8))
            {
                var targetx = 0;
                var targety = 0;
                with (obj_genmarker)
                {
                    var suffix = "";
                    if (extflag == (string(other.reachcon) + suffix))
                    {
                        other.targetgenmarker = self;
                        targetx = x;
                        targety = y;
                        break;
                    }
                }
                with (obj_climb_kris)
                {
                    scr_lerpvarscr_lerpvarfunction 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;
}("x", x, targetx, 25);
                    scr_lerpvarscr_lerpvarfunction 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;
}("y", y, targety - 20, 25);
                }
                with (instance_create(obj_climb_kris.x, obj_climb_kris.y - 20, obj_marker))
                {
                    scr_jump_to_pointscr_jump_to_pointfunction scr_jump_to_point(arg0, arg1, arg2, arg3, arg4 = 0)
{
    var ___jump = scr_jump_to_point_sprite(arg0, arg1, arg2, arg3, 0, 0);
    with (___jump)
    {
        trackalpha = arg4;
        trackblend = arg4;
        trackindex = arg4;
        tracksprite = arg4;
        trackangle = arg4;
    }
    return ___jump;
}(targetx, targety - 20, 10, 25);
                    sprite_index = spr_kris_jump_ball;
                    image_xscale = 2;
                    image_yscale = 2;
                    scr_doomscr_doomfunction scr_doom(arg0, arg1)
{
    var _doom = instance_create_depth(0, 0, 0, obj_doom);
    with (_doom)
    {
alarm[0]
        target = arg0;
    }
    return _doom;
}(self, 25);
                }
                snd_play(snd_jump);
            }
            if (timer == (delay + 34))
            {
                var targetx = 0;
                var targety = 0;
                if (targetgenmarker != -4)
                {
                    targetx = targetgenmarker.x;
                    targety = targetgenmarker.y;
                }
                snd_play(snd_noise);
                obj_climb_kris.x = targetx + 20;
                obj_climb_kris.y = targety + 20;
                obj_climb_kris.image_alpha = 1;
                global.interact = 0;
                sprite_index = spr_susie_climb;
                con = 0;
                reachcon = 0;
            }
        }
    }
}
if (con == 5)
{
    if (timer > 0)
    {
        timer++;
        var delay = 20;
        if (timer < delay)
        {
            image_index = 2 + min(4, floor(timer / 4));
        }
        else
        {
            image_index = 6 + min(3, floor((timer - delay) / 4));
            var jumptime = 100;
            if (timer == (delay + 8))
            {
                with (instance_create(camerax() + (0.5 * camerawidth()), obj_climb_kris.y - 20, obj_marker))
                {
                    scr_jump_to_pointscr_jump_to_pointfunction scr_jump_to_point(arg0, arg1, arg2, arg3, arg4 = 0)
{
    var ___jump = scr_jump_to_point_sprite(arg0, arg1, arg2, arg3, 0, 0);
    with (___jump)
    {
        trackalpha = arg4;
        trackblend = arg4;
        trackindex = arg4;
        tracksprite = arg4;
        trackangle = arg4;
    }
    return ___jump;
}((camerax() - 19) + (0.5 * camerawidth()), ((cameray() - 42) + (0.5 * cameraheight())) - 416, 25, jumptime);
                    sprite_index = spr_kris_jump_ball;
                    image_xscale = 2;
                    image_yscale = 2;
                    depth = 100;
                }
                snd_play(snd_jump);
            }
            if (timer > (delay + 8) && timer <= (delay + 60))
                obj_climb_kris.y -= 8;
            if (timer == (delay + 30))
            {
                whiteout = scr_marker_extscr_marker_extfunction 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];
}(0, 0, spr_pxwhite, room_width, room_height, undefined, undefined, c_white, 101);
                with (whiteout)
                {
                    image_alpha = 0;
                    scr_lerpvarscr_lerpvarfunction 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", 0, 1, 30);
                }
            }
            if (timer == (delay + 8 + jumptime))
            {
                snd_play(snd_noise);
                with (obj_marker)
                {
                    if (depth == 100)
                    {
                        y -= 6;
                        newmarker = instance_create(x, y, obj_marker_screen);
                        newmarker.sprite_index = spr_kris_dw_landed;
                        newmarker.image_speed = 0;
                        newmarker.depth = 10;
                        with (newmarker)
                            scr_darksizescr_darksizefunction scr_darksize()
{
    var inst = id;
    if (argument_count)
        inst = argument0;
    inst.image_xscale = 2;
    inst.image_yscale = 2;
}();
                        scr_doomscr_doomfunction scr_doom(arg0, arg1)
{
    var _doom = instance_create_depth(0, 0, 0, obj_doom);
    with (_doom)
    {
alarm[0]
        target = arg0;
    }
    return _doom;
}(newmarker, 100, true);
                        scr_shakeobjscr_shakeobjfunction scr_shakeobj()
{
    var _shakeobj = instance_create(x, y, obj_shakeobj);
    _shakeobj.target = id;
    if (argument_count >= 1)
    {
        if (i_ex(argument0))
            _shakeobj.target = argument0;
    }
    if (argument_count >= 2)
    {
        if (argument1 != -1)
            _shakeobj.shakeamt = argument1;
    }
    if (argument_count >= 3)
    {
        if (argument2 != -1)
            _shakeobj.shakereduct = argument2;
    }
    with (_shakeobj)
        event_user(0);
}();
                        instance_destroy();
                    }
                }
                blackout = scr_marker_extscr_marker_extfunction 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];
}(0, 0, spr_pxwhite, room_width, room_height, undefined, undefined, c_black, 102);
            }
            if (timer == (delay + 8 + jumptime + 10))
            {
                with (whiteout)
                {
                    scr_lerpvarscr_lerpvarfunction 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", 1, 0, 30);
                    scr_doomscr_doomfunction scr_doom(arg0, arg1)
{
    var _doom = instance_create_depth(0, 0, 0, obj_doom);
    with (_doom)
    {
alarm[0]
        target = arg0;
    }
    return _doom;
}(self, 30);
                }
            }
            if (timer == (delay + 8 + jumptime + 55))
            {
            }
        }
    }
}
if (con == 2)
{
    image_index = 0;
    timer += 1;
    if (followmode != 3)
    {
        var _dir = dir;
        if (climb_direction == -1 && (_dir % 2) == 0)
            _dir = (_dir + 2) % 4;
        if (_dir == 2)
            yclimb = -40;
        else if (_dir == 3)
            xclimb = -40;
        else if (_dir == 1)
            xclimb = 40;
        else
            yclimb = 40;
        if (followmode == 2)
        {
            xclimb = obj_climb_kris.xclimb;
            yclimb = obj_climb_kris.yclimb;
            snd_play_x(snd_wing, 0.6, 1.1 + random(0.1));
            sprite_index = climbsprite;
            image_index = obj_climb_kris.image_index;
            timer = 0;
            con = 12;
        }
        else
        {
            var checkamount = 4;
            for (var i = 1; i <= checkamount; i++)
            {
                var testxclimb = xclimb * i;
                var testyclimb = yclimb * i;
                var finalclimbx = x + testxclimb;
                var finalclimbx2 = (x + testxclimb) - xclimb;
                var falseloopused = 0;
                if (collision_rectangle(finalclimbx, y + 10 + testyclimb, finalclimbx + 1, y + testyclimb + 11, obj_climb_climbable, false, true))
                {
                    if (falseloopused)
                        remx = finalclimbx - testxclimb;
                    if (i == 1)
                    {
                        con = 1;
                        break;
                    }
                    xclimb = testxclimb;
                    yclimb = testyclimb;
                    snd_play_x(snd_wing, 0.6, 1.1 + random(0.1));
                    sprite_index = climbsprite;
                    timer = 0;
                    con = 12;
                    break;
                }
            }
        }
    }
    else
    {
        if (timer == 1)
        {
            if (image_index < 2)
                sprite_index = chargelsprite;
            else
                sprite_index = chargersprite;
        }
        image_index = timer / 4;
        if (timer > 3)
        {
            snd_play_x(snd_wing, 0.6, 1.1 + random(0.1));
            sprite_index = jumpsprite;
            timer = 0;
            con = 12;
        }
    }
}
if (con == 12)
{
    timer++;
    if (timer == 1)
    {
        var dust_amount = 5;
        for (var i = 0; i < dust_amount; i++)
        {
            var dust = instance_create(x, y, obj_animation);
            dust.sprite_index = spr_climb_dust_small;
            dust.depth = depth + 10;
            dust.x = dust.x + random_range(-10, 10);
            dust.y = dust.y + random_range(-10, 10);
            dust.image_xscale = 2;
            dust.image_yscale = 2;
            dust.image_speed = 0.5;
            dust.vspeed += -1;
        }
    }
    var climbrate = 12;
    if (followmode == 2)
    {
        var boost = ((abs(xclimb) + abs(yclimb)) / 40) - 1;
        climbrate = 6 + (boost * 2);
        var clipamount = 4;
        if (boost >= 2)
            clipamount = 2;
        if (obj_climb_kris.climbcon == 10 || obj_climb_kris.cuttimer > 0)
            timer -= 1;
        if (timer >= climbrate)
            climbtimer = climbrate;
        if (timer >= (climbrate - clipamount))
            timer = climbrate;
    }
    if (timer >= climbrate)
        timer = climbrate;
    var newx = lerp_ease_out(remx, remx + xclimb, timer / climbrate, 1);
    var newy = lerp_ease_out(remy, remy + yclimb, timer / climbrate, 1);
    drawoffsety = -sin((timer / climbrate) * pi) * (2 * (((abs(xclimb) + abs(yclimb)) / 40) - 1));
    if (dir == 2 || dir == 0)
    {
        image_index = timer / 2;
        sprite_index = jumpsprite;
    }
    else if (dir == 1)
    {
        if ((timer / climbrate) > 0.5)
        {
            sprite_index = jumpsprite;
        }
        else
        {
            sprite_index = jumpsprite;
            image_index = 0;
        }
    }
    else if ((timer / climbrate) > 0.5)
    {
        sprite_index = jumpsprite;
    }
    else
    {
        sprite_index = jumpsprite;
        image_index = 0;
    }
    var afterimage = scr_afterimagescr_afterimagefunction scr_afterimage()
{
    afterimage = instance_create(x, y, obj_afterimage);
    afterimage.sprite_index = sprite_index;
    afterimage.image_index = image_index;
    afterimage.image_blend = image_blend;
    afterimage.image_speed = 0;
    afterimage.depth = depth;
    afterimage.image_xscale = image_xscale;
    afterimage.image_yscale = image_yscale;
    afterimage.image_angle = image_angle;
    return afterimage;
}();
    afterimage.image_alpha = 0.2;
    x = newx;
    y = newy;
    if (timer >= climbrate)
    {
        con = 0;
        timer = 0;
        drawoffsety = 0;
        climbmomentum = ((abs(xclimb) + abs(yclimb)) / 40) * 0.5;
        sprite_index = climbsprite;
        image_index = 0;
        x = remx + xclimb;
        y = remy + yclimb;
    }
}
var overlapping_trigger = instance_place(x, y, obj_climb_destructableclimbarea);
if (overlapping_trigger != -4)
{
    with (overlapping_trigger)
    {
        if (con == 0)
            con = 1;
    }
}
hittimer--;
if (hittimer <= 0 && global.interact == 0)
{
    var bulletcheck = collision_rectangle(bbox_left + 14, bbox_top + 14, bbox_right - 14, bbox_bottom - 14, obj_climb_bullet, true, true);
    if (jumping == 0)
    {
        if (bulletcheck == -4)
        {
            var reposition = x;
            bulletcheck = collision_rectangle(bbox_left + 14, bbox_top + 14, bbox_right - 14, bbox_bottom - 14, obj_climb_enemy, true, true);
            x = reposition;
            if (bulletcheck != -4)
            {
                if (bulletcheck.active == 0)
                    bulletcheck = -4;
            }
        }
    }
    if (bulletcheck != -4)
    {
        damage = bulletcheck.damage;
        damagecon = 1;
        hittimer = 60;
    }
}
if (damagecon == 1)
{
    scr_damage_all_overworldscr_damage_all_overworldfunction scr_damage_all_overworld()
{
    if (global.inv < 0)
    {
        gameover = 1;
        if (global.char[0] != 0 && global.hp[global.char[0]] > 1)
            gameover = 0;
        if (global.char[1] != 0 && global.hp[global.char[1]] > 1)
            gameover = 0;
        if (global.char[2] != 0 && global.hp[global.char[2]] > 1)
            gameover = 0;
        if (global.chapter == 5 && gameover && global.tempflag[57] == 1)
        {
            if (global.char[0] != 0)
                global.hp[global.char[0]] = 0;
            if (global.char[1] != 0)
                global.hp[global.char[1]] = 0;
            if (global.char[2] != 0)
                global.hp[global.char[2]] = 0;
            exit;
        }
        if (gameover == 1)
            scr_gameover();
        remdamage = damage;
        remtarget = target;
        if (!instance_exists(obj_shake))
            instance_create(0, 0, obj_shake);
        with (obj_dmgwriter)
            killactive = 1;
        snd_stop(snd_hurt1);
        snd_play(snd_hurt1);
        var maxhpdiff = 0;
        for (ti = 0; ti < 3; ti += 1)
        {
            global.inv = -1;
            damage = remdamage;
            target = ti;
            tdamage = damage;
            with (global.charinstance[target])
            {
                hurt = 1;
                hurttimer = 0;
            }
            hpdiff = tdamage;
            if (hpdiff >= global.hp[global.char[target]])
                hpdiff = global.hp[global.char[target]] - 1;
            maxhpdiff = max(hpdiff, maxhpdiff);
            d_cancel = 0;
            if (hpdiff <= 1)
            {
                if (global.hp[global.char[target]] <= 0)
                {
                    hpdiff = 0;
                    d_cancel = 1;
                }
                else
                {
                    hpdiff = 1;
                }
            }
            if (d_cancel == 0)
            {
                doomtype = -1;
                global.hp[global.char[target]] -= hpdiff;
                if ((instance_exists(global.charinstance[target]) && global.charinstance[target].visible == true) || i_ex(obj_climb_kris) || i_ex(obj_plat_player))
                {
                    var trg = -4;
                    var nowriter = false;
                    if (i_ex(obj_plat_player))
                    {
                        trg = 910;
                        if (ti > 0)
                        {
                            with (obj_plat_follower)
                            {
                                if (name == "susie" && other.ti == 1)
                                    trg = self;
                                if (name == "ralsei" && other.ti == 2)
                                    trg = self;
                            }
                            if (trg == 910)
                            {
                                if (hpdiff == maxhpdiff)
                                {
                                    with (dmgwriter)
                                        damage = maxhpdiff;
                                }
                                nowriter = true;
                            }
                        }
                    }
                    else if (i_ex(obj_climb_kris))
                    {
                        trg = 1164;
                        if (ti > 0)
                        {
                            with (obj_climb_susie)
                            {
                                if (name == "susie" && other.ti == 1)
                                    trg = self;
                                if (name == "ralsei" && other.ti == 2)
...();
    with (obj_darkcontroller)
        charcon = 1;
    with (obj_climb_kris)
        hittimer = 60;
    damagecon = 0;
}
climbmomentum -= 0.03;
if (climbmomentum <= 0)
    climbmomentum = 0;
if (caterpillartarget != -4 && (!i_ex(obj_climb_kris) || obj_climb_kris.exitcon == 1))
{
    caterpillartarget = -4;
    con = 999;
    var targx = 0;
    var targy = 0;
    if (object_index == obj_climb_ralsei)
    {
        sprite_index = spr_ralsei_jump_ball;
        image_speed = 0.25;
        x -= 20;
        y -= 20;
    }
    else
    {
        sprite_index = spr_susie_dw_jump_ball;
        image_speed = 0.25;
        x -= 20;
        y -= 20;
    }
    with (obj_caterpillarchara)
    {
        if (name == other.name)
        {
            targx = x;
            targy = y;
        }
    }
    var jumpstrength = 8;
    if (global.facing == 2)
        jumpstrength = 12;
    var __jump = scr_jump_to_pointscr_jump_to_pointfunction scr_jump_to_point(arg0, arg1, arg2, arg3, arg4 = 0)
{
    var ___jump = scr_jump_to_point_sprite(arg0, arg1, arg2, arg3, 0, 0);
    with (___jump)
    {
        trackalpha = arg4;
        trackblend = arg4;
        trackindex = arg4;
        tracksprite = arg4;
        trackangle = arg4;
    }
    return ___jump;
}(targx, targy, jumpstrength, 15);
    con = 999;
    __jump.end_step = true;
    with (__jump)
        scr_delay_var("image_alpha", 0, 15);
    scr_delay_var("image_alpha", 0, 15);
    scr_doomscr_doomfunction scr_doom(arg0, arg1)
{
    var _doom = instance_create_depth(0, 0, 0, obj_doom);
    with (_doom)
    {
alarm[0]
        target = arg0;
    }
    return _doom;
}(self, 16);
    exit;
}
1	`if (init == 0)`
2	`init = 1;`
3	`event_inherited();`
4	`if (caterpillartarget == -4)`
5	`depth = 31000;`
6	`else`
7	`scr_depthscr_depth function scr_depth(arg0 = id, arg1 = 0) { with (arg0) depth = 100000 - ((y * 10) + (sprite_height * 10) + (arg1 * 10)); } ();`
8	`if (con == 0)`
9	`{`
10	`sprite_index = climbsprite;`
11	`image_index = climbindex;`
12	`if (reachcon >= 10)`
13	`{`
14	`con = 4;`
15	`exit;`
16	`}`
17	`if (reachcon > 0)`
18	`{`
19	`con = 3;`
20	`exit;`
21	`}`
22	`var _dir = dir;`
23	`if (followmode == 1)`
24	`{`
25	`if (i_ex(obj_climb_kris))`
26	`{`
27	`if (obj_climb_kris.y < y)`
28	`climb_direction = 1;`
29	`else`
30	`climb_direction = -1;`
31	`_dir = -1;`
32	`if ((obj_climb_kris.y - y) > 80 \|\| (obj_climb_kris.y - y) < -20)`
33	`{`
34	`if (dir >= 0)`
35	`{`
36	`con = 1;`
37	`climbcon = -startdelay;`
38	`}`
39	`}`
40	`}`