Getting closer

[David Arnold <darnold@northcoast.com>]

All,

This works pretty well. Still, I don't feel like I am doing this correctly.
More advice needed. 

I can resize the graphics in Metapost, but how would I scale and resize in
Context one the graphics are already drawn?

% interface=en output=pdf

\starttext

\setuppapersize[S6][S6]

\setupbodyfont[pos,14.4pt]

\setupcolors[state=start]

\setupinteraction[state=start]

There is a \gotobox {\tooltip {last page} {indeed, klicking here
will bring you to the last page}} [nextpage] too in this document.

\MPinclusions{input mp-tool}

\startMPgraphic
 path squares[];
 numeric side;
 side=8cm;
 squares0=unitsquare scaled side;
 draw squares0;
 y1=0;x2=side;
 x1=side/25;y2=x1;
 d=angle(z2-z1);
 r=abs(z2-z1)/side;
 for i:=1 upto 80:
 squares[i]:=squares[i-1] shifted (-side/2,-side/2)
 rotated d scaled r shifted (side/2,side/2);
 draw squares[i] withcolor (i/100)[blue,green];
 endfor
\stopMPgraphic

\loadcurrentMPgraphic{setups}

\placefigure
 [][fig1]
 {My metapost graphic.}
 {\placeMPgraphic}

\page

>From this it follows that there is also a \gotobox {\tooltip
{first page} {this button lets you go to the first page}}
[firstpage].

\stoptext