Scale
Scale(point/poly, center, hScale, vScale)
Additional Notes
oh, hang on, I get it..
actually the problem is in the point input. You have to scale the results to match the screen size, so inserting the lines
float w, h;
DimensionsOf(dest, w, h)
centrePt.X *= w;
centrePt.Y *=h;
right after the code statement fixes the problem.
the centre parameter of the scale function seems to have no effect. Try rhis script to see what I mean
Generator "Scale Test"
input Hscale, "scale", Slider, 1, 0, 2
input Vscale, "scale", Slider, 1, 0, 2
input centrePt, "centre", Point, 0, 0
code
point source1[4];
BoundsOf(dest, source1);
Scale(source1, centrePt, Hscale, Vscale);
FillPoly(source1, dest, Kred)