anchor.diff:        (brk) (db 5)
         (jsr 'player-step)
         (jsr 'wait)
  -      (jmp (mem 'loop)))
  -
  -
  -    )
  +      (jmp (mem 'loop))))
   
     (procedure brk-handler (rti))
   
  
positive.code:       ;; Funky section
        (seq
         (para
          (phase-aaab
           (measure
            (rhythm #'thump '(0 0 0 0 7) -12)
            (seq (swagger) (stagger)))
  
negative.code:          (measure (fat-arp 128 '(0.00  -1 2 3 7 )  :rate 4 :volume (volramp 10 -1/18)))))
  
         (para
          (phrase-aaab
           (intro-beat)
           (intro-fill-2))
          (seq
  