summaryrefslogtreecommitdiff
path: root/macros/generic/bagpipe/Washer.tex
blob: 3976585456f83896808b0e6bd548b5e589f49bbc (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
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
%&bagpipe
\input bagpipe
%
% Washer.tex
%
\newgrace\newpitch\noautoglue
%
\ifx\medleyflag\relax\else\normalwidth\nopagenumbers\fi
%
% for line 1
\def\barone{\notes
 \hdblf\bcsc dd3\bfp{\bd\grN}\bd\etn\grg\bcsc ac3\bap{\bd\grN}\bd\enotes\xbarre}
\def\bartwo{\notes
 \grg\bcsc ee3\bfp\bd\bf\etn\bcsc hf3\bhp\bg\bf\enotes\xbarre}
\def\barthree{\notes
 \grh\bcsc ee3\bgp{\be\gra}\be\etn\grg\bcsc cd3\bcp{\be\gra}\be\enotes\xbarre}
\def\barfour{\notes
 \grg\bcsc ae3{\bap\grd}\bc\be\etn\grh\bcsc ge3\bgp\bf\be\enotes\alaligne}
%
% for line 2
\def\barfive{\barone}
\def\barsix{\bartwo}
\def\barseven{\notes
 \grh\bcsc ff3\bgp\bf\bg\etn\grh\bscc eg3\be\bhp\bg\enotes\xbarre}
\def\bareight{\notes
 \grh\bcsc dd3\bfp{\bd\grN}\bd\etn\shkd\qld\etn\enotes}
%
% for line 3
\def\barnine{\notes
 \hdblf\bcsc dd3\bfp{\bd\grN}\bd\etn\bcsc dd3\bhp{\bd\grN}\bd\enotes\xbarre}
\def\barten{\notes
 \grg\bcsc dd3\bfp{\bd\grN}\bd\etn\bcsc hf3\bhp\bg\bf\enotes\xbarre}
\def\bareleven{\barthree}
\def\bartwelve{\notes
 \grh\bcsc ee3\bgp{\be\gra}\be\etn\grg\bscc fg3\bf\bhp\bg\enotes\alaligne}
%
% for line 4
\def\barthirteen{\barnine}
\def\barfourteen{\barten}
\def\barfifteen{\barseven}
\def\barsixteen{\bareight}
%
% for line 5
\def\barseventeen{\notes
 \sk\bscc ff3\bf\bhp\bf\etn\dbld\bcsc cc3\bdp\bc\bd\enotes\xbarre}
\def\bareighteen{\notes
 \grg\bcsc a e3\bap\bd\bf\etn\bcsc hf3\bhp{\bg\grh}\bf\enotes\xbarre}
\def\barnineteen{\notes
 \sk\bcsc ff3{\bgp\grh}\bf\bg\etn\hdble\bcsc dd3\bep\bc\be\enotes\xbarre}
\def\bartwenty{\barfour}
%
% for line 6
\def\bartwentyone{\barseventeen}
\def\bartwentytwo{\bareighteen}
\def\bartwentythree{\barseven}
\def\bartwentyfour{\bareight}
%
% for line 7
\def\bartwentyfive{\notes
 \grg\qlf\grip\cf\etn\bcsc hf3\bhp\bg\bf\enotes\xbarre}
\def\bartwentysix{\bareighteen}
\def\bartwentyseven{\notes
 \grg\qle\grip\ce\etn\grh\bcsc ge3\bgp\bf\be\enotes\xbarre}
\def\bartwentyeight{\barfour}
%
% for line 8
\def\bartwentynine{\bartwentyfive}
\def\barthirty{\bareighteen}
\def\barthirtyone{\barseven}
\def\barthirtytwo{\bareight}
%
% for line 9
\def\barthirtythree{\bartwentyfive}
\def\barthirtyfour{\bartwentysix}
\def\barthirtyfive{\bartwentyseven}
\def\barthirtysix{\bartwentyeight}
%
% for line 10
\def\barthirtyseven{\notes
 \grg\bscc ff3\bf\bhp\bf\etn\dbld\bcsc cc3\bdp\bc\bd\enotes\xbarre}
\def\barthirtyeight{\bareighteen}
\def\barthirtynine{\barseven}
\def\barforty{\bareight}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
\line{\moyen The Irish Washerwoman\hss
\rm Jig\hss revised \today\hss}
\bigskip
%
\generalmeter{\meterfrac 68}%
%
\debutmorceau
%
\autolines{13}{4}{13}%
% line 1
\leftrepeatsymbol
\pickup{\ch}%
\barone\bartwo\barthree\barfour
% line 2
\autolines{11}{4}{13}%
\barfive\barsix\barseven\bareight\setrightrepeat\suspmorceau
% line 3
\line{\twelvebf Part 2\hss}
\autolines{12}{4}{13}%
\repreppickup{\ch}%
\barnine\barten\bareleven\bartwelve
% line 4
\barthirteen\barfourteen\barfifteen\barsixteen\setrightrepeat\suspmorceau
% line 5
\line{\twelvebf Part 3\hss}
\autolines{12}{4}{13}%
\repreppickup{\ch}%
\barseventeen\bareighteen\barnineteen\bartwenty
% line 6
\autolines{11}{4}{13}%
\bartwentyone\bartwentytwo\bartwentythree\bartwentyfour
\setrightrepeat\suspmorceau
% line 7
\line{\twelvebf Part 4\hss}
\autolines{12}{4}{13}%
\reppickup{\ce}%
\bartwentyfive\bartwentysix\bartwentyseven\bartwentyeight
% line 8
\autolines{11}{4}{13}%
\bartwentynine\barthirty\barthirtyone\barthirtytwo\suspmorceau
% line 9
\reppickup{\ce}%
\barthirtythree\barthirtyfour\barthirtyfive\barthirtysix
% line 10
\barthirtyseven\barthirtyeight\barthirtynine\barforty
\finmorceau
%
\byemedley
\bye