Undertale Yellow script viewer

← back to main script listing

gml_GlobalScript_scr_verlet_constrainpoints

(view raw script w/o annotations or w/e)
1 
function scr_verlet_constrainpoints
scr_verlet_constrainpoints

function scr_verlet_constrainpoints(arg0, arg1, arg2)
{
    for (var i = 0; i < array_length(arg0); i++)
    {
        var p = arg0[i];
        if (!p[4])
        {
            var vx = (p[0] - p[2]) * arg1;
            var vy = (p[1] - p[3]) * arg1;
            if (p[0] > room_width)
            {
                p[0] = room_width;
                p[2] = p[0] + (vx * arg2);
            }
            else if (p[0] < 0)
            {
                p[0] = 0;
                p[2] = p[0] + (vx * arg2);
            }
            if (p[1] > room_height)
            {
                p[1] = room_height;
                p[3] = p[1] + (vy * arg2);
            }
            else if (p[1] < 0)
            {
                p[1] = 0;
                p[3] = p[1] + (vy * arg2);
            }
        }
    }
}
(arg0, arg1, arg2)
2 
{
3 
    for (var i = 0; i < array_length(arg0); i++)
4 
    {
5 
        var p = arg0[i];
6 
        if (!p[4])
7 
        {
8 
            var vx = (p[0] - p[2]) * arg1;
9 
            var vy = (p[1] - p[3]) * arg1;
10 
            if (p[0] > room_width)
11 
            {
12 
                p[0] = room_width;
13 
                p[2] = p[0] + (vx * arg2);
14 
            }
15 
            else if (p[0] < 0)
16 
            {
17 
                p[0] = 0;
18 
                p[2] = p[0] + (vx * arg2);
19 
            }
20 
            if (p[1] > room_height)
21 
            {
22 
                p[1] = room_height;
23 
                p[3] = p[1] + (vy * arg2);
24 
            }
25 
            else if (p[1] < 0)
26 
            {
27 
                p[1] = 0;
28 
                p[3] = p[1] + (vy * arg2);
29 
            }
30 
        }
31 
    }
32 
}