src/replay-xm.lisp

   1 ;;;
   2 ;;; Code to support outputting simple FastTracker XMs from mumble.
   3 ;;;
   4 ;;; Julian Squires <tek@wiw.org> / 2004
   5 ;;;
   6
   7 (in-package :mumble)
   8
   9 ;;; converting:
  10 ;;;
  11 ;;; default to 1/16th note per row, read in all note data, allocating
  12 ;;; patterns accordingly. (have temporary patterns, containing rows
  13 ;;; with simultaneous notes together)
  14 ;;;
  15 ;;; go back through patterns; when strange/fast timings occur, try to
  16 ;;; frob tempo appropriately to accomidate.  finally, pack patterns.
  17 ;;;
  18 ;;; load instruments from XI