quacks-ingredients-counts.scad

   1 //  autogenerated - do not edit
   2 //   update script is quacks-ingredients-updates-levels
   3 //   source is quacks-ingredients-counts
   4 module Base_1xFour(){ ////toplevel
   5 // Base  1xFour      total= 1  rowsz=1  nrows=1
   6   union(){
   7     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
   8     $nspots = 0;
   9   };
  10   union(){
  11     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  12     $nspots = 1;
  13   };
  14   union(){
  15     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  16     $nspots = 2;
  17   };
  18   union(){
  19     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  20     $nspots = 3;
  21   };
  22   union(){
  23     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  24     $nspots = 4;
  25     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
  26   };
  27 }
  28 module Base_1xOne(){ ////toplevel
  29 // Base  1xOne       total= 1  rowsz=1  nrows=1
  30   union(){
  31     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  32     $nspots = 0;
  33   };
  34   union(){
  35     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  36     $nspots = 1;
  37     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
  38   };
  39   union(){
  40     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  41     $nspots = 2;
  42   };
  43   union(){
  44     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  45     $nspots = 3;
  46   };
  47   union(){
  48     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  49     $nspots = 4;
  50   };
  51 }
  52 module Base_1xThree(){ ////toplevel
  53 // Base  1xThree     total= 1  rowsz=1  nrows=1
  54   union(){
  55     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  56     $nspots = 0;
  57   };
  58   union(){
  59     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  60     $nspots = 1;
  61   };
  62   union(){
  63     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  64     $nspots = 2;
  65   };
  66   union(){
  67     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  68     $nspots = 3;
  69     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
  70   };
  71   union(){
  72     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  73     $nspots = 4;
  74   };
  75 }
  76 module Base_1xTwo(){ ////toplevel
  77 // Base  1xTwo       total= 1  rowsz=1  nrows=1
  78   union(){
  79     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  80     $nspots = 0;
  81   };
  82   union(){
  83     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  84     $nspots = 1;
  85   };
  86   union(){
  87     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  88     $nspots = 2;
  89     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
  90   };
  91   union(){
  92     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  93     $nspots = 3;
  94   };
  95   union(){
  96     Frame($phase, token_pitch * [ 1 + 1.00, 1 + 0.50 ]);
  97     $nspots = 4;
  98   };
  99 }
 100 module Base_2xFour(){ ////toplevel
 101 // Base  2xFour      total= 2  rowsz=2  nrows=1
 102   union(){
 103     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 104     $nspots = 0;
 105   };
 106   union(){
 107     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 108     $nspots = 1;
 109   };
 110   union(){
 111     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 112     $nspots = 2;
 113   };
 114   union(){
 115     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 116     $nspots = 3;
 117   };
 118   union(){
 119     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 120     $nspots = 4;
 121     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
 122     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
 123   };
 124 }
 125 module Base_2xOne(){ ////toplevel
 126 // Base  2xOne       total= 2  rowsz=2  nrows=1
 127   union(){
 128     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 129     $nspots = 0;
 130   };
 131   union(){
 132     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 133     $nspots = 1;
 134     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
 135     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
 136   };
 137   union(){
 138     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 139     $nspots = 2;
 140   };
 141   union(){
 142     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 143     $nspots = 3;
 144   };
 145   union(){
 146     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 147     $nspots = 4;
 148   };
 149 }
 150 module Base_2xThree(){ ////toplevel
 151 // Base  2xThree     total= 2  rowsz=2  nrows=1
 152   union(){
 153     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 154     $nspots = 0;
 155   };
 156   union(){
 157     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 158     $nspots = 1;
 159   };
 160   union(){
 161     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 162     $nspots = 2;
 163   };
 164   union(){
 165     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 166     $nspots = 3;
 167     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
 168     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
 169   };
 170   union(){
 171     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 172     $nspots = 4;
 173   };
 174 }
 175 module Base_2xTwo(){ ////toplevel
 176 // Base  2xTwo       total= 2  rowsz=2  nrows=1
 177   union(){
 178     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 179     $nspots = 0;
 180   };
 181   union(){
 182     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 183     $nspots = 1;
 184   };
 185   union(){
 186     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 187     $nspots = 2;
 188     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
 189     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
 190   };
 191   union(){
 192     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 193     $nspots = 3;
 194   };
 195   union(){
 196     Frame($phase, token_pitch * [ 2 + 1.00, 1 + 0.50 ]);
 197     $nspots = 4;
 198   };
 199 }
 200 module Base_3xFour(){ ////toplevel
 201 // Base  3xFour      total= 3  rowsz=2  nrows=2
 202   union(){
 203     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 204     $nspots = 0;
 205   };
 206   union(){
 207     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 208     $nspots = 1;
 209   };
 210   union(){
 211     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 212     $nspots = 2;
 213   };
 214   union(){
 215     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 216     $nspots = 3;
 217   };
 218   union(){
 219     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 220     $nspots = 4;
 221     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
 222     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
 223     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
 224   };
 225 }
 226 module Base_3xOne(){ ////toplevel
 227 // Base  3xOne       total= 3  rowsz=2  nrows=2
 228   union(){
 229     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 230     $nspots = 0;
 231   };
 232   union(){
 233     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 234     $nspots = 1;
 235     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
 236     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
 237     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
 238   };
 239   union(){
 240     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 241     $nspots = 2;
 242   };
 243   union(){
 244     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 245     $nspots = 3;
 246   };
 247   union(){
 248     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 249     $nspots = 4;
 250   };
 251 }
 252 module Base_3xThree(){ ////toplevel
 253 // Base  3xThree     total= 3  rowsz=2  nrows=2
 254   union(){
 255     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 256     $nspots = 0;
 257   };
 258   union(){
 259     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 260     $nspots = 1;
 261   };
 262   union(){
 263     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 264     $nspots = 2;
 265   };
 266   union(){
 267     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 268     $nspots = 3;
 269     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
 270     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
 271     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
 272   };
 273   union(){
 274     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 275     $nspots = 4;
 276   };
 277 }
 278 module Base_3xTwo(){ ////toplevel
 279 // Base  3xTwo       total= 3  rowsz=2  nrows=2
 280   union(){
 281     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 282     $nspots = 0;
 283   };
 284   union(){
 285     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 286     $nspots = 1;
 287   };
 288   union(){
 289     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 290     $nspots = 2;
 291     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
 292     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
 293     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
 294   };
 295   union(){
 296     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 297     $nspots = 3;
 298   };
 299   union(){
 300     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 301     $nspots = 4;
 302   };
 303 }
 304 module Base_Black(){ ////toplevel
 305 // Base  Black       total=18  rowsz=5  nrows=4
 306   union(){
 307     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
 308     $nspots = 0;
 309   };
 310   union(){
 311     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
 312     $nspots = 1;
 313     translate(token_pitch * [  -2.0,  -1.5 ]) Token_L();
 314     translate(token_pitch * [  -2.0,  -0.5 ]) Token_L();
 315     translate(token_pitch * [  -2.0,   0.5 ]) Token_L();
 316     translate(token_pitch * [  -2.0,   1.5 ]) Token_L();
 317     translate(token_pitch * [  -1.0,  -1.5 ]) Token_L();
 318     translate(token_pitch * [  -1.0,  -0.5 ]) Token_L();
 319     translate(token_pitch * [  -1.0,   0.5 ]) Token_L();
 320     translate(token_pitch * [  -1.0,   1.5 ]) Token_L();
 321     translate(token_pitch * [   0.0,  -1.5 ]) Token_L();
 322     translate(token_pitch * [   0.0,  -0.5 ]) Token_L();
 323     translate(token_pitch * [   0.0,   0.5 ]) Token_L();
 324     translate(token_pitch * [   0.0,   1.5 ]) Token_L();
 325     translate(token_pitch * [   1.0,  -1.5 ]) Token_L();
 326     translate(token_pitch * [   1.0,  -0.5 ]) Token_L();
 327     translate(token_pitch * [   1.0,   0.5 ]) Token_L();
 328     translate(token_pitch * [   1.0,   1.5 ]) Token_L();
 329     translate(token_pitch * [   2.0,  -1.5 ]) Token_L();
 330     translate(token_pitch * [   2.0,  -0.5 ]) Token_L();
 331   };
 332   union(){
 333     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
 334     $nspots = 2;
 335   };
 336   union(){
 337     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
 338     $nspots = 3;
 339   };
 340   union(){
 341     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
 342     $nspots = 4;
 343   };
 344 }
 345 module Base_Blue(){ ////toplevel
 346 // Base  Blue        total=34  rowsz=6  nrows=6
 347   union(){
 348     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 349     $nspots = 0;
 350   };
 351   union(){
 352     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 353     $nspots = 1;
 354     translate(token_pitch * [  -2.5,  -2.5 ]) Token_L();
 355     translate(token_pitch * [  -2.5,  -1.5 ]) Token_L();
 356     translate(token_pitch * [  -2.5,  -0.5 ]) Token_L();
 357     translate(token_pitch * [  -2.5,   0.5 ]) Token_L();
 358     translate(token_pitch * [  -2.5,   1.5 ]) Token_L();
 359     translate(token_pitch * [  -2.5,   2.5 ]) Token_L();
 360     translate(token_pitch * [  -1.5,  -2.5 ]) Token_L();
 361     translate(token_pitch * [  -1.5,  -1.5 ]) Token_L();
 362     translate(token_pitch * [  -1.5,  -0.5 ]) Token_L();
 363     translate(token_pitch * [  -1.5,   0.5 ]) Token_L();
 364     translate(token_pitch * [  -1.5,   1.5 ]) Token_L();
 365     translate(token_pitch * [  -1.5,   2.5 ]) Token_L();
 366     translate(token_pitch * [  -0.5,  -2.5 ]) Token_L();
 367     translate(token_pitch * [  -0.5,  -1.5 ]) Token_L();
 368   };
 369   union(){
 370     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 371     $nspots = 2;
 372     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
 373     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
 374     translate(token_pitch * [  -0.5,   1.5 ]) Token_L();
 375     translate(token_pitch * [  -0.5,   2.5 ]) Token_L();
 376     translate(token_pitch * [   0.5,  -2.5 ]) Token_L();
 377     translate(token_pitch * [   0.5,  -1.5 ]) Token_L();
 378     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
 379     translate(token_pitch * [   0.5,   0.5 ]) Token_L();
 380     translate(token_pitch * [   0.5,   1.5 ]) Token_L();
 381     translate(token_pitch * [   0.5,   2.5 ]) Token_L();
 382   };
 383   union(){
 384     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 385     $nspots = 3;
 386   };
 387   union(){
 388     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 389     $nspots = 4;
 390     translate(token_pitch * [   1.5,  -2.5 ]) Token_L();
 391     translate(token_pitch * [   1.5,  -1.5 ]) Token_L();
 392     translate(token_pitch * [   1.5,  -0.5 ]) Token_L();
 393     translate(token_pitch * [   1.5,   0.5 ]) Token_L();
 394     translate(token_pitch * [   1.5,   1.5 ]) Token_L();
 395     translate(token_pitch * [   1.5,   2.5 ]) Token_L();
 396     translate(token_pitch * [   2.5,  -2.5 ]) Token_L();
 397     translate(token_pitch * [   2.5,  -1.5 ]) Token_L();
 398     translate(token_pitch * [   2.5,  -0.5 ]) Token_L();
 399     translate(token_pitch * [   2.5,   0.5 ]) Token_L();
 400   };
 401 }
 402 module Base_Green(){ ////toplevel
 403 // Base  Green       total=38  rowsz=7  nrows=6
 404   union(){
 405     Frame($phase, token_pitch * [ 7 + 1.00, 6 + 0.50 ]);
 406     $nspots = 0;
 407   };
 408   union(){
 409     Frame($phase, token_pitch * [ 7 + 1.00, 6 + 0.50 ]);
 410     $nspots = 1;
 411     translate(token_pitch * [  -3.0,  -2.5 ]) Token_L();
 412     translate(token_pitch * [  -3.0,  -1.5 ]) Token_L();
 413     translate(token_pitch * [  -3.0,  -0.5 ]) Token_L();
 414     translate(token_pitch * [  -3.0,   0.5 ]) Token_L();
 415     translate(token_pitch * [  -3.0,   1.5 ]) Token_L();
 416     translate(token_pitch * [  -3.0,   2.5 ]) Token_L();
 417     translate(token_pitch * [  -2.0,  -2.5 ]) Token_L();
 418     translate(token_pitch * [  -2.0,  -1.5 ]) Token_L();
 419     translate(token_pitch * [  -2.0,  -0.5 ]) Token_L();
 420     translate(token_pitch * [  -2.0,   0.5 ]) Token_L();
 421     translate(token_pitch * [  -2.0,   1.5 ]) Token_L();
 422     translate(token_pitch * [  -2.0,   2.5 ]) Token_L();
 423     translate(token_pitch * [  -1.0,  -2.5 ]) Token_L();
 424     translate(token_pitch * [  -1.0,  -1.5 ]) Token_L();
 425     translate(token_pitch * [  -1.0,  -0.5 ]) Token_L();
 426   };
 427   union(){
 428     Frame($phase, token_pitch * [ 7 + 1.00, 6 + 0.50 ]);
 429     $nspots = 2;
 430     translate(token_pitch * [  -1.0,   0.5 ]) Token_L();
 431     translate(token_pitch * [  -1.0,   1.5 ]) Token_L();
 432     translate(token_pitch * [  -1.0,   2.5 ]) Token_L();
 433     translate(token_pitch * [   0.0,  -2.5 ]) Token_L();
 434     translate(token_pitch * [   0.0,  -1.5 ]) Token_L();
 435     translate(token_pitch * [   0.0,  -0.5 ]) Token_L();
 436     translate(token_pitch * [   0.0,   0.5 ]) Token_L();
 437     translate(token_pitch * [   0.0,   1.5 ]) Token_L();
 438     translate(token_pitch * [   0.0,   2.5 ]) Token_L();
 439     translate(token_pitch * [   1.0,  -2.5 ]) Token_L();
 440   };
 441   union(){
 442     Frame($phase, token_pitch * [ 7 + 1.00, 6 + 0.50 ]);
 443     $nspots = 3;
 444   };
 445   union(){
 446     Frame($phase, token_pitch * [ 7 + 1.00, 6 + 0.50 ]);
 447     $nspots = 4;
 448     translate(token_pitch * [   1.0,  -1.5 ]) Token_L();
 449     translate(token_pitch * [   1.0,  -0.5 ]) Token_L();
 450     translate(token_pitch * [   1.0,   0.5 ]) Token_L();
 451     translate(token_pitch * [   1.0,   1.5 ]) Token_L();
 452     translate(token_pitch * [   1.0,   2.5 ]) Token_L();
 453     translate(token_pitch * [   2.0,  -2.5 ]) Token_L();
 454     translate(token_pitch * [   2.0,  -1.5 ]) Token_L();
 455     translate(token_pitch * [   2.0,  -0.5 ]) Token_L();
 456     translate(token_pitch * [   2.0,   0.5 ]) Token_L();
 457     translate(token_pitch * [   2.0,   1.5 ]) Token_L();
 458     translate(token_pitch * [   2.0,   2.5 ]) Token_L();
 459     translate(token_pitch * [   3.0,  -2.5 ]) Token_L();
 460     translate(token_pitch * [   3.0,  -1.5 ]) Token_L();
 461   };
 462 }
 463 module Base_Orange(){ ////toplevel
 464 // Base  Orange      total=20  rowsz=5  nrows=4
 465   union(){
 466     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
 467     $nspots = 0;
 468   };
 469   union(){
 470     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
 471     $nspots = 1;
 472     translate(token_pitch * [  -2.0,  -1.5 ]) Token_L();
 473     translate(token_pitch * [  -2.0,  -0.5 ]) Token_L();
 474     translate(token_pitch * [  -2.0,   0.5 ]) Token_L();
 475     translate(token_pitch * [  -2.0,   1.5 ]) Token_L();
 476     translate(token_pitch * [  -1.0,  -1.5 ]) Token_L();
 477     translate(token_pitch * [  -1.0,  -0.5 ]) Token_L();
 478     translate(token_pitch * [  -1.0,   0.5 ]) Token_L();
 479     translate(token_pitch * [  -1.0,   1.5 ]) Token_L();
 480     translate(token_pitch * [   0.0,  -1.5 ]) Token_L();
 481     translate(token_pitch * [   0.0,  -0.5 ]) Token_L();
 482     translate(token_pitch * [   0.0,   0.5 ]) Token_L();
 483     translate(token_pitch * [   0.0,   1.5 ]) Token_L();
 484     translate(token_pitch * [   1.0,  -1.5 ]) Token_L();
 485     translate(token_pitch * [   1.0,  -0.5 ]) Token_L();
 486     translate(token_pitch * [   1.0,   0.5 ]) Token_L();
 487     translate(token_pitch * [   1.0,   1.5 ]) Token_L();
 488     translate(token_pitch * [   2.0,  -1.5 ]) Token_L();
 489     translate(token_pitch * [   2.0,  -0.5 ]) Token_L();
 490     translate(token_pitch * [   2.0,   0.5 ]) Token_L();
 491     translate(token_pitch * [   2.0,   1.5 ]) Token_L();
 492   };
 493   union(){
 494     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
 495     $nspots = 2;
 496   };
 497   union(){
 498     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
 499     $nspots = 3;
 500   };
 501   union(){
 502     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
 503     $nspots = 4;
 504   };
 505 }
 506 module Base_Purple(){ ////toplevel
 507 // Base  Purple      total=15  rowsz=4  nrows=4
 508   union(){
 509     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
 510     $nspots = 0;
 511   };
 512   union(){
 513     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
 514     $nspots = 1;
 515     translate(token_pitch * [  -1.5,  -1.5 ]) Token_L();
 516     translate(token_pitch * [  -1.5,  -0.5 ]) Token_L();
 517     translate(token_pitch * [  -1.5,   0.5 ]) Token_L();
 518     translate(token_pitch * [  -1.5,   1.5 ]) Token_L();
 519     translate(token_pitch * [  -0.5,  -1.5 ]) Token_L();
 520     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
 521     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
 522     translate(token_pitch * [  -0.5,   1.5 ]) Token_L();
 523     translate(token_pitch * [   0.5,  -1.5 ]) Token_L();
 524     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
 525     translate(token_pitch * [   0.5,   0.5 ]) Token_L();
 526     translate(token_pitch * [   0.5,   1.5 ]) Token_L();
 527     translate(token_pitch * [   1.5,  -1.5 ]) Token_L();
 528     translate(token_pitch * [   1.5,  -0.5 ]) Token_L();
 529     translate(token_pitch * [   1.5,   0.5 ]) Token_L();
 530   };
 531   union(){
 532     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
 533     $nspots = 2;
 534   };
 535   union(){
 536     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
 537     $nspots = 3;
 538   };
 539   union(){
 540     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
 541     $nspots = 4;
 542   };
 543 }
 544 module Base_Red(){ ////toplevel
 545 // Base  Red         total=30  rowsz=6  nrows=5
 546   union(){
 547     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 548     $nspots = 0;
 549   };
 550   union(){
 551     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 552     $nspots = 1;
 553     translate(token_pitch * [  -2.5,  -2.0 ]) Token_L();
 554     translate(token_pitch * [  -2.5,  -1.0 ]) Token_L();
 555     translate(token_pitch * [  -2.5,   0.0 ]) Token_L();
 556     translate(token_pitch * [  -2.5,   1.0 ]) Token_L();
 557     translate(token_pitch * [  -2.5,   2.0 ]) Token_L();
 558     translate(token_pitch * [  -1.5,  -2.0 ]) Token_L();
 559     translate(token_pitch * [  -1.5,  -1.0 ]) Token_L();
 560     translate(token_pitch * [  -1.5,   0.0 ]) Token_L();
 561     translate(token_pitch * [  -1.5,   1.0 ]) Token_L();
 562     translate(token_pitch * [  -1.5,   2.0 ]) Token_L();
 563     translate(token_pitch * [  -0.5,  -2.0 ]) Token_L();
 564     translate(token_pitch * [  -0.5,  -1.0 ]) Token_L();
 565   };
 566   union(){
 567     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 568     $nspots = 2;
 569     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
 570     translate(token_pitch * [  -0.5,   1.0 ]) Token_L();
 571     translate(token_pitch * [  -0.5,   2.0 ]) Token_L();
 572     translate(token_pitch * [   0.5,  -2.0 ]) Token_L();
 573     translate(token_pitch * [   0.5,  -1.0 ]) Token_L();
 574     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
 575     translate(token_pitch * [   0.5,   1.0 ]) Token_L();
 576     translate(token_pitch * [   0.5,   2.0 ]) Token_L();
 577   };
 578   union(){
 579     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 580     $nspots = 3;
 581   };
 582   union(){
 583     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 584     $nspots = 4;
 585     translate(token_pitch * [   1.5,  -2.0 ]) Token_L();
 586     translate(token_pitch * [   1.5,  -1.0 ]) Token_L();
 587     translate(token_pitch * [   1.5,   0.0 ]) Token_L();
 588     translate(token_pitch * [   1.5,   1.0 ]) Token_L();
 589     translate(token_pitch * [   1.5,   2.0 ]) Token_L();
 590     translate(token_pitch * [   2.5,  -2.0 ]) Token_L();
 591     translate(token_pitch * [   2.5,  -1.0 ]) Token_L();
 592     translate(token_pitch * [   2.5,   0.0 ]) Token_L();
 593     translate(token_pitch * [   2.5,   1.0 ]) Token_L();
 594     translate(token_pitch * [   2.5,   2.0 ]) Token_L();
 595   };
 596 }
 597 module Base_White(){ ////toplevel
 598 // Base  White       total=32  rowsz=6  nrows=6
 599   union(){
 600     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 601     $nspots = 0;
 602   };
 603   union(){
 604     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 605     $nspots = 1;
 606     translate(token_pitch * [  -2.5,  -2.5 ]) Token_L();
 607     translate(token_pitch * [  -2.5,  -1.5 ]) Token_L();
 608     translate(token_pitch * [  -2.5,  -0.5 ]) Token_L();
 609     translate(token_pitch * [  -2.5,   0.5 ]) Token_L();
 610     translate(token_pitch * [  -2.5,   1.5 ]) Token_L();
 611     translate(token_pitch * [  -2.5,   2.5 ]) Token_L();
 612     translate(token_pitch * [  -1.5,  -2.5 ]) Token_L();
 613     translate(token_pitch * [  -1.5,  -1.5 ]) Token_L();
 614     translate(token_pitch * [  -1.5,  -0.5 ]) Token_L();
 615     translate(token_pitch * [  -1.5,   0.5 ]) Token_L();
 616     translate(token_pitch * [  -1.5,   1.5 ]) Token_L();
 617     translate(token_pitch * [  -1.5,   2.5 ]) Token_L();
 618     translate(token_pitch * [  -0.5,  -2.5 ]) Token_L();
 619     translate(token_pitch * [  -0.5,  -1.5 ]) Token_L();
 620     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
 621     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
 622     translate(token_pitch * [  -0.5,   1.5 ]) Token_L();
 623     translate(token_pitch * [  -0.5,   2.5 ]) Token_L();
 624     translate(token_pitch * [   0.5,  -2.5 ]) Token_L();
 625     translate(token_pitch * [   0.5,  -1.5 ]) Token_L();
 626   };
 627   union(){
 628     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 629     $nspots = 2;
 630     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
 631     translate(token_pitch * [   0.5,   0.5 ]) Token_L();
 632     translate(token_pitch * [   0.5,   1.5 ]) Token_L();
 633     translate(token_pitch * [   0.5,   2.5 ]) Token_L();
 634     translate(token_pitch * [   1.5,  -2.5 ]) Token_L();
 635     translate(token_pitch * [   1.5,  -1.5 ]) Token_L();
 636     translate(token_pitch * [   1.5,  -0.5 ]) Token_L();
 637     translate(token_pitch * [   1.5,   0.5 ]) Token_L();
 638   };
 639   union(){
 640     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 641     $nspots = 3;
 642     translate(token_pitch * [   1.5,   1.5 ]) Token_L();
 643     translate(token_pitch * [   1.5,   2.5 ]) Token_L();
 644     translate(token_pitch * [   2.5,  -2.5 ]) Token_L();
 645     translate(token_pitch * [   2.5,  -1.5 ]) Token_L();
 646   };
 647   union(){
 648     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 649     $nspots = 4;
 650   };
 651 }
 652 module Base_WhiteSpare(){ ////toplevel
 653 // Base  WhiteSpare  total= 3  rowsz=2  nrows=2
 654   union(){
 655     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 656     $nspots = 0;
 657   };
 658   union(){
 659     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 660     $nspots = 1;
 661     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
 662   };
 663   union(){
 664     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 665     $nspots = 2;
 666     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
 667   };
 668   union(){
 669     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 670     $nspots = 3;
 671     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
 672   };
 673   union(){
 674     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 675     $nspots = 4;
 676   };
 677 }
 678 module Base_Yellow(){ ////toplevel
 679 // Base  Yellow      total=29  rowsz=6  nrows=5
 680   union(){
 681     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 682     $nspots = 0;
 683   };
 684   union(){
 685     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 686     $nspots = 1;
 687     translate(token_pitch * [  -2.5,  -2.0 ]) Token_L();
 688     translate(token_pitch * [  -2.5,  -1.0 ]) Token_L();
 689     translate(token_pitch * [  -2.5,   0.0 ]) Token_L();
 690     translate(token_pitch * [  -2.5,   1.0 ]) Token_L();
 691     translate(token_pitch * [  -2.5,   2.0 ]) Token_L();
 692     translate(token_pitch * [  -1.5,  -2.0 ]) Token_L();
 693     translate(token_pitch * [  -1.5,  -1.0 ]) Token_L();
 694     translate(token_pitch * [  -1.5,   0.0 ]) Token_L();
 695     translate(token_pitch * [  -1.5,   1.0 ]) Token_L();
 696     translate(token_pitch * [  -1.5,   2.0 ]) Token_L();
 697     translate(token_pitch * [  -0.5,  -2.0 ]) Token_L();
 698     translate(token_pitch * [  -0.5,  -1.0 ]) Token_L();
 699     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
 700   };
 701   union(){
 702     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 703     $nspots = 2;
 704     translate(token_pitch * [  -0.5,   1.0 ]) Token_L();
 705     translate(token_pitch * [  -0.5,   2.0 ]) Token_L();
 706     translate(token_pitch * [   0.5,  -2.0 ]) Token_L();
 707     translate(token_pitch * [   0.5,  -1.0 ]) Token_L();
 708     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
 709     translate(token_pitch * [   0.5,   1.0 ]) Token_L();
 710   };
 711   union(){
 712     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 713     $nspots = 3;
 714   };
 715   union(){
 716     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 717     $nspots = 4;
 718     translate(token_pitch * [   0.5,   2.0 ]) Token_L();
 719     translate(token_pitch * [   1.5,  -2.0 ]) Token_L();
 720     translate(token_pitch * [   1.5,  -1.0 ]) Token_L();
 721     translate(token_pitch * [   1.5,   0.0 ]) Token_L();
 722     translate(token_pitch * [   1.5,   1.0 ]) Token_L();
 723     translate(token_pitch * [   1.5,   2.0 ]) Token_L();
 724     translate(token_pitch * [   2.5,  -2.0 ]) Token_L();
 725     translate(token_pitch * [   2.5,  -1.0 ]) Token_L();
 726     translate(token_pitch * [   2.5,   0.0 ]) Token_L();
 727     translate(token_pitch * [   2.5,   1.0 ]) Token_L();
 728   };
 729 }
 730 // Base  total_count=243   total_real_count=216
 731 // Base  max_rowsz=7       max_nrows=6
 732 module All_Black(){ ////toplevel
 733 // All  Black       total=26  rowsz=6  nrows=5
 734   union(){
 735     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 736     $nspots = 0;
 737   };
 738   union(){
 739     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 740     $nspots = 1;
 741     translate(token_pitch * [  -2.5,  -2.0 ]) Token_L();
 742     translate(token_pitch * [  -2.5,  -1.0 ]) Token_L();
 743     translate(token_pitch * [  -2.5,   0.0 ]) Token_L();
 744     translate(token_pitch * [  -2.5,   1.0 ]) Token_L();
 745     translate(token_pitch * [  -2.5,   2.0 ]) Token_L();
 746     translate(token_pitch * [  -1.5,  -2.0 ]) Token_L();
 747     translate(token_pitch * [  -1.5,  -1.0 ]) Token_L();
 748     translate(token_pitch * [  -1.5,   0.0 ]) Token_L();
 749     translate(token_pitch * [  -1.5,   1.0 ]) Token_L();
 750     translate(token_pitch * [  -1.5,   2.0 ]) Token_L();
 751     translate(token_pitch * [  -0.5,  -2.0 ]) Token_L();
 752     translate(token_pitch * [  -0.5,  -1.0 ]) Token_L();
 753     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
 754     translate(token_pitch * [  -0.5,   1.0 ]) Token_L();
 755     translate(token_pitch * [  -0.5,   2.0 ]) Token_L();
 756     translate(token_pitch * [   0.5,  -2.0 ]) Token_L();
 757     translate(token_pitch * [   0.5,  -1.0 ]) Token_L();
 758     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
 759     translate(token_pitch * [   0.5,   1.0 ]) Token_L();
 760     translate(token_pitch * [   0.5,   2.0 ]) Token_L();
 761     translate(token_pitch * [   1.5,  -2.0 ]) Token_L();
 762     translate(token_pitch * [   1.5,  -1.0 ]) Token_L();
 763     translate(token_pitch * [   1.5,   0.0 ]) Token_L();
 764     translate(token_pitch * [   1.5,   1.0 ]) Token_L();
 765     translate(token_pitch * [   1.5,   2.0 ]) Token_L();
 766     translate(token_pitch * [   2.5,  -2.0 ]) Token_L();
 767   };
 768   union(){
 769     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 770     $nspots = 2;
 771   };
 772   union(){
 773     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 774     $nspots = 3;
 775   };
 776   union(){
 777     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 778     $nspots = 4;
 779   };
 780 }
 781 module All_Blue(){ ////toplevel
 782 // All  Blue        total=52  rowsz=8  nrows=7
 783   union(){
 784     Frame($phase, token_pitch * [ 8 + 1.00, 7 + 0.50 ]);
 785     $nspots = 0;
 786   };
 787   union(){
 788     Frame($phase, token_pitch * [ 8 + 1.00, 7 + 0.50 ]);
 789     $nspots = 1;
 790     translate(token_pitch * [  -3.5,  -3.0 ]) Token_L();
 791     translate(token_pitch * [  -3.5,  -2.0 ]) Token_L();
 792     translate(token_pitch * [  -3.5,  -1.0 ]) Token_L();
 793     translate(token_pitch * [  -3.5,   0.0 ]) Token_L();
 794     translate(token_pitch * [  -3.5,   1.0 ]) Token_L();
 795     translate(token_pitch * [  -3.5,   2.0 ]) Token_L();
 796     translate(token_pitch * [  -3.5,   3.0 ]) Token_L();
 797     translate(token_pitch * [  -2.5,  -3.0 ]) Token_L();
 798     translate(token_pitch * [  -2.5,  -2.0 ]) Token_L();
 799     translate(token_pitch * [  -2.5,  -1.0 ]) Token_L();
 800     translate(token_pitch * [  -2.5,   0.0 ]) Token_L();
 801     translate(token_pitch * [  -2.5,   1.0 ]) Token_L();
 802     translate(token_pitch * [  -2.5,   2.0 ]) Token_L();
 803     translate(token_pitch * [  -2.5,   3.0 ]) Token_L();
 804     translate(token_pitch * [  -1.5,  -3.0 ]) Token_L();
 805     translate(token_pitch * [  -1.5,  -2.0 ]) Token_L();
 806     translate(token_pitch * [  -1.5,  -1.0 ]) Token_L();
 807     translate(token_pitch * [  -1.5,   0.0 ]) Token_L();
 808     translate(token_pitch * [  -1.5,   1.0 ]) Token_L();
 809     translate(token_pitch * [  -1.5,   2.0 ]) Token_L();
 810     translate(token_pitch * [  -1.5,   3.0 ]) Token_L();
 811     translate(token_pitch * [  -0.5,  -3.0 ]) Token_L();
 812   };
 813   union(){
 814     Frame($phase, token_pitch * [ 8 + 1.00, 7 + 0.50 ]);
 815     $nspots = 2;
 816     translate(token_pitch * [  -0.5,  -2.0 ]) Token_L();
 817     translate(token_pitch * [  -0.5,  -1.0 ]) Token_L();
 818     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
 819     translate(token_pitch * [  -0.5,   1.0 ]) Token_L();
 820     translate(token_pitch * [  -0.5,   2.0 ]) Token_L();
 821     translate(token_pitch * [  -0.5,   3.0 ]) Token_L();
 822     translate(token_pitch * [   0.5,  -3.0 ]) Token_L();
 823     translate(token_pitch * [   0.5,  -2.0 ]) Token_L();
 824     translate(token_pitch * [   0.5,  -1.0 ]) Token_L();
 825     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
 826     translate(token_pitch * [   0.5,   1.0 ]) Token_L();
 827     translate(token_pitch * [   0.5,   2.0 ]) Token_L();
 828     translate(token_pitch * [   0.5,   3.0 ]) Token_L();
 829     translate(token_pitch * [   1.5,  -3.0 ]) Token_L();
 830     translate(token_pitch * [   1.5,  -2.0 ]) Token_L();
 831   };
 832   union(){
 833     Frame($phase, token_pitch * [ 8 + 1.00, 7 + 0.50 ]);
 834     $nspots = 3;
 835   };
 836   union(){
 837     Frame($phase, token_pitch * [ 8 + 1.00, 7 + 0.50 ]);
 838     $nspots = 4;
 839     translate(token_pitch * [   1.5,  -1.0 ]) Token_L();
 840     translate(token_pitch * [   1.5,   0.0 ]) Token_L();
 841     translate(token_pitch * [   1.5,   1.0 ]) Token_L();
 842     translate(token_pitch * [   1.5,   2.0 ]) Token_L();
 843     translate(token_pitch * [   1.5,   3.0 ]) Token_L();
 844     translate(token_pitch * [   2.5,  -3.0 ]) Token_L();
 845     translate(token_pitch * [   2.5,  -2.0 ]) Token_L();
 846     translate(token_pitch * [   2.5,  -1.0 ]) Token_L();
 847     translate(token_pitch * [   2.5,   0.0 ]) Token_L();
 848     translate(token_pitch * [   2.5,   1.0 ]) Token_L();
 849     translate(token_pitch * [   2.5,   2.0 ]) Token_L();
 850     translate(token_pitch * [   2.5,   3.0 ]) Token_L();
 851     translate(token_pitch * [   3.5,  -3.0 ]) Token_L();
 852     translate(token_pitch * [   3.5,  -2.0 ]) Token_L();
 853     translate(token_pitch * [   3.5,  -1.0 ]) Token_L();
 854   };
 855 }
 856 module All_Green(){ ////toplevel
 857 // All  Green       total=58  rowsz=8  nrows=8
 858   union(){
 859     Frame($phase, token_pitch * [ 8 + 1.00, 8 + 0.50 ]);
 860     $nspots = 0;
 861   };
 862   union(){
 863     Frame($phase, token_pitch * [ 8 + 1.00, 8 + 0.50 ]);
 864     $nspots = 1;
 865     translate(token_pitch * [  -3.5,  -3.5 ]) Token_L();
 866     translate(token_pitch * [  -3.5,  -2.5 ]) Token_L();
 867     translate(token_pitch * [  -3.5,  -1.5 ]) Token_L();
 868     translate(token_pitch * [  -3.5,  -0.5 ]) Token_L();
 869     translate(token_pitch * [  -3.5,   0.5 ]) Token_L();
 870     translate(token_pitch * [  -3.5,   1.5 ]) Token_L();
 871     translate(token_pitch * [  -3.5,   2.5 ]) Token_L();
 872     translate(token_pitch * [  -3.5,   3.5 ]) Token_L();
 873     translate(token_pitch * [  -2.5,  -3.5 ]) Token_L();
 874     translate(token_pitch * [  -2.5,  -2.5 ]) Token_L();
 875     translate(token_pitch * [  -2.5,  -1.5 ]) Token_L();
 876     translate(token_pitch * [  -2.5,  -0.5 ]) Token_L();
 877     translate(token_pitch * [  -2.5,   0.5 ]) Token_L();
 878     translate(token_pitch * [  -2.5,   1.5 ]) Token_L();
 879     translate(token_pitch * [  -2.5,   2.5 ]) Token_L();
 880     translate(token_pitch * [  -2.5,   3.5 ]) Token_L();
 881     translate(token_pitch * [  -1.5,  -3.5 ]) Token_L();
 882     translate(token_pitch * [  -1.5,  -2.5 ]) Token_L();
 883     translate(token_pitch * [  -1.5,  -1.5 ]) Token_L();
 884     translate(token_pitch * [  -1.5,  -0.5 ]) Token_L();
 885     translate(token_pitch * [  -1.5,   0.5 ]) Token_L();
 886     translate(token_pitch * [  -1.5,   1.5 ]) Token_L();
 887     translate(token_pitch * [  -1.5,   2.5 ]) Token_L();
 888     translate(token_pitch * [  -1.5,   3.5 ]) Token_L();
 889     translate(token_pitch * [  -0.5,  -3.5 ]) Token_L();
 890   };
 891   union(){
 892     Frame($phase, token_pitch * [ 8 + 1.00, 8 + 0.50 ]);
 893     $nspots = 2;
 894     translate(token_pitch * [  -0.5,  -2.5 ]) Token_L();
 895     translate(token_pitch * [  -0.5,  -1.5 ]) Token_L();
 896     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
 897     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
 898     translate(token_pitch * [  -0.5,   1.5 ]) Token_L();
 899     translate(token_pitch * [  -0.5,   2.5 ]) Token_L();
 900     translate(token_pitch * [  -0.5,   3.5 ]) Token_L();
 901     translate(token_pitch * [   0.5,  -3.5 ]) Token_L();
 902     translate(token_pitch * [   0.5,  -2.5 ]) Token_L();
 903     translate(token_pitch * [   0.5,  -1.5 ]) Token_L();
 904     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
 905     translate(token_pitch * [   0.5,   0.5 ]) Token_L();
 906     translate(token_pitch * [   0.5,   1.5 ]) Token_L();
 907     translate(token_pitch * [   0.5,   2.5 ]) Token_L();
 908     translate(token_pitch * [   0.5,   3.5 ]) Token_L();
 909   };
 910   union(){
 911     Frame($phase, token_pitch * [ 8 + 1.00, 8 + 0.50 ]);
 912     $nspots = 3;
 913   };
 914   union(){
 915     Frame($phase, token_pitch * [ 8 + 1.00, 8 + 0.50 ]);
 916     $nspots = 4;
 917     translate(token_pitch * [   1.5,  -3.5 ]) Token_L();
 918     translate(token_pitch * [   1.5,  -2.5 ]) Token_L();
 919     translate(token_pitch * [   1.5,  -1.5 ]) Token_L();
 920     translate(token_pitch * [   1.5,  -0.5 ]) Token_L();
 921     translate(token_pitch * [   1.5,   0.5 ]) Token_L();
 922     translate(token_pitch * [   1.5,   1.5 ]) Token_L();
 923     translate(token_pitch * [   1.5,   2.5 ]) Token_L();
 924     translate(token_pitch * [   1.5,   3.5 ]) Token_L();
 925     translate(token_pitch * [   2.5,  -3.5 ]) Token_L();
 926     translate(token_pitch * [   2.5,  -2.5 ]) Token_L();
 927     translate(token_pitch * [   2.5,  -1.5 ]) Token_L();
 928     translate(token_pitch * [   2.5,  -0.5 ]) Token_L();
 929     translate(token_pitch * [   2.5,   0.5 ]) Token_L();
 930     translate(token_pitch * [   2.5,   1.5 ]) Token_L();
 931     translate(token_pitch * [   2.5,   2.5 ]) Token_L();
 932     translate(token_pitch * [   2.5,   3.5 ]) Token_L();
 933     translate(token_pitch * [   3.5,  -3.5 ]) Token_L();
 934     translate(token_pitch * [   3.5,  -2.5 ]) Token_L();
 935   };
 936 }
 937 module All_Orange(){ ////toplevel
 938 // All  Orange      total=32  rowsz=6  nrows=6
 939   union(){
 940     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 941     $nspots = 0;
 942   };
 943   union(){
 944     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 945     $nspots = 1;
 946     translate(token_pitch * [  -2.5,  -2.5 ]) Token_L();
 947     translate(token_pitch * [  -2.5,  -1.5 ]) Token_L();
 948     translate(token_pitch * [  -2.5,  -0.5 ]) Token_L();
 949     translate(token_pitch * [  -2.5,   0.5 ]) Token_L();
 950     translate(token_pitch * [  -2.5,   1.5 ]) Token_L();
 951     translate(token_pitch * [  -2.5,   2.5 ]) Token_L();
 952     translate(token_pitch * [  -1.5,  -2.5 ]) Token_L();
 953     translate(token_pitch * [  -1.5,  -1.5 ]) Token_L();
 954     translate(token_pitch * [  -1.5,  -0.5 ]) Token_L();
 955     translate(token_pitch * [  -1.5,   0.5 ]) Token_L();
 956     translate(token_pitch * [  -1.5,   1.5 ]) Token_L();
 957     translate(token_pitch * [  -1.5,   2.5 ]) Token_L();
 958     translate(token_pitch * [  -0.5,  -2.5 ]) Token_L();
 959     translate(token_pitch * [  -0.5,  -1.5 ]) Token_L();
 960     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
 961     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
 962     translate(token_pitch * [  -0.5,   1.5 ]) Token_L();
 963     translate(token_pitch * [  -0.5,   2.5 ]) Token_L();
 964     translate(token_pitch * [   0.5,  -2.5 ]) Token_L();
 965     translate(token_pitch * [   0.5,  -1.5 ]) Token_L();
 966     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
 967     translate(token_pitch * [   0.5,   0.5 ]) Token_L();
 968     translate(token_pitch * [   0.5,   1.5 ]) Token_L();
 969     translate(token_pitch * [   0.5,   2.5 ]) Token_L();
 970     translate(token_pitch * [   1.5,  -2.5 ]) Token_L();
 971     translate(token_pitch * [   1.5,  -1.5 ]) Token_L();
 972     translate(token_pitch * [   1.5,  -0.5 ]) Token_L();
 973     translate(token_pitch * [   1.5,   0.5 ]) Token_L();
 974     translate(token_pitch * [   1.5,   1.5 ]) Token_L();
 975     translate(token_pitch * [   1.5,   2.5 ]) Token_L();
 976     translate(token_pitch * [   2.5,  -2.5 ]) Token_L();
 977     translate(token_pitch * [   2.5,  -1.5 ]) Token_L();
 978   };
 979   union(){
 980     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 981     $nspots = 2;
 982   };
 983   union(){
 984     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 985     $nspots = 3;
 986   };
 987   union(){
 988     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 989     $nspots = 4;
 990   };
 991 }
 992 module All_Purple(){ ////toplevel
 993 // All  Purple      total=23  rowsz=5  nrows=5
 994   union(){
 995     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
 996     $nspots = 0;
 997   };
 998   union(){
 999     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
1000     $nspots = 1;
1001     translate(token_pitch * [  -2.0,  -2.0 ]) Token_L();
1002     translate(token_pitch * [  -2.0,  -1.0 ]) Token_L();
1003     translate(token_pitch * [  -2.0,   0.0 ]) Token_L();
1004     translate(token_pitch * [  -2.0,   1.0 ]) Token_L();
1005     translate(token_pitch * [  -2.0,   2.0 ]) Token_L();
1006     translate(token_pitch * [  -1.0,  -2.0 ]) Token_L();
1007     translate(token_pitch * [  -1.0,  -1.0 ]) Token_L();
1008     translate(token_pitch * [  -1.0,   0.0 ]) Token_L();
1009     translate(token_pitch * [  -1.0,   1.0 ]) Token_L();
1010     translate(token_pitch * [  -1.0,   2.0 ]) Token_L();
1011     translate(token_pitch * [   0.0,  -2.0 ]) Token_L();
1012     translate(token_pitch * [   0.0,  -1.0 ]) Token_L();
1013     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
1014     translate(token_pitch * [   0.0,   1.0 ]) Token_L();
1015     translate(token_pitch * [   0.0,   2.0 ]) Token_L();
1016     translate(token_pitch * [   1.0,  -2.0 ]) Token_L();
1017     translate(token_pitch * [   1.0,  -1.0 ]) Token_L();
1018     translate(token_pitch * [   1.0,   0.0 ]) Token_L();
1019     translate(token_pitch * [   1.0,   1.0 ]) Token_L();
1020     translate(token_pitch * [   1.0,   2.0 ]) Token_L();
1021     translate(token_pitch * [   2.0,  -2.0 ]) Token_L();
1022     translate(token_pitch * [   2.0,  -1.0 ]) Token_L();
1023     translate(token_pitch * [   2.0,   0.0 ]) Token_L();
1024   };
1025   union(){
1026     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
1027     $nspots = 2;
1028   };
1029   union(){
1030     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
1031     $nspots = 3;
1032   };
1033   union(){
1034     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
1035     $nspots = 4;
1036   };
1037 }
1038 module All_Red(){ ////toplevel
1039 // All  Red         total=46  rowsz=7  nrows=7
1040   union(){
1041     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1042     $nspots = 0;
1043   };
1044   union(){
1045     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1046     $nspots = 1;
1047     translate(token_pitch * [  -3.0,  -3.0 ]) Token_L();
1048     translate(token_pitch * [  -3.0,  -2.0 ]) Token_L();
1049     translate(token_pitch * [  -3.0,  -1.0 ]) Token_L();
1050     translate(token_pitch * [  -3.0,   0.0 ]) Token_L();
1051     translate(token_pitch * [  -3.0,   1.0 ]) Token_L();
1052     translate(token_pitch * [  -3.0,   2.0 ]) Token_L();
1053     translate(token_pitch * [  -3.0,   3.0 ]) Token_L();
1054     translate(token_pitch * [  -2.0,  -3.0 ]) Token_L();
1055     translate(token_pitch * [  -2.0,  -2.0 ]) Token_L();
1056     translate(token_pitch * [  -2.0,  -1.0 ]) Token_L();
1057     translate(token_pitch * [  -2.0,   0.0 ]) Token_L();
1058     translate(token_pitch * [  -2.0,   1.0 ]) Token_L();
1059     translate(token_pitch * [  -2.0,   2.0 ]) Token_L();
1060     translate(token_pitch * [  -2.0,   3.0 ]) Token_L();
1061     translate(token_pitch * [  -1.0,  -3.0 ]) Token_L();
1062     translate(token_pitch * [  -1.0,  -2.0 ]) Token_L();
1063     translate(token_pitch * [  -1.0,  -1.0 ]) Token_L();
1064     translate(token_pitch * [  -1.0,   0.0 ]) Token_L();
1065   };
1066   union(){
1067     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1068     $nspots = 2;
1069     translate(token_pitch * [  -1.0,   1.0 ]) Token_L();
1070     translate(token_pitch * [  -1.0,   2.0 ]) Token_L();
1071     translate(token_pitch * [  -1.0,   3.0 ]) Token_L();
1072     translate(token_pitch * [   0.0,  -3.0 ]) Token_L();
1073     translate(token_pitch * [   0.0,  -2.0 ]) Token_L();
1074     translate(token_pitch * [   0.0,  -1.0 ]) Token_L();
1075     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
1076     translate(token_pitch * [   0.0,   1.0 ]) Token_L();
1077     translate(token_pitch * [   0.0,   2.0 ]) Token_L();
1078     translate(token_pitch * [   0.0,   3.0 ]) Token_L();
1079     translate(token_pitch * [   1.0,  -3.0 ]) Token_L();
1080     translate(token_pitch * [   1.0,  -2.0 ]) Token_L();
1081     translate(token_pitch * [   1.0,  -1.0 ]) Token_L();
1082   };
1083   union(){
1084     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1085     $nspots = 3;
1086   };
1087   union(){
1088     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1089     $nspots = 4;
1090     translate(token_pitch * [   1.0,   0.0 ]) Token_L();
1091     translate(token_pitch * [   1.0,   1.0 ]) Token_L();
1092     translate(token_pitch * [   1.0,   2.0 ]) Token_L();
1093     translate(token_pitch * [   1.0,   3.0 ]) Token_L();
1094     translate(token_pitch * [   2.0,  -3.0 ]) Token_L();
1095     translate(token_pitch * [   2.0,  -2.0 ]) Token_L();
1096     translate(token_pitch * [   2.0,  -1.0 ]) Token_L();
1097     translate(token_pitch * [   2.0,   0.0 ]) Token_L();
1098     translate(token_pitch * [   2.0,   1.0 ]) Token_L();
1099     translate(token_pitch * [   2.0,   2.0 ]) Token_L();
1100     translate(token_pitch * [   2.0,   3.0 ]) Token_L();
1101     translate(token_pitch * [   3.0,  -3.0 ]) Token_L();
1102     translate(token_pitch * [   3.0,  -2.0 ]) Token_L();
1103     translate(token_pitch * [   3.0,  -1.0 ]) Token_L();
1104     translate(token_pitch * [   3.0,   0.0 ]) Token_L();
1105   };
1106 }
1107 module All_White(){ ////toplevel
1108 // All  White       total=43  rowsz=7  nrows=7
1109   union(){
1110     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1111     $nspots = 0;
1112   };
1113   union(){
1114     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1115     $nspots = 1;
1116     translate(token_pitch * [  -3.0,  -3.0 ]) Token_L();
1117     translate(token_pitch * [  -3.0,  -2.0 ]) Token_L();
1118     translate(token_pitch * [  -3.0,  -1.0 ]) Token_L();
1119     translate(token_pitch * [  -3.0,   0.0 ]) Token_L();
1120     translate(token_pitch * [  -3.0,   1.0 ]) Token_L();
1121     translate(token_pitch * [  -3.0,   2.0 ]) Token_L();
1122     translate(token_pitch * [  -3.0,   3.0 ]) Token_L();
1123     translate(token_pitch * [  -2.0,  -3.0 ]) Token_L();
1124     translate(token_pitch * [  -2.0,  -2.0 ]) Token_L();
1125     translate(token_pitch * [  -2.0,  -1.0 ]) Token_L();
1126     translate(token_pitch * [  -2.0,   0.0 ]) Token_L();
1127     translate(token_pitch * [  -2.0,   1.0 ]) Token_L();
1128     translate(token_pitch * [  -2.0,   2.0 ]) Token_L();
1129     translate(token_pitch * [  -2.0,   3.0 ]) Token_L();
1130     translate(token_pitch * [  -1.0,  -3.0 ]) Token_L();
1131     translate(token_pitch * [  -1.0,  -2.0 ]) Token_L();
1132     translate(token_pitch * [  -1.0,  -1.0 ]) Token_L();
1133     translate(token_pitch * [  -1.0,   0.0 ]) Token_L();
1134     translate(token_pitch * [  -1.0,   1.0 ]) Token_L();
1135     translate(token_pitch * [  -1.0,   2.0 ]) Token_L();
1136     translate(token_pitch * [  -1.0,   3.0 ]) Token_L();
1137     translate(token_pitch * [   0.0,  -3.0 ]) Token_L();
1138     translate(token_pitch * [   0.0,  -2.0 ]) Token_L();
1139     translate(token_pitch * [   0.0,  -1.0 ]) Token_L();
1140     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
1141     translate(token_pitch * [   0.0,   1.0 ]) Token_L();
1142   };
1143   union(){
1144     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1145     $nspots = 2;
1146     translate(token_pitch * [   0.0,   2.0 ]) Token_L();
1147     translate(token_pitch * [   0.0,   3.0 ]) Token_L();
1148     translate(token_pitch * [   1.0,  -3.0 ]) Token_L();
1149     translate(token_pitch * [   1.0,  -2.0 ]) Token_L();
1150     translate(token_pitch * [   1.0,  -1.0 ]) Token_L();
1151     translate(token_pitch * [   1.0,   0.0 ]) Token_L();
1152     translate(token_pitch * [   1.0,   1.0 ]) Token_L();
1153     translate(token_pitch * [   1.0,   2.0 ]) Token_L();
1154     translate(token_pitch * [   1.0,   3.0 ]) Token_L();
1155     translate(token_pitch * [   2.0,  -3.0 ]) Token_L();
1156     translate(token_pitch * [   2.0,  -2.0 ]) Token_L();
1157   };
1158   union(){
1159     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1160     $nspots = 3;
1161     translate(token_pitch * [   2.0,  -1.0 ]) Token_L();
1162     translate(token_pitch * [   2.0,   0.0 ]) Token_L();
1163     translate(token_pitch * [   2.0,   1.0 ]) Token_L();
1164     translate(token_pitch * [   2.0,   2.0 ]) Token_L();
1165     translate(token_pitch * [   2.0,   3.0 ]) Token_L();
1166     translate(token_pitch * [   3.0,  -3.0 ]) Token_L();
1167   };
1168   union(){
1169     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1170     $nspots = 4;
1171   };
1172 }
1173 module All_WhiteSpare(){ ////toplevel
1174 // All  WhiteSpare  total= 3  rowsz=2  nrows=2
1175   union(){
1176     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
1177     $nspots = 0;
1178   };
1179   union(){
1180     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
1181     $nspots = 1;
1182     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
1183   };
1184   union(){
1185     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
1186     $nspots = 2;
1187     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
1188   };
1189   union(){
1190     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
1191     $nspots = 3;
1192     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
1193   };
1194   union(){
1195     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
1196     $nspots = 4;
1197   };
1198 }
1199 module All_Yellow(){ ////toplevel
1200 // All  Yellow      total=45  rowsz=7  nrows=7
1201   union(){
1202     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1203     $nspots = 0;
1204   };
1205   union(){
1206     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1207     $nspots = 1;
1208     translate(token_pitch * [  -3.0,  -3.0 ]) Token_L();
1209     translate(token_pitch * [  -3.0,  -2.0 ]) Token_L();
1210     translate(token_pitch * [  -3.0,  -1.0 ]) Token_L();
1211     translate(token_pitch * [  -3.0,   0.0 ]) Token_L();
1212     translate(token_pitch * [  -3.0,   1.0 ]) Token_L();
1213     translate(token_pitch * [  -3.0,   2.0 ]) Token_L();
1214     translate(token_pitch * [  -3.0,   3.0 ]) Token_L();
1215     translate(token_pitch * [  -2.0,  -3.0 ]) Token_L();
1216     translate(token_pitch * [  -2.0,  -2.0 ]) Token_L();
1217     translate(token_pitch * [  -2.0,  -1.0 ]) Token_L();
1218     translate(token_pitch * [  -2.0,   0.0 ]) Token_L();
1219     translate(token_pitch * [  -2.0,   1.0 ]) Token_L();
1220     translate(token_pitch * [  -2.0,   2.0 ]) Token_L();
1221     translate(token_pitch * [  -2.0,   3.0 ]) Token_L();
1222     translate(token_pitch * [  -1.0,  -3.0 ]) Token_L();
1223     translate(token_pitch * [  -1.0,  -2.0 ]) Token_L();
1224     translate(token_pitch * [  -1.0,  -1.0 ]) Token_L();
1225     translate(token_pitch * [  -1.0,   0.0 ]) Token_L();
1226     translate(token_pitch * [  -1.0,   1.0 ]) Token_L();
1227   };
1228   union(){
1229     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1230     $nspots = 2;
1231     translate(token_pitch * [  -1.0,   2.0 ]) Token_L();
1232     translate(token_pitch * [  -1.0,   3.0 ]) Token_L();
1233     translate(token_pitch * [   0.0,  -3.0 ]) Token_L();
1234     translate(token_pitch * [   0.0,  -2.0 ]) Token_L();
1235     translate(token_pitch * [   0.0,  -1.0 ]) Token_L();
1236     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
1237     translate(token_pitch * [   0.0,   1.0 ]) Token_L();
1238     translate(token_pitch * [   0.0,   2.0 ]) Token_L();
1239     translate(token_pitch * [   0.0,   3.0 ]) Token_L();
1240     translate(token_pitch * [   1.0,  -3.0 ]) Token_L();
1241     translate(token_pitch * [   1.0,  -2.0 ]) Token_L();
1242   };
1243   union(){
1244     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1245     $nspots = 3;
1246   };
1247   union(){
1248     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1249     $nspots = 4;
1250     translate(token_pitch * [   1.0,  -1.0 ]) Token_L();
1251     translate(token_pitch * [   1.0,   0.0 ]) Token_L();
1252     translate(token_pitch * [   1.0,   1.0 ]) Token_L();
1253     translate(token_pitch * [   1.0,   2.0 ]) Token_L();
1254     translate(token_pitch * [   1.0,   3.0 ]) Token_L();
1255     translate(token_pitch * [   2.0,  -3.0 ]) Token_L();
1256     translate(token_pitch * [   2.0,  -2.0 ]) Token_L();
1257     translate(token_pitch * [   2.0,  -1.0 ]) Token_L();
1258     translate(token_pitch * [   2.0,   0.0 ]) Token_L();
1259     translate(token_pitch * [   2.0,   1.0 ]) Token_L();
1260     translate(token_pitch * [   2.0,   2.0 ]) Token_L();
1261     translate(token_pitch * [   2.0,   3.0 ]) Token_L();
1262     translate(token_pitch * [   3.0,  -3.0 ]) Token_L();
1263     translate(token_pitch * [   3.0,  -2.0 ]) Token_L();
1264     translate(token_pitch * [   3.0,  -1.0 ]) Token_L();
1265   };
1266 }
1267 // All  total_count=328   total_real_count=325
1268 // All  max_rowsz=8       max_nrows=8
1269 module Witches_Black(){ ////toplevel
1270 // Witches  Black       total= 8  rowsz=3  nrows=3
1271   union(){
1272     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1273     $nspots = 0;
1274   };
1275   union(){
1276     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1277     $nspots = 1;
1278     translate(token_pitch * [  -1.0,  -1.0 ]) Token_L();
1279     translate(token_pitch * [  -1.0,   0.0 ]) Token_L();
1280     translate(token_pitch * [  -1.0,   1.0 ]) Token_L();
1281     translate(token_pitch * [   0.0,  -1.0 ]) Token_L();
1282     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
1283     translate(token_pitch * [   0.0,   1.0 ]) Token_L();
1284     translate(token_pitch * [   1.0,  -1.0 ]) Token_L();
1285     translate(token_pitch * [   1.0,   0.0 ]) Token_L();
1286   };
1287   union(){
1288     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1289     $nspots = 2;
1290   };
1291   union(){
1292     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1293     $nspots = 3;
1294   };
1295   union(){
1296     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1297     $nspots = 4;
1298   };
1299 }
1300 module Witches_Blue(){ ////toplevel
1301 // Witches  Blue        total=18  rowsz=5  nrows=4
1302   union(){
1303     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1304     $nspots = 0;
1305   };
1306   union(){
1307     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1308     $nspots = 1;
1309     translate(token_pitch * [  -2.0,  -1.5 ]) Token_L();
1310     translate(token_pitch * [  -2.0,  -0.5 ]) Token_L();
1311     translate(token_pitch * [  -2.0,   0.5 ]) Token_L();
1312     translate(token_pitch * [  -2.0,   1.5 ]) Token_L();
1313     translate(token_pitch * [  -1.0,  -1.5 ]) Token_L();
1314     translate(token_pitch * [  -1.0,  -0.5 ]) Token_L();
1315     translate(token_pitch * [  -1.0,   0.5 ]) Token_L();
1316     translate(token_pitch * [  -1.0,   1.5 ]) Token_L();
1317   };
1318   union(){
1319     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1320     $nspots = 2;
1321     translate(token_pitch * [   0.0,  -1.5 ]) Token_L();
1322     translate(token_pitch * [   0.0,  -0.5 ]) Token_L();
1323     translate(token_pitch * [   0.0,   0.5 ]) Token_L();
1324     translate(token_pitch * [   0.0,   1.5 ]) Token_L();
1325     translate(token_pitch * [   1.0,  -1.5 ]) Token_L();
1326   };
1327   union(){
1328     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1329     $nspots = 3;
1330   };
1331   union(){
1332     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1333     $nspots = 4;
1334     translate(token_pitch * [   1.0,  -0.5 ]) Token_L();
1335     translate(token_pitch * [   1.0,   0.5 ]) Token_L();
1336     translate(token_pitch * [   1.0,   1.5 ]) Token_L();
1337     translate(token_pitch * [   2.0,  -1.5 ]) Token_L();
1338     translate(token_pitch * [   2.0,  -0.5 ]) Token_L();
1339   };
1340 }
1341 module Witches_Green(){ ////toplevel
1342 // Witches  Green       total=20  rowsz=5  nrows=4
1343   union(){
1344     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1345     $nspots = 0;
1346   };
1347   union(){
1348     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1349     $nspots = 1;
1350     translate(token_pitch * [  -2.0,  -1.5 ]) Token_L();
1351     translate(token_pitch * [  -2.0,  -0.5 ]) Token_L();
1352     translate(token_pitch * [  -2.0,   0.5 ]) Token_L();
1353     translate(token_pitch * [  -2.0,   1.5 ]) Token_L();
1354     translate(token_pitch * [  -1.0,  -1.5 ]) Token_L();
1355     translate(token_pitch * [  -1.0,  -0.5 ]) Token_L();
1356     translate(token_pitch * [  -1.0,   0.5 ]) Token_L();
1357     translate(token_pitch * [  -1.0,   1.5 ]) Token_L();
1358     translate(token_pitch * [   0.0,  -1.5 ]) Token_L();
1359     translate(token_pitch * [   0.0,  -0.5 ]) Token_L();
1360   };
1361   union(){
1362     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1363     $nspots = 2;
1364     translate(token_pitch * [   0.0,   0.5 ]) Token_L();
1365     translate(token_pitch * [   0.0,   1.5 ]) Token_L();
1366     translate(token_pitch * [   1.0,  -1.5 ]) Token_L();
1367     translate(token_pitch * [   1.0,  -0.5 ]) Token_L();
1368     translate(token_pitch * [   1.0,   0.5 ]) Token_L();
1369   };
1370   union(){
1371     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1372     $nspots = 3;
1373   };
1374   union(){
1375     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1376     $nspots = 4;
1377     translate(token_pitch * [   1.0,   1.5 ]) Token_L();
1378     translate(token_pitch * [   2.0,  -1.5 ]) Token_L();
1379     translate(token_pitch * [   2.0,  -0.5 ]) Token_L();
1380     translate(token_pitch * [   2.0,   0.5 ]) Token_L();
1381     translate(token_pitch * [   2.0,   1.5 ]) Token_L();
1382   };
1383 }
1384 module Witches_Orange(){ ////toplevel
1385 // Witches  Orange      total=12  rowsz=4  nrows=3
1386   union(){
1387     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1388     $nspots = 0;
1389   };
1390   union(){
1391     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1392     $nspots = 1;
1393     translate(token_pitch * [  -1.5,  -1.0 ]) Token_L();
1394     translate(token_pitch * [  -1.5,   0.0 ]) Token_L();
1395     translate(token_pitch * [  -1.5,   1.0 ]) Token_L();
1396     translate(token_pitch * [  -0.5,  -1.0 ]) Token_L();
1397     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
1398     translate(token_pitch * [  -0.5,   1.0 ]) Token_L();
1399     translate(token_pitch * [   0.5,  -1.0 ]) Token_L();
1400     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
1401     translate(token_pitch * [   0.5,   1.0 ]) Token_L();
1402     translate(token_pitch * [   1.5,  -1.0 ]) Token_L();
1403     translate(token_pitch * [   1.5,   0.0 ]) Token_L();
1404     translate(token_pitch * [   1.5,   1.0 ]) Token_L();
1405   };
1406   union(){
1407     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1408     $nspots = 2;
1409   };
1410   union(){
1411     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1412     $nspots = 3;
1413   };
1414   union(){
1415     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1416     $nspots = 4;
1417   };
1418 }
1419 module Witches_Purple(){ ////toplevel
1420 // Witches  Purple      total= 8  rowsz=3  nrows=3
1421   union(){
1422     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1423     $nspots = 0;
1424   };
1425   union(){
1426     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1427     $nspots = 1;
1428     translate(token_pitch * [  -1.0,  -1.0 ]) Token_L();
1429     translate(token_pitch * [  -1.0,   0.0 ]) Token_L();
1430     translate(token_pitch * [  -1.0,   1.0 ]) Token_L();
1431     translate(token_pitch * [   0.0,  -1.0 ]) Token_L();
1432     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
1433     translate(token_pitch * [   0.0,   1.0 ]) Token_L();
1434     translate(token_pitch * [   1.0,  -1.0 ]) Token_L();
1435     translate(token_pitch * [   1.0,   0.0 ]) Token_L();
1436   };
1437   union(){
1438     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1439     $nspots = 2;
1440   };
1441   union(){
1442     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1443     $nspots = 3;
1444   };
1445   union(){
1446     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1447     $nspots = 4;
1448   };
1449 }
1450 module Witches_Red(){ ////toplevel
1451 // Witches  Red         total=16  rowsz=4  nrows=4
1452   union(){
1453     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1454     $nspots = 0;
1455   };
1456   union(){
1457     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1458     $nspots = 1;
1459     translate(token_pitch * [  -1.5,  -1.5 ]) Token_L();
1460     translate(token_pitch * [  -1.5,  -0.5 ]) Token_L();
1461     translate(token_pitch * [  -1.5,   0.5 ]) Token_L();
1462     translate(token_pitch * [  -1.5,   1.5 ]) Token_L();
1463     translate(token_pitch * [  -0.5,  -1.5 ]) Token_L();
1464     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
1465   };
1466   union(){
1467     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1468     $nspots = 2;
1469     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
1470     translate(token_pitch * [  -0.5,   1.5 ]) Token_L();
1471     translate(token_pitch * [   0.5,  -1.5 ]) Token_L();
1472     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
1473     translate(token_pitch * [   0.5,   0.5 ]) Token_L();
1474   };
1475   union(){
1476     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1477     $nspots = 3;
1478   };
1479   union(){
1480     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1481     $nspots = 4;
1482     translate(token_pitch * [   0.5,   1.5 ]) Token_L();
1483     translate(token_pitch * [   1.5,  -1.5 ]) Token_L();
1484     translate(token_pitch * [   1.5,  -0.5 ]) Token_L();
1485     translate(token_pitch * [   1.5,   0.5 ]) Token_L();
1486     translate(token_pitch * [   1.5,   1.5 ]) Token_L();
1487   };
1488 }
1489 module Witches_White(){ ////toplevel
1490 // Witches  White       total=11  rowsz=4  nrows=3
1491   union(){
1492     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1493     $nspots = 0;
1494   };
1495   union(){
1496     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1497     $nspots = 1;
1498     translate(token_pitch * [  -1.5,  -1.0 ]) Token_L();
1499     translate(token_pitch * [  -1.5,   0.0 ]) Token_L();
1500     translate(token_pitch * [  -1.5,   1.0 ]) Token_L();
1501     translate(token_pitch * [  -0.5,  -1.0 ]) Token_L();
1502     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
1503     translate(token_pitch * [  -0.5,   1.0 ]) Token_L();
1504   };
1505   union(){
1506     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1507     $nspots = 2;
1508     translate(token_pitch * [   0.5,  -1.0 ]) Token_L();
1509     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
1510     translate(token_pitch * [   0.5,   1.0 ]) Token_L();
1511   };
1512   union(){
1513     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1514     $nspots = 3;
1515     translate(token_pitch * [   1.5,  -1.0 ]) Token_L();
1516     translate(token_pitch * [   1.5,   0.0 ]) Token_L();
1517   };
1518   union(){
1519     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1520     $nspots = 4;
1521   };
1522 }
1523 module Witches_Yellow(){ ////toplevel
1524 // Witches  Yellow      total=16  rowsz=4  nrows=4
1525   union(){
1526     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1527     $nspots = 0;
1528   };
1529   union(){
1530     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1531     $nspots = 1;
1532     translate(token_pitch * [  -1.5,  -1.5 ]) Token_L();
1533     translate(token_pitch * [  -1.5,  -0.5 ]) Token_L();
1534     translate(token_pitch * [  -1.5,   0.5 ]) Token_L();
1535     translate(token_pitch * [  -1.5,   1.5 ]) Token_L();
1536     translate(token_pitch * [  -0.5,  -1.5 ]) Token_L();
1537     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
1538   };
1539   union(){
1540     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1541     $nspots = 2;
1542     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
1543     translate(token_pitch * [  -0.5,   1.5 ]) Token_L();
1544     translate(token_pitch * [   0.5,  -1.5 ]) Token_L();
1545     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
1546     translate(token_pitch * [   0.5,   0.5 ]) Token_L();
1547   };
1548   union(){
1549     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1550     $nspots = 3;
1551   };
1552   union(){
1553     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1554     $nspots = 4;
1555     translate(token_pitch * [   0.5,   1.5 ]) Token_L();
1556     translate(token_pitch * [   1.5,  -1.5 ]) Token_L();
1557     translate(token_pitch * [   1.5,  -0.5 ]) Token_L();
1558     translate(token_pitch * [   1.5,   0.5 ]) Token_L();
1559     translate(token_pitch * [   1.5,   1.5 ]) Token_L();
1560   };
1561 }
1562 // Witches  total_count=109   total_real_count=109
1563 // Witches  max_rowsz=5       max_nrows=4