examples/pieces/hommage_a_duerer.scd

   1
   2
   3 // Vera Molnar: Hommage ˆ DŸrer (1948-92)
   4
   5 (
   6 w = Window.new("Vera Molnar: Hommage a Duerer (1948-92)", Rect(20, 20, 720, 720), false).front;
   7 w.view.background_(Color.white);
   8 x = Array.fill2D(4, 4, _ @ _).flat.scramble * 20;
   9 w.drawHook = {
  10         Pen.strokeColor = Color.black;
  11         Pen.translate(10, 10);
  12         9.do {
  13                 9.do {
  14                         Pen.moveTo(x.first);
  15                         x.do { |point, i|
  16                                 Pen.lineTo(point);
  17                         };
  18                         x = x.scramble;
  19                         Pen.translate(80, 0);
  20                         Pen.stroke;
  21                 };
  22         Pen.translate(80 * -9, 80);
  23         };
  24 };
  25 w.refresh;
  26 )