./../../src/globals.lsp

## sc/globals.lsp [ Modules ]

[ Top ] [ Modules ]

NAME

     globals

     File:             globals.lsp

     Class Hierarchy:  None: no classes defined.

     Version:          1.0.3

     Project:          slippery chicken (algorithmic composition)

     Purpose:          Definition of the user-changeable configuration data and
                       globals for internal programme use.

     Author:           Michael Edwards: m@michael-edwards.org

     Creation date:    30th May 2013

     $$ Last modified: 18:11:51 Fri Jun 21 2013 BST

     SVN ID: $Id: sclist.lsp 963 2010-04-08 20:58:32Z medward2 $

## globals/+slippery-chicken-config-data+ [ Global Parameters ]

[ Top ] [ Global Parameters ]

DESCRIPTION

     A global to hold various user-settable configuration settings.  Use e.g.
     (set-sc-config 'default-dir "~/Desktop") or (get-sc-config 'default-dir) to
     set or query the settings.

SYNOPSIS

    (defparameter +slippery-chicken-config-data+
      (make-instance
       'assoc-list
       :id 'slippery-chicken-config-data
       :data
       ;; MDE Sun Mar 25 10:39:07 2012 -- The following two are used in
       ;; pitch-seq::get-notes to indicate which lowest number in a pitch-seq would
       ;; indicate that we should select the highest or lowest notes possible for
       ;; the instrument/set.
       ;;
       ;; The first is used to indicate the lowest number in a pitch-seq that would
       ;; indicate that the get-notes algorithm should select the highest notes
       ;; possible for the instrument/set.
       '((pitch-seq-lowest-equals-prefers-high 5)
         ;; the lowest number in a pitch-seq that would indicate that the get-notes
         ;; algorithm should select the lowest notes possible for the
         ;; instrument/set.
         (pitch-seq-lowest-equals-prefers-low 1)
         ;; Whether to automatically open EPS files generated with CMN via
         ;; cmn-display.  Currently only works with SBCL and CCL on Mac OSX.
         (cmn-display-auto-open #+sc-auto-open T #-sc-auto-open nil)
         ;; Whether to automatically open PDF files generated with via lp-display.
         ;; Currently only works with SBCL and CCL on Mac OSX.
         (lp-display-auto-open #+sc-auto-open T #-sc-auto-open nil)
         ;; Whether to automatically open MIDI files generated with via midi-play.
         ;; Currently only works with SBCL and CCL on Mac OSX.
         (midi-play-auto-open #+sc-auto-open T #-sc-auto-open nil)
         ;; The default directory for output of sound files, EPS files, and
         ;; Lilypond files. Don't forget the trailing slash (i.e. "/tmp/" not
         ;; "/tmp").  Bear in mind that on OSX the /tmp directory is emptied upon
         ;; reboot so you shouldn't store any files you'd like to keep in there.
         (default-dir "/tmp/")
         ;; The full path to the lilypond command.  We need to set this if we'll
         ;; call lp-display, i.e. if we want to automatically call Lilypond and
         ;; open the resultant PDF directly from Lisp.  The default should work if
         ;; you have the Lilypond app in your Applications folder on OSX.
         (lilypond-command
          "/Applications/LilyPond.app/Contents/Resources/bin/lilypond")
         ;; The default amplitude for all events that don't have amplitude/dynamic
         ;; set via some means such as marks.
         (default-amplitude 0.7)
         ;; Bar number offsets for CMN
         (cmn-bar-num-dx-for-sc -0.2)
         (cmn-bar-num-dy-for-sc 1.2)
         ;; font size for CMN bar numbers
         (cmn-bar-num-size-for-sc 6))))