add a load of mscore files

[music.git] / bookofpsalmsetup.mup

diff --git a/bookofpsalmsetup.mup b/bookofpsalmsetup.mup
new file mode 100644 (file)
index 0000000..08b81a0
--- /dev/null
+++ b/bookofpsalmsetup.mup
@@ -0,0 +1,113 @@
+// bookofpsalmsetup.mup
+
+define CPRGHT(YR) "\s(14)\(copyright)"+YR+" by Christian Mondrup (scancm\@biobase.dk). Typeset with Mup, non-commercial copying welcome." @
+
+// Editorial accidentals
+define EDACC(PRT) rom(8) above PRT @
+define FLT "\(flat)" @
+define NA "\(nat)" @
+define SH "\(sharp)" @
+
+define FULLBAR 
+       score
+         barstyle = 1-4;
+       music @
+
+define DIVBAR 
+       score
+         barstyle = ;
+       music @
+
+define STAFFOCT(STF,OCT)
+       staff STF
+         defoct = OCT
+       music @
+
+define MTR(ARG)
+       score
+         time = ARGn
+       music @
+
+define PARTNMFONT1 "\s(18)\f(TX)" @
+define PARTNMFONT2 "\s(14)\f(TB)" @
+define CANTUS PARTNMFONT1+"CANTVS." @
+define MEDIUS PARTNMFONT1+"MEDIVS." @
+define TENOR1 PARTNMFONT1+"TENOR," @
+define TENOR2 PARTNMFONT2+"or \f(TX)Playnsong." @
+define BASSUS PARTNMFONT1+"BASSVS." @
+define PRTOFFS +2 @
+
+define CANTUSLBL(TAG) left(_win.w PRTOFFS,TAG.y-2) CANTUS @
+define MEDIUSLBL(TAG) left(_win.w PRTOFFS,TAG.y-2) MEDIUS @
+define TENORLBL(TAG)
+       left(_win.w PRTOFFS,TAG.y) TENOR1
+       left(_win.w PRTOFFS,TAG.y-5) TENOR2 @
+define BASSUSLBL(TAG) left(_win.w PRTOFFS,TAG.y-2) BASSUS @
+
+define RECORDER "74" @
+
+define BARLN(TAG,OFFS) line (TAG.x OFFS,TAG.y+4) to (TAG.x OFFS,TAG.y-4) @
+
+define SCORETITLE(ARGS)
+header
+       title bold (22) ARGS
+       title (16) " "
+@
+
+define SCORESETUP(PCKFACT,KEY)
+score
+       //key = 1&
+       key = KEY
+       time = 4/4n
+
+       scale = .6
+
+       units = cm
+       leftmargin = 1.2
+       topmargin = .5
+       packfact = PCKFACT
+       scoresep = 20
+
+       measnum = y
+
+       lyricsalign = .5
+       lyricssize = 16
+       size = 16
+
+       staffs = 4
+       bracket = 1-4
+       barstyle = 1-4
+       release = 40
+       label = "                     "
+staff 1
+       clef = soprano
+staff 2
+       clef = alto
+staff 3
+       clef = tenor
+staff 4
+       clef = bass
+music
+       midi all: 0 "tempo="+TEMPO;
+       midi 1: 0 "channel=2"; 0 "program="+RECORDER;
+       midi 2: 0 "channel=3"; 0 "program="+RECORDER; 
+       midi 3: 0 "channel=4"; 0 "program="+RECORDER; 
+       midi 4: 0 "channel=5"; 0 "program="+RECORDER; 
+@
+
+define CLEFCHANGE
+       // clef change
+score
+       time=1/4n
+       barstyle=
+       stafflines=5n
+staff 1
+       clef=treble
+staff 2
+       clef=treble
+staff 3
+       clef=treble8
+staff 4
+       clef=bass
+music
+@