ly/festival.ly

   1 % festival.ly --- Festival singing mode output
   2 %
   3 % Copyright (C) 2006, 2007 Brailcom, o.p.s.
   4 %
   5 % Author: Milan Zamazal <pdm@brailcom.org>
   6 %
   7 % COPYRIGHT NOTICE
   8 %
   9 % This program is free software; you can redistribute it and/or modify
  10 % it under the terms of the GNU General Public License as published by
  11 % the Free Software Foundation; either version 2 of the License, or
  12 % (at your option) any later version.
  13 %
  14 % This program is distributed in the hope that it will be useful, but
  15 % WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
  16 % or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  17 % for more details.
  18 %
  19 % You should have received a copy of the GNU General Public License
  20 % along with this program; if not, write to the Free Software
  21 % Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA.
  22
  23 \version "2.12.0"
  24
  25 #(use-modules (scm song))
  26
  27 % \festival #"filename" { \tempo N = X } { music }
  28 festival =
  29 #(define-music-function (parser location filename tempo music) (string? ly:music? ly:music?)
  30   (output-file music tempo filename)
  31   music)
  32
  33 % \festivalsyl #"filename" { \tempo N = X } { music }
  34 festivalsyl =
  35 #(define-music-function (parser location filename tempo music) (string? ly:music? ly:music?)
  36   (set! *syllabify* #t)
  37   (output-file music tempo filename)
  38   music)