d2
$ whenmod 8 6 (# gain 0)
$ every' 16 12 (# speed 0.75)
$ every' 16 13 (# speed 0.5)
$ every' 8 6 rev
$ s "<arpy*8 ~>"
# n (run 8)
# gain 0.8