41 lines
1 KiB
Org Mode
41 lines
1 KiB
Org Mode
:PROPERTIES:
|
|
:ID: 088d51ce-bf1e-4717-b3a6-f2dd6d445836
|
|
:END:
|
|
#+TITLE: Tidalcycles Resources
|
|
#+Author: Yann Esposito
|
|
|
|
tags :: [[id:d248036c-4117-4406-a230-030b4d2b0085][tidal]]
|
|
source ::
|
|
|
|
* MIDI
|
|
|
|
Video: [[file:assets/Tidal Acid Jam (MIDI test)--fpSKvxOA0k.mkv][Tidal Acid Jam (MIDI test)]] ; https://www.youtube.com/watch?v=-fpSKvxOA0k
|
|
|
|
Init MIDI
|
|
|
|
- https://www.youtube.com/watch?v=cdB0dBGiar4
|
|
- https://tidalcycles.org/index.php/SuperDirt_MIDI_Tutorial
|
|
|
|
* Chiptune like
|
|
|
|
https://www.youtube.com/watch?v=MbCNdB3hfpc&feature=youtu.be
|
|
|
|
#+begin_src tidal
|
|
import qualified Sound.Tidal.Chords as Chords
|
|
|
|
let mute = const silence
|
|
|
|
do
|
|
let arp = "[0 0 2 4]*2"
|
|
pat = "<0 2 5 4>"
|
|
oct = -2
|
|
d1 $ fast 2 $ stack [
|
|
n (toScale Chords.major (arp + pat) + 2*oct) # s "superchip" # release 0.075,
|
|
n ("0*8" + (slow 4 pat) - 14) # s "superchip" # release 0.3 # cut 2
|
|
] # orbit 1 # room 0.15 # size 0.93 # gain 0.9
|
|
d2 $ fast 2 $ stack [
|
|
"bd:10(3,8)",
|
|
s "~ sn" # n 3,
|
|
s "[~ cp:1]*2"
|
|
] # orbit 2 # room 0.05 # size 0.2
|
|
#+end_src
|