import var Spline in "Spline.t"

put "Interpolation Demonstration: Depress left mouse button at desired points"
put "Stop execution by hitting 'Stop' button on OOT Control Panel"
setscreen("title: Bicubic Spline Plot")
setscreen("position: -300;-200");
setscreen("nocursor")

% Spline.SetUpSpline(Spline.CubicLagrange, 16, 0)	% other possible uses
% Spline.SetUpSpline(Spline.CubicBezier, 16, 0)
% Spline.SetEvaluation(Spline.Horner);

Spline.SetUpSpline(Spline.CubicCatmullRom, 16, 0)
Spline.SetEvaluation(Spline.DirectTM)

loop
	Spline.AddControlPoint(Spline.GetMouseButtonPush)
end loop