[Dach]

oops, forgot how hard it is to understand any script without any kind of help;
r - radius
px - pointx
py - pointy
seg - segment length (parts of a tile or something...)
^ edit those to change the effects
dx - x dist from center to point
dy - y dist from center to point
c - vector length from center to point
uc - altered vector length (makes seg usefull)
pdx - dist I want to move point x
pdy - dist I want to move point y
pndx - new dist for point y
pndy - ^ same for x
nc - new radius
unc - altered new radius (keep the radius the same)
pnx - new point x
pny - new point y

basically i'm finding the tangent to the current vector, then changing the vector without altering the radius