diff options
Diffstat (limited to 'Master/texmf-dist/doc/generic/bagpipe/Green.tex')
-rw-r--r-- | Master/texmf-dist/doc/generic/bagpipe/Green.tex | 61 |
1 files changed, 61 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/generic/bagpipe/Green.tex b/Master/texmf-dist/doc/generic/bagpipe/Green.tex new file mode 100644 index 00000000000..d0b11b49ca1 --- /dev/null +++ b/Master/texmf-dist/doc/generic/bagpipe/Green.tex @@ -0,0 +1,61 @@ +%&bagpipe +\input bagpipe +%\let\usemusixtex\relax +% +% Green.tex +%% WUSPBA massed band setting +% +\newpitch\newgrace\noautoglue +\ifx\medleyflag\relax\else\nopagenumbers\fi +% +%\landscape +% +% for line 1 +\def\barone{\notes\grg\pcps ab\etn\grip\qlc\etn\dblc\pcgc c\gre a\enotes\xbarre} +\def\bartwo{\notes\grg\pcgc c\thrwd d\etn\dble\qle\etn\gra\pcc ef\enotes\xbarre} +\def\barthree{\notes\dblc\pcc cf\etn\dble\pcps ec\etn\grg\qlb\enotes\xbarre} +\def\barfour{\notes\grip\pcc bf\etn\dble\pcps ec\etn\grN\qla\enotes\alaligne} +% +% for line 2 +\def\barfive{\barone} +\def\barsix{\bartwo} +\def\barseven{\barthree} +\def\bareight{\notes\grip\pcgc b\grN a\etn\dblc\pcps cb\etn\grN\qla\enotes} +% +% for line 3 +\def\barnine{\notes\dblc\pcc ce\etn\dblh\qlh\etn\grg\qlh\enotes\xbarre} +\def\barten{\notes\grf\pcc gf\etn\dblf\pcc fe\etn\gra\qle\enotes\xbarre} +\def\bareleven{\notes\grg\pcps ef\etn\dble\pcc ed\etn\shkd\qld\enotes\xbarre} +\def\bartwelve{\notes\grg\pcps de\etn\dbld\pcc dc\etn\grip\qlc\enotes\alaligne} +% +% for line 4 +\def\barthirteen{\barnine} +\def\barfourteen{\barten} +\def\barfifteen{\notes\grg\pcps ef\etn\dble\qle\etn\gra\pcps ed\enotes\xbarre} +\def\barsixteen{\notes\grg\pcgc c\thrwd d\etn\dble\qle\etn\gra\qle\enotes} +% +\line{\moyen The Green Hills of Tyrol\hss +\rm March\hss revised \today\hss PM J Macleod} +\bigskip +% +\generalmeter{\meterfrac 34}% +% +\debutmorceau +% +\autolines{13}{4}{48}% +%line 1 +\leftrepeatsymbol +\barone\bartwo\barthree\barfour +% line 2 +\barfive\barsix\barseven\bareight\setrightrepeat\suspmorceau +% line 3 +\reprmorceau +\autolines{12}{4}{48}% +\leftrepeatsymbol +\barnine\barten\bareleven\bartwelve +% line 4 +\autolines{12}{4}{48}% +\barthirteen\barfourteen\barfifteen\barsixteen\setrightrepeat\suspmorceau +% +\byemedley +\bye |