     h:
       name: "fast green blue"
       program: player.createProgram (set, all, next) ->
-        all GREEN...
-        next 100
-        all BLUE...
+        all GREEN
+        next 100
+        all BLUE
         next 100
 
     j:
       name: "flash red"
       program: player.createProgram (set, all, next) ->
-        all BLACK...
-        next 100
-        all RED...
+        all BLACK
+        next 100
+        all RED
         next 100
 
     l:


  createProgram: (cb) ->
    program = []
    next = (time=0) -> program.push time
    set = (i, r, g, b) -> program.push [i, r, g, b]
    all = (r, g, b) =>
      for i in [@client.min..@client.max]
        program.push [i, r, g, b]
    cb set, all, next, program
    return program




        for i in [client.min..client.max]
          for j in [0..len]
            set i-j, BLACK

          for j in [0..len]
            set i+j, RED

          next 20

