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=35  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     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
 627   };
 628   union(){
 629     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 630     $nspots = 2;
 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     translate(token_pitch * [   1.5,   1.5 ]) Token_L();
 639     translate(token_pitch * [   1.5,   2.5 ]) Token_L();
 640   };
 641   union(){
 642     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 643     $nspots = 3;
 644     translate(token_pitch * [   2.5,  -2.5 ]) Token_L();
 645     translate(token_pitch * [   2.5,  -1.5 ]) Token_L();
 646     translate(token_pitch * [   2.5,  -0.5 ]) Token_L();
 647     translate(token_pitch * [   2.5,   0.5 ]) Token_L();
 648     translate(token_pitch * [   2.5,   1.5 ]) Token_L();
 649   };
 650   union(){
 651     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 652     $nspots = 4;
 653   };
 654 }
 655 module Base_WhiteSpare(){ ////toplevel
 656 // Base  WhiteSpare  total= 3  rowsz=2  nrows=2
 657   union(){
 658     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 659     $nspots = 0;
 660   };
 661   union(){
 662     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 663     $nspots = 1;
 664     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
 665   };
 666   union(){
 667     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 668     $nspots = 2;
 669     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
 670   };
 671   union(){
 672     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 673     $nspots = 3;
 674     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
 675   };
 676   union(){
 677     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
 678     $nspots = 4;
 679   };
 680 }
 681 module Base_Yellow(){ ////toplevel
 682 // Base  Yellow      total=29  rowsz=6  nrows=5
 683   union(){
 684     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 685     $nspots = 0;
 686   };
 687   union(){
 688     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 689     $nspots = 1;
 690     translate(token_pitch * [  -2.5,  -2.0 ]) Token_L();
 691     translate(token_pitch * [  -2.5,  -1.0 ]) Token_L();
 692     translate(token_pitch * [  -2.5,   0.0 ]) Token_L();
 693     translate(token_pitch * [  -2.5,   1.0 ]) Token_L();
 694     translate(token_pitch * [  -2.5,   2.0 ]) Token_L();
 695     translate(token_pitch * [  -1.5,  -2.0 ]) Token_L();
 696     translate(token_pitch * [  -1.5,  -1.0 ]) Token_L();
 697     translate(token_pitch * [  -1.5,   0.0 ]) Token_L();
 698     translate(token_pitch * [  -1.5,   1.0 ]) Token_L();
 699     translate(token_pitch * [  -1.5,   2.0 ]) Token_L();
 700     translate(token_pitch * [  -0.5,  -2.0 ]) Token_L();
 701     translate(token_pitch * [  -0.5,  -1.0 ]) Token_L();
 702     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
 703   };
 704   union(){
 705     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 706     $nspots = 2;
 707     translate(token_pitch * [  -0.5,   1.0 ]) Token_L();
 708     translate(token_pitch * [  -0.5,   2.0 ]) Token_L();
 709     translate(token_pitch * [   0.5,  -2.0 ]) Token_L();
 710     translate(token_pitch * [   0.5,  -1.0 ]) Token_L();
 711     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
 712     translate(token_pitch * [   0.5,   1.0 ]) Token_L();
 713   };
 714   union(){
 715     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 716     $nspots = 3;
 717   };
 718   union(){
 719     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 720     $nspots = 4;
 721     translate(token_pitch * [   0.5,   2.0 ]) Token_L();
 722     translate(token_pitch * [   1.5,  -2.0 ]) Token_L();
 723     translate(token_pitch * [   1.5,  -1.0 ]) Token_L();
 724     translate(token_pitch * [   1.5,   0.0 ]) Token_L();
 725     translate(token_pitch * [   1.5,   1.0 ]) Token_L();
 726     translate(token_pitch * [   1.5,   2.0 ]) Token_L();
 727     translate(token_pitch * [   2.5,  -2.0 ]) Token_L();
 728     translate(token_pitch * [   2.5,  -1.0 ]) Token_L();
 729     translate(token_pitch * [   2.5,   0.0 ]) Token_L();
 730     translate(token_pitch * [   2.5,   1.0 ]) Token_L();
 731   };
 732 }
 733 // Base  total_count=246   total_real_count=219
 734 // Base  max_rowsz=7       max_nrows=6
 735 module All_Black(){ ////toplevel
 736 // All  Black       total=26  rowsz=6  nrows=5
 737   union(){
 738     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 739     $nspots = 0;
 740   };
 741   union(){
 742     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 743     $nspots = 1;
 744     translate(token_pitch * [  -2.5,  -2.0 ]) Token_L();
 745     translate(token_pitch * [  -2.5,  -1.0 ]) Token_L();
 746     translate(token_pitch * [  -2.5,   0.0 ]) Token_L();
 747     translate(token_pitch * [  -2.5,   1.0 ]) Token_L();
 748     translate(token_pitch * [  -2.5,   2.0 ]) Token_L();
 749     translate(token_pitch * [  -1.5,  -2.0 ]) Token_L();
 750     translate(token_pitch * [  -1.5,  -1.0 ]) Token_L();
 751     translate(token_pitch * [  -1.5,   0.0 ]) Token_L();
 752     translate(token_pitch * [  -1.5,   1.0 ]) Token_L();
 753     translate(token_pitch * [  -1.5,   2.0 ]) Token_L();
 754     translate(token_pitch * [  -0.5,  -2.0 ]) Token_L();
 755     translate(token_pitch * [  -0.5,  -1.0 ]) Token_L();
 756     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
 757     translate(token_pitch * [  -0.5,   1.0 ]) Token_L();
 758     translate(token_pitch * [  -0.5,   2.0 ]) Token_L();
 759     translate(token_pitch * [   0.5,  -2.0 ]) Token_L();
 760     translate(token_pitch * [   0.5,  -1.0 ]) Token_L();
 761     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
 762     translate(token_pitch * [   0.5,   1.0 ]) Token_L();
 763     translate(token_pitch * [   0.5,   2.0 ]) Token_L();
 764     translate(token_pitch * [   1.5,  -2.0 ]) Token_L();
 765     translate(token_pitch * [   1.5,  -1.0 ]) Token_L();
 766     translate(token_pitch * [   1.5,   0.0 ]) Token_L();
 767     translate(token_pitch * [   1.5,   1.0 ]) Token_L();
 768     translate(token_pitch * [   1.5,   2.0 ]) Token_L();
 769     translate(token_pitch * [   2.5,  -2.0 ]) Token_L();
 770   };
 771   union(){
 772     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 773     $nspots = 2;
 774   };
 775   union(){
 776     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 777     $nspots = 3;
 778   };
 779   union(){
 780     Frame($phase, token_pitch * [ 6 + 1.00, 5 + 0.50 ]);
 781     $nspots = 4;
 782   };
 783 }
 784 module All_Blue(){ ////toplevel
 785 // All  Blue        total=52  rowsz=8  nrows=7
 786   union(){
 787     Frame($phase, token_pitch * [ 8 + 1.00, 7 + 0.50 ]);
 788     $nspots = 0;
 789   };
 790   union(){
 791     Frame($phase, token_pitch * [ 8 + 1.00, 7 + 0.50 ]);
 792     $nspots = 1;
 793     translate(token_pitch * [  -3.5,  -3.0 ]) Token_L();
 794     translate(token_pitch * [  -3.5,  -2.0 ]) Token_L();
 795     translate(token_pitch * [  -3.5,  -1.0 ]) Token_L();
 796     translate(token_pitch * [  -3.5,   0.0 ]) Token_L();
 797     translate(token_pitch * [  -3.5,   1.0 ]) Token_L();
 798     translate(token_pitch * [  -3.5,   2.0 ]) Token_L();
 799     translate(token_pitch * [  -3.5,   3.0 ]) Token_L();
 800     translate(token_pitch * [  -2.5,  -3.0 ]) Token_L();
 801     translate(token_pitch * [  -2.5,  -2.0 ]) Token_L();
 802     translate(token_pitch * [  -2.5,  -1.0 ]) Token_L();
 803     translate(token_pitch * [  -2.5,   0.0 ]) Token_L();
 804     translate(token_pitch * [  -2.5,   1.0 ]) Token_L();
 805     translate(token_pitch * [  -2.5,   2.0 ]) Token_L();
 806     translate(token_pitch * [  -2.5,   3.0 ]) Token_L();
 807     translate(token_pitch * [  -1.5,  -3.0 ]) Token_L();
 808     translate(token_pitch * [  -1.5,  -2.0 ]) Token_L();
 809     translate(token_pitch * [  -1.5,  -1.0 ]) Token_L();
 810     translate(token_pitch * [  -1.5,   0.0 ]) Token_L();
 811     translate(token_pitch * [  -1.5,   1.0 ]) Token_L();
 812     translate(token_pitch * [  -1.5,   2.0 ]) Token_L();
 813     translate(token_pitch * [  -1.5,   3.0 ]) Token_L();
 814     translate(token_pitch * [  -0.5,  -3.0 ]) Token_L();
 815   };
 816   union(){
 817     Frame($phase, token_pitch * [ 8 + 1.00, 7 + 0.50 ]);
 818     $nspots = 2;
 819     translate(token_pitch * [  -0.5,  -2.0 ]) Token_L();
 820     translate(token_pitch * [  -0.5,  -1.0 ]) Token_L();
 821     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
 822     translate(token_pitch * [  -0.5,   1.0 ]) Token_L();
 823     translate(token_pitch * [  -0.5,   2.0 ]) Token_L();
 824     translate(token_pitch * [  -0.5,   3.0 ]) Token_L();
 825     translate(token_pitch * [   0.5,  -3.0 ]) Token_L();
 826     translate(token_pitch * [   0.5,  -2.0 ]) Token_L();
 827     translate(token_pitch * [   0.5,  -1.0 ]) Token_L();
 828     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
 829     translate(token_pitch * [   0.5,   1.0 ]) Token_L();
 830     translate(token_pitch * [   0.5,   2.0 ]) Token_L();
 831     translate(token_pitch * [   0.5,   3.0 ]) Token_L();
 832     translate(token_pitch * [   1.5,  -3.0 ]) Token_L();
 833     translate(token_pitch * [   1.5,  -2.0 ]) Token_L();
 834   };
 835   union(){
 836     Frame($phase, token_pitch * [ 8 + 1.00, 7 + 0.50 ]);
 837     $nspots = 3;
 838   };
 839   union(){
 840     Frame($phase, token_pitch * [ 8 + 1.00, 7 + 0.50 ]);
 841     $nspots = 4;
 842     translate(token_pitch * [   1.5,  -1.0 ]) Token_L();
 843     translate(token_pitch * [   1.5,   0.0 ]) Token_L();
 844     translate(token_pitch * [   1.5,   1.0 ]) Token_L();
 845     translate(token_pitch * [   1.5,   2.0 ]) Token_L();
 846     translate(token_pitch * [   1.5,   3.0 ]) Token_L();
 847     translate(token_pitch * [   2.5,  -3.0 ]) Token_L();
 848     translate(token_pitch * [   2.5,  -2.0 ]) Token_L();
 849     translate(token_pitch * [   2.5,  -1.0 ]) Token_L();
 850     translate(token_pitch * [   2.5,   0.0 ]) Token_L();
 851     translate(token_pitch * [   2.5,   1.0 ]) Token_L();
 852     translate(token_pitch * [   2.5,   2.0 ]) Token_L();
 853     translate(token_pitch * [   2.5,   3.0 ]) Token_L();
 854     translate(token_pitch * [   3.5,  -3.0 ]) Token_L();
 855     translate(token_pitch * [   3.5,  -2.0 ]) Token_L();
 856     translate(token_pitch * [   3.5,  -1.0 ]) Token_L();
 857   };
 858 }
 859 module All_Green(){ ////toplevel
 860 // All  Green       total=58  rowsz=8  nrows=8
 861   union(){
 862     Frame($phase, token_pitch * [ 8 + 1.00, 8 + 0.50 ]);
 863     $nspots = 0;
 864   };
 865   union(){
 866     Frame($phase, token_pitch * [ 8 + 1.00, 8 + 0.50 ]);
 867     $nspots = 1;
 868     translate(token_pitch * [  -3.5,  -3.5 ]) Token_L();
 869     translate(token_pitch * [  -3.5,  -2.5 ]) Token_L();
 870     translate(token_pitch * [  -3.5,  -1.5 ]) Token_L();
 871     translate(token_pitch * [  -3.5,  -0.5 ]) Token_L();
 872     translate(token_pitch * [  -3.5,   0.5 ]) Token_L();
 873     translate(token_pitch * [  -3.5,   1.5 ]) Token_L();
 874     translate(token_pitch * [  -3.5,   2.5 ]) Token_L();
 875     translate(token_pitch * [  -3.5,   3.5 ]) Token_L();
 876     translate(token_pitch * [  -2.5,  -3.5 ]) Token_L();
 877     translate(token_pitch * [  -2.5,  -2.5 ]) Token_L();
 878     translate(token_pitch * [  -2.5,  -1.5 ]) Token_L();
 879     translate(token_pitch * [  -2.5,  -0.5 ]) Token_L();
 880     translate(token_pitch * [  -2.5,   0.5 ]) Token_L();
 881     translate(token_pitch * [  -2.5,   1.5 ]) Token_L();
 882     translate(token_pitch * [  -2.5,   2.5 ]) Token_L();
 883     translate(token_pitch * [  -2.5,   3.5 ]) Token_L();
 884     translate(token_pitch * [  -1.5,  -3.5 ]) Token_L();
 885     translate(token_pitch * [  -1.5,  -2.5 ]) Token_L();
 886     translate(token_pitch * [  -1.5,  -1.5 ]) Token_L();
 887     translate(token_pitch * [  -1.5,  -0.5 ]) Token_L();
 888     translate(token_pitch * [  -1.5,   0.5 ]) Token_L();
 889     translate(token_pitch * [  -1.5,   1.5 ]) Token_L();
 890     translate(token_pitch * [  -1.5,   2.5 ]) Token_L();
 891     translate(token_pitch * [  -1.5,   3.5 ]) Token_L();
 892     translate(token_pitch * [  -0.5,  -3.5 ]) Token_L();
 893   };
 894   union(){
 895     Frame($phase, token_pitch * [ 8 + 1.00, 8 + 0.50 ]);
 896     $nspots = 2;
 897     translate(token_pitch * [  -0.5,  -2.5 ]) Token_L();
 898     translate(token_pitch * [  -0.5,  -1.5 ]) Token_L();
 899     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
 900     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
 901     translate(token_pitch * [  -0.5,   1.5 ]) Token_L();
 902     translate(token_pitch * [  -0.5,   2.5 ]) Token_L();
 903     translate(token_pitch * [  -0.5,   3.5 ]) Token_L();
 904     translate(token_pitch * [   0.5,  -3.5 ]) Token_L();
 905     translate(token_pitch * [   0.5,  -2.5 ]) Token_L();
 906     translate(token_pitch * [   0.5,  -1.5 ]) Token_L();
 907     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
 908     translate(token_pitch * [   0.5,   0.5 ]) Token_L();
 909     translate(token_pitch * [   0.5,   1.5 ]) Token_L();
 910     translate(token_pitch * [   0.5,   2.5 ]) Token_L();
 911     translate(token_pitch * [   0.5,   3.5 ]) Token_L();
 912   };
 913   union(){
 914     Frame($phase, token_pitch * [ 8 + 1.00, 8 + 0.50 ]);
 915     $nspots = 3;
 916   };
 917   union(){
 918     Frame($phase, token_pitch * [ 8 + 1.00, 8 + 0.50 ]);
 919     $nspots = 4;
 920     translate(token_pitch * [   1.5,  -3.5 ]) Token_L();
 921     translate(token_pitch * [   1.5,  -2.5 ]) Token_L();
 922     translate(token_pitch * [   1.5,  -1.5 ]) Token_L();
 923     translate(token_pitch * [   1.5,  -0.5 ]) Token_L();
 924     translate(token_pitch * [   1.5,   0.5 ]) Token_L();
 925     translate(token_pitch * [   1.5,   1.5 ]) Token_L();
 926     translate(token_pitch * [   1.5,   2.5 ]) Token_L();
 927     translate(token_pitch * [   1.5,   3.5 ]) Token_L();
 928     translate(token_pitch * [   2.5,  -3.5 ]) Token_L();
 929     translate(token_pitch * [   2.5,  -2.5 ]) Token_L();
 930     translate(token_pitch * [   2.5,  -1.5 ]) Token_L();
 931     translate(token_pitch * [   2.5,  -0.5 ]) Token_L();
 932     translate(token_pitch * [   2.5,   0.5 ]) Token_L();
 933     translate(token_pitch * [   2.5,   1.5 ]) Token_L();
 934     translate(token_pitch * [   2.5,   2.5 ]) Token_L();
 935     translate(token_pitch * [   2.5,   3.5 ]) Token_L();
 936     translate(token_pitch * [   3.5,  -3.5 ]) Token_L();
 937     translate(token_pitch * [   3.5,  -2.5 ]) Token_L();
 938   };
 939 }
 940 module All_Loco(){ ////toplevel
 941 // All  Loco        total=25  rowsz=5  nrows=5
 942   union(){
 943     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
 944     $nspots = 0;
 945     translate(token_pitch * [  -2.0,  -2.0 ]) Token_L();
 946     translate(token_pitch * [  -2.0,  -1.0 ]) Token_L();
 947     translate(token_pitch * [  -2.0,   0.0 ]) Token_L();
 948     translate(token_pitch * [  -2.0,   1.0 ]) Token_L();
 949     translate(token_pitch * [  -2.0,   2.0 ]) Token_L();
 950     translate(token_pitch * [  -1.0,  -2.0 ]) Token_L();
 951     translate(token_pitch * [  -1.0,  -1.0 ]) Token_L();
 952     translate(token_pitch * [  -1.0,   0.0 ]) Token_L();
 953     translate(token_pitch * [  -1.0,   1.0 ]) Token_L();
 954     translate(token_pitch * [  -1.0,   2.0 ]) Token_L();
 955     translate(token_pitch * [   0.0,  -2.0 ]) Token_L();
 956     translate(token_pitch * [   0.0,  -1.0 ]) Token_L();
 957     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
 958     translate(token_pitch * [   0.0,   1.0 ]) Token_L();
 959     translate(token_pitch * [   0.0,   2.0 ]) Token_L();
 960     translate(token_pitch * [   1.0,  -2.0 ]) Token_L();
 961     translate(token_pitch * [   1.0,  -1.0 ]) Token_L();
 962     translate(token_pitch * [   1.0,   0.0 ]) Token_L();
 963     translate(token_pitch * [   1.0,   1.0 ]) Token_L();
 964     translate(token_pitch * [   1.0,   2.0 ]) Token_L();
 965     translate(token_pitch * [   2.0,  -2.0 ]) Token_L();
 966     translate(token_pitch * [   2.0,  -1.0 ]) Token_L();
 967     translate(token_pitch * [   2.0,   0.0 ]) Token_L();
 968     translate(token_pitch * [   2.0,   1.0 ]) Token_L();
 969     translate(token_pitch * [   2.0,   2.0 ]) Token_L();
 970   };
 971   union(){
 972     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
 973     $nspots = 1;
 974   };
 975   union(){
 976     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
 977     $nspots = 2;
 978   };
 979   union(){
 980     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
 981     $nspots = 3;
 982   };
 983   union(){
 984     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
 985     $nspots = 4;
 986   };
 987 }
 988 module All_Orange(){ ////toplevel
 989 // All  Orange      total=32  rowsz=6  nrows=6
 990   union(){
 991     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 992     $nspots = 0;
 993   };
 994   union(){
 995     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
 996     $nspots = 1;
 997     translate(token_pitch * [  -2.5,  -2.5 ]) Token_L();
 998     translate(token_pitch * [  -2.5,  -1.5 ]) Token_L();
 999     translate(token_pitch * [  -2.5,  -0.5 ]) Token_L();
1000     translate(token_pitch * [  -2.5,   0.5 ]) Token_L();
1001     translate(token_pitch * [  -2.5,   1.5 ]) Token_L();
1002     translate(token_pitch * [  -2.5,   2.5 ]) Token_L();
1003     translate(token_pitch * [  -1.5,  -2.5 ]) Token_L();
1004     translate(token_pitch * [  -1.5,  -1.5 ]) Token_L();
1005     translate(token_pitch * [  -1.5,  -0.5 ]) Token_L();
1006     translate(token_pitch * [  -1.5,   0.5 ]) Token_L();
1007     translate(token_pitch * [  -1.5,   1.5 ]) Token_L();
1008     translate(token_pitch * [  -1.5,   2.5 ]) Token_L();
1009     translate(token_pitch * [  -0.5,  -2.5 ]) Token_L();
1010     translate(token_pitch * [  -0.5,  -1.5 ]) Token_L();
1011     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
1012     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
1013     translate(token_pitch * [  -0.5,   1.5 ]) Token_L();
1014     translate(token_pitch * [  -0.5,   2.5 ]) Token_L();
1015     translate(token_pitch * [   0.5,  -2.5 ]) Token_L();
1016     translate(token_pitch * [   0.5,  -1.5 ]) Token_L();
1017     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
1018     translate(token_pitch * [   0.5,   0.5 ]) Token_L();
1019     translate(token_pitch * [   0.5,   1.5 ]) Token_L();
1020     translate(token_pitch * [   0.5,   2.5 ]) Token_L();
1021     translate(token_pitch * [   1.5,  -2.5 ]) Token_L();
1022     translate(token_pitch * [   1.5,  -1.5 ]) Token_L();
1023     translate(token_pitch * [   1.5,  -0.5 ]) Token_L();
1024     translate(token_pitch * [   1.5,   0.5 ]) Token_L();
1025     translate(token_pitch * [   1.5,   1.5 ]) Token_L();
1026     translate(token_pitch * [   1.5,   2.5 ]) Token_L();
1027     translate(token_pitch * [   2.5,  -2.5 ]) Token_L();
1028     translate(token_pitch * [   2.5,  -1.5 ]) Token_L();
1029   };
1030   union(){
1031     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
1032     $nspots = 2;
1033   };
1034   union(){
1035     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
1036     $nspots = 3;
1037   };
1038   union(){
1039     Frame($phase, token_pitch * [ 6 + 1.00, 6 + 0.50 ]);
1040     $nspots = 4;
1041   };
1042 }
1043 module All_Orange6(){ ////toplevel
1044 // All  Orange6     total=20  rowsz=5  nrows=4
1045   union(){
1046     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1047     $nspots = 0;
1048     translate(token_pitch * [  -2.0,  -1.5 ]) Token_L();
1049     translate(token_pitch * [  -2.0,  -0.5 ]) Token_L();
1050     translate(token_pitch * [  -2.0,   0.5 ]) Token_L();
1051     translate(token_pitch * [  -2.0,   1.5 ]) Token_L();
1052     translate(token_pitch * [  -1.0,  -1.5 ]) Token_L();
1053     translate(token_pitch * [  -1.0,  -0.5 ]) Token_L();
1054     translate(token_pitch * [  -1.0,   0.5 ]) Token_L();
1055     translate(token_pitch * [  -1.0,   1.5 ]) Token_L();
1056     translate(token_pitch * [   0.0,  -1.5 ]) Token_L();
1057     translate(token_pitch * [   0.0,  -0.5 ]) Token_L();
1058     translate(token_pitch * [   0.0,   0.5 ]) Token_L();
1059     translate(token_pitch * [   0.0,   1.5 ]) Token_L();
1060     translate(token_pitch * [   1.0,  -1.5 ]) Token_L();
1061     translate(token_pitch * [   1.0,  -0.5 ]) Token_L();
1062     translate(token_pitch * [   1.0,   0.5 ]) Token_L();
1063     translate(token_pitch * [   1.0,   1.5 ]) Token_L();
1064     translate(token_pitch * [   2.0,  -1.5 ]) Token_L();
1065     translate(token_pitch * [   2.0,  -0.5 ]) Token_L();
1066     translate(token_pitch * [   2.0,   0.5 ]) Token_L();
1067     translate(token_pitch * [   2.0,   1.5 ]) Token_L();
1068   };
1069   union(){
1070     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1071     $nspots = 1;
1072   };
1073   union(){
1074     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1075     $nspots = 2;
1076   };
1077   union(){
1078     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1079     $nspots = 3;
1080   };
1081   union(){
1082     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1083     $nspots = 4;
1084   };
1085 }
1086 module All_Purple(){ ////toplevel
1087 // All  Purple      total=23  rowsz=5  nrows=5
1088   union(){
1089     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
1090     $nspots = 0;
1091   };
1092   union(){
1093     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
1094     $nspots = 1;
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 * [  -1.0,  -2.0 ]) Token_L();
1101     translate(token_pitch * [  -1.0,  -1.0 ]) Token_L();
1102     translate(token_pitch * [  -1.0,   0.0 ]) Token_L();
1103     translate(token_pitch * [  -1.0,   1.0 ]) Token_L();
1104     translate(token_pitch * [  -1.0,   2.0 ]) Token_L();
1105     translate(token_pitch * [   0.0,  -2.0 ]) Token_L();
1106     translate(token_pitch * [   0.0,  -1.0 ]) Token_L();
1107     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
1108     translate(token_pitch * [   0.0,   1.0 ]) Token_L();
1109     translate(token_pitch * [   0.0,   2.0 ]) Token_L();
1110     translate(token_pitch * [   1.0,  -2.0 ]) Token_L();
1111     translate(token_pitch * [   1.0,  -1.0 ]) Token_L();
1112     translate(token_pitch * [   1.0,   0.0 ]) Token_L();
1113     translate(token_pitch * [   1.0,   1.0 ]) Token_L();
1114     translate(token_pitch * [   1.0,   2.0 ]) Token_L();
1115     translate(token_pitch * [   2.0,  -2.0 ]) Token_L();
1116     translate(token_pitch * [   2.0,  -1.0 ]) Token_L();
1117     translate(token_pitch * [   2.0,   0.0 ]) Token_L();
1118   };
1119   union(){
1120     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
1121     $nspots = 2;
1122   };
1123   union(){
1124     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
1125     $nspots = 3;
1126   };
1127   union(){
1128     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
1129     $nspots = 4;
1130   };
1131 }
1132 module All_Red(){ ////toplevel
1133 // All  Red         total=46  rowsz=7  nrows=7
1134   union(){
1135     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1136     $nspots = 0;
1137   };
1138   union(){
1139     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1140     $nspots = 1;
1141     translate(token_pitch * [  -3.0,  -3.0 ]) Token_L();
1142     translate(token_pitch * [  -3.0,  -2.0 ]) Token_L();
1143     translate(token_pitch * [  -3.0,  -1.0 ]) Token_L();
1144     translate(token_pitch * [  -3.0,   0.0 ]) Token_L();
1145     translate(token_pitch * [  -3.0,   1.0 ]) Token_L();
1146     translate(token_pitch * [  -3.0,   2.0 ]) Token_L();
1147     translate(token_pitch * [  -3.0,   3.0 ]) Token_L();
1148     translate(token_pitch * [  -2.0,  -3.0 ]) Token_L();
1149     translate(token_pitch * [  -2.0,  -2.0 ]) Token_L();
1150     translate(token_pitch * [  -2.0,  -1.0 ]) Token_L();
1151     translate(token_pitch * [  -2.0,   0.0 ]) Token_L();
1152     translate(token_pitch * [  -2.0,   1.0 ]) Token_L();
1153     translate(token_pitch * [  -2.0,   2.0 ]) Token_L();
1154     translate(token_pitch * [  -2.0,   3.0 ]) Token_L();
1155     translate(token_pitch * [  -1.0,  -3.0 ]) Token_L();
1156     translate(token_pitch * [  -1.0,  -2.0 ]) Token_L();
1157     translate(token_pitch * [  -1.0,  -1.0 ]) Token_L();
1158     translate(token_pitch * [  -1.0,   0.0 ]) Token_L();
1159   };
1160   union(){
1161     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1162     $nspots = 2;
1163     translate(token_pitch * [  -1.0,   1.0 ]) Token_L();
1164     translate(token_pitch * [  -1.0,   2.0 ]) Token_L();
1165     translate(token_pitch * [  -1.0,   3.0 ]) Token_L();
1166     translate(token_pitch * [   0.0,  -3.0 ]) Token_L();
1167     translate(token_pitch * [   0.0,  -2.0 ]) Token_L();
1168     translate(token_pitch * [   0.0,  -1.0 ]) Token_L();
1169     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
1170     translate(token_pitch * [   0.0,   1.0 ]) Token_L();
1171     translate(token_pitch * [   0.0,   2.0 ]) Token_L();
1172     translate(token_pitch * [   0.0,   3.0 ]) Token_L();
1173     translate(token_pitch * [   1.0,  -3.0 ]) Token_L();
1174     translate(token_pitch * [   1.0,  -2.0 ]) Token_L();
1175     translate(token_pitch * [   1.0,  -1.0 ]) Token_L();
1176   };
1177   union(){
1178     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1179     $nspots = 3;
1180   };
1181   union(){
1182     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1183     $nspots = 4;
1184     translate(token_pitch * [   1.0,   0.0 ]) Token_L();
1185     translate(token_pitch * [   1.0,   1.0 ]) Token_L();
1186     translate(token_pitch * [   1.0,   2.0 ]) Token_L();
1187     translate(token_pitch * [   1.0,   3.0 ]) Token_L();
1188     translate(token_pitch * [   2.0,  -3.0 ]) Token_L();
1189     translate(token_pitch * [   2.0,  -2.0 ]) Token_L();
1190     translate(token_pitch * [   2.0,  -1.0 ]) Token_L();
1191     translate(token_pitch * [   2.0,   0.0 ]) Token_L();
1192     translate(token_pitch * [   2.0,   1.0 ]) Token_L();
1193     translate(token_pitch * [   2.0,   2.0 ]) Token_L();
1194     translate(token_pitch * [   2.0,   3.0 ]) Token_L();
1195     translate(token_pitch * [   3.0,  -3.0 ]) Token_L();
1196     translate(token_pitch * [   3.0,  -2.0 ]) Token_L();
1197     translate(token_pitch * [   3.0,  -1.0 ]) Token_L();
1198     translate(token_pitch * [   3.0,   0.0 ]) Token_L();
1199   };
1200 }
1201 module All_White(){ ////toplevel
1202 // All  White       total=46  rowsz=7  nrows=7
1203   union(){
1204     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1205     $nspots = 0;
1206   };
1207   union(){
1208     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1209     $nspots = 1;
1210     translate(token_pitch * [  -3.0,  -3.0 ]) Token_L();
1211     translate(token_pitch * [  -3.0,  -2.0 ]) Token_L();
1212     translate(token_pitch * [  -3.0,  -1.0 ]) Token_L();
1213     translate(token_pitch * [  -3.0,   0.0 ]) Token_L();
1214     translate(token_pitch * [  -3.0,   1.0 ]) Token_L();
1215     translate(token_pitch * [  -3.0,   2.0 ]) Token_L();
1216     translate(token_pitch * [  -3.0,   3.0 ]) Token_L();
1217     translate(token_pitch * [  -2.0,  -3.0 ]) Token_L();
1218     translate(token_pitch * [  -2.0,  -2.0 ]) Token_L();
1219     translate(token_pitch * [  -2.0,  -1.0 ]) Token_L();
1220     translate(token_pitch * [  -2.0,   0.0 ]) Token_L();
1221     translate(token_pitch * [  -2.0,   1.0 ]) Token_L();
1222     translate(token_pitch * [  -2.0,   2.0 ]) Token_L();
1223     translate(token_pitch * [  -2.0,   3.0 ]) Token_L();
1224     translate(token_pitch * [  -1.0,  -3.0 ]) Token_L();
1225     translate(token_pitch * [  -1.0,  -2.0 ]) Token_L();
1226     translate(token_pitch * [  -1.0,  -1.0 ]) Token_L();
1227     translate(token_pitch * [  -1.0,   0.0 ]) Token_L();
1228     translate(token_pitch * [  -1.0,   1.0 ]) Token_L();
1229     translate(token_pitch * [  -1.0,   2.0 ]) Token_L();
1230     translate(token_pitch * [  -1.0,   3.0 ]) Token_L();
1231     translate(token_pitch * [   0.0,  -3.0 ]) Token_L();
1232     translate(token_pitch * [   0.0,  -2.0 ]) Token_L();
1233     translate(token_pitch * [   0.0,  -1.0 ]) Token_L();
1234     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
1235     translate(token_pitch * [   0.0,   1.0 ]) Token_L();
1236     translate(token_pitch * [   0.0,   2.0 ]) Token_L();
1237   };
1238   union(){
1239     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1240     $nspots = 2;
1241     translate(token_pitch * [   0.0,   3.0 ]) Token_L();
1242     translate(token_pitch * [   1.0,  -3.0 ]) Token_L();
1243     translate(token_pitch * [   1.0,  -2.0 ]) Token_L();
1244     translate(token_pitch * [   1.0,  -1.0 ]) Token_L();
1245     translate(token_pitch * [   1.0,   0.0 ]) Token_L();
1246     translate(token_pitch * [   1.0,   1.0 ]) Token_L();
1247     translate(token_pitch * [   1.0,   2.0 ]) Token_L();
1248     translate(token_pitch * [   1.0,   3.0 ]) Token_L();
1249     translate(token_pitch * [   2.0,  -3.0 ]) Token_L();
1250     translate(token_pitch * [   2.0,  -2.0 ]) Token_L();
1251     translate(token_pitch * [   2.0,  -1.0 ]) Token_L();
1252     translate(token_pitch * [   2.0,   0.0 ]) Token_L();
1253   };
1254   union(){
1255     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1256     $nspots = 3;
1257     translate(token_pitch * [   2.0,   1.0 ]) Token_L();
1258     translate(token_pitch * [   2.0,   2.0 ]) Token_L();
1259     translate(token_pitch * [   2.0,   3.0 ]) Token_L();
1260     translate(token_pitch * [   3.0,  -3.0 ]) Token_L();
1261     translate(token_pitch * [   3.0,  -2.0 ]) Token_L();
1262     translate(token_pitch * [   3.0,  -1.0 ]) Token_L();
1263     translate(token_pitch * [   3.0,   0.0 ]) Token_L();
1264   };
1265   union(){
1266     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1267     $nspots = 4;
1268   };
1269 }
1270 module All_WhiteSpare(){ ////toplevel
1271 // All  WhiteSpare  total= 3  rowsz=2  nrows=2
1272   union(){
1273     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
1274     $nspots = 0;
1275   };
1276   union(){
1277     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
1278     $nspots = 1;
1279     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
1280   };
1281   union(){
1282     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
1283     $nspots = 2;
1284     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
1285   };
1286   union(){
1287     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
1288     $nspots = 3;
1289     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
1290   };
1291   union(){
1292     Frame($phase, token_pitch * [ 2 + 1.00, 2 + 0.50 ]);
1293     $nspots = 4;
1294   };
1295 }
1296 module All_Yellow(){ ////toplevel
1297 // All  Yellow      total=45  rowsz=7  nrows=7
1298   union(){
1299     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1300     $nspots = 0;
1301   };
1302   union(){
1303     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1304     $nspots = 1;
1305     translate(token_pitch * [  -3.0,  -3.0 ]) Token_L();
1306     translate(token_pitch * [  -3.0,  -2.0 ]) Token_L();
1307     translate(token_pitch * [  -3.0,  -1.0 ]) Token_L();
1308     translate(token_pitch * [  -3.0,   0.0 ]) Token_L();
1309     translate(token_pitch * [  -3.0,   1.0 ]) Token_L();
1310     translate(token_pitch * [  -3.0,   2.0 ]) Token_L();
1311     translate(token_pitch * [  -3.0,   3.0 ]) Token_L();
1312     translate(token_pitch * [  -2.0,  -3.0 ]) Token_L();
1313     translate(token_pitch * [  -2.0,  -2.0 ]) Token_L();
1314     translate(token_pitch * [  -2.0,  -1.0 ]) Token_L();
1315     translate(token_pitch * [  -2.0,   0.0 ]) Token_L();
1316     translate(token_pitch * [  -2.0,   1.0 ]) Token_L();
1317     translate(token_pitch * [  -2.0,   2.0 ]) Token_L();
1318     translate(token_pitch * [  -2.0,   3.0 ]) Token_L();
1319     translate(token_pitch * [  -1.0,  -3.0 ]) Token_L();
1320     translate(token_pitch * [  -1.0,  -2.0 ]) Token_L();
1321     translate(token_pitch * [  -1.0,  -1.0 ]) Token_L();
1322     translate(token_pitch * [  -1.0,   0.0 ]) Token_L();
1323     translate(token_pitch * [  -1.0,   1.0 ]) Token_L();
1324   };
1325   union(){
1326     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1327     $nspots = 2;
1328     translate(token_pitch * [  -1.0,   2.0 ]) Token_L();
1329     translate(token_pitch * [  -1.0,   3.0 ]) Token_L();
1330     translate(token_pitch * [   0.0,  -3.0 ]) Token_L();
1331     translate(token_pitch * [   0.0,  -2.0 ]) Token_L();
1332     translate(token_pitch * [   0.0,  -1.0 ]) Token_L();
1333     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
1334     translate(token_pitch * [   0.0,   1.0 ]) Token_L();
1335     translate(token_pitch * [   0.0,   2.0 ]) Token_L();
1336     translate(token_pitch * [   0.0,   3.0 ]) Token_L();
1337     translate(token_pitch * [   1.0,  -3.0 ]) Token_L();
1338     translate(token_pitch * [   1.0,  -2.0 ]) Token_L();
1339   };
1340   union(){
1341     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1342     $nspots = 3;
1343   };
1344   union(){
1345     Frame($phase, token_pitch * [ 7 + 1.00, 7 + 0.50 ]);
1346     $nspots = 4;
1347     translate(token_pitch * [   1.0,  -1.0 ]) Token_L();
1348     translate(token_pitch * [   1.0,   0.0 ]) Token_L();
1349     translate(token_pitch * [   1.0,   1.0 ]) Token_L();
1350     translate(token_pitch * [   1.0,   2.0 ]) Token_L();
1351     translate(token_pitch * [   1.0,   3.0 ]) Token_L();
1352     translate(token_pitch * [   2.0,  -3.0 ]) Token_L();
1353     translate(token_pitch * [   2.0,  -2.0 ]) Token_L();
1354     translate(token_pitch * [   2.0,  -1.0 ]) Token_L();
1355     translate(token_pitch * [   2.0,   0.0 ]) Token_L();
1356     translate(token_pitch * [   2.0,   1.0 ]) Token_L();
1357     translate(token_pitch * [   2.0,   2.0 ]) Token_L();
1358     translate(token_pitch * [   2.0,   3.0 ]) Token_L();
1359     translate(token_pitch * [   3.0,  -3.0 ]) Token_L();
1360     translate(token_pitch * [   3.0,  -2.0 ]) Token_L();
1361     translate(token_pitch * [   3.0,  -1.0 ]) Token_L();
1362   };
1363 }
1364 // All  total_count=376   total_real_count=353
1365 // All  max_rowsz=8       max_nrows=8
1366 module Witches_Black(){ ////toplevel
1367 // Witches  Black       total= 8  rowsz=3  nrows=3
1368   union(){
1369     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1370     $nspots = 0;
1371   };
1372   union(){
1373     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1374     $nspots = 1;
1375     translate(token_pitch * [  -1.0,  -1.0 ]) Token_L();
1376     translate(token_pitch * [  -1.0,   0.0 ]) Token_L();
1377     translate(token_pitch * [  -1.0,   1.0 ]) Token_L();
1378     translate(token_pitch * [   0.0,  -1.0 ]) Token_L();
1379     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
1380     translate(token_pitch * [   0.0,   1.0 ]) Token_L();
1381     translate(token_pitch * [   1.0,  -1.0 ]) Token_L();
1382     translate(token_pitch * [   1.0,   0.0 ]) Token_L();
1383   };
1384   union(){
1385     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1386     $nspots = 2;
1387   };
1388   union(){
1389     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1390     $nspots = 3;
1391   };
1392   union(){
1393     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1394     $nspots = 4;
1395   };
1396 }
1397 module Witches_Blue(){ ////toplevel
1398 // Witches  Blue        total=18  rowsz=5  nrows=4
1399   union(){
1400     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1401     $nspots = 0;
1402   };
1403   union(){
1404     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1405     $nspots = 1;
1406     translate(token_pitch * [  -2.0,  -1.5 ]) Token_L();
1407     translate(token_pitch * [  -2.0,  -0.5 ]) Token_L();
1408     translate(token_pitch * [  -2.0,   0.5 ]) Token_L();
1409     translate(token_pitch * [  -2.0,   1.5 ]) Token_L();
1410     translate(token_pitch * [  -1.0,  -1.5 ]) Token_L();
1411     translate(token_pitch * [  -1.0,  -0.5 ]) Token_L();
1412     translate(token_pitch * [  -1.0,   0.5 ]) Token_L();
1413     translate(token_pitch * [  -1.0,   1.5 ]) Token_L();
1414   };
1415   union(){
1416     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1417     $nspots = 2;
1418     translate(token_pitch * [   0.0,  -1.5 ]) Token_L();
1419     translate(token_pitch * [   0.0,  -0.5 ]) Token_L();
1420     translate(token_pitch * [   0.0,   0.5 ]) Token_L();
1421     translate(token_pitch * [   0.0,   1.5 ]) Token_L();
1422     translate(token_pitch * [   1.0,  -1.5 ]) Token_L();
1423   };
1424   union(){
1425     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1426     $nspots = 3;
1427   };
1428   union(){
1429     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1430     $nspots = 4;
1431     translate(token_pitch * [   1.0,  -0.5 ]) Token_L();
1432     translate(token_pitch * [   1.0,   0.5 ]) Token_L();
1433     translate(token_pitch * [   1.0,   1.5 ]) Token_L();
1434     translate(token_pitch * [   2.0,  -1.5 ]) Token_L();
1435     translate(token_pitch * [   2.0,  -0.5 ]) Token_L();
1436   };
1437 }
1438 module Witches_Green(){ ////toplevel
1439 // Witches  Green       total=20  rowsz=5  nrows=4
1440   union(){
1441     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1442     $nspots = 0;
1443   };
1444   union(){
1445     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1446     $nspots = 1;
1447     translate(token_pitch * [  -2.0,  -1.5 ]) Token_L();
1448     translate(token_pitch * [  -2.0,  -0.5 ]) Token_L();
1449     translate(token_pitch * [  -2.0,   0.5 ]) Token_L();
1450     translate(token_pitch * [  -2.0,   1.5 ]) Token_L();
1451     translate(token_pitch * [  -1.0,  -1.5 ]) Token_L();
1452     translate(token_pitch * [  -1.0,  -0.5 ]) Token_L();
1453     translate(token_pitch * [  -1.0,   0.5 ]) Token_L();
1454     translate(token_pitch * [  -1.0,   1.5 ]) Token_L();
1455     translate(token_pitch * [   0.0,  -1.5 ]) Token_L();
1456     translate(token_pitch * [   0.0,  -0.5 ]) Token_L();
1457   };
1458   union(){
1459     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1460     $nspots = 2;
1461     translate(token_pitch * [   0.0,   0.5 ]) Token_L();
1462     translate(token_pitch * [   0.0,   1.5 ]) Token_L();
1463     translate(token_pitch * [   1.0,  -1.5 ]) Token_L();
1464     translate(token_pitch * [   1.0,  -0.5 ]) Token_L();
1465     translate(token_pitch * [   1.0,   0.5 ]) Token_L();
1466   };
1467   union(){
1468     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1469     $nspots = 3;
1470   };
1471   union(){
1472     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1473     $nspots = 4;
1474     translate(token_pitch * [   1.0,   1.5 ]) Token_L();
1475     translate(token_pitch * [   2.0,  -1.5 ]) Token_L();
1476     translate(token_pitch * [   2.0,  -0.5 ]) Token_L();
1477     translate(token_pitch * [   2.0,   0.5 ]) Token_L();
1478     translate(token_pitch * [   2.0,   1.5 ]) Token_L();
1479   };
1480 }
1481 module Witches_Loco(){ ////toplevel
1482 // Witches  Loco        total=25  rowsz=5  nrows=5
1483   union(){
1484     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
1485     $nspots = 0;
1486     translate(token_pitch * [  -2.0,  -2.0 ]) Token_L();
1487     translate(token_pitch * [  -2.0,  -1.0 ]) Token_L();
1488     translate(token_pitch * [  -2.0,   0.0 ]) Token_L();
1489     translate(token_pitch * [  -2.0,   1.0 ]) Token_L();
1490     translate(token_pitch * [  -2.0,   2.0 ]) Token_L();
1491     translate(token_pitch * [  -1.0,  -2.0 ]) Token_L();
1492     translate(token_pitch * [  -1.0,  -1.0 ]) Token_L();
1493     translate(token_pitch * [  -1.0,   0.0 ]) Token_L();
1494     translate(token_pitch * [  -1.0,   1.0 ]) Token_L();
1495     translate(token_pitch * [  -1.0,   2.0 ]) Token_L();
1496     translate(token_pitch * [   0.0,  -2.0 ]) Token_L();
1497     translate(token_pitch * [   0.0,  -1.0 ]) Token_L();
1498     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
1499     translate(token_pitch * [   0.0,   1.0 ]) Token_L();
1500     translate(token_pitch * [   0.0,   2.0 ]) Token_L();
1501     translate(token_pitch * [   1.0,  -2.0 ]) Token_L();
1502     translate(token_pitch * [   1.0,  -1.0 ]) Token_L();
1503     translate(token_pitch * [   1.0,   0.0 ]) Token_L();
1504     translate(token_pitch * [   1.0,   1.0 ]) Token_L();
1505     translate(token_pitch * [   1.0,   2.0 ]) Token_L();
1506     translate(token_pitch * [   2.0,  -2.0 ]) Token_L();
1507     translate(token_pitch * [   2.0,  -1.0 ]) Token_L();
1508     translate(token_pitch * [   2.0,   0.0 ]) Token_L();
1509     translate(token_pitch * [   2.0,   1.0 ]) Token_L();
1510     translate(token_pitch * [   2.0,   2.0 ]) Token_L();
1511   };
1512   union(){
1513     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
1514     $nspots = 1;
1515   };
1516   union(){
1517     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
1518     $nspots = 2;
1519   };
1520   union(){
1521     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
1522     $nspots = 3;
1523   };
1524   union(){
1525     Frame($phase, token_pitch * [ 5 + 1.00, 5 + 0.50 ]);
1526     $nspots = 4;
1527   };
1528 }
1529 module Witches_Orange(){ ////toplevel
1530 // Witches  Orange      total=12  rowsz=4  nrows=3
1531   union(){
1532     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1533     $nspots = 0;
1534   };
1535   union(){
1536     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1537     $nspots = 1;
1538     translate(token_pitch * [  -1.5,  -1.0 ]) Token_L();
1539     translate(token_pitch * [  -1.5,   0.0 ]) Token_L();
1540     translate(token_pitch * [  -1.5,   1.0 ]) Token_L();
1541     translate(token_pitch * [  -0.5,  -1.0 ]) Token_L();
1542     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
1543     translate(token_pitch * [  -0.5,   1.0 ]) Token_L();
1544     translate(token_pitch * [   0.5,  -1.0 ]) Token_L();
1545     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
1546     translate(token_pitch * [   0.5,   1.0 ]) Token_L();
1547     translate(token_pitch * [   1.5,  -1.0 ]) Token_L();
1548     translate(token_pitch * [   1.5,   0.0 ]) Token_L();
1549     translate(token_pitch * [   1.5,   1.0 ]) Token_L();
1550   };
1551   union(){
1552     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1553     $nspots = 2;
1554   };
1555   union(){
1556     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1557     $nspots = 3;
1558   };
1559   union(){
1560     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1561     $nspots = 4;
1562   };
1563 }
1564 module Witches_Orange6(){ ////toplevel
1565 // Witches  Orange6     total=20  rowsz=5  nrows=4
1566   union(){
1567     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1568     $nspots = 0;
1569     translate(token_pitch * [  -2.0,  -1.5 ]) Token_L();
1570     translate(token_pitch * [  -2.0,  -0.5 ]) Token_L();
1571     translate(token_pitch * [  -2.0,   0.5 ]) Token_L();
1572     translate(token_pitch * [  -2.0,   1.5 ]) Token_L();
1573     translate(token_pitch * [  -1.0,  -1.5 ]) Token_L();
1574     translate(token_pitch * [  -1.0,  -0.5 ]) Token_L();
1575     translate(token_pitch * [  -1.0,   0.5 ]) Token_L();
1576     translate(token_pitch * [  -1.0,   1.5 ]) Token_L();
1577     translate(token_pitch * [   0.0,  -1.5 ]) Token_L();
1578     translate(token_pitch * [   0.0,  -0.5 ]) Token_L();
1579     translate(token_pitch * [   0.0,   0.5 ]) Token_L();
1580     translate(token_pitch * [   0.0,   1.5 ]) Token_L();
1581     translate(token_pitch * [   1.0,  -1.5 ]) Token_L();
1582     translate(token_pitch * [   1.0,  -0.5 ]) Token_L();
1583     translate(token_pitch * [   1.0,   0.5 ]) Token_L();
1584     translate(token_pitch * [   1.0,   1.5 ]) Token_L();
1585     translate(token_pitch * [   2.0,  -1.5 ]) Token_L();
1586     translate(token_pitch * [   2.0,  -0.5 ]) Token_L();
1587     translate(token_pitch * [   2.0,   0.5 ]) Token_L();
1588     translate(token_pitch * [   2.0,   1.5 ]) Token_L();
1589   };
1590   union(){
1591     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1592     $nspots = 1;
1593   };
1594   union(){
1595     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1596     $nspots = 2;
1597   };
1598   union(){
1599     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1600     $nspots = 3;
1601   };
1602   union(){
1603     Frame($phase, token_pitch * [ 5 + 1.00, 4 + 0.50 ]);
1604     $nspots = 4;
1605   };
1606 }
1607 module Witches_Purple(){ ////toplevel
1608 // Witches  Purple      total= 8  rowsz=3  nrows=3
1609   union(){
1610     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1611     $nspots = 0;
1612   };
1613   union(){
1614     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1615     $nspots = 1;
1616     translate(token_pitch * [  -1.0,  -1.0 ]) Token_L();
1617     translate(token_pitch * [  -1.0,   0.0 ]) Token_L();
1618     translate(token_pitch * [  -1.0,   1.0 ]) Token_L();
1619     translate(token_pitch * [   0.0,  -1.0 ]) Token_L();
1620     translate(token_pitch * [   0.0,   0.0 ]) Token_L();
1621     translate(token_pitch * [   0.0,   1.0 ]) Token_L();
1622     translate(token_pitch * [   1.0,  -1.0 ]) Token_L();
1623     translate(token_pitch * [   1.0,   0.0 ]) Token_L();
1624   };
1625   union(){
1626     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1627     $nspots = 2;
1628   };
1629   union(){
1630     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1631     $nspots = 3;
1632   };
1633   union(){
1634     Frame($phase, token_pitch * [ 3 + 1.00, 3 + 0.50 ]);
1635     $nspots = 4;
1636   };
1637 }
1638 module Witches_Red(){ ////toplevel
1639 // Witches  Red         total=16  rowsz=4  nrows=4
1640   union(){
1641     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1642     $nspots = 0;
1643   };
1644   union(){
1645     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1646     $nspots = 1;
1647     translate(token_pitch * [  -1.5,  -1.5 ]) Token_L();
1648     translate(token_pitch * [  -1.5,  -0.5 ]) Token_L();
1649     translate(token_pitch * [  -1.5,   0.5 ]) Token_L();
1650     translate(token_pitch * [  -1.5,   1.5 ]) Token_L();
1651     translate(token_pitch * [  -0.5,  -1.5 ]) Token_L();
1652     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
1653   };
1654   union(){
1655     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1656     $nspots = 2;
1657     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
1658     translate(token_pitch * [  -0.5,   1.5 ]) Token_L();
1659     translate(token_pitch * [   0.5,  -1.5 ]) Token_L();
1660     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
1661     translate(token_pitch * [   0.5,   0.5 ]) Token_L();
1662   };
1663   union(){
1664     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1665     $nspots = 3;
1666   };
1667   union(){
1668     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1669     $nspots = 4;
1670     translate(token_pitch * [   0.5,   1.5 ]) Token_L();
1671     translate(token_pitch * [   1.5,  -1.5 ]) Token_L();
1672     translate(token_pitch * [   1.5,  -0.5 ]) Token_L();
1673     translate(token_pitch * [   1.5,   0.5 ]) Token_L();
1674     translate(token_pitch * [   1.5,   1.5 ]) Token_L();
1675   };
1676 }
1677 module Witches_White(){ ////toplevel
1678 // Witches  White       total=11  rowsz=4  nrows=3
1679   union(){
1680     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1681     $nspots = 0;
1682   };
1683   union(){
1684     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1685     $nspots = 1;
1686     translate(token_pitch * [  -1.5,  -1.0 ]) Token_L();
1687     translate(token_pitch * [  -1.5,   0.0 ]) Token_L();
1688     translate(token_pitch * [  -1.5,   1.0 ]) Token_L();
1689     translate(token_pitch * [  -0.5,  -1.0 ]) Token_L();
1690     translate(token_pitch * [  -0.5,   0.0 ]) Token_L();
1691     translate(token_pitch * [  -0.5,   1.0 ]) Token_L();
1692   };
1693   union(){
1694     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1695     $nspots = 2;
1696     translate(token_pitch * [   0.5,  -1.0 ]) Token_L();
1697     translate(token_pitch * [   0.5,   0.0 ]) Token_L();
1698     translate(token_pitch * [   0.5,   1.0 ]) Token_L();
1699   };
1700   union(){
1701     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1702     $nspots = 3;
1703     translate(token_pitch * [   1.5,  -1.0 ]) Token_L();
1704     translate(token_pitch * [   1.5,   0.0 ]) Token_L();
1705   };
1706   union(){
1707     Frame($phase, token_pitch * [ 4 + 1.00, 3 + 0.50 ]);
1708     $nspots = 4;
1709   };
1710 }
1711 module Witches_Yellow(){ ////toplevel
1712 // Witches  Yellow      total=16  rowsz=4  nrows=4
1713   union(){
1714     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1715     $nspots = 0;
1716   };
1717   union(){
1718     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1719     $nspots = 1;
1720     translate(token_pitch * [  -1.5,  -1.5 ]) Token_L();
1721     translate(token_pitch * [  -1.5,  -0.5 ]) Token_L();
1722     translate(token_pitch * [  -1.5,   0.5 ]) Token_L();
1723     translate(token_pitch * [  -1.5,   1.5 ]) Token_L();
1724     translate(token_pitch * [  -0.5,  -1.5 ]) Token_L();
1725     translate(token_pitch * [  -0.5,  -0.5 ]) Token_L();
1726   };
1727   union(){
1728     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1729     $nspots = 2;
1730     translate(token_pitch * [  -0.5,   0.5 ]) Token_L();
1731     translate(token_pitch * [  -0.5,   1.5 ]) Token_L();
1732     translate(token_pitch * [   0.5,  -1.5 ]) Token_L();
1733     translate(token_pitch * [   0.5,  -0.5 ]) Token_L();
1734     translate(token_pitch * [   0.5,   0.5 ]) Token_L();
1735   };
1736   union(){
1737     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1738     $nspots = 3;
1739   };
1740   union(){
1741     Frame($phase, token_pitch * [ 4 + 1.00, 4 + 0.50 ]);
1742     $nspots = 4;
1743     translate(token_pitch * [   0.5,   1.5 ]) Token_L();
1744     translate(token_pitch * [   1.5,  -1.5 ]) Token_L();
1745     translate(token_pitch * [   1.5,  -0.5 ]) Token_L();
1746     translate(token_pitch * [   1.5,   0.5 ]) Token_L();
1747     translate(token_pitch * [   1.5,   1.5 ]) Token_L();
1748   };
1749 }
1750 // Witches  total_count=154   total_real_count=134
1751 // Witches  max_rowsz=5       max_nrows=5