\header{ title = \markup { \override #'(font-name . "Times Bold") \fontsize #1.0 "UŞŞAK SAZ SEMÂÎSİ" } composer = \markup { \override #'(font-name . "Times Bold") \fontsize #-1.0 "MÜZİK : Neyzen Dede Salih Efendi (1818-1888)" } meter = \markup { \override #'(font-name . "Times Bold") \fontsize #-1.0 "USÛLÜ : Aksak Semâi" } tagline = "" copyright = "" } \version "2.11.14" %{ Define 1/9 alterations. %} #(define-public KOMA 1/9) #(define-public BAKIYE 4/9) #(define-public KUCUK 5/9) #(define-public BUYUKMUCENNEB 8/9) %{ Define pitch names %} makamPitchNames = #`( (c . ,(ly:make-pitch -1 0 NATURAL)) (d . ,(ly:make-pitch -1 1 NATURAL)) (e . ,(ly:make-pitch -1 2 NATURAL)) (f . ,(ly:make-pitch -1 3 NATURAL)) (g . ,(ly:make-pitch -1 4 NATURAL)) (a . ,(ly:make-pitch -1 5 NATURAL)) (b . ,(ly:make-pitch -1 6 NATURAL)) (cc . ,(ly:make-pitch -1 0 KOMA)) (dc . ,(ly:make-pitch -1 1 KOMA)) (ec . ,(ly:make-pitch -1 2 KOMA)) (fc . ,(ly:make-pitch -1 3 KOMA)) (gc . ,(ly:make-pitch -1 4 KOMA)) (ac . ,(ly:make-pitch -1 5 KOMA)) (bc . ,(ly:make-pitch -1 6 KOMA)) (cb . ,(ly:make-pitch -1 0 BAKIYE)) (db . ,(ly:make-pitch -1 1 BAKIYE)) (eb . ,(ly:make-pitch -1 2 BAKIYE)) (fb . ,(ly:make-pitch -1 3 BAKIYE)) (gb . ,(ly:make-pitch -1 4 BAKIYE)) (ab . ,(ly:make-pitch -1 5 BAKIYE)) (bb . ,(ly:make-pitch -1 6 BAKIYE)) (ck . ,(ly:make-pitch -1 0 KUCUK)) (dk . ,(ly:make-pitch -1 1 KUCUK)) (ek . ,(ly:make-pitch -1 2 KUCUK)) (fk . ,(ly:make-pitch -1 3 KUCUK)) (gk . ,(ly:make-pitch -1 4 KUCUK)) (ak . ,(ly:make-pitch -1 5 KUCUK)) (bk . ,(ly:make-pitch -1 6 KUCUK)) (cbm . ,(ly:make-pitch -1 0 BUYUKMUCENNEB)) (dbm . ,(ly:make-pitch -1 1 BUYUKMUCENNEB)) (ebm . ,(ly:make-pitch -1 2 BUYUKMUCENNEB)) (fbm . ,(ly:make-pitch -1 3 BUYUKMUCENNEB)) (gbm . ,(ly:make-pitch -1 4 BUYUKMUCENNEB)) (abm . ,(ly:make-pitch -1 5 BUYUKMUCENNEB)) (bbm . ,(ly:make-pitch -1 6 BUYUKMUCENNEB)) ;; f for flat. (cfc . ,(ly:make-pitch -1 0 (- KOMA))) (dfc . ,(ly:make-pitch -1 1 (- KOMA))) (efc . ,(ly:make-pitch -1 2 (- KOMA))) (ffc . ,(ly:make-pitch -1 3 (- KOMA))) (gfc . ,(ly:make-pitch -1 4 (- KOMA))) (afc . ,(ly:make-pitch -1 5 (- KOMA))) (bfc . ,(ly:make-pitch -1 6 (- KOMA))) (cfb . ,(ly:make-pitch -1 0 (- BAKIYE))) (dfb . ,(ly:make-pitch -1 1 (- BAKIYE))) (efb . ,(ly:make-pitch -1 2 (- BAKIYE))) (ffb . ,(ly:make-pitch -1 3 (- BAKIYE))) (gfb . ,(ly:make-pitch -1 4 (- BAKIYE))) (afb . ,(ly:make-pitch -1 5 (- BAKIYE))) (bfb . ,(ly:make-pitch -1 6 (- BAKIYE))) (cfk . ,(ly:make-pitch -1 0 (- KUCUK))) (dfk . ,(ly:make-pitch -1 1 (- KUCUK))) (efk . ,(ly:make-pitch -1 2 (- KUCUK))) (ffk . ,(ly:make-pitch -1 3 (- KUCUK))) (gfk . ,(ly:make-pitch -1 4 (- KUCUK))) (afk . ,(ly:make-pitch -1 5 (- KUCUK))) (bfk . ,(ly:make-pitch -1 6 (- KUCUK))) (cfbm . ,(ly:make-pitch -1 0 (- BUYUKMUCENNEB))) (dfbm . ,(ly:make-pitch -1 1 (- BUYUKMUCENNEB))) (efbm . ,(ly:make-pitch -1 2 (- BUYUKMUCENNEB))) (ffbm . ,(ly:make-pitch -1 3 (- BUYUKMUCENNEB))) (gfbm . ,(ly:make-pitch -1 4 (- BUYUKMUCENNEB))) (afbm . ,(ly:make-pitch -1 5 (- BUYUKMUCENNEB))) (bfbm . ,(ly:make-pitch -1 6 (- BUYUKMUCENNEB))) ) %% set pitch names. pitchnames = \makamPitchNames #(ly:parser-set-note-names parser makamPitchNames) \paper { after-title-space = 10\mm } makamGlyphs = #'((1 . "accidentals.doublesharp") (8/9 . "accidentals.sharp.slashslashslash.stemstem") (5/9 . "accidentals.sharp.slashslashslash.stem") (4/9 . "accidentals.sharp") (1/9 . "accidentals.sharp.slashslash.stem") (0 . "accidentals.natural") (-1/9 . "accidentals.mirroredflat") (-4/9 . "accidentals.flat.slash") (-5/9 . "accidentals.flat") (-8/9 . "accidentals.flat.slashslash") (-1 . "accidentals.flatflat") ) \layout { \context { \Score \remove "Bar_number_engraver" } } \relative a' { \time 10/8 %{ define alteration <-> symbol mapping. The following glyphs are available. accidentals.sharp accidentals.sharp.slashslash.stem accidentals.sharp.slashslashslash.stemstem accidentals.sharp.slashslashslash.stem accidentals.sharp.slashslash.stemstemstem accidentals.natural accidentals.flat accidentals.flat.slash accidentals.flat.slashslash accidentals.mirroredflat.flat accidentals.mirroredflat accidentals.flatflat accidentals.flatflat.slash accidentals.doublesharp %} \override Accidental #'glyph-name-alist = \makamGlyphs \override Staff.KeySignature #'glyph-name-alist = \makamGlyphs \set Staff.keySignature = #'( (6 . -1/9)) \set Staff.extraNatural = ##f #(override-auto-beam-setting '(end * * * *) 2 8) #(override-auto-beam-setting '(end * * * *) 3 8) #(override-auto-beam-setting '(end * * * *) 5 8) #(override-auto-beam-setting '(end * * * *) 7 8) #(override-auto-beam-setting '(end * * * *) 9 8) #(override-auto-beam-setting '(end * * * *) 10 8) \override TextScript #'extra-offset = #'( 0.0 . 1.0 ) a4^\markup { \fontsize #-1.0 \italic "1. Hâne" } g8 a4 d16 c bfc a g4. a8 bfc d c8. bfc16 c bfc bfc a a4 r8 d4 d16 d d4 e16 f e d c bfc a8 bfc c4 bfc16 c d e d c bfc a g8 a bfc4 a8 bfc c d e f e d c bfc c4 bfc16 c e d c bfc bfc16. a32 g8 a4 g'16 a \break \mark \markup { \normalsize \raise #1 \musicglyph #"scripts.segno" } \repeat volta 2 { g16^\markup { \fontsize #-1.0 \italic "Teslim" } f e8 f16 g f e d8 r8 e16 f e d c8 d16 e d c c bfc bfc a bfc4 r8 a16 bfc c d c bfc bfc a g8. c16 bfc c d4 r8 e16 f g f e d c bfc } \alternative { {c4 bfc16 c e d c bfc bfc16. a32 g8 a4 g'16 a} {c,4 bfc16 c e d c bfc bfc16. a32 g8 a4 r8} } \bar "||" \break a4^\markup { \fontsize #-1.0 \italic "2. Hâne" } bfc8 a g c16 bfc c d c8 bfc a bfc16 c bfc a g8 a8. g'16 f8 e f4. f4 e8 f16 e f g f8 e d4. e4 d8 e16 d e f e8 d c4 e8 f e16 d d4 c8 e d16 c c4 bfc8 d c16 bfc bfc4 a8 c bfc16 a a4 g'16 \once \override Script #'extra-offset = #'( 1.5 . 1.5 ) a^\segno \bar "||" \break a,4^\markup { \fontsize #-1.0 \italic "3. Hâne" } a'8 g16. fb32 e8 fb g a4. d,16 e d8 e d16 c8 bfc16 bfc16. a32 g8 a4 r8 c'8 bfc a g fb g16 a g fb e4 fb8 d4 g8 fb a g fb fb8. e16 d8 e4 g8 fb g e f d16 e d8 e c16 d c8 d c8. bfc16 bfc8 bfc16 a a4 g'16 \once \override Script #'extra-offset = #'( 1.5 . 1.5 ) a^\segno \bar "||" \break \time 6/4 \repeat volta 1 {a,4^\markup { \fontsize #-1.0 \italic "4. Hâne" \fontsize #-1.0 Yürük Semâi } a8 [g] a [g] a [bfc] c2 c8 d e [f] e [d] c [bfc] a4. r8 f'8. e16 d8 [a'] g [f] e [d] d [c] bfc [a] g8. e'16 d8 [c] c [bfc] bfc [bfc16 a] a4. r8 } \break \repeat volta 1 { a'8. g16 g8. [f16] f8. [e16] g8 [f16 e] e4. d8 f8. e16 e8. [d16] d8. [c16] f8 [e16 d] d4. r8 c8 d e [f] g [f] e [d] d [c] bfc [a] g8. e'16 d8. [c16] c8. [bfc16] bfc8 [bfc16 a16] a4 \once \override TextScript #'extra-offset = #'( -4.0 . -1.0 ) r4_\markup { \fontsize #-1.0 \italic "D.S. al fine" } } }