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 ;; Rob Hubbard vibrato, or so.
  26 @~1 = { delay 8 speed 2 depth 3 }
  27
  28 ;; This looks hideous -- it's just a test.
  29 @v1 = { 15 15 14 14 13 13 12 12 11 11 10 10 9 9 8 8
  30         7 7 7 7 6 6 6 6 6 | 7 }
  31 @v2 = { 13 12 11 10 9 7 5 3 1
  32         0 0 0 0 1 2 3 4 5 6 7 7 7 | 8 }
  33
  34 #MUSIC
  35
  36 ;;;; D minor.
  37
  38 ABC t140
  39 A q6 v12 @v1 %eu
  40 B q8 v10 @v2
  41
  42 A o1     d1            | f1                |
  43 B o4 @a1 [d8d16d]3 d8d | @a2 [c8c16c]3 c8c |
  44 C r1 | r |
  45
  46 A b-1           | a2 g2                      |
  47 B [f8f16f]3 f8f | @a1 e8e16ee8e @a2 ee16ee8e |
  48 C r | r |
  49
  50 ABC !loop
  51 A o1
  52 C v13 q8 @~1
  53
  54 A     d4 d d d8>d<  | f4 f f f8e        |
  55 B @a1 [d8d16d]3 d8d | @a2 [c8c16c]3 c8c |
  56 C r | r |
  57 ;D k8 h h h s h h h | k8 h h h s h h h |
  58
  59 A b-4 b- b- b-8>f< | a4 a8>a< g4 g8>c+<         |
  60 B [f8f16f]3 f8f    | @a1 e8e16ee8e @a2 ee16ee8e |
  61 C r | r |
  62 ;D k8 h h h s h h  h     | k8 h16hh8h s h16hhsh8     |
  63
  64
  65 A d4 d d d8>d<      | f4 f f f8e        |
  66 B @a1 [d8d16d]3 d8d | @a2 [c8c16c]3 c8c |
  67 C o5 d2. f4         | a2 g8 f e c+              |
  68
  69 A b-4 b- b- b-8>f< | a4 a8>a< g4 g8>c+<         |
  70 B [f8f16f]3 f8f    | @a1 e8e16ee8e @a2 ee16ee8e |
  71 C <b-2> d4 f       | g2 a4 c+                   |
  72
  73
  74 A d4 d d d8>d<         | f4 f f f8e        |
  75 B o4 @a3 [d8d16d]3 d8d | @a4 [c8c16c]3 c8c |
  76 C o5 d2. f4            | a2 g8 f d e       |
  77
  78 A a4 a a a8b-                | g4 g8>e< a4 a8g+                     |
  79 B @a5 e8e16ee8e @a6 gg16gg8g | @a7 b-8b-16b-b-8b- @a8 aa16a @a9 a8a |
  80 C c2 e4 a                    | b-2 a4 >c+                           |
  81
  82 ;;;; A minor.
  83
  84 A q6
  85 B @a0 q8
  86 C q8 v13 @v2
  87 A o1 a4 a a a8>a   | c4 c c c8<b   |
  88 B o3 [a8a16a]3 a8a | [g8g16g]3 g8g |
  89 C o4 a8>cec a4 g   | >c4 <b8a g4 e |
  90
  91 A >f4 f f f8>c<   | e4 e8>e< d4 d8g+   |
  92 B >[c8c16c]3 c8c< | b8b16bb8b bb16bb8b |
  93 C f2 a8>cea       | b2 g4 g+           |
  94
  95 A <a4 a a a8>a    | c4 c c c8<b       |
  96 B [a8a16a]3 a8a   | [g8g16g]3 g8g     |
  97 C a16gecagec>c4<a | e8.g16ab>c8 e4 <g |
  98
  99 A >f4 f f f8>c<        | e4 e8>e< d4 d8g+   |
 100 B >[c8c16c]3 c8c<      | b8b16bb8b bb16bb8b |
 101 C >c16<afe>c<afe c8eae | b2 g8>e<g+>e<      |
 102
 103 ;; end of data.