// -*- C -*-

include <quacks-ingredients.scad>

module Demo(){ ////toplevel
  $nspots = 3;
  color("red") { Token_L3(); }
  color("white") { Token_L1(); Token_L5(); }
  color("black") { Token_L2(); Token_L4(); }
}

module SandingFrame(){ ////toplevel
  deltas = [ for (i = [ 0 : 0.15 : 0.75 ]) i ];
  echo(deltas);
  stride = token_dia + 5;
  linear_extrude(height = thick*2/3) {
    difference(){
      translate((token_dia/2 + stride) * 0.5 * [-1,-1])
	square([ stride * (len(deltas) + 0.5),
		 stride * 1.5 ]);
      for (i = [0 : len(deltas)-1]) {
	translate([ stride*i, 0 ])
	  circle(r = token_dia/2 + deltas[i]);
      }
    }
  }
}