examples/demo-y.mbl

   1
   2 Transcription of YM tune for Ngaire.
   3 Julian Squires <tek@wiw.org> / 2004
   4
   5 #HEADER
   6
   7 replay "YMamoto"
   8 title "Demo-y"
   9 composer "tokenrove"
  10 copyright "Julian Squires / 2004"
  11
  12 #MACROS
  13
  14 ;; it's so great to arpeggiate.
  15 @a1 = { 0 | 3 9 -12 }
  16 @a2 = { 0 | 5 7 -12 }
  17 @a3 = { 0 | 3 4 -7 }
  18 @a4 = { 0 | 5 4 -9 }
  19 @a5 = { 0 | 5 3 -8 }
  20 @a6 = { 0 | 2 3 -5 }
  21 @a7 = { 0 | 6 3 -9 }
  22 @a8 = { 0 | 4 3 -7 }
  23 @a9 = { 0 | 4 8 -12 }
  24
  25 ;; This looks hideous -- it's just a test.
  26 @v1 = { 15 15 14 14 13 13 12 12 11 11 10 10 9 9 8 8
  27         7 7 7 7 6 6 6 6 6 | 7 }
  28 @v2 = { 13 12 11 10 9 7 5 3 1
  29         0 0 0 0 1 2 3 4 5 6 7 7 7 | 8 }
  30
  31 #MUSIC
  32
  33 ;;;; D minor.
  34
  35 ABC t140
  36 A q6 v8 %eu
  37 B q8 v10 @v2
  38
  39 A o1     d1            | f1                |
  40 B o4 @a1 [d8d16d]3 d8d | @a2 [c8c16c]3 c8c |
  41 C r1 | r |
  42
  43 A b-1           | a2 g2                      |
  44 B [f8f16f]3 f8f | @a1 e8e16ee8e @a2 ee16ee8e |
  45 C r | r |
  46
  47 ABC !loop
  48 A o2
  49 C v11 q8
  50
  51 A     d4 d d d8>d<  | f4 f f f8e        |
  52 B @a1 [d8d16d]3 d8d | @a2 [c8c16c]3 c8c |
  53 C r | r |
  54 ;D k8 h h h s h h h | k8 h h h s h h h |
  55
  56 A b-4 b- b- b-8>f< | a4 a8>a< g4 g8>c+<         |
  57 B [f8f16f]3 f8f    | @a1 e8e16ee8e @a2 ee16ee8e |
  58 C r | r |
  59 ;D k8 h h h s h h  h     | k8 h16hh8h s h16hhsh8     |
  60
  61
  62 A d4 d d d8>d<      | f4 f f f8e        |
  63 B @a1 [d8d16d]3 d8d | @a2 [c8c16c]3 c8c |
  64 C o5 d2. f4         | a2 g8 f e c+              |
  65
  66 A b-4 b- b- b-8>f< | a4 a8>a< g4 g8>c+<         |
  67 B [f8f16f]3 f8f    | @a1 e8e16ee8e @a2 ee16ee8e |
  68 C <b-2> d4 f       | g2 a4 c+                   |
  69
  70
  71 A d4 d d d8>d<         | f4 f f f8e        |
  72 B o4 @a3 [d8d16d]3 d8d | @a4 [c8c16c]3 c8c |
  73 C o5 d2. f4            | a2 g8 f d e       |
  74
  75 A a4 a a a8b-                | g4 g8>e< a4 a8g+                     |
  76 B @a5 e8e16ee8e @a6 gg16gg8g | @a7 b-8b-16b-b-8b- @a8 aa16a @a9 a8a |
  77 C c2 e4 a                    | b-2 a4 >c+                           |
  78
  79 ;;;; A minor.
  80
  81 A q6 v10
  82 B @a0 q8
  83 C q8 @v2
  84 A o1 a4 a a a8>a   | c4 c c c8<b   |
  85 B o3 [a8a16a]3 a8a | [g8g16g]3 g8g |
  86 C o4 a8>cec a4 g   | >c4 <b8a g4 e |
  87
  88 A >f4 f f f8>c<   | e4 e8>e< d4 d8g+   |
  89 B >[c8c16c]3 c8c< | b8b16bb8b bb16bb8b |
  90 C f2 a8>cea       | b2 g4 g+           |
  91
  92 A <a4 a a a8>a    | c4 c c c8<b       |
  93 B [a8a16a]3 a8a   | [g8g16g]3 g8g     |
  94 C a16gecagec>c4<a | e8.g16ab>c8 e4 <g |
  95
  96 A >f4 f f f8>c<        | e4 e8>e< d4 d8g+   |
  97 B >[c8c16c]3 c8c<      | b8b16bb8b bb16bb8b |
  98 C >c16<afe>c<afe c8eae | b2 g8>e<g+>e<      |
  99
 100 ;; end of data.