home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 3 / FREEWARE.BIN / towns_os / taropyon / music / comp04 / cp04_h.mml < prev    next >
Text File  |  1980-01-02  |  2KB  |  94 lines
  1. /*
  2. /*    【Ｈ】パート
  3. /*
  4. #ifdef    cp04_h
  5. #    include    "comp04.h"
  6.     $TEMPO2
  7. .    next
  8. #    define    G_CONT
  9. #    define    B    %d%0 $T_SYNTH    $SYNTH        [#5
  10. #    define    C    %d12 $T_SYNTH    $SYNTH    [#7 [#5
  11. #else
  12. #    define    B
  13. #    define    C
  14. #endif
  15. /*======================================================================
  16.     $MEL_LFO    $MEL_LFO
  17. #define    A    l8g1& gb->c<b->c32&d-32&d16&d4<b-&
  18.     $T_MELA    $MELA    $A
  19.     $T_MELB    $MELB    $A
  20. #ifdef    G_CONT
  21. #    undef    G_CONT
  22. #    define    A    l16([#4a>[#2c<)16
  23. #else
  24. #    define    A    r1
  25. #    define    B    g1
  26. #    define    C    d1
  27. #endif
  28.        $B    $A
  29.     $C    $A
  30.     %d%0 $T_BASFM    $BASFM          [#8 $BsG_01    $BsG_02
  31.     %d%4 $T_BASFM    $BASFM >[#9     [#8 $BsG_01    $BsG_02
  32.     %d%0 $T_BASS        $BASS           [#8 $BsG_01    $BsG_02
  33.     %d%4 $T_BASS        $BASS  >[#9     [#8 $BsG_01    $BsG_02
  34. #ifdef    CLS_CONT
  35. #    undef    CLS_CONT
  36. #    define    A    $CLS(8) r8r4r2    r1
  37. #else
  38. #    define    A    r1    r1
  39. #endif
  40.     $DRUMS    $A
  41.     $DRUMS    $DA_04        $DA_04
  42.     $DRUMS    $DB_02        $DB_02
  43.     $DRUMS    $DC_03        $DC_03
  44. /*----------------------------------------------------------------------
  45. #define    A    b-f&f2.& f1
  46.     $MEL_LFO    $MEL_LFO
  47.     $A
  48.     $A
  49.     r1
  50.     r1
  51.     $BsF_01    $BsF_02
  52.     $BsF_01    $BsF_02
  53.     $BsF_01    $BsF_02
  54.     $BsF_01    $BsF_02
  55.     $DD_01    r1
  56.     $DA_01    $DA_02
  57.     $DB_02    $DB_02
  58.     $DC_01    $DC_02
  59. /*----------------------------------------------------------------------
  60. #define    A    g1& gb->c<b->e-32&e32&f16&f4d&
  61.     $MEL_LFO    $MEL_LFO
  62.     $A
  63.     $A
  64.     r1
  65.     r1
  66.     $BsG_01    $BsG_02
  67.     $BsG_01    $BsG_02
  68.     $BsG_01    $BsG_02
  69.     $BsG_01    $BsG_02
  70.     $DRUMS        $DD_01    r1
  71.     $DRUMS        $DA_01    $DA_02
  72.     $DRUMS        $DB_02    $DB_02
  73.     $DRUMS        $DC_03    $DC_03
  74. /*----------------------------------------------------------------------
  75. #define    A    dc&c2.& c2r2
  76.     $MEL_LFO    $MEL_LFO
  77.     $A
  78.     $A
  79.     r1    r2 %d%0 l8 $T_BACA $BACA ffrg&
  80.     r1    r2 %d%0 l8 $T_BACA $BACA ccrd&
  81.     $BsF_01    $BsF_03
  82.     $BsF_01    $BsF_03
  83.     $BsF_01    $BsF_03
  84.     $BsF_01    $BsF_03
  85. #define    CLS_CONT
  86.     $DD_01    $DD_02
  87.     $DA_01    l8$T_HH ($CHH)4 $CHH $OHH & $OHH r
  88.     $DB_02    l8$T_TT $TT1 $TT1 $T_SNR $SNR4 $SNR8$SNR8 r4
  89.     $DC_01    l8$T_BSD $BSD $BSD r4r4 [#16{r$BSD$BSD}8]#16 $BSD
  90. /*----------------------------------------------------------------------
  91. #ifdef    cp04_h
  92. /.    end
  93. #endif
  94.