summaryrefslogtreecommitdiff
path: root/macros/generic/bagpipe/GreenTwo.tex
blob: d1b035c3bb61c36c75612839569bd048dc0c5ed7 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
%&bagpipe
\input bagpipe
%
%  GreenTwo.tex
%% WUSPBA massed band setting  two part version
%
\multipart{2}%
%
\newpitch
\ifx\medleyflag\relax\else\nopagenumbers\fi
%
%\landscape
%
%
\line{\moyen The Green Hills of Tyrol\hss
\rm March\hss revised \today\hss PM J Macleod}%
\bigskip
%
\generalmeter{\meterfrac 34}%
%
\debutmorceau
%
% for line 1
\def\barone{\notes\grg\pcps ab|\grg\pcps ab\etn
                  \grip\qlc|\grip\qlc\etn
                  \dblc\pcgc c\gre a|\dblc\pcgc c\gre a\enotes\xbarre}\relax
\def\bartwo{\notes\grg\pcgc c\thrwd d|\grg\pcgc c\thrwd d\etn
                  \grg\qlc|\dble\qle\etn
                  \grip\pcc cd|\gra\pcc ef\enotes\xbarre}\relax
\def\barthree{\notes\grg\pcc cd|\dblc\pcc cf\etn
                  \dblc\pcps ca|\dble\pcps ec\etn
                  \grg\qlN|\grg\qlb\enotes\xbarre}\relax
\def\barfour{\notes\grd\pcc Nd|\grip\pcc bf\etn
                  \dblc\pcps ca|\dble\pcps ec\etn
                  \grg\qla|\grN\qla\enotes\alaligne}\relax
%
% for line 2
\def\barfive{\barone}\relax
\def\barsix{\bartwo}\relax
\def\barseven{\barthree}\relax
\def\bareight{\notes\grd\pcc Na|\grip\pcgc b\grN a\etn
                  \dblc\pcc cN|\dblc\pcps cb\etn
                  \grg\qla|\grN\qla\enotes}\relax
%
% for line 3
\def\barnine{\notes\grg\pcgc a\grd c|\dblc\pcc ce\etn
                   \grg\qlf|\dblh\qlh\etn
                   \gre\qlf|\grg\qlh\enotes\xbarre}\relax
\def\barten{\notes\dble\pcc ed|\grf\pcc gf\etn
                  \dbld\pcc dc|\dblf\pcc fe\etn
                  \grip\qlc|\gra\qle\enotes\xbarre}\relax
\def\bareleven{\notes\grg\pcps cd|\grg\pcps ef\etn
                     \dblc\pcgc c\gre b|\dble\pcc ed\etn
                     \grip\qlb|\shkd\qld\enotes\xbarre}\relax
\def\bartwelve{\notes\grg\pcps bc|\grg\pcps de\etn
                     \dblb\pcgc b\gre a|\dbld\pcc dc\etn
                     \wbirl\qla|\grip\qlc\enotes\alaligne}\relax
%
% for line 4
\def\barthirteen{\barnine}\relax
\def\barfourteen{\barten}\relax
\def\barfifteen{\notes\grg\pcps cd|\grg\pcps ef\etn
                      \grg\qlc|\dble\qle\etn
                      \grip\pcps cb|\gra\pcps ed\enotes\xbarre}\relax
\def\barsixteen{\notes\grg\pcc ab|\grg\pcgc c\thrwd d\etn
                      \dblc\qlc|\dble\qle\etn
                      \grip\qlc|\gra\qle\enotes}\relax
%
\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