On Mon, Apr 11, 2011 at 01:02:39PM +0200, Hermann Hinsch wrote: > > So Dirk, your suggestion might be easier. As you asked me you will find the > M-Tx score of the Sanctus (which is the smallest part) in the attachment. >
I append: 1. The program extract.lua, a rudimentary M-Tx score-to-parts maker, with just enough features to handle your Sanctus. 2. Your Sanctus.mtx (so others can check that exctact.lua works on their systems too) 3. The five files made by extract.lua The coding is to my usual standard, i.e. intelligible to me at the time of writing. If others can understand it, it is because Lua is an unusually readable and intuitive language. We can start talking revision numbers the moment that more than one version exists. βIt is pointless to generalize unless at least two non-isomorphic examples of the generalization can be given.β β Nicolas Bourbaki Dirk
#!/usr/bin/texlua -- extract.lua DPL 2011-04-13 -- write separate M-Tx scores for each style element -- Usage (Unix): extract.lua MYFILE.mtx -- (all systems) texlua extract.lua MYFILE.mtx -- There must be exactly one style line in the preamble. Each -- separate entry in that line will get one part. -- Features: -- will look for lyrics, uptext and chord lines -- Bugs: -- does not look for special lyrics lines, only for those -- starting with L: -- only adjacent C or L lines are found (i.e. no intervening -- comment lines allowed) -- some convenient abbreviations and utility subroutines append = table.insert match = string.match upper = string.upper format = string.format gmatch = string.gmatch find = string.find comment = '^%s*%%' -- first non-blank is a comment lyrics = '^%s*{.*}' -- first word is enclosed in braces keyword = '^%s*(.*):' -- first word if followed by colon kwbody = ".*:(.*)" -- everything after keyword word = '%s*(%S+)' -- maximal string of non-blanks styleclause = ';?([^;]*)' -- clauses of style line separated by semicolons function wordset(line) local ws = {} for w in gmatch(line,word) do ws[w]=true end return ws end -- read input and separate into paragraphs infilename = arg[1] if infilename then infile = io.open(arg[1]) end assert (infile, "Usage: extract.lua MYFILE.mtx") base, ext = match(infilename,'(.*)%.(.*)') lines = {} index = {} for l in infile:lines() do blank = match(l,"^%s*$") if blank and start then append(index,{start,#lines}); start=nil elseif not (blank or start) then start = #lines+1 end append(lines,l) end if start then append(index,{start,#lines}) end -- classify paragraphs function classify(item) local first for l=item[1],item[2] do if not match(lines[l],comment) then first=lines[l] break end end if not first then return 'comment' end if match(first,lyrics) then return 'lyrics' end for l=item[1],item[2] do if match(upper(lines[l]),'^%s*STYLE:') then styleline = lines[l]; return 'style' end end return 'music' end for _,item in ipairs(index) do item.class = classify(item) end -- identify style elements and open part files assert(styleline,"No styleline found") body = match(styleline,kwbody) parts={} partfile={} partset={} style={} for part in gmatch(body,word) do append(parts,part) partset[part] = true partfile[part]=io.open(format("%s-%s.%s",base,part,ext),'w') end -- go through file and print relevant lines function writeln(part,line) partfile[part]:write(line..'\n') end function to_all(line) for _,part in pairs(parts) do writeln(part,line) end end function stylepara(item) for l=item[1],item[2] do local line = lines[l] local kw = match(line,keyword) if upper(kw)=='STYLE' then for _,part in ipairs(parts) do writeln(part,'Style: '..part) end elseif partset[kw] then style[kw] = match(line,kwbody) writeln(kw,line) else to_all(line) end end end function commentpara(item) for l=item[1],item[2] do to_all(lines[l]) end end function musicpara(item,part) -- write line to file if it matches function maybe(line,lbl) if not line then return end local x = match(line,keyword) if x and find(lbl,x) then writeln(part,line) end end label=voices[part] for l=item[1],item[2] do local line = lines[l] local kw = match(line,keyword) if label[kw] then -- Aha! this is one of our voices. maybe(lines[l-1],'U') writeln(part,line) maybe(lines[l+1],'CL') maybe(lines[l+2],'CL') elseif match(line,comment) then writeln(part,line) end end end function labels() -- Identify voice labels for each part voices = {} for _,part in ipairs(parts)do for clause in gmatch(style[part],styleclause) do voiceclause = match(clause,"Voices (.*)") if voiceclause then voices[part]=wordset(voiceclause) end end end end for _,item in ipairs(index) do if item.class == 'style' then stylepara(item); labels() elseif item.class == 'comment' then commentpara(item) else for _,part in ipairs(parts) do musicpara(item,part) end end to_all('') end
Style: Q1 Q2 Q3 Q4 Bass Q1: Voices S1 A1 T1 B1 ; Clefs G G8 G8 F ; Choral Q2: Voices S2 A2 T2 B2 ; Clefs G G8 G8 F ; Choral Q3: Voices S3 A3 T3 B3 ; Clefs G G8 G8 F ; Choral Q4: Voices S4 A4 T4 B4 ; Clefs G G8 G8 F ; Choral Bass: Voices BC ; Clefs F Meter: m4206 %Pages: 8 %Systems: 8 Bars/line: 3 Size: 20 %% \def\writebarno{\ifnum\barno>1\lrlap{\tenrm\it\the\barno\barnoadd}\fi} %% \def\raisebarno{4mm} %% \raggedbottom %% \parskip 9\Interligne plus 7\Interligne minus 7\Interligne %% \input musixadd %% \input musixuad %% \input musixlit %% \tenbf %% P2 %% Ab %% h290m %% \\let\interstaffsav\interstaff\def\interstaff#1{}\interstaffsav{8.6}\ % Bar 1 %% \\\roffset{79.5}{\zcharnote{306}{\medtype\bf 1}}\ %% \\setinterinstrument{1}{3.2mm}\ %% \\setinterinstrument{5}{3.5mm}\ %% \\setinterinstrument{9}{3.5mm}\ %% \\setinterinstrument{13}{3.5mm}\ S1: d25d c4 b2 d L: San---ctus A1: XS3 r0 (~ g25d f4 L: San- T1: r9 L: B1: r9 L: S2: r9 L: A2: r9 L: T2: r9 L: B2: r9 L: S3: r9 L: A3: r9 L: T3: r9 L: B3: r9 L: S4: r9 L: A4: r9 L: T4: r9 L: B4: r9 L: BC: g03 g2- b % Bar 2 S1: (~ c45 b b [ a8 g ] a0 )~ L: San- A1: e45 fs g0 f2 )~ L: - T1: XS6 r0 d25d c4 L: San--- B1: r9 L: S2: r9 L: A2: r9 L: T2: r9 L: B2: r9 L: S3: r9 L: A3: r9 L: T3: r9 L: B3: r9 L: S4: r9 L: A4: r9 L: T4: r9 L: B4: r9 L: BC: c23 e d0 % Bar 3 S1: b04 r L: ctus A1: g05 r L: ctus T1: b24 d (~ c4 b b [ a8 g ] L: -ctus San- B1: @+2.8 (~ g23d f4s e f ( g2 L: San- S2: r9 L: A2: r9 L: T2: r9 L: B2: r9 L: S3: r9 L: A3: r9 L: T3: r9 L: B3: r9 L: S4: r9 L: A4: r9 L: T4: r9 L: B4: r9 L: BC: g23d f4s e f g2 s % Bar 4 S1: d25d c4 b2 d L: San---ctus, A1: XS3 r0 g25d f4 L: San--- T1: a04 )~ b L: ctus, B1: g23 ) fs )~ g0 L: ctus, S2: r9 L: A2: r9 L: T2: r9 L: B2: r9 L: S3: r9 L: A3: r9 L: T3: r9 L: B3: r9 L: S4: r9 L: A4: r9 L: T4: r9 L: B4: r9 L: BC: g23 s fs g0 % Bar 5 S1: (~ c25d d4 e2 b L: San- A1: e25 g r (~ fs L: -ctus, San- T1: e25d d4 c2 d L: San---ctus, B1: (~ c23d b4 a2 b L: San- S2: r9 L: A2: r9 L: T2: r9 L: B2: r9 L: S3: r9 L: A3: r9 L: T3: r9 L: B3: r9 L: S4: r9 L: A4: r9 L: T4: r9 L: B4: r9 L: BC: c23d b4 a2 b % Bar 6 S1: a04 )~ b L: ctus A1: [ e85 f ] g2 f4s )~ g0 L: ctus T1: c45d b8 a4 d d0 L: San----ctus B1: c23 d )~ g0- L: ctus S2: XS8 r0 (~ d45 c b [ c8 d ] L: San- A2: XS4 r2 (~ d45 c b c d2 )~ L: San- T2: XS8 r0 (~ b44 a g [ a8 b ] L: San- B2: XS8 r0 r2 @+2.8 (~ g43 f L: San- S3: XS8 r0 r2 (~ b44 a L: San- A3: r9 L: T3: r9 L: B3: r9 L: S4: r9 L: A4: r9 L: T4: r9 L: B4: r9 L: BC: c23 d g0- % Bar 7 S1: r9 L: A1: r9 L: T1: r9 L: B1: r9 L: S2: e25 )~ e r (~ b4 a L: ctus San- A2: g25 r r0 L: ctus T2: c25 )~ c r0 L: ctus B2: e43 [ f8 g ] a2 )~ d- g L: ctus, San-ctus S3: g44 [ a8 b ] c2 )~ d0 L: ctus A3: (~ g45 f e [ f8 g ] a2 g )~ L: San- T3: (~ e45 d c [ d8 e ] f4 )~ d r2 L: San-ctus B3: XS3 r2 @+2.8 (~ a43 g f [ g8 a ] b2 )~ L: San- S4: XS3 r2 (~ c45 b a [ b8 c ] d2 L: San- A4: XS8 r0 (~ f45d e8 d4 [ e8 f ] L: San- T4: XS8 r0 (~ d45 c b [ c8 d ] L: San- B4: r9 L: BC: c23 a d g- % Bar 8 S1: r9 L: A1: r9 L: T1: r9 L: B1: r9 L: S2: g44 [ a8 b ] c4 gd [ a8 b c ] d2 )~ L: - A2: (~ e45 f g2d [ f8 e ] d4 g )~ L: San- T2: (~ e45 d c [ b8 a ] b0 )~ L: San- B2: c03 g L: ctus, San- S3: r9 L: A3: g05 r L: ctus T3: r9 L: B3: c24 r r0 L: ctus S4: c45 d e [ d8 c ] b0 )~ L: - A4: g95 )~ L: - T4: e25 )~ e d4d [ c8 b a ] g4 L: ctus, San-- B4: @+2.8 (~ g43 f e f g0 )~ L: San- BC: c03 g % Bar 9 S1: r9 L: A1: r9 L: T1: r9 L: B1: r9 L: S2: c25 r r0 L: ctus A2: g25 r r0 L: ctus T2: e25 r r0 L: ctus B2: c23 r r0 L: ctus S3: r9 L: A3: r9 L: T3: r9 L: B3: r9 L: S4: c25 r r4 cd c8 b4 L: ctus Do-mi-nus A4: e45 ed e8 d4 e2 g L: ctus Do-mi-nus De-us, T4: g24 r r4 e+d e8 d4 L: ctus Do-mi-nus B4: c43 c+d c8 b4 c2 g L: ctus Do-mi-nus De-us, BC: c43 c2 b4 c2 g % Bar 10 S1: r9 L: A1: r9 L: T1: r9 L: B1: r9 L: S2: r9 L: A2: r9 L: T2: r9 L: B2: r9 L: S3: r9 L: A3: r9 L: T3: r9 L: B3: r9 L: S4: c25 (~ [ g8 a ] b4 )~ a2d a4 L: De-us Sa-ba- A4: r4 g45d g8 g4 e fs ed e8 L: Do-mi-nus De-us Sa-ba- T4: e25 d c4s d2 c4 L: De-us Sa--ba- B4: r4 c44d c8 g4 a fs ad a8 L: Do-mi-nus De-us Sa-ba- BC: c23d g4+ a fs a2 % Bar 11 S1: d25 d4 d d c bd a8 L: Ple-ni sunt cae--- A1: f25s f4 f (~ g0 sl L: Ple-ni sunt cae- T1: a24 a4 a g a bd c8 L: Ple-ni sunt cae---- B1: d23 d4 d g0 L: Ple-ni sunt cae- S2: XS5 r0 d25 d4 d L: Ple-ni sunt A2: XS5 r0 g25 g4 g L: Ple-ni sunt T2: XS5 r0 b24 b4 b L: Ple-ni sunt B2: XS5 r0 g23 g4 g L: Ple-ni sunt S3: a24 a4 a (~ b c dd c8 L: Ple-ni sunt cae- A3: f25s f4 f g0 L: Ple-ni sunt cae- T3: d25 d4 d b a g2 L: Ple-ni sunt cae--- B3: d23 d4 d (~ g0 sl L: Ple-ni sunt cae- S4: a04 b2 b4 b L: oth Ple-ni sunt A4: d05 g2 g4 g L: oth Ple-ni sunt T4: d05 d2 d4 g- L: oth Ple-ni sunt B4: d03 g2- g4 g L: oth Ple-ni sunt BC: d03 g- s % Bar 12 S1: b04 b2 b L: -li et A1: g05 s )~ g2 d L: li et T1: d05 d L: li et B1: g03 g- L: li et S2: (~ d45 c bd a8 b0 )~ L: cae- A2: g05 g2 g L: cae-li et T2: (~ g44 a bd c8 d2 )~ ( g- L: cae-li B2: g02 (~ g+ sl L: cae-li S3: b04 )~ g2d b4 L: li et A3: d05 g L: li et T3: g04 (~ b4 c d2 )~ L: li et B3: g03 s )~ g2 g- L: li et S4: b44 c d2 b g4 ( g L: cae---li et ter- A4: g45 d2 b d g4 L: cae-li ple-ni sunt T4: b44 a g2 gd ( g4 L: cae---li et B4: g02 g2 g L: cae-li et BC: g02 s g % Bar 13 S1: (~ c45 d ed d8 c0 )~ L: ter- A1: (~ g45 f ed f8s g0 )~ L: ter- T1: (~ e45 d cd d8 e2 e- )~ L: ter- B1: @-2 c92 L: ter- S2: g24 c c4 d e2 L: li et ter--- A2: g95 L: ter- T2: g24 ) g c (~ g4d a8 L: et ter-ra B2: g23 s )~ g g0 L: et ter- S3: e95 L: ter- A3: (~ e45 f gd f8 e4 d c g+ )~ L: ter- T3: c95 L: ter- B3: c93 L: ter- S4: g44 ) e2 g g4 g2 L: ra, et ter-ra A4: g45 c2- c4 c2 c L: cae-li et ter-ra T4: g44 ) cd d8 e4 e2 r L: ter---ra B4: g02 g2 r L: ter-ra BC: c93 % Bar 14 S1: d45 g-d g8 a4 a2 a L: ra glo-ri-a tu-a A1: g45 dd d8 f4 e2 f L: ra glo-ri-a tu-a T1: b44 bd b8 d4 d cs d2 L: ra glo-ri-a tu--a B1: @+3.8 g42 g+d g8 d4 a2+ d- L: ra glo-ri-a tu-a S2: b24 r r r4 ( d L: ra glo- A2: g25 r r r4 ( f L: ra glo- T2: b24 )~ r r r4 ( a L: glo- B2: g23 r r r4 ( d L: ra glo- S3: d25 r r0 L: ra A3: g25 r r0 L: ra T3: b24 r r0 L: ra B3: g22 r r0 L: ra S4: r9 L: A4: r9 L: T4: r9 L: B4: r9 L: BC: g22 g4+ d a2+ d- s % Bar 15 S1: r9 L: A1: r9 L: T1: r9 L: B1: r9 L: S2: d85 ) d c4 b2 cs r L: ri-a tu-a A2: f85 ) f a4 a gs a2 r L: ri-a tu--a T2: a84 ) a e4+ e2 e r L: ri-a tu-a B2: d83 ) d a4 e2+ a- r L: ri-a tu-a S3: XS2 r2 r4 b44 ad a8 a4 g L: O-san-na in ex- A3: XS2 r2 r4 e45 ed e8 f4 e L: O-san-na in ex- T3: XS2 r2 r4 e45 cds c8 d8 b ( c4 L: O-san-na in ex-cel-- B3: XS2 r2 r4 e43 ad a8 d4- e L: O-san-na in ex- S4: r9 L: A4: r9 L: T4: r9 L: B4: r9 L: BC: d43 s a e2+ a- d4 e % Bar 16 S1: XS4 r0 r2 r4 d45 L: O- A1: XS4 r0 r2 r4 f45s L: O- T1: XS4 r0 r2 r4 a44 L: O- B1: XS4 r0 r2 r4 d43 L: O- S2: r9 L: A2: r9 L: T2: r9 L: B2: r9 L: S3: g24 g r0 L: cel-sis A3: d25 d r0 L: cel-sis T3: c45 ) b c2 r0 L: -sis B3: g23 c- r0 L: cel-sis S4: r4 d45 cd c8 d4 b a2 L: O-san-na in ex-cel- A4: r4 g45 ed e8 g4 g f2s L: O-san-na in ex-cel- T4: r4 b44 gd g8 b4 d d2 L: O-san-na in ex-cel- B4: r4 g42 cd c8 b4 g d2+ L: O-san-na in ex-cel- BC: g43 g- c2 b4 g d2+ % Bar 17 S1: [ d85 c b a ] b2 r0 L: san-na A1: d25 d r0 L: san-na T1: [ b84 a g f oes-15 ] g2 r0 L: san-na B1: g23 g- r0 L: san-na S2: r4 d45 [ d8 c b a ] b0 L: O-san-na A2: r4 g45 g2 d0 L: O-san-na T2: r4 b44 [ b8 a g f oes-15 ] g0 L: O-san-na B2: r4 g42 g2+ g0- L: O-san-na S3: XS3 r2 r4 d45 [ d8 c b a ] b2 L: O-san-na A3: XS3 r2 r4 g45 g2 d L: O-san-na T3: XS3 r2 r4 b44 [ b8 a g f oes-15 ] g2 L: O-san-na B3: XS3 r2 r4 g42 g2+ g- L: O-san-na S4: g04 r4 d+ [ d8 c ] b4 L: sis O-san-- A4: g05 r4 g g2 L: sis O-san- T4: d05 r4 b [ b8 a ] g4 L: sis O-san-- B4: g02 r4 g g2+ L: sis O-san- BC: g92 % Bar 18 S1: r4 e45 d2 { d0 L: in ex-cel- A1: r4 g25 g4 { f0s L: in ex-cel- T1: r4 c45 b2 { a0 L: in ex-cel- B1: r4 c43 g2+ { d0 L: in ex-cel- S2: r4 c45 d2 { d0 L: in ex-cel- A2: XS5 r0 r4 d25 e4 L: in ex- T2: r4 g24 g4 a0 L: in ex-cel- B2: XS2 r2 r4 d43 d0 L: in ex- S3: XS4 r0 a24d a4 L: in ex- A3: XS4 r0 d25d d4 L: in ex- T3: XS4 r0 f44s g ( a2 L: in ex cel----- B3: XS4 r0 d23d d4 L: in ex- S4: c45 g2 d+ [ c8 b ] a4 ( a L: na, o-san---na A4: g45 g2 d4 d2 d L: na in ex-cel-sis T4: g44 g2 g4 f2s f L: na in ex-cel-sis B4: c43 c g2 { d0+ L: in ex--cel- BC: c23 g d0+ s % Bar 19 S1: m8200 d05 } \chl6\ r9bd L: sis. A1: m8200 f05 } \chl9\ r9bd L: sis. T1: m8200 a04 } \chl4\ r9db L: sis. B1: m8200 d03 } \chl7\ r9db L: sis. S2: m8200 d05 } \chl4\ r9db L: sis. A2: m8200 f05s \chl6\ r9db L: cel-sis. T2: m8200 (~ d25d c4 )~ \chl4\ r9db L: sis. ~ B2: m8200 d03 \chl4\ r9db L: cel-sis. S3: m8200 a04 \chu2\ r9db L: cel-sis. A3: m8200 d05 \chl6\ r9db L: cel-sis. T3: m8200 a44 ) [ b8 c ] d4 d- \chu{-1}\ r9db L: ---sis. B3: m8200 d03 (~ d2 b4d a8 g9 )~ L: cel-sis. S4: m8200 a44 ) a2 d4 d0 \chl6\ r9b L: in ex-cel-sis. A4: m8200 [ d85 e f oes-15 g ] a4 d- \chl6\ r9db L: in ex-cel-sis. T4: m8200 d44 d d2 (~ d e4 fs g9 )~ L: in ex-cel-sis. B4: m8200 d03 } \chu0\ r9db L: sis. BC: m8200 d03 s \chu0\ r9db
Style: Bass Bass: Voices BC ; Clefs F Meter: m4206 %Pages: 8 %Systems: 8 Bars/line: 3 Size: 20 %% \def\writebarno{\ifnum\barno>1\lrlap{\tenrm\it\the\barno\barnoadd}\fi} %% \def\raisebarno{4mm} %% \raggedbottom %% \parskip 9\Interligne plus 7\Interligne minus 7\Interligne %% \input musixadd %% \input musixuad %% \input musixlit %% \tenbf %% P2 %% Ab %% h290m %% \\let\interstaffsav\interstaff\def\interstaff#1{}\interstaffsav{8.6}\ % Bar 1 %% \\\roffset{79.5}{\zcharnote{306}{\medtype\bf 1}}\ %% \\setinterinstrument{1}{3.2mm}\ %% \\setinterinstrument{5}{3.5mm}\ %% \\setinterinstrument{9}{3.5mm}\ %% \\setinterinstrument{13}{3.5mm}\ BC: g03 g2- b % Bar 2 BC: c23 e d0 % Bar 3 BC: g23d f4s e f g2 s % Bar 4 BC: g23 s fs g0 % Bar 5 BC: c23d b4 a2 b % Bar 6 BC: c23 d g0- % Bar 7 BC: c23 a d g- % Bar 8 BC: c03 g % Bar 9 BC: c43 c2 b4 c2 g % Bar 10 BC: c23d g4+ a fs a2 % Bar 11 BC: d03 g- s % Bar 12 BC: g02 s g % Bar 13 BC: c93 % Bar 14 BC: g22 g4+ d a2+ d- s % Bar 15 BC: d43 s a e2+ a- d4 e % Bar 16 BC: g43 g- c2 b4 g d2+ % Bar 17 BC: g92 % Bar 18 BC: c23 g d0+ s % Bar 19 BC: m8200 d03 s \chu0\ r9db
Style: Q1 Q1: Voices S1 A1 T1 B1 ; Clefs G G8 G8 F ; Choral Meter: m4206 %Pages: 8 %Systems: 8 Bars/line: 3 Size: 20 %% \def\writebarno{\ifnum\barno>1\lrlap{\tenrm\it\the\barno\barnoadd}\fi} %% \def\raisebarno{4mm} %% \raggedbottom %% \parskip 9\Interligne plus 7\Interligne minus 7\Interligne %% \input musixadd %% \input musixuad %% \input musixlit %% \tenbf %% P2 %% Ab %% h290m %% \\let\interstaffsav\interstaff\def\interstaff#1{}\interstaffsav{8.6}\ % Bar 1 %% \\\roffset{79.5}{\zcharnote{306}{\medtype\bf 1}}\ %% \\setinterinstrument{1}{3.2mm}\ %% \\setinterinstrument{5}{3.5mm}\ %% \\setinterinstrument{9}{3.5mm}\ %% \\setinterinstrument{13}{3.5mm}\ S1: d25d c4 b2 d L: San---ctus A1: XS3 r0 (~ g25d f4 L: San- T1: r9 L: B1: r9 L: % Bar 2 S1: (~ c45 b b [ a8 g ] a0 )~ L: San- A1: e45 fs g0 f2 )~ L: - T1: XS6 r0 d25d c4 L: San--- B1: r9 L: % Bar 3 S1: b04 r L: ctus A1: g05 r L: ctus T1: b24 d (~ c4 b b [ a8 g ] L: -ctus San- B1: @+2.8 (~ g23d f4s e f ( g2 L: San- % Bar 4 S1: d25d c4 b2 d L: San---ctus, A1: XS3 r0 g25d f4 L: San--- T1: a04 )~ b L: ctus, B1: g23 ) fs )~ g0 L: ctus, % Bar 5 S1: (~ c25d d4 e2 b L: San- A1: e25 g r (~ fs L: -ctus, San- T1: e25d d4 c2 d L: San---ctus, B1: (~ c23d b4 a2 b L: San- % Bar 6 S1: a04 )~ b L: ctus A1: [ e85 f ] g2 f4s )~ g0 L: ctus T1: c45d b8 a4 d d0 L: San----ctus B1: c23 d )~ g0- L: ctus % Bar 7 S1: r9 L: A1: r9 L: T1: r9 L: B1: r9 L: % Bar 8 S1: r9 L: A1: r9 L: T1: r9 L: B1: r9 L: % Bar 9 S1: r9 L: A1: r9 L: T1: r9 L: B1: r9 L: % Bar 10 S1: r9 L: A1: r9 L: T1: r9 L: B1: r9 L: % Bar 11 S1: d25 d4 d d c bd a8 L: Ple-ni sunt cae--- A1: f25s f4 f (~ g0 sl L: Ple-ni sunt cae- T1: a24 a4 a g a bd c8 L: Ple-ni sunt cae---- B1: d23 d4 d g0 L: Ple-ni sunt cae- % Bar 12 S1: b04 b2 b L: -li et A1: g05 s )~ g2 d L: li et T1: d05 d L: li et B1: g03 g- L: li et % Bar 13 S1: (~ c45 d ed d8 c0 )~ L: ter- A1: (~ g45 f ed f8s g0 )~ L: ter- T1: (~ e45 d cd d8 e2 e- )~ L: ter- B1: @-2 c92 L: ter- % Bar 14 S1: d45 g-d g8 a4 a2 a L: ra glo-ri-a tu-a A1: g45 dd d8 f4 e2 f L: ra glo-ri-a tu-a T1: b44 bd b8 d4 d cs d2 L: ra glo-ri-a tu--a B1: @+3.8 g42 g+d g8 d4 a2+ d- L: ra glo-ri-a tu-a % Bar 15 S1: r9 L: A1: r9 L: T1: r9 L: B1: r9 L: % Bar 16 S1: XS4 r0 r2 r4 d45 L: O- A1: XS4 r0 r2 r4 f45s L: O- T1: XS4 r0 r2 r4 a44 L: O- B1: XS4 r0 r2 r4 d43 L: O- % Bar 17 S1: [ d85 c b a ] b2 r0 L: san-na A1: d25 d r0 L: san-na T1: [ b84 a g f oes-15 ] g2 r0 L: san-na B1: g23 g- r0 L: san-na % Bar 18 S1: r4 e45 d2 { d0 L: in ex-cel- A1: r4 g25 g4 { f0s L: in ex-cel- T1: r4 c45 b2 { a0 L: in ex-cel- B1: r4 c43 g2+ { d0 L: in ex-cel- % Bar 19 S1: m8200 d05 } \chl6\ r9bd L: sis. A1: m8200 f05 } \chl9\ r9bd L: sis. T1: m8200 a04 } \chl4\ r9db L: sis. B1: m8200 d03 } \chl7\ r9db L: sis.
Style: Q2 Q2: Voices S2 A2 T2 B2 ; Clefs G G8 G8 F ; Choral Meter: m4206 %Pages: 8 %Systems: 8 Bars/line: 3 Size: 20 %% \def\writebarno{\ifnum\barno>1\lrlap{\tenrm\it\the\barno\barnoadd}\fi} %% \def\raisebarno{4mm} %% \raggedbottom %% \parskip 9\Interligne plus 7\Interligne minus 7\Interligne %% \input musixadd %% \input musixuad %% \input musixlit %% \tenbf %% P2 %% Ab %% h290m %% \\let\interstaffsav\interstaff\def\interstaff#1{}\interstaffsav{8.6}\ % Bar 1 %% \\\roffset{79.5}{\zcharnote{306}{\medtype\bf 1}}\ %% \\setinterinstrument{1}{3.2mm}\ %% \\setinterinstrument{5}{3.5mm}\ %% \\setinterinstrument{9}{3.5mm}\ %% \\setinterinstrument{13}{3.5mm}\ S2: r9 L: A2: r9 L: T2: r9 L: B2: r9 L: % Bar 2 S2: r9 L: A2: r9 L: T2: r9 L: B2: r9 L: % Bar 3 S2: r9 L: A2: r9 L: T2: r9 L: B2: r9 L: % Bar 4 S2: r9 L: A2: r9 L: T2: r9 L: B2: r9 L: % Bar 5 S2: r9 L: A2: r9 L: T2: r9 L: B2: r9 L: % Bar 6 S2: XS8 r0 (~ d45 c b [ c8 d ] L: San- A2: XS4 r2 (~ d45 c b c d2 )~ L: San- T2: XS8 r0 (~ b44 a g [ a8 b ] L: San- B2: XS8 r0 r2 @+2.8 (~ g43 f L: San- % Bar 7 S2: e25 )~ e r (~ b4 a L: ctus San- A2: g25 r r0 L: ctus T2: c25 )~ c r0 L: ctus B2: e43 [ f8 g ] a2 )~ d- g L: ctus, San-ctus % Bar 8 S2: g44 [ a8 b ] c4 gd [ a8 b c ] d2 )~ L: - A2: (~ e45 f g2d [ f8 e ] d4 g )~ L: San- T2: (~ e45 d c [ b8 a ] b0 )~ L: San- B2: c03 g L: ctus, San- % Bar 9 S2: c25 r r0 L: ctus A2: g25 r r0 L: ctus T2: e25 r r0 L: ctus B2: c23 r r0 L: ctus % Bar 10 S2: r9 L: A2: r9 L: T2: r9 L: B2: r9 L: % Bar 11 S2: XS5 r0 d25 d4 d L: Ple-ni sunt A2: XS5 r0 g25 g4 g L: Ple-ni sunt T2: XS5 r0 b24 b4 b L: Ple-ni sunt B2: XS5 r0 g23 g4 g L: Ple-ni sunt % Bar 12 S2: (~ d45 c bd a8 b0 )~ L: cae- A2: g05 g2 g L: cae-li et T2: (~ g44 a bd c8 d2 )~ ( g- L: cae-li B2: g02 (~ g+ sl L: cae-li % Bar 13 S2: g24 c c4 d e2 L: li et ter--- A2: g95 L: ter- T2: g24 ) g c (~ g4d a8 L: et ter-ra B2: g23 s )~ g g0 L: et ter- % Bar 14 S2: b24 r r r4 ( d L: ra glo- A2: g25 r r r4 ( f L: ra glo- T2: b24 )~ r r r4 ( a L: glo- B2: g23 r r r4 ( d L: ra glo- % Bar 15 S2: d85 ) d c4 b2 cs r L: ri-a tu-a A2: f85 ) f a4 a gs a2 r L: ri-a tu--a T2: a84 ) a e4+ e2 e r L: ri-a tu-a B2: d83 ) d a4 e2+ a- r L: ri-a tu-a % Bar 16 S2: r9 L: A2: r9 L: T2: r9 L: B2: r9 L: % Bar 17 S2: r4 d45 [ d8 c b a ] b0 L: O-san-na A2: r4 g45 g2 d0 L: O-san-na T2: r4 b44 [ b8 a g f oes-15 ] g0 L: O-san-na B2: r4 g42 g2+ g0- L: O-san-na % Bar 18 S2: r4 c45 d2 { d0 L: in ex-cel- A2: XS5 r0 r4 d25 e4 L: in ex- T2: r4 g24 g4 a0 L: in ex-cel- B2: XS2 r2 r4 d43 d0 L: in ex- % Bar 19 S2: m8200 d05 } \chl4\ r9db L: sis. A2: m8200 f05s \chl6\ r9db L: cel-sis. T2: m8200 (~ d25d c4 )~ \chl4\ r9db L: sis. ~ B2: m8200 d03 \chl4\ r9db L: cel-sis.
Style: Q3 Q3: Voices S3 A3 T3 B3 ; Clefs G G8 G8 F ; Choral Meter: m4206 %Pages: 8 %Systems: 8 Bars/line: 3 Size: 20 %% \def\writebarno{\ifnum\barno>1\lrlap{\tenrm\it\the\barno\barnoadd}\fi} %% \def\raisebarno{4mm} %% \raggedbottom %% \parskip 9\Interligne plus 7\Interligne minus 7\Interligne %% \input musixadd %% \input musixuad %% \input musixlit %% \tenbf %% P2 %% Ab %% h290m %% \\let\interstaffsav\interstaff\def\interstaff#1{}\interstaffsav{8.6}\ % Bar 1 %% \\\roffset{79.5}{\zcharnote{306}{\medtype\bf 1}}\ %% \\setinterinstrument{1}{3.2mm}\ %% \\setinterinstrument{5}{3.5mm}\ %% \\setinterinstrument{9}{3.5mm}\ %% \\setinterinstrument{13}{3.5mm}\ S3: r9 L: A3: r9 L: T3: r9 L: B3: r9 L: % Bar 2 S3: r9 L: A3: r9 L: T3: r9 L: B3: r9 L: % Bar 3 S3: r9 L: A3: r9 L: T3: r9 L: B3: r9 L: % Bar 4 S3: r9 L: A3: r9 L: T3: r9 L: B3: r9 L: % Bar 5 S3: r9 L: A3: r9 L: T3: r9 L: B3: r9 L: % Bar 6 S3: XS8 r0 r2 (~ b44 a L: San- A3: r9 L: T3: r9 L: B3: r9 L: % Bar 7 S3: g44 [ a8 b ] c2 )~ d0 L: ctus A3: (~ g45 f e [ f8 g ] a2 g )~ L: San- T3: (~ e45 d c [ d8 e ] f4 )~ d r2 L: San-ctus B3: XS3 r2 @+2.8 (~ a43 g f [ g8 a ] b2 )~ L: San- % Bar 8 S3: r9 L: A3: g05 r L: ctus T3: r9 L: B3: c24 r r0 L: ctus % Bar 9 S3: r9 L: A3: r9 L: T3: r9 L: B3: r9 L: % Bar 10 S3: r9 L: A3: r9 L: T3: r9 L: B3: r9 L: % Bar 11 S3: a24 a4 a (~ b c dd c8 L: Ple-ni sunt cae- A3: f25s f4 f g0 L: Ple-ni sunt cae- T3: d25 d4 d b a g2 L: Ple-ni sunt cae--- B3: d23 d4 d (~ g0 sl L: Ple-ni sunt cae- % Bar 12 S3: b04 )~ g2d b4 L: li et A3: d05 g L: li et T3: g04 (~ b4 c d2 )~ L: li et B3: g03 s )~ g2 g- L: li et % Bar 13 S3: e95 L: ter- A3: (~ e45 f gd f8 e4 d c g+ )~ L: ter- T3: c95 L: ter- B3: c93 L: ter- % Bar 14 S3: d25 r r0 L: ra A3: g25 r r0 L: ra T3: b24 r r0 L: ra B3: g22 r r0 L: ra % Bar 15 S3: XS2 r2 r4 b44 ad a8 a4 g L: O-san-na in ex- A3: XS2 r2 r4 e45 ed e8 f4 e L: O-san-na in ex- T3: XS2 r2 r4 e45 cds c8 d8 b ( c4 L: O-san-na in ex-cel-- B3: XS2 r2 r4 e43 ad a8 d4- e L: O-san-na in ex- % Bar 16 S3: g24 g r0 L: cel-sis A3: d25 d r0 L: cel-sis T3: c45 ) b c2 r0 L: -sis B3: g23 c- r0 L: cel-sis % Bar 17 S3: XS3 r2 r4 d45 [ d8 c b a ] b2 L: O-san-na A3: XS3 r2 r4 g45 g2 d L: O-san-na T3: XS3 r2 r4 b44 [ b8 a g f oes-15 ] g2 L: O-san-na B3: XS3 r2 r4 g42 g2+ g- L: O-san-na % Bar 18 S3: XS4 r0 a24d a4 L: in ex- A3: XS4 r0 d25d d4 L: in ex- T3: XS4 r0 f44s g ( a2 L: in ex cel----- B3: XS4 r0 d23d d4 L: in ex- % Bar 19 S3: m8200 a04 \chu2\ r9db L: cel-sis. A3: m8200 d05 \chl6\ r9db L: cel-sis. T3: m8200 a44 ) [ b8 c ] d4 d- \chu{-1}\ r9db L: ---sis. B3: m8200 d03 (~ d2 b4d a8 g9 )~ L: cel-sis.
Style: Q4 Q4: Voices S4 A4 T4 B4 ; Clefs G G8 G8 F ; Choral Meter: m4206 %Pages: 8 %Systems: 8 Bars/line: 3 Size: 20 %% \def\writebarno{\ifnum\barno>1\lrlap{\tenrm\it\the\barno\barnoadd}\fi} %% \def\raisebarno{4mm} %% \raggedbottom %% \parskip 9\Interligne plus 7\Interligne minus 7\Interligne %% \input musixadd %% \input musixuad %% \input musixlit %% \tenbf %% P2 %% Ab %% h290m %% \\let\interstaffsav\interstaff\def\interstaff#1{}\interstaffsav{8.6}\ % Bar 1 %% \\\roffset{79.5}{\zcharnote{306}{\medtype\bf 1}}\ %% \\setinterinstrument{1}{3.2mm}\ %% \\setinterinstrument{5}{3.5mm}\ %% \\setinterinstrument{9}{3.5mm}\ %% \\setinterinstrument{13}{3.5mm}\ S4: r9 L: A4: r9 L: T4: r9 L: B4: r9 L: % Bar 2 S4: r9 L: A4: r9 L: T4: r9 L: B4: r9 L: % Bar 3 S4: r9 L: A4: r9 L: T4: r9 L: B4: r9 L: % Bar 4 S4: r9 L: A4: r9 L: T4: r9 L: B4: r9 L: % Bar 5 S4: r9 L: A4: r9 L: T4: r9 L: B4: r9 L: % Bar 6 S4: r9 L: A4: r9 L: T4: r9 L: B4: r9 L: % Bar 7 S4: XS3 r2 (~ c45 b a [ b8 c ] d2 L: San- A4: XS8 r0 (~ f45d e8 d4 [ e8 f ] L: San- T4: XS8 r0 (~ d45 c b [ c8 d ] L: San- B4: r9 L: % Bar 8 S4: c45 d e [ d8 c ] b0 )~ L: - A4: g95 )~ L: - T4: e25 )~ e d4d [ c8 b a ] g4 L: ctus, San-- B4: @+2.8 (~ g43 f e f g0 )~ L: San- % Bar 9 S4: c25 r r4 cd c8 b4 L: ctus Do-mi-nus A4: e45 ed e8 d4 e2 g L: ctus Do-mi-nus De-us, T4: g24 r r4 e+d e8 d4 L: ctus Do-mi-nus B4: c43 c+d c8 b4 c2 g L: ctus Do-mi-nus De-us, % Bar 10 S4: c25 (~ [ g8 a ] b4 )~ a2d a4 L: De-us Sa-ba- A4: r4 g45d g8 g4 e fs ed e8 L: Do-mi-nus De-us Sa-ba- T4: e25 d c4s d2 c4 L: De-us Sa--ba- B4: r4 c44d c8 g4 a fs ad a8 L: Do-mi-nus De-us Sa-ba- % Bar 11 S4: a04 b2 b4 b L: oth Ple-ni sunt A4: d05 g2 g4 g L: oth Ple-ni sunt T4: d05 d2 d4 g- L: oth Ple-ni sunt B4: d03 g2- g4 g L: oth Ple-ni sunt % Bar 12 S4: b44 c d2 b g4 ( g L: cae---li et ter- A4: g45 d2 b d g4 L: cae-li ple-ni sunt T4: b44 a g2 gd ( g4 L: cae---li et B4: g02 g2 g L: cae-li et % Bar 13 S4: g44 ) e2 g g4 g2 L: ra, et ter-ra A4: g45 c2- c4 c2 c L: cae-li et ter-ra T4: g44 ) cd d8 e4 e2 r L: ter---ra B4: g02 g2 r L: ter-ra % Bar 14 S4: r9 L: A4: r9 L: T4: r9 L: B4: r9 L: % Bar 15 S4: r9 L: A4: r9 L: T4: r9 L: B4: r9 L: % Bar 16 S4: r4 d45 cd c8 d4 b a2 L: O-san-na in ex-cel- A4: r4 g45 ed e8 g4 g f2s L: O-san-na in ex-cel- T4: r4 b44 gd g8 b4 d d2 L: O-san-na in ex-cel- B4: r4 g42 cd c8 b4 g d2+ L: O-san-na in ex-cel- % Bar 17 S4: g04 r4 d+ [ d8 c ] b4 L: sis O-san-- A4: g05 r4 g g2 L: sis O-san- T4: d05 r4 b [ b8 a ] g4 L: sis O-san-- B4: g02 r4 g g2+ L: sis O-san- % Bar 18 S4: c45 g2 d+ [ c8 b ] a4 ( a L: na, o-san---na A4: g45 g2 d4 d2 d L: na in ex-cel-sis T4: g44 g2 g4 f2s f L: na in ex-cel-sis B4: c43 c g2 { d0+ L: in ex--cel- % Bar 19 S4: m8200 a44 ) a2 d4 d0 \chl6\ r9b L: in ex-cel-sis. A4: m8200 [ d85 e f oes-15 g ] a4 d- \chl6\ r9db L: in ex-cel-sis. T4: m8200 d44 d d2 (~ d e4 fs g9 )~ L: in ex-cel-sis. B4: m8200 d03 } \chu0\ r9db L: sis.
------------------------------- TeX-music@tug.org mailing list If you want to unsubscribe or look at the archives, go to http://tug.org/mailman/listinfo/tex-music