💾 Archived View for heavysquare.com › visuals › 0109.mp.txt captured on 2023-01-29 at 03:07:30.

View Raw

More Information

⬅️ Previous capture (2022-04-28)

-=-=-=-=-=-=-

outputformat:="png";
outputformatoptions:="format=rgb antialias=good";
randomseed:=42;
u=33mm;

begingroup
  for j=1 upto 20:
     currentpicture:=nullpicture;
     charcode:=800+j;
     path p;
     p:=(0,0)..(u,u)..(u,0)--(0,u);
     for i=1 upto 8:
       p:=(subpath (length p / (1 + j/20), length p) of p)..(p rotated (13+i*i) shifted (.1i*u,-.2u) scaled (1-.105i) reflectedabout ((.4i*u,.01*i*u),(0,.01i*u)));
     endfor
     draw p scaled 64;
     draw (llcorner bbox currentpicture -(u,u)) withcolor white;
     draw (urcorner bbox currentpicture +(u,u)) withcolor white;
     shipout currentpicture;
  endfor
endgroup;

end

% mpost 0109.mp.txt
% for i in 0109.mp.8*; do mv $i $i.png; done