home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 January - Disc 2 / Macworld (1999-01) (Disk 2).dmg / Serious Demos / Symbolic Composer 4.2 / Environment / Projects / Tutorial Material / Zone Tutorial / Structure Examples / 4. Demo1 < prev    next >
Encoding:
Text File  |  1998-10-26  |  519 b   |  23 lines  |  [TEXT/ScoM]
  1. ; DEMO1 - try compiling all combinations of mel & rhy.
  2.  
  3. (setq tonals 
  4.    (activate-tonality (chromatic c 4) (major c 4) (c maj maj7 2 4) 
  5.                       (b& min 7 1 3) (aeolian f 3)))
  6.  
  7. (setq mela '(a b c d))
  8. (setq melb '(a b = c = d))
  9.  
  10. (setq rhya '(1/16))
  11. (setq rhyb '(1/8 1/16 1/16 1/4 1/8 1/8))
  12.  
  13. (def-rhythm
  14.    solo rhya "---- --- - --- -" mela
  15. )
  16.  
  17. (compile-song-p "ccl;output:" 1/4 "another song"
  18. ; BARS            |---|---|---|---| 
  19. changes  tonals  "    .   . . .   "
  20. solo     changes "----------------"
  21. )
  22.  
  23.