Deltarune (Chapter 1) script viewer

wallcheck = 0;

press_l = 0;

press_r = 0;

press_d = 0;

press_u = 0;

bkx = 0;

bky = 0;

bkxy = 0;

jelly = 2;

if (left_h())

    press_l = 1;

if (right_h())

    press_r = 1;

if (up_h())

    press_u = 1;

if (down_h())

    press_d = 1;

px = 0;

py = 0;

if (press_r == 1)

    px = wspeed;

if (press_l == 1)

    px = -wspeed;

if (press_d == 1)

    py = wspeed;

if (press_u == 1)

    py = -wspeed;

if (button2_h())

{

    if (disableslow == 0)

    {

        px = ceil(px * 0.5);

        py = ceil(py * 0.5);

    }

}

else

{

    disableslow = 0;

}

xmeet = 0;

ymeet = 0;

xymeet = 0;

if (place_meeting(x + px, y + py, obj_battlesolid))

    xymeet = 1;

if (place_meeting(x + px, y, obj_battlesolid))

{

    if (place_meeting(x + px, y, obj_battlesolid))

    {

        for (g = wspeed; g > 0; g -= 1)

        {

            mvd = 0;

            if (press_d == 0 && !place_meeting(x + px, y - g, obj_battlesolid))

            {

                y -= g;

                py = 0;

                break;

                mvd = 1;

            }

            if (press_u == 0 && mvd == 0 && !place_meeting(x + px, y + g, obj_battlesolid))

            {

                y += g;

                py = 0;

                break;

            }

        }

    }

    xmeet = 1;

    bkx = 0;

    if (px > 0)

    {

        for (i = px; i >= 0; i -= 1)

        {

            if (!place_meeting(x + i, y, obj_battlesolid))

            {

                px = i;

                bkx = 1;

                break;

            }

        }

    }

    if (px < 0)

    {

        for (i = px; i <= 0; i += 1)

        {

            if (!place_meeting(x + i, y, obj_battlesolid))

            {

                px = i;

                bkx = 1;

                break;

            }

        }

    }

    if (bkx == 0)

        px = 0;

}

if (place_meeting(x, y + py, obj_battlesolid))

{

    ymeet = 1;

    bky = 0;

    if (place_meeting(x, y + py, obj_battlesolid))

    {

        for (g = wspeed; g > 0; g -= 1)

        {

            mvd = 0;

            if (press_r == 0 && !place_meeting(x - g, y + py, obj_battlesolid))

            {

                x -= g;

                px = 0;

                break;

                mvd = 1;

            }

            if (mvd == 0 && press_l == 0 && !place_meeting(x + g, y + py, obj_battlesolid))

            {

                x += g;

                px = 0;

                break;

            }

        }

    }

    if (py > 0)

    {

        for (i = py; i >= 0; i -= 1)

        {

            if (!place_meeting(x, y + i, obj_battlesolid))

            {

                py = i;

                bky = 1;

                break;

            }

        }

    }

    if (py < 0)

    {

        for (i = py; i <= 0; i += 1)

        {

            if (!place_meeting(x, y + i, obj_battlesolid))

            {

                py = i;

                bky = 1;

                break;

            }

        }

    }

    if (bky == 0)

        py = 0;

}

if (place_meeting(x + px, y + py, obj_battlesolid))

{

    xymeet = 1;

    bkxy = 0;

    i = px;

    j = py;

    while (j != 0 || i != 0)

    {

        if (!place_meeting(x + i, y + j, obj_battlesolid))

        {

            px = i;

            py = j;

            bkxy = 1;

            break;

        }

        if (abs(j) >= 1)

        {

            if (j > 0)

                j -= 1;

            if (j < 0)

                j += 1;

        }

        else

        {

            j = 0;

        }

        if (abs(i) >= 1)

        {

            if (i > 0)

                i -= 1;

            if (i < 0)

                i += 1;

        }

        else

        {

            i = 0;

        }

    }

    if (bkxy == 0)

    {

        px = 0;

        py = 0;

    }

}

if ((x + px) >= ((__view_get(e__VW.XView, 0) + 640) - sprite_width))

    px = (__view_get(e__VW.XView, 0) + 640) - sprite_width - x;

if ((x + px) <= 0)

    px = -x;

if ((y + py) <= 0)

    py = -y;

if ((y + py) >= (((__view_get(e__VW.YView, 0) + 320) - sprite_height) + boundaryup))

    py = ((__view_get(e__VW.YView, 0) + 320) - sprite_height - y) + boundaryup;

x += px;

y += py;

if (dmgnoise == 1)

{

    dmgnoise = 0;

    snd_stop(snd_hurt1);

    snd_play(snd_hurt1);

}

global.inv -= 1;

if (global.inv > 0)

{

    image_speed = 0.25;

}

else

{

    image_speed = 0;

    image_index = 0;

}

global.heartx = (x + 2) - __view_get(e__VW.XView, 0);

global.hearty = (y + 2) - __view_get(e__VW.YView, 0);

enum e__VW

{

    XView,

    YView,

    WView,

    HView,

    Angle,

    HBorder,

    VBorder,

    HSpeed,

    VSpeed,

    Object,

    Visible,

    XPort,

    YPort,

    WPort,

    HPort,

    Camera,

    SurfaceID

}