! This program is written in 
! a bizarre language called "blivet,"
! which is pretty much just a procedural
! modeling language.  A set of routines
! to build skating diagrams are called
! things like "iiedge" (edge from inside
! the circle to inside the circle) or 
! "openmohawk."  I am not willing to 
! distribute the language for various
! reasons, but if you are really intent,
! I suppose I could give you the input
! functions and you could translate them
! into some other modeler's format.
! Mostly, this is here just to show what
! sort of language I used to build these.

! This is the Canasta Tango
input init
centerx = .346
centery = -.46667
start = 210
radius = .20
beatspercircle = 12
input setspeed

! First pattern
input iiedge
input ooedge
input iiedge
input ooedge
beats = 4
input iiedge

beatspercircle = 16
input newlobe
beats = 2
input iiedge
input ooedge
beats = 4
input iiedge

beatspercircle = 12
input newlobe
beats = 2
input iiedge
input ooedge
beats = 1
input iiedge
input ooedge
beats = 2
input ioedge
beats = 4

input newlobe
input oiedge

! second pattern
beatspercircle = 12
input newlobe
beats = 1
input iiedge
input ooedge
input iiedge
input ooedge
beats = 4
input iiedge

beatspercircle = 16
input newlobe
beats = 2
input iiedge
input ooedge
beats = 4
input iiedge

beatspercircle = 12
input newlobe
beats = 2
input iiedge
input ooedge
beats = 1
input iiedge
input ooedge
beats = 2
input ioedge
beats = 4

input newlobe
input oiedge