home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 3 / FREEWARE.BIN / towns_os / taropyon / music / comp09 / cp09_b.mml < prev    next >
Text File  |  1980-01-02  |  4KB  |  169 lines
  1. #ifdef    cp09_b
  2. #    include    "comp09.h"
  3.     $TEMPO
  4. .    next
  5. #endif
  6. /----------------------------------------------------------------------------
  7. /============================================================================
  8.     r1    /* Ｅm (e,g,b)    Ｄ(d,a,f+)
  9.     r1
  10. #define    $A    l8    egbbbb&b>c< ba&a4&a2
  11.     $T_MELA    $MELA    $A    /* Mel
  12.     $T_MELB    $MELB    $A
  13. #define    A    l8eb&be&egbr    df+&f+d&df+ar
  14. %d%0     $T_BACA $BACA    $A
  15. $BACA_DT $T_BACA $BACA    $A
  16.     $T_CODA $CODA l8    g1    f+1
  17.     $T_CODA $CODA l8    e1    d1
  18.     $T_ELEP $ELEP l8    e4e4e4e4    d4d4d4d4
  19.     $T_ELEP $ELEP l8    <b4b4b4b4    a4a4a4a4
  20.     $T_BASPCM $BASPCM    l8e!#+4g&gerebe    d!f+&f+drddd
  21.     r1
  22.     $DRUMS    r4.$T_SYM $SYM(8&)$SYM(4)r4    r1    /* Drums
  23.     $DRUMS    l8$T_HH $CHH$CHH$OHH r r$OHH $CHH$CHH    $DA_A5
  24.     $DRUMS    $DB_A1    $DB_A1
  25.     $DRUMS    $DC_01    $DC_02
  26. /*---------------------------------------------------------------------------
  27.     r1    /*    Ｄ (d,a,f+)    Ｃ (c,g,e)
  28.     r1
  29. #define    $A    l8    df+aaaa&ab    a4g4&g4.g
  30.     $A
  31.     $A
  32. #define    A    l8df+&f+d&df+ar    ce&ec&cegr
  33.     $A    /* Back
  34.     $A
  35.     f+1            e1
  36.     d1            c1
  37.     d4d4d4d4    c4c4c4c4
  38.     a4a4a4a4    g4g4g4g4
  39.     l8d!f+&f+drdad    c!e&ecrccc
  40.     r1
  41.     r1
  42.     $DA_A5    $DA_A5
  43.     $DB_A1    $DB_A1
  44.     $DC_01    $DC_03
  45. /----------------------------------------------------------------------------
  46.     r1    /*    Ｃ (c,g,e)    Ｄ (d,a,f+)    
  47.     r1
  48. #define    $A    l8    cegggg&ga    g4f+4&f+4.g
  49.     $A
  50.     $A
  51. #define    A    l8ce&ec&cegr    df+&f+d&df+ad&
  52.     $A    /* Back
  53.     $A
  54.     e1    f+1
  55.     c1    d1
  56.     c4c4c4c4    d4d4d4d4
  57.     g4g4g4g4    a4a4a4a4
  58.     l8ce&ecrccc    d!f+&f+drddd
  59.     r1
  60.     r1
  61.     $DA_A5    l8$T_HH $CHH$CHH$OHH$CHH $CHH$OHH$CHH$OHH
  62.     $DB_A1    $DB_A1
  63.     $DC_01    $T_BSD $BSD(4)r4r$BSD $BSD $BSD(&)
  64. /*---------------------------------------------------------------------------
  65.     r1    /*    Ｄ (d,a,f+)    
  66.     r1
  67. #define    $A    l8    f+2f+gaf+&    f+1
  68.     $A
  69.     $A
  70. #define    A    ]#3<b4.>]#2d&d4]#2f+4    ]#3d4.f+&f+4b4
  71.     $A    /* Back
  72.     $A
  73.     l8f+2.f+4    f+1
  74.     l8d2.d4        d1
  75.     l8f+4f+4f+4f+4    b4b4b4b4
  76.     l8d4d4d4d4        f+4f+4f+4f+4
  77.     d!f+&f+drdad    f+!a&af+rf+f+f+
  78.     r1
  79.     l8r2.r$T_CLS [#22$CLS(8)&    $CLS(4)r4r2
  80.     l8$T_HH $CHH$CHH$OHH$CHH r2            $CHH(4)$CHH(4)$CHH(4)$CHH(4)
  81. #define    A    l8 $T_SNR r4 $SNR4 r $T_TT $TT1$TT2 $T_SNR $SNR8
  82. #define    B     l8 $T_TT $TT3 $T_SNR r $SNR4 r4 $SNR8 $SNR8
  83.     $A    $B
  84.     l8$T_BSD $BSD$BSD r4 rr $BSD(4)        $BSD(4)r4$BSD(4) $BSD $T_TT $TT4
  85. /----------------------------------------------------------------------------
  86. /*===========================================================================
  87.     r1    /* Ｅm (e,g,b)    Ｄ(d,a,f+)
  88.     r1
  89. #define    $A    l8    egbbbb&b>c< ba&a4&a2
  90.     $MELA    $A
  91.     $MELB    $A
  92. #define    A    l8eb&be&egbr    df+&f+d&df+ar
  93.     $BACA    $A
  94.     $BACA    $A
  95.     $CODA l8    g1    f+1
  96.     $CODA l8    e1    d1
  97.     $ELEP l8    e4e4e4e4    d4d4d4d4
  98.     $ELEP l8    <b4b4b4b4    a4a4a4a4
  99.     $BASPCM    l8e!#+4g&gerebe    d!f+&f+drddd
  100.     r1
  101.     r4.$T_SYM $SYM(8&)$SYM(4)r4    r1    /* Drums
  102.     l8$T_HH $CHH$CHH$OHH r r$OHH$CHH$CHH    $DA_A5
  103.     $DB_A1    $DB_A1
  104.     $DC_01    $DC_02
  105. /*---------------------------------------------------------------------------
  106.     r1    /*    Ｄ (d,a,f+)    Ｃ (c,g,e)
  107.     r1
  108. #define    $A    l8    df+aaaa&ab    a4g4&g4.g
  109.     $A
  110.     $A
  111. #define    A    l8df+&f+d&df+ar    ce&ec&cegr
  112.     $A    /* Back
  113.     $A
  114.     f+1            e1
  115.     d1            c1
  116.     d4d4d4d4    c4c4c4c4
  117.     a4a4a4a4    g4g4g4g4
  118.     l8d!f+&f+drdad    c!e&ecrccc
  119.     r1
  120.     r1
  121.     $DA_A5    $DA_A5
  122.     $DB_A1    $DB_A1
  123.     $DC_01    $DC_03
  124. /----------------------------------------------------------------------------
  125.     r1    /*    Ｃ (c,g,e)    Ｄ (d,a,f+)    
  126.     r1
  127. #define    $A    l8    cegggg&ga    g4f+4&f+4.g
  128.     $A
  129.     $A
  130. #define    A    l8ce&ec&cegr    df+&f+d&df+ad&
  131.     $A    /* Back
  132.     $A
  133.     e1    f+1
  134.     c1    d1
  135.     c4c4c4c4    d4d4d4d4
  136.     g4g4g4g4    a4a4a4a4
  137.     l8ce&ecrcgc    d!f+&f+drddd
  138.     r1
  139.     r1
  140.     $DA_A5    l8$T_HH $CHH$CHH$OHH$CHH $CHH$OHH$CHH$OHH
  141.     $DB_A1    $DB_A1
  142.     $DC_01    $T_BSD $BSD(4)r4r$BSD $BSD $BSD(&)
  143. /*---------------------------------------------------------------------------
  144.     r1    /*    Ｄ (d,a,f+)    
  145.     r1
  146. #define    $A    l8    f+2f+gab&    b1
  147.     $A
  148.     $A
  149. #define    A    ]#4<b4.>]#2d&d4]#2f+4    ]#4d4.f+&f+4b4
  150.     $A    /* Back
  151.     $A
  152.     l8f+2.f+4    b1
  153.     l8d2.d4        f+1
  154.     d4d4d4d4        b4]#1b4]#1b4]#1b4
  155.     >f+4f+4f+4f+4    f+4]#1f+4]#1f+4]#1f+4
  156.     d!f+&f+drdad    ]#1f+!a&a]#1f+r]#1f+]#1f+]#1f+
  157.     r1
  158.     l8r1    $T_CLS [#8$CLS(4)$T_SYM r4 $SYM(4)]#2$SYM(4)
  159.     l8$T_HH $CHH$CHH$OHH$CHH r2        r1
  160. #define    A    l8$T_TT$TT1$TT2 r$T_SNR $SNR4 r $T_SNR $SNR8 $T_TT $TT2
  161. #define    B    l8$T_TT $TT1 $TT2 $T_SNR $SNR8 $T_TT r $TT2 $TT3 r {$TT2$TT3$TT4}8
  162.     $A    $B
  163.     l8$T_BSD $BSD$BSD $BSD(4) rr$BSD        $BSD(4)r4 $BSD(4)$BSD $BSD 
  164. /----------------------------------------------------------------------------
  165. #ifdef    cp09_b
  166. #    include    "cp09_c.mml"
  167. .    end
  168. #endif
  169.