home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 3 / FREEWARE.BIN / towns_os / taropyon / music / comp03 / cp03_f2.mml < prev    next >
Text File  |  1980-01-02  |  2KB  |  86 lines
  1. /*    "cp03_f2.mml"
  2. /*
  3. /*    【Ｆ#2】パート
  4. /*
  5. #ifdef    cp03_f2
  6. #    include    "comp03.h"
  7.     $TEMPO
  8. .    next
  9. #endif
  10. #ifndef    F_PASS
  11. #    define    F_PASS    通過したよん
  12. #    define    DA_F01    l16$T_HH]#24$CHH$CHH$CHH$CHH$OHH(8)$CHH$CHH $_DA_F01
  13. #    define    _DA_F01    $CHH$CHH$CHH$CHH$OHH$CHH$OHH(8)
  14. #    define    DA_F02    l16$T_HH]#24$CHH$CHH$CHH$CHH$OHH(8)$CHH$CHH $_DA_F02
  15. #    define    _DA_F02    $CHH$CHH$OHH(8)$CHH$CHH$OHH(8)
  16. #endif
  17. /--------------------------------------------------------------------
  18.     $T_MELC    $MELC ]#2e1&    e1
  19.     $T_MELC $MELC ]#2c1&    c1
  20. #define    A    ({>c<ae}4)8
  21.     $T_BACK3A    $BACK3A    [#6  %d%0  %c0    u+42    $A
  22.     $T_BACK3B    $BACK3B    [#10 %d%20 %c-8 u-42    $A
  23.     $T_EPIANO    $EPIANO    ]#4l4aaaa    aaaa    /*    Ａm(a,e,c)    */
  24.     $T_EPIANO    $EPIANO    ]#4l4eeee    eeee
  25. #define    A    l16aaeee8aafff8]#8($cho(a,64,8,sqr,-1600,0))2[#8
  26. $T_BASS  %d%0 $BASS]#6 $A l16aaeee8aafff8]#8>($cho(a,64,8,sqr,-1600,0))2<[#8
  27. $T_SBASS %d%2 $SBASS]#6$A $A
  28.     $DRUMS    $DA_F01    $DA_F02
  29.     $DRUMS    $T_SNR l8r4$SNR r  r$SNR $T_TT $TT1(16)$TT2(16) r8    $DB_01
  30. #define    A    l8$T_BSD$BSD(4)r4$BSD(4)$T_CLP[#24$CLP_R$CLP_L
  31.     $DRUMS    l8$T_BSD$BSD(4)r4$BSD(4)$BSD$BSD    $A
  32. /--------------------------------------------------------------------
  33.      d1&    d1
  34.     <b1&    b1>
  35. #define    A    ({bgd}4)8
  36.     $A    
  37.     $A
  38.     gggg    gggg
  39.     dddd    dddd
  40. #define    A    ggddd8ggddd8]#8($cho(g,64,8,sqr,-1600,0))2[#8
  41.     $A    ggddd8ggddd8>]#12($cho(g,64,8,sqr,-1600,0))2[#12<
  42.     $A    $A
  43.     $DA_F01    $DA_F02
  44.     $DB_01    $DB_01
  45.     $DC_01    l8$T_BSD$BSD(4)r4$BSD(4)$DRUMS_B$T_HH%c+11$CHH%c-11$CHH$DRUMS
  46. /--------------------------------------------------------------------
  47.      c1&    c1
  48.     <a1&    a1>
  49. #define    A    ({afc}4)8
  50.     $A
  51.     $A
  52.     ffff    ffff
  53.     cccc    cccc
  54. #define    A    ffccc8ffccc8]#8($cho(f,64,8,sqr,-1600,0))2[#8
  55.     $A    $A
  56.     $A    $A
  57.     $DA_F01    $DA_F02
  58.     $DB_01    $DB_01
  59.     $DC_01    $T_BSD$BSD(4)r4$BSD(4){$BSD$BSD$BSD$BSD}4
  60. /--------------------------------------------------------------------
  61.      d1        e1
  62.     <b1        b1>
  63. #define    A    ]#4({bgd}4)4    ]#8({bgd}4)4
  64.     $A
  65.     $A
  66.     ]#2gggg    ]#2bbbb    /*    Ｇ(g,d,b) Ｇ6(g,e,d,b)
  67.     ]#2dddd    ]#2gggg
  68. #define    A    l16ggddd8ggddd8]#8($cho(g,64,8,sqr,-1600,0))2[#8
  69.     l16ggddd8ggddd8]#8>($cho(g,64,8,sqr,-1600,0))2<[#8    $A
  70.     $A    $A
  71.     $DA_F01    l16$T_HH ($OHH$CHH)8
  72. #define    A    $SNR16
  73.     $DB_01    l16$T_SNR [#40$A$A$A]#8$A [#4$A$A$A]#8$A [#4$A$A$A]#8$A (]#3$A)4
  74. #define    A    l8$T_BSD$BSD(4)r4$BSD(4)$T_CLP[#24$CLP_R$CLP_L
  75.     $A        $T_BSD $BSD(4)$BSD(4)$BSD(4)l16$T_TT$TT1$TT2$TT3(8)
  76. /--------------------------------------------------------------
  77. /*
  78. /*    間
  79. /*
  80. t220    r1    $TEMPO
  81. .next
  82. #ifdef    cp03_f2
  83. .    end
  84. #endif
  85. /*    end of "cp03_f2.mml"    */
  86.