// (def kickkick (sample (freesound-path 2086)))(def clapclap (sample (freesound-path 48310))) Un, deux, trois et quatre, il y a des synthétiseurs et des boites à rythmes programmés par Aphex Twin. Aujourd’hui j’ai repris le métro. Nous étions tous isolés dans la rame, j’écoutais de la musique de la musique électronique avec mon lecteur MP3. (defn looper [current period sound](at current (sound))(let [new (+ current period) J’essaye de faire danser mon cerveau avec des 0 et des 1 alors que nous nous retrouvons comme des autistes, coincés derrière nos écrans.](apply-at new #’looper [new period sound])))(looper (now) 200 kickkick)(looper (now) 1600 clapclap)

( ♫) Aphex Twin – Minipops 67 (Source Field Mix)

(definst one-note[attack 1 sustain 1 release 1 freq 220 vol 1]J’entends le futur son de la résistance souterraine. Le beat est très intense et les BPMs ne sont pas très élevés. La basse n’est plus une expérience physique mais un matelas moelleux dans lequel il fait bon venir se reposer. L’âge, la famille, les enfants sont passés par là. Ton corps ne peut plus accepter les substances chimiques et la danse dans la boue jusqu’à six heures du matin. Tu te lèves maintenant à l’heure où tu prenais ce bus pour rentrer chez toi au petit matin. (*(env-gen (env-lin attack sustain release) 1 1 0 1 FREE)(sin-osc freq)))

( ♫) Aphex Twin – 4 bit 9d api+e+6

(definst crazy-saw [freq 220 depth 10 rate 6 length 3](* 0.3(line:kr 0 1 length FREE)(saw (+ freq (* depth (sin-osc:kr rate))))))Il n’y a plus de stroboscope psychédélique pour te rappeler les effets de la défonce à l’ecstasy. Il n’y a plus personne sur la piste pour danser. (for [i (range 1 10)](crazy-saw i i i i)) Les sons restent dorénavant pâles, solitaires et parfaitement définissables. Les voix samplées sont maintenant accueillantes et familières. Il ne reste plus qu’un long bourdonnement fantomatique qui parcourt doucement les machines.

( ♫) Aphex Twin – CIRCLONT14 (Shrymoming Mix)

Mathieu