home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 3 / FREEWARE.BIN / towns_os / taropyon / music / comp03 / cp03_c.mml < prev    next >
Text File  |  1980-01-02  |  2KB  |  77 lines
  1. /*    "cp03_c.mml"
  2. /*
  3. /*    【Ｃ】パート
  4. /*
  5. #ifdef    cp03_c
  6. #    include    "comp03.h"
  7.     $TEMPO
  8. .    next
  9. #endif
  10. /---------------------------------------------------------------------
  11.     r1
  12.     r1
  13.     $T_CODE2    $CODE2    a1    a1    /*    Ａm(a,e,c)    */
  14.     $T_CODE2    $CODE2    e1    e1
  15.     $T_EPIANO    $EPIANO    [#17 l4aaaa    aaaa
  16.     $T_EPIANO    $EPIANO    [#17 l4eeee    eeee
  17. #define    A    l16a4arrrarag64&a64&a32r4
  18. #define    B    arag64&a64&a32r4 a8>]#8ar>]#2c]#2d-64&d64&d32<r8[#12<
  19.     $T_BASS        %d%0    $BASS    ]#15    $A    $B
  20.     $T_SBASS    %d%2    $SBASS    ]#15    $A    $B
  21.     $DRUMS    $T_CLS [#12$CLS(4) $T_RID r4$RID(4)$RID(4)    $DA_11
  22.     $DRUMS    $DB_01    $T_SNR l8r4$SNR r  r$SNR $T_TT $TT1(16)$TT2(16) r8
  23.     $DRUMS    $DC_01    $DC_02
  24. /---------------------------------------------------------------------
  25.     r1
  26.     r1
  27.     g1    g1    /*    Ｇ(g,d,b)    */
  28.     d1    d1
  29.     gggg    gggg
  30.     dddd    dddd
  31. #define    A    g4grrrgrfgr4  
  32. #define    B    grfgr4 g8>]#8gr>]#2c]#2d-64&d64&d32<[#12r8<
  33.     $A    $B
  34.     $A    $B
  35.     $DA_11    $DA_11
  36. #define    A    $T_CLS l8 [#22$CLS(8.)r16 $T_SNR$SNR rr4$SNR r
  37. #define    B    r4$SNR rr$SNR$T_TT$TT1(16)$TT2(16)r8
  38.     $A    $B
  39.     $DC_01    $DC_03
  40. /---------------------------------------------------------------------
  41.     r1
  42.     r1
  43.     a1    a1    /*    Ａm(a,e,c)    */
  44.     e1    e1
  45.     aaaa    aaaa
  46.     eeee    eeee
  47. #define    A    a4arrrarag64&a64&a32r4
  48. #define    B    arag64&a64&a32r4 a8>]#8ar>]#2c]#2d-64&d64&d32<r8[#12<
  49.     $A    $B
  50.     $A    $B
  51.     $T_CLS [#18$CLS(4) $T_RID r4$RID(4)$RID(4)    $DA_11
  52.     $DB_01                        l8$T_SNR r4$SNR rr$SNR$T_TT$TT1(16)$TT2(16) r8
  53.     $T_BSD $BSD(4)$T_RID$RID(4)$T_BSD$BSD(4)r4    $DC_02
  54. /---------------------------------------------------------------------
  55.     r1
  56.     r1
  57.     g1    b1    /*    Ｇ(g,d,b)    */
  58.     d1    g1
  59.     gggg    bbbb
  60.     dddd    gggg
  61. #define    A    g4grrrgrfgr4  
  62. #define    B    grfgr4 g8>]#8gr>]#2c]#2d-64&d64&d32<[#12r8<
  63.     $A    $B
  64.     $A    $B
  65.     $DA_11    $DA_11
  66. #define    A    $T_CLS l8 [#25$CLS(8.)r16 $T_SNR$SNR rr4$SNR r l16
  67. #define    B    [#38$SNR16$SNR16$SNR16 r$SNR16$SNR(8)$SNR16
  68. #define    C    ]#7l8$SNR$SNR l16$SNR16$SNR16$SNR16$SNR16
  69.     $A    $B    $C    /* ちょっとワザとらしい…    */
  70. #define    A    l8$T_BSD$BSD(4)$BSD(4)$T_TT[#42$TT4]#4$TT4]#4$T_BSD{r$BSD$BSD}4
  71.     $DC_01    $A
  72. /---------------------------------------------------------------------
  73. #ifdef    cp03_c
  74. .    end
  75. #endif
  76. /*    end of "cp03_c.mml"    */
  77.