BuboBubo/topos
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Computer Music Class (demo song)

Browse Source
This commit is contained in:
Raphaël Forment
2023-09-03 22:14:54 +02:00
committed by GitHub
parent 10779f4e21
commit 40a0271c0c
1 changed files with 18 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
src/examples/excerpts.ts
View File

@ -1,4 +1,22 @@
export const examples = [ export const examples = [
`// Computer Music Classroom, Monday (8AM) -- Bubobubobubo
let ur = [0, 12, 7].div(24),
fundamental = [0, 5, 10, 8, 6].repeatAll(4).bar();
mod(.25) :: sound('square')
.note(ur + fundamental + 40).n(1 + $(1) % 8)
.atk(0.05).sustain(0.1).release(0.1)
.room(0.9).size(0.9)
.out()
mod(.25) :: sound('sawtooth')
.note(ur + fundamental + 47).n(1 + $(2) % 8)
.atk(0.05).sustain(0.1).release(0.1)
.room(0.9).size(0.9)
.out()
mod(.25) :: sound(['sawtooth', 'square'].bar())
.note(ur + fundamental + 40+[10,12].bar()).n(1 + $(3) % 8)
.atk(0.05).sustain(0.1).release(0.1)
.room(0.9).size(0.9).out()
`,
`// Lamento for Digital Harpists -- Bubobubobubo `// Lamento for Digital Harpists -- Bubobubobubo
mod(4) :: sound('triangle') mod(4) :: sound('triangle')
.note(60).fmwave('triangle').fmi(3.95) .note(60).fmwave('triangle').fmi(3.95)