From e0c6872cf40896c7be36b11dcc744620f10adf1d Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Mon, 2 Sep 2019 13:46:59 +0900 Subject: Initial commit --- info/examples/lgc2/9-3-22.abcplus | 31 +++++++++++++++++++++++++++++++ 1 file changed, 31 insertions(+) create mode 100644 info/examples/lgc2/9-3-22.abcplus (limited to 'info/examples/lgc2/9-3-22.abcplus') diff --git a/info/examples/lgc2/9-3-22.abcplus b/info/examples/lgc2/9-3-22.abcplus new file mode 100644 index 0000000000..a01f4c8fb1 --- /dev/null +++ b/info/examples/lgc2/9-3-22.abcplus @@ -0,0 +1,31 @@ +% -- guitar diagrams +%%beginps +/SLW {setlinewidth}! +/guitar{ gsave exch 10 sub exch 8 add T 1.5 SLW -0.3 24.6 M 20.6 0 RL stroke + 0.6 SLW 0 0 M 20 0 RL 0 6 M 20 0 RL 0 12 M 20 0 RL 0 18 M 20 0 RL 0 0 M + 0 24 RL 4 0 M 0 24 RL 8 0 M 0 24 RL 12 0 M 0 24 RL 16 0 M 0 24 RL 20 0 M + 0 24 RL stroke 0.5 SLW}! +/gdot{newpath 1.4 0 360 arc fill}! +/gx{28 M -1.3 -1.3 RM 2.6 2.6 RL 0 -2.6 RM -2.6 2.6 RL stroke}! +/go{28 newpath 1.5 0 360 arc stroke}! +/Dm{ guitar 0 gx 4 gx 8 go 20 21 gdot 12 15 gdot 16 9 gdot grestore}! +/Bb{ guitar 0 gx 20 gx 4 21 gdot 8 9 gdot 12 9 gdot 16 9 gdot grestore}! +/C7{ guitar 0 gx 20 go 16 21 gdot 8 15 gdot 4 9 gdot 12 9 gdot grestore}! +/F{ guitar 0 21 gdot 20 21 gdot 0.9 SLW 0 21 M 20 0 RL stroke + 12 15 gdot 4 9 gdot 8 9 gdot grestore}! +%%endps +% -- guitar chords +%%deco Dm 3 Dm 36 0 0 +%%deco Bb 3 Bb 36 0 0 +%%deco C7 3 C7 36 0 0 +%%deco F 3 F 36 0 0 +%%staffwidth 14.5cm +% --- start of displayed header in the book --- +X:1 +T:Defining customized decorations +M:C +K:C treble-8 +% --- end of header --- +"Dm"!Dm!e3/d/ d6 | "Bb"!Bb!z2 d/d3/ "C7"!C7!cB/A/- AG | "F"!F!F8 | + +% --- end of song --- -- cgit v1.2.3