516 B
516 B
setcps(136/60/2) //cycles per minute
//Probability
$:sound("bd").struct("1 0")
$_:sound(choose("sd","cp")).struct("0 1 0 1")._punchcard()
$_:sound(chooseCycles("sd","cp")).struct("0 1 0 1")._punchcard()
$_:sound("sd | cp").struct("0 1 0 1")._punchcard()
$_:sound(wchoose(["hh",10],["oh",1])).struct("1 1 1 1")
$_:sound(wchooseCycles(["hh",10],["oh",1])).struct("1 1 1 1")
$_:sound("mt").struct("1 1 1 1").degradeBy(0.6)._punchcard()
$_:sound("- - - lt").sometimes(x=>x.echo(4,1/8,.5))._punchcard()