kujirahand / picosakura

piko sakura is music box for browser with MML Compiler Sakura
MIT License
2 stars 0 forks source link

過去のピコサクラで作った曲がエラーに #14

Open kujirahand opened 8 months ago

kujirahand commented 8 months ago
SoundType={pico}
// ----------------------------------------------
// 洞窟にて
// ピコサクラ版
// ----------------------------------------------

Tempo(130)

#A00={CH( 1)@81;V=120}
#B00={CH( 2)@11;V=120}
#C00={CH( 3) @1;V=120}
#D00={CH( 4) @1;V=120}
#E00={CH( 5) @1;V=120}
#F00={CH( 6) @1;V=120}
#G00={CH( 7)@33;V=120}
#H00={CH(10);V=120}
#___={l1rrrr}

// -----------------------------------------------
// A00
// -----------------------------------------------
#A01={
    v120 l8 o4
    SUB{ [2[2 rgeg : ed^d- ] gaga ] }
         [2[2 r`db`d :ba^a- ] >cdcd<]
}
#A02={
    l8 o5
    edeg a^g^ | ^^ed e^^^
    ga{gag}e d^<b^ | ag{age}d aged
}
#A03={
    l8o5 e^{ed-^}ga^ | ^ge^ de^^^
    ga{gag}e ga{gag}e | dedg ^^^^
}
#A04={
    l1 e
}
// -----------------------------------------------
// B00
// -----------------------------------------------
#B01={
    v70 l8 o6 q50
    Unison5th{ [4 rgrg rara] }
}

// -----------------------------------------------
// C00
// -----------------------------------------------
#C02 = {
    v70 l32
    [2
        o5 Unison5th{
            cdef defg efga fgab
            gab>c< b>c<ba >cdef defg<
            >c<bag bagf agfe fedc
            b>c<ba b>cde cdef efga
        }
    ]
}
// -----------------------------------------------
// F00
// -----------------------------------------------
#F01={
    v70 q99 o5 l2 [2 'egb`e' 'fa>ce<' | 'gb>d-e<' 'fa>ce<']
}
#F02={
    v70 q99 o5 l1 'egb`e'
}
// -----------------------------------------------
// G00
// -----------------------------------------------
#G01={
  l1rr
  v120 o2 l8 q70 OctaveUnison{ [2 eeee efef ] }
}
#G02={
  v120 o2 l8 q70 OctaveUnison{ [3 eeee efef ] eeee gab>e<  }
}

#G03={
  v120 o3 l8 q70 OctaveUnison{ [4 efef efef ]  }
}

#G04={
  v120 o2 l16 q70 OctaveUnison{
    [2[2 crcc rrrr crcc : rrrr ] gfed ]
  }
}
#G05={
  v120 o2 l16 q70 OctaveUnison{
    [2[2 crcc rrrr : rrrr rrrr ] : crcc rrrr] 
    cggg eg>ce<
  }
}
// -----------------------------------------------
// H00
// -----------------------------------------------
#H01={
  v120 Sub{ Rhythm{ l8 [4 o^^^ o^^^ ] } }
  [4 l16
    v100 Sub{ Rhythm{ [2 hhhh hhhh ] } }
    v120 Rhythm{ [2 brbr :srrr ] sbsb }
  ]
}

#H02={
  v120
  [4 l16
    v100 Sub{ Rhythm{ [2 hhhh hhhh ] } }
    v120 Rhythm{ [2 brbr :brbr ] bbbb }
  ]
}
#H03={
    v120 l1 r r r l16
    v60      Rhythm{ [4s] }
    v80      Rhythm{ [4s] }
    v100     Rhythm{ [4s] }
    v120 l32 Rhythm{ [8s] }
}
#H04={
    v120 Rhythm {
    `cb`
    }
}

//      1    2    3    4    5   6,    7,   8
PLAY(#A00,#B00,#C00,#D00,#E00,#F00,#G00,#H00)
// Intro
PLAY(#___,#___,#___,#___,#___,#F01,#G01,#___)
// A-melo
PLAY(#A01,#___,#___,#___,#___,#F01,#G02,#H01)
PLAY(#A01,#B01,#___,#___,#___,#F01,#G02,#H01)
// B-melo
PLAY(#A02,#B01,#___,#___,#___,#F01,#G03,#H02)
PLAY(#A03,#B01,#___,#___,#___,#F01,#G03,#H02)
// A-melo
PLAY(#A01,#___,#___,#___,#___,#F01,#G02,#H01)
PLAY(#A01,#B01,#___,#___,#___,#F01,#G02,#H01)
// end
PLAY(#A04,#___,#___,#___,#___,#F02,#___,#H04)