home *** CD-ROM | disk | FTP | other *** search
/ ARM Club 3 / TheARMClub_PDCD3.iso / hensa / demo / pms_1 / uucode / RGHSamples / Legend < prev    next >
Text File  |  1995-03-15  |  13KB  |  207 lines
  1. @ PMS2 3.26
  2. @
  3. Pageheading 12 "\pe\||\po\" 28
  4. Heading 12 "|\it\T\*<\o John Simons" 30
  5. Heading 30 "|Legend" 50
  6. Heading 12 "||Sir Arnold Bax (1883−1953)" 12
  7. Heading 8 "||\it\Edited by Richard G. Hallas" 30
  8. Footing "" -4
  9. Footing 12 "This edition and typography copyright © 1995  Fand Music Press" 0
  10. Footing 8 "||Original title:  Legends Nº 1"
  11. LastFooting "" 10
  12. LastFooting 8 "Typesetting by \it\KeyNote||\rm\Graphics origination" 10
  13. LastFooting 8 "Huddersfield, HD4 5PN||by Richard G. Hallas"
  14. Key C
  15. Time 3/4
  16. Timefont extra 1
  17. Longrestfont 12 extra 1
  18. Repeatbarfont 10 extra 1
  19. Repeatstyle 4
  20. @ Rehearsalmarks boxed 12 extra 1
  21. @
  22. Staffspacing 1/0 2/60 3/60 4/0 5/60
  23. Suspend 3,6
  24. Systemgap 70
  25. @ Breakbarlines 1
  26. Barnumbers line 8  @ 8 is the size. Can replace 'line' by interval
  27. Bracket
  28. Brace 1-6
  29. @ Thinbracket
  30. Copyzero 1
  31. @ Breverests
  32. Clefsize 0.9
  33. Vertaccsize 8
  34. OldBeamBreak
  35. Beamthickness 2
  36. Maxbeamslope 0.2 0.2
  37. Shortenstems 2
  38. Sluroverwarnings
  39. @ Nospreadunderlay
  40. @ Nocheck
  41. Unfinished
  42. @
  43. Hairpinwidth 6 @ 7 is default
  44. Hairpinlinewidth 0.5 @ 0.2 is default
  45. Startlinespacing 4 0 4
  46. Bracestyle 1
  47. Tripletfont 8 bolditalic @ Default size is 10, roman
  48. Tripletlinewidth 0.4
  49. Textsizes 10 8 12 7 15/0.66
  50. Underlaystyle 1
  51. Underlaysize 10
  52. Overlaysize 10
  53. Footnotesize 8
  54. Justify left right top bottom
  55. Linelength 520
  56. Pagelength 712
  57. Magnification 1
  58. Notespacing *1
  59.  
  60. *Define Trans() [playtranspose &&1]
  61.  
  62. *Define s8va &Trans(12)  "\it\8-"/ol/l2/" -| \mf\\167\"/u4/"\it\(8)"
  63. *Define s8vb &Trans(-12) "\it\^8-"/ul/l2/" -| \mf\\168\"/d2/"\it\(8)"
  64. *Define e8va "#"/ol/r8
  65. *Define e8vb "#"/ul/r8
  66.  
  67. *Define Ped   "\mf\£"/b26
  68. *Define PedUp "\mf\$"/s4/b25/e
  69.  
  70. *Define pppv [playvolume 3]
  71. *Define ppv  [playvolume 4]
  72. *Define pv   [playvolume 6]
  73. *Define mpv  [playvolume 8]
  74. *Define mfv  [playvolume 9]
  75. *Define fv   [playvolume 11]
  76. *Define ffv  [playvolume 13]
  77. *Define fffv [playvolume 14]
  78. *Define sfv  [playvolume 15]
  79.  
  80. *Define ppp &pppv "\x1\ppp"/m/e
  81. *Define pp  &ppv  "\x1\pp"/m/e
  82. *Define p   &pv   "\x1\p"/m/e
  83. *Define mp  &mpv  "\x1\mp"/m/e
  84. *Define mf  &mfv  "\x1\mf"/m/e
  85. *Define f   &fv   "\x1\f"/m/e
  86. *Define ff  &ffv  "\x1\ff"/m/e
  87. *Define fff &fffv "\x1\fff"/m/e
  88. *Define sf  &sfv  "\x1\sf"/m/e
  89.  
  90. *Define f1  "\x1\1"/a/s2/c
  91. *Define f2  "\x1\2"/a/s2/c
  92. *Define f3  "\x1\3"/a/s2/c
  93. *Define f4  "\x1\4"/a/s2/c
  94. *Define f5  "\x1\5"/a/s2/c
  95.  
  96. Draw Notebracket
  97.   @ Pair of round parentheses enclosing note or chord
  98.   @ Width in the centre auto-adjusts according to size of bracket
  99.   @
  100.   @ Left bracket (inside):
  101.   -1 headleft sub accleft sub  stembottom 1 sub moveto @ Bottom
  102.   -1 headleft sub accleft sub stemtop stembottom sub 8 div 1 add sub  stembottom stemtop stembottom sub 4 div add @ bezier point 1 (lower)
  103.   -1 headleft sub accleft sub stemtop stembottom sub 8 div 1 add sub  stemtop stemtop stembottom sub 4 div sub @ bezier point 2 (upper)
  104.   -1 headleft sub accleft sub  stemtop 1 add curveto @ Top
  105.   @ Left bracket (outside):
  106.   -1 headleft sub accleft sub stemtop stembottom sub 8 div dup 2 1 roll 0.25 mul 1.5 add add sub  stemtop stemtop stembottom sub 4 div sub @ bezier point 1 (upper)
  107.   -1 headleft sub accleft sub stemtop stembottom sub 8 div dup 2 1 roll 0.25 mul 1.5 add add sub  stembottom stemtop stembottom sub 4 div add @ bezier point 2 (lower)
  108.   -1 headleft sub accleft sub  stembottom 1 sub curveto @ Bottom
  109.   0.5 setlinewidth fill @ Left bracket complete
  110.   @
  111.   @ Right bracket (inside):
  112.   1 headright add  stembottom 1 sub moveto @ Bottom
  113.   1 headright add stemtop stembottom sub 8 div 1 add add  stembottom stemtop stembottom sub 4 div add @ bezier point 1 (lower)
  114.   1 headright add stemtop stembottom sub 8 div 1 add add  stemtop stemtop stembottom sub 4 div sub @ bezier point 2 (upper)
  115.   1 headright add  stemtop 1 add curveto @ Top
  116.   @ Right bracket (outside):
  117.   1 headright add stemtop stembottom sub 8 div dup 2 1 roll 0.25 mul 1.5 add add add  stemtop stemtop stembottom sub 4 div sub @ bezier point 1 (upper)
  118.   1 headright add stemtop stembottom sub 8 div dup 2 1 roll 0.25 mul 1.5 add add add  stembottom stemtop stembottom sub 4 div add @ bezier point 2 (lower)
  119.   1 headright add  stembottom 1 sub curveto @ Bottom
  120.   0.5 setlinewidth fill @ Right bracket complete
  121. Enddraw
  122.  
  123. Draw RHbracket
  124.   @ Square left-bracket with jog at bottom only, for piano RH on lower stave
  125.   @ Requires one argument to specify length of main part of bracket
  126.   @
  127.   -1 headleft sub accleft sub headbottom linebottom add moveto
  128.   -2 0 rlineto
  129.   0 exch rlineto
  130.   0.5 setlinewidth stroke
  131. Enddraw
  132.  
  133. Draw LHbracket
  134.   @ Square left-bracket with jog at top only, for piano LH on upper stave
  135.   @ Requires one argument to specify length of main part of bracket
  136.   @
  137.   -1 headleft sub accleft sub headtop linetop sub moveto
  138.   -2 0 rlineto
  139.   0 exch sub 0 exch rlineto
  140.   0.5 setlinewidth stroke
  141. Enddraw
  142.  
  143. Textfont extra 1 "PMS.Alpha"
  144.  
  145. Midichannel 1 "piano"/15 1-6
  146. Playtempo 90
  147.  
  148. Page 3
  149.  
  150. [Staff 1] [Treble 1] [Stems above] [Ties above] [Dots above] [Hairpins middle]
  151. [Footnote "" 4 Footnote 12 "Copyright © 1995  Sir Arnold Bax Estate"]
  152. [beamslope 0] &f5/u2 "\bf\Moderato"/a28/s3/ts &p [stems auto] [slur/a] {6 e''=;&f2;a'=;&f1;e'=$b'=a'=e'=} {6/b e'=$b=a=e=;&f3;b=;&f2;a=} {6 &f1/d2 a=b=a=e'=;&f1;e'=a'=} | [2] [beamslope 0] {6 e''=a'=e'=$b'=a'=e'=} {6/b e'=$b=a=e=b=a=} {6 a=b=a=e'=e'=a'=} | [beamslope 0] {6 e''=a'=e'=;>/u4;$b'=a'=e'=} {6/b e'=;[space -3];$]b=a=e=b=a=} > &ppv {6 a=b=a=e'=e'=a'=} | @4
  153. [beamslope 0] {6 e''=a'=e'=$b'=a'=e'=} {6/b e'=$b=a=e=b=a=} {6 a=b=a=e'=e'=a'=} | [beamslope 0] {6 e''=a'=e'=$b'=a'=e'=} {6/b e'=$b=a=e=b=a=} &pv {6/b/u2 e=;<;a`=;&mpv;e=b=;&mfv;a=e'=} < | &fv %]E'.\su\ [es] | &p/d4 [beamslope 0] [slur/a/slco6/lr2/rr1] &s8va {6 e''=a'=e'=$b'=a'=;&e8va;e'=} &Trans(-12) [beamslope 0] {6 e''=$b'=a'=e'=b'=a'=} {6 a'=b'=a'=e''=e''=e'=} | @8
  154. [newline] %]E'.\su\ [es] | &p/d3 [beamslope 0] [slur/a/co6/lr2/ru8/cru4] &s8va {6 e''=a'=e'=$b'=a'=;&e8va;e'=} &Trans(-12) [beamslope 0] {6 e''=$b'=a'=e'=b'=a'=} {6 a'=b'=a'=e''=e''=e'=} [es] | "\bf\poco rubato"/a/s3/u20 [notes off] [slur/a/h/slco12/ld4] [beammove -8] {a-\suc\;[notes on];[space 4];(d'-\sd\%f-)(a-\sd\#c-)} {(%c'-e-)(a-#c-)(#f-$b`-)} {($e-g`-)(f-b`-)(%c-\c\#d`-\c\)} | (%E.A`.E`.)_/1b | @12
  155. (e-a`-e`-) [es] r- r r-. &mfv q= | e-\!>\e-\!>\ e\!>\ </w5 (d-\>\$b`-g`-)(e-\>\c-a`-) < | >/w5 (#f-\>\d-$b`-)(d-\>\b`-g`-) > (e\>/u2\ca`)_/1b [beamslope -0.15] (e-.c-.a`-.);"\rm\[  ]"/a/s2/c/d8/r0.5;a`=\!./u2.5\ | e-\!>\e-\!>\ e\!>\ </d8/w5 a`-\!>\(e-c-) < | >/d8/w5 (d-\!>\b`-)(g-\!>\$d-$b`-) > (a\!>\ec)_/1b (a-.e-.c-.)e=\.\ | @17
  156. "più \x1\f"/m/c &fv (a-\>\e-c-)(a-\>\f-$d-) (a\>\ec) </w5 (g-\>\%d-$b`-)(a-\>\e-c-) < | (%c'-\>\#f-#d-#c-)(g-\>\%f-d-c-) (a\>/u2\e%c)_/1b (a-.e-.c-.)e=\.\ | (a-\>\e-c-)(a-\>\f-$d-) "cresc."/m (a\>\ec) (e-\>\%d-$b`-#g`-)(a-\>\e-c-a`-) | (g=\>\d=$b`=g`=)(g=\>\#c=b`=g`=)(g=\>\$e=b`=g`=)(d'=\>\$b=g=d=) < (e'.\>\%c'.a.%e.) (a=\>\e=%c=a`=)(e'=\>\e=) < | @21
  157. &sf (#F'\su\#C'A#F)_/1a "dim."/m &mfv (f'=\su\c'=a=f=)(e'=e=);&mpv;(c'=a=#c=)f= | &p/m (E'%C'AE)_/1b (e'-c'-a-e-);&mfv;(a=e=a`=)(c'=a=c=) | "poco \x1\sf"/m/e/r10/u4 &fv [smove 8] (F'\!>su\F)_/1b &mfv (f'=$b=f=)e'=a=#g= | [slur/a] &mpv (c'ec)_/b(a-e-c-) [es] r- &p [slur/b] {(a-#c-)(%c'-e-);[space -6];(a-#]c-)} | (%c'e) (a-#c-) [es] r- [bass 0] [slur/a/slco2/clu4] &pp {(a-#c-)(%c'-e-)(a-#c-)} | @26 OP1
  158. &ppv (c'-e-%c-) [es] [treble 1] [slur/a/co6] {/b (c'=e=)a=g=} Q | q &mpv {/b (e'=%g=)b=a=,}{/b (c'=e=)a=g=} &pv {/b (b=d=)#g=#f=,}{/b (a=c=)f=e=} [es] | r- [slur/a/co6] {/b (c'=e=)a=g=} Q | q &mpv {/b (e'=%g=)b=a=,}{/b (c'=e=)a=g=} &pv {/b (b=d=)#g=#f=,}{/b (a=c=)f=e=} [es] | @30
  159. &p r- [slur/a/h/e/ld4/slco6/srco8/rr7] {/b (c'=e=)a=g=} Q | Q [space 4] &mpv {/b (d'=#f=)b=a=,}{/b/d1 (c'=e=)a=#g=} | "più \x1\f"/m/c &mfv {/b (%c'=e=)a=#g=,}{/b/d1 (e'=%g=)c'=b=} Q | @33
  160. Q {/x q-. q- q=} [es] |
  161. [endstaff]
  162.  
  163. [Staff 2 "Piano"/m/e] [Treble 1] [Stems below] [Ties below] [Dots below] [Hairpins middle]
  164. &ppv [4] Q! | @4
  165. [2] Q! | &fv "poco \x1\f"/m/c [slur/b/w/co20/clu18] [smove 19] ($e'\>\$bg) >/u2 &mfv (d'a#f) &mpv (#c'-#g-%f-);[line/b/i/ol/or/lu4/lr2/rl4/rd14];(%c'-%)<1e-) > | [notes off] a` [el] q a`\c\ [notes on] [es] | @8
  166. &fv "poco \x1\f"/m/c [slur/b/w/co20/clu18] "\rm\[\mf\\*d*d\U\*u*u\\rm\\*>*>*>*>*>*>\]"/a/d2/r16 [smove 19] ($e'$bg) >/u2 &mfv (d'-a-#f-)#c'- &mpv (%c'-#<5g-%<10f-);[line/b/i/ol/or/lu4/lr2/rl4/rd12];(g-%)e-) > | [notes off] a` [el] q a`\c\ [notes on] [es] | [2] Q! | @12
  167. Q q-. &mfv "poco \x1\f"/m/e/d4 "\rm\[  ]"/a/s2/c/d8/r0.5 "eroica"/a/u8 a`=\su!./u4\_ | (C\sd\A`) q | Q q-. a`=\msu\_ | (C\sd\A`) [smove 5] g` | #f`-;[line/b/i/ol/or/lr6/lu13/rl8/rd40];%f`- q [el] q | @17
  168. [4] Q! | @21
  169. Q! | q "cresc."/m Q | &fv c'\tr\ "dim."/m/u4 &mfv [space 8] b q | Q! | Q [bass 0] q | @26 OP1
  170. q- [treble 1] q- [space 4] &ppv {(d'=#f=)b=a=,};</d6/w7;{(e'=#g=)c'=b=} &pv {(%g'=$b=)e'=d'=,}{(e'=%g=)#]c'=%b=} | &mpv  {(d'=#f=)$b=a=,};<;>/d6/w7;{(%f'=#g=)%)c'=%b=} q {/x q-q=} > q- | q [space 4] &ppv {(d'=#f=)b=a=,};</d4/w7;{(e'=#g=)c'=b=} &pv {(%g'=$b=)e'=d'=,}{(e'=%g=)#c'=%b=} | &mpv {(d'=#f=)$b=a=,};<;>/d4/w7;{(%f'=#g=)%)c'=%b=} q {/x q-q=} > q- | @30
  171. &pv q [space 4] {(d'=#f=)b=a=,};"cresc."/m/d4;{(e'=#g=)c'=b=} {(%g'=$b=)e'=d'=,}{(e'=%g=)#c'=%b=} | < &mpv {($b'=d'=)g'=f'=,}{(a'=%)c'=)f'=e'=} < {(g'=$b=)e'=d'=,}{(e'=%g=)#c'=%b=} q | &mfv {/x q-q=} </w7 {/x q-q=} [space 4] {(#f'=a=)d'=c'=,}{(g'=$b=)e'=d'=} {($b'=$d'=)g'=%f'=,};<;{(a'=c'=)#f'=e'=} | @33
  172. &f {($e''=\>\#f'=)c''=$b'=,}{(d''=%f'=)b'=a'=} "dim. molto"/m {(#c''=e'=)a'=#g'=,}{(%c''=#d'=)g'=%g'=} {(%]b'=%d'=)g'=#f'=,}{(a'=#c'=)f'=e'=} |
  173. [endstaff]
  174.  
  175. [Staff 3] [Treble 1] [Hairpins middle]
  176. [20] R! | R! [reset] q < q. q=q= < | &sf r- "\rm\m.d."/a/s2 &mpv (#g-#g`-) (#f-#f`-)(#d-#d`-) "dim."/m/d2 %c- r- [assume bass 0] [suspend] | [4] R! | @26 OP1
  177. [8] R! |
  178. [endstaff]
  179.  
  180. [Staff 4] [Bass] [Stems above] [Ties above] [Dots above]
  181. &pv R!\l4\ | [move -6] (e'-\g/\d'-\g\$b-\g\g-\g\) [space 6] [slur/a/h/d16] [slur/a/h/d26/lr5/rl10/ci1] [slur/a/h/d30/lr5/rl10/ci2] (E'\!>\D'BG) (e'#c'b) [es] [es] [es] [reset] Q g-\sd\#f- | (E'.%C'.A.E.) | [move -6] (e'-\g/\d'-\g\%b-\g\a-\g\#f-\g\) [space 8] (E'\!>\D'BAF)_ &ppv (e'#c'$b%f) | @4
  182. (E'.%C'.A.E.)_ | (E'C'AE)_ (e'-c'-a-e-) r- | &fv (#c'g$<4e) &mfv (d'a%e) &mpv (#d'-#g-f-)e'- [reset] Q q- [noteheads only] [draw notebracket] e'-\m\ [noteheads normal] [treble 1] | &pv {3 (a-\sp\c-e`-)(c'-e-)(a-#c-)} (%c'e) (a-%c-) r- [bass 0] | @8
  183. &fv (#c'g$<4e) &mfv (d'a%e) &mpv (#d'-#g-f-)e'- [reset] Q q- [noteheads only] [draw notebracket] e'-\m\ [noteheads normal] [treble 1] | &pv {3 (a-\sp\c-e`-)(d'-#f-)(a-#c-)} (%c'e) (a-%c-) r- | {/x [beamslope 0 beammove 8.5] (a-\su\c-);[notes off];f'-\c sd\q-} [notes on] q {/x q [bass 0] q-} | [slur/b/h/u4/rd8/e/srci4] "smorzando"/b/d6 (a`=a``=)e`=$b`=a`= e=b`=a`=e`= f`=e`=a``=e`= | @12
  184. a`=e`=$b`=a`= e=b`=a`=e`= f`=e`=a``=e`= | (a`=a``=)e`=$b`=a`= e=b`=a`=e`= f`=e`=a``=e`= | a`=e`=$b`=a`= e=b`=a`=e`= f`=e`=a``=e`= | (a`=a``=)e`=$b`=a`= e=b`=a`=e`= f`=e`=a``=e`= | a`=e`=$b`=a`= e=b`=a`=e`= f`=e`=a``=e`= | @17
  185. &mpv (a`=a``=)e`=$b`=a`= e=b`=a`=e`= f`=e`=a``=e`= | a`=e`=$b`=a`= e=b`=a`=e`= f`=e`=a``=e`= | (a`=a``=)e`=$b`=a`= e=b`=a`=e`= f`=e`=a``=e`= | &mfv a`=e`=$b`=a`= e=b`=a`=e`= f`=e`=a``=e`= [es] | @21
  186. [ulhere -4] &mpv &s8vb (a`=d`=)d=(%)b`=e`=)e= (#c=#f`=)#f=(#d=#g`=)#g= (e=a`=)a=(f=b`=);&e8vb;b= &Trans(12) | &p/a/u9 (e`=%c`=)%c=(#f`=d`=)d= "cresc."/a/u4 &mpv (%)g`=e`=)e=(b`=g`=)g= &mfv ($b`=#)f`=)#f=(a`=%f`=)%f= | &fv d' &mfv #c' (%c'#ge) | &mpv (aea`)_/1b (a-e-a`-) q. | q. r- [slur/b/slco2] &ppv {%f`-a`-#f`-} | @26 OP1
  187. (A`E`A``)_/1b (a`-e`-a``-) [es] r- | r r r-. &p/b (a`=\>\e`=a``=) | "marcato"/b (e-\>\a`-e`-)(e-\>\a`-e`-) (e\>\a`e`) (d-\>\g`-d`-)(e-\>\a`-e`-) | (#f-\>\$b`-#f`-)(d-\>\%f`-d`-) (e\>/u2\a`e`)_/1a (e-.a`-.e`-.)(a`=\>\e`=a``=) | @30
  188. (e-\>\a`-e`-)(e-\>\a`-e`-) (e\>\a`e`) (a`-\>\e`-a``-)(e-\>\a`-e`-) | &mpv (d-\>\g`-d`-)(g-\>\d-g`-) (a\>/u2\ea`)_/1b (a-.e-.a`-.);&mfv;(e=\>\a`=e`=) | (a-\>\e-a`-)(a-\>\e-a`-) (a\>\ea`) (g-\>\$e-g`-)(a-\>\%e-a`-) | @33
  189. &fv (c'-\>\#f-$e-)(g-\>\$b`-$e`-) &mfv "\rm\[\mf\\*d*d\U\*u*u\\rm\\*>*>*>*>*>*>\]"/b/l3/u1 (a%ea`)_/1b (a-.e-.a`-.);&ppv;(e=a`=%e`=) |
  190. [endstaff]
  191.  
  192. [Staff 5] [Bass] [Stems below] [Ties below] [Dots below]
  193. &pv (A`.E`.\:\A``.\:\)_ | (a`-e`-a``-) r-\l-18\ r\l-18\ r\l-18\ | r\l-16\ (A`E`A``)_ | (a`-e`-a``-) r-\l-16\ r\l-16\ &ppv r\l-16\ | @4
  194. R!\l-12\ | [sghere +8] [move -6] "\it\^8-"/ul/l12/" -| \mf\\168\"/d2/"\it\(8)" &Trans(-12) (a`-\g/\e`-\g\a``-\g\) [space 6] (A`E`A``)_ &e8vb (a`-e`-a``-) &Trans(12) r- | [space -4] [move -12] &fv a`-\g/\_ [space 6] A`. [treble 1] | Q! [bass 0] | @8
  195. [space -4] [move -12] a`-\g/\_ [space 6] A`. [treble 1] | Q! | Q {/x q [bass 0] q-} | Q! | @12
  196. [5] Q! | @17
  197. [4] Q! | @21
  198. [2] Q! | [move -6] &fv (e`-\g/\e``-\g\) (AGE) q | q. &pv r- [slur/a/co4] {f-a-#f-} | a %f- [es] q. &ppv | @26 OP1
  199. [4] Q! | @30
  200. [3] Q! | @33
  201. Q! |
  202. [endstaff]
  203.  
  204. [Staff 6] [Bass]
  205. [34] R! | @ NB This part is used in the real thing...
  206. [endstaff]
  207.