summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
Diffstat
-rw-r--r--stafftab-examples/example-score.ly67
-rw-r--r--stafftab-examples/nyan.ly85
-rw-r--r--stafftab-examples/proclamation.ly120
-rw-r--r--stafftab-examples/underground.ly128
4 files changed, 400 insertions, 0 deletions
diff --git a/stafftab-examples/example-score.ly b/stafftab-examples/example-score.ly
new file mode 100644
index 0000000000..9771f1275c
--- /dev/null
+++ b/stafftab-examples/example-score.ly
@@ -0,0 +1,67 @@
+\version "2.14.2"
+\include "stafftab.ly"
+
+\header {
+ copyright = "copyright"
+ title = "StaffTab™ for Lilypond"
+ subtitle = "Album title"
+ composer = "unknown"
+ instrument = "Grand Stick (Classic Tuning)"
+ arranger = "arr. Ricardo Wurmus"
+}
+
+% ------------------------------------------------------
+% Named music
+% ------------------------------------------------------
+
+melody = {
+ \relative f' {
+ c'8-1\4 d-2 e4-3 f\3 g8-4
+ <g-2\2 c,-3\3> ~ <g c,>
+ }
+}
+
+bass = {
+ \relative f {
+ c,8-1\8
+ d e f4 g
+ }
+}
+
+% ------------------------------------------------------
+% Score structure
+% ------------------------------------------------------
+
+\score {
+ % two joined staves
+ \new GrandStaff
+ <<
+ \new StaffTab {
+ \clef "treble_8"
+ \key g \major
+ \set Staff.midiInstrument = #"electric guitar (jazz)"
+ % upper six strings of the classic 10-string tuning
+ \set Staff.stringTunings = #(stick-string-group
+ (ten-string-stick stick-classic-tuning)
+ 'melody)
+
+ \new StickVoice {
+ \melody
+ }
+ }
+
+ \new StaffTab {
+ \clef "bass_8"
+ \key g \major
+ \set Staff.midiInstrument = #"electric guitar (jazz)"
+ % lower six strings of the classic 10-string tuning
+ \set Staff.stringTunings = #(stick-string-group
+ (ten-string-stick stick-classic-tuning)
+ 'bass)
+
+ \new StickVoice {
+ \bass
+ }
+ }
+ >>
+}
diff --git a/stafftab-examples/nyan.ly b/stafftab-examples/nyan.ly
new file mode 100644
index 0000000000..3694d6fea4
--- /dev/null
+++ b/stafftab-examples/nyan.ly
@@ -0,0 +1,85 @@
+\version "2.14.2"
+\include "stafftab.ly"
+
+\header {
+ copyright = "copyright"
+ title = "Nyan"
+ subtitle = "Nyan Nyan"
+ composer = "unknown"
+ instrument = "Grand Stick (Classic Tuning)"
+ arranger = "arr. Ricardo Wurmus"
+}
+
+% ------------------------------------------------------
+% Named music
+% ------------------------------------------------------
+
+melody = {
+ \relative f {
+ fis'8-1\2 gis-3\2
+ d16-2\3 dis-3\3 r16
+ b16-4\4 d-2\3 cis-1 b-4\4 r b8-4\4 cis-1\3
+ d16-2\3 r d-2\3 cis-1\3 b-4\4 cis-1\3 d-3\3 fis-1\2
+ gis-2\2 dis-1\3 fis-2\2 cis-1\3 dis-3\3 b-4\4 cis-1\3 b-4\4
+ }
+}
+
+bass = {
+ \relative f {
+ e,,8-4\7 e'-1\9
+ fis,-4\7 fis'-1\9
+ dis-4\8 dis'-1\10
+ gis,,-4\7 gis'-1\9
+ cis,-4\8 cis'-1\10
+ fis,,-4\7 fis'-1\9
+ b,-3\8 b-1\8
+ dis,-3\7 dis-1\7
+ }
+}
+
+% ------------------------------------------------------
+% Score structure
+% ------------------------------------------------------
+
+\score {
+ % two joined staves
+ \new GrandStaff
+ <<
+ \new StaffTab = upper {
+ \clef "treble_8"
+ \key b \major
+ \set Staff.midiInstrument = #"electric guitar (jazz)"
+ % upper six strings of the classic 12-string tuning
+ \set Staff.stringTunings = #(stick-string-group stick-classic-tuning 'melody)
+
+ \new StickVoice {
+ \melody
+ }
+ }
+ \new StaffTab = lower {
+ \clef "bass_8"
+ \key b \major
+ \set Staff.midiInstrument = #"electric guitar (jazz)"
+ % lower six strings of the classic 12-string tuning
+ \set Staff.stringTunings = #(stick-string-group stick-classic-tuning 'bass)
+
+ \new StickVoice {
+ \bass
+ }
+ }
+ >>
+ \midi {
+ \context {
+ \Staff
+ \remove "Staff_performer"
+ }
+ \context {
+ \Voice
+ \consists "Staff_performer"
+ }
+ \context {
+ \Score
+ tempoWholesPerMinute = #(ly:make-moment 150 4)
+ }
+ }
+}
diff --git a/stafftab-examples/proclamation.ly b/stafftab-examples/proclamation.ly
new file mode 100644
index 0000000000..3f39d1fb20
--- /dev/null
+++ b/stafftab-examples/proclamation.ly
@@ -0,0 +1,120 @@
+\version "2.19.16"
+\include "stafftab.ly"
+
+\header {
+ copyright = "copyright"
+ title = "Proclamation"
+ subtitle = "The Power and the Glory"
+ composer = "Gentle Giant"
+ instrument = "Grand Stick (12 string matched reciprocal tuning)"
+ arranger = "arr. Ricardo Wurmus"
+}
+
+
+% ------------------------------------------------------
+% Melody
+% ------------------------------------------------------
+intro = \relative f' {
+ \repeat volta 4 {
+ r8
+ < d'-1\1 a-1\2 >16-> b-3\2 f-2\3 r
+ < a-1\2 e-1\3 > f-2\3 r d-4\4 r
+ < as'-1\2 b,-3\4 >16 r8
+ < e-1\3 as,-3\5>16 r
+ }
+}
+
+themeA = \relative f' {
+ \intro
+ \repeat volta 4 {
+ < e'-2\1 a,-1\2 >16 b-3\2 e,-1\3 r
+ < d-1\3 a-1\4 > e-2\3 c-3\4 < b-3\4 g'-1\2 >8 r8
+ < des'-1\1 e,-3\3 >16 r8
+ < a-1\2 des,-3\4>16 r16
+ }
+}
+
+fiddly = \relative f' {
+ \repeat volta 3 {
+ r16 < g-1\2 c-1\1 > a-2\2-> e-3\3-.
+ < d-1\3 g-1\2 >-> e-2\3 c-3\4 r
+
+ < des-2\3 ges-2\2 >-> ges,-1\4 a-3\4
+ < des-2\3 ges-2\2 > ges,-1\4 a-3\4
+ < des-2\3 ges-2\2 > ges,-1\4
+ }
+}
+fiddlyEndA = \relative f' {
+ r16 < g-1\2 c-1\1 > a-2\2-> e-3\3-.
+ < d-1\3 g-1\2 > e-2\3 c-3\4 %r
+ < f-2\2 a,-4\4 >-> c-1\3 f,-4\5
+ < a-1\4 es'-2\3 > b-3\4 ges8-2\5-. ges16
+
+%% r8 r r r16
+ a16-1\4 ~ a16 b16-3 d-1\3 g-2\2 des-1\3 ges-2\2 r16
+ a,16-1\4 ~ a16 b16-3 d-1\3 g-2\2 c-1\1 as-2\2 r % maybe as-3\2 instead
+}
+
+melody = {
+ \intro
+ \themeA
+ \fiddly
+ \fiddlyEndA
+}
+
+% ------------------------------------------------------
+% Bass
+% ------------------------------------------------------
+bass = {
+ \relative f {
+ d,4-4\8 d'4.-1\10
+ }
+}
+
+
+%% ------------------------------------------------------
+%% Scores
+%% ------------------------------------------------------
+\score {
+ \new GrandStaff
+ <<
+ \new StaffTab {
+ \clef "treble_8"
+ \key d \minor
+ \set Staff.stringTunings = #(stick-string-group stick-matched-reciprocal-tuning 'melody)
+ \new StickVoice { \melody }
+ }
+
+ \new StaffTab {
+ \clef "bass_8"
+ \key d \minor
+ \set Staff.stringTunings = #(stick-string-group stick-matched-reciprocal-tuning 'bass)
+ \new StickVoice { \bass }
+ }
+ >>
+ \layout {}
+}
+
+\score {
+ \new GrandStaff
+ <<
+ \new StaffTab {
+ \set Staff.midiInstrument = #"electric guitar (jazz)"
+ \new StickVoice { \unfoldRepeats \melody }
+ }
+
+ \new StaffTab {
+ \set Staff.midiInstrument = #"electric bass (finger)"
+ \new StickVoice { \unfoldRepeats \bass }
+ }
+ \drums {
+ \unfoldRepeats \repeat volta 14 { bd8 bd bd bd }
+ }
+ >>
+ \midi {
+ \context {
+ \Score
+ tempoWholesPerMinute = #(ly:make-moment 45 4)
+ }
+ }
+}
diff --git a/stafftab-examples/underground.ly b/stafftab-examples/underground.ly
new file mode 100644
index 0000000000..dea58a142f
--- /dev/null
+++ b/stafftab-examples/underground.ly
@@ -0,0 +1,128 @@
+\version "2.14.2"
+\include "stafftab.ly"
+
+\header {
+ copyright = "copyright"
+ title = "Underground"
+ subtitle = "Civilian (1980)"
+ composer = "Gentle Giant"
+ instrument = "Grand Stick (Classic Tuning)"
+ arranger = "arr. Ricardo Wurmus"
+}
+
+% melody ----------------------------------------------------------------------
+verseTheme = {
+ < b-3\4 e-3\3 >8
+ < g'-1\2 d-1\3 >16 r8 < fis-1\2 des-1\3 >16 r8
+ e,16-1\5 fis-3 g-4 a8.-1\4
+ < b-3\4 e-3\3 >8 ~
+ }
+
+melody = {
+ \relative c' {
+
+ % intro
+ \mark \markup { \box \bold Intro }
+ r1
+ \repeat volta 2 {
+ r1 r1 r1 r1
+ }
+ r1
+
+ r2..
+ < b-3\4 e-3\3 >8 ~
+
+ \repeat volta 2 {
+ \verseTheme
+ \verseTheme
+ \verseTheme
+ \verseTheme
+ }
+
+ %< b-3\4 e-3\3 >
+ }
+}
+
+% bass ------------------------------------------------------------------------
+bassTheme = {
+ e8
+ e,-1\7 fis-2 g16-1 g-2 a8-4 cis-1\8 d-2
+ e-4\8~
+}
+bassThemeNoTie = {
+ e8
+ e,-1\7 fis-2 g16-1 g-2 a8-4 cis-1\8 d-2
+ e-4\8
+}
+
+bass = {
+ \relative f, {
+
+ % intro
+ r2..
+ e8-4\8 ~
+
+ \repeat volta 2 {
+ \bassTheme
+ \bassTheme
+ \bassTheme
+ \bassTheme
+ }
+ e
+ e,8-1\7 e e e e e e
+ e\staccato r8 r4 r4.
+
+ % verse
+ e'8-4\8 ~
+ \repeat volta 2 {
+ \bassTheme
+ \bassTheme
+ \bassTheme
+ \bassTheme
+ \bassTheme
+ }
+ \alternative {
+ {\bassTheme}
+ {\bassThemeNoTie}
+ }
+ a16\9 b a g fis8\staccato
+ fis16 g fis e c8\8 ~ c4
+
+ % "un-der-ground!"...
+
+ }
+}
+
+% ------------------------------------------------------
+% Score structure
+% ------------------------------------------------------
+
+\score {
+ % two joined staves
+ \new GrandStaff
+ <<
+ \new StaffTab {
+ \clef "treble_8"
+ \key g \major
+ \set Staff.midiInstrument = #"electric guitar (jazz)"
+ % upper six strings of the classic 12-string tuning
+ \set Staff.stringTunings = #(stick-string-group stick-classic-tuning 'melody)
+
+ \new StickVoice = melody {
+ \melody
+ }
+ }
+
+ \new StaffTab {
+ \clef "bass_8"
+ \key g \major
+ \set Staff.midiInstrument = #"electric guitar (jazz)"
+ % lower six strings of the classic 12-string tuning
+ \set Staff.stringTunings = #(stick-string-group stick-classic-tuning 'bass)
+
+ \new StickVoice = bass {
+ \bass
+ }
+ }
+ >>
+}
generated by cgit v1.2.3 (git 2.46.0) at 2024-11-21 09:58:32 +0000