kn1kn1

➜  go-plus git:(docker-ci) ✗ docker build .         
Sending build context to Docker daemon 4.961 MB
Sending build context to Docker daemon 
Step 0 : FROM ubuntu:trusty
 ---> 8eaa4ff06b53
Step 1 : MAINTAINER Joe Fitzgerald <jfitzgerald@pivotal.io>
 ---> Running in cff3749083d9
 ---> 6e90bd2152e2
Removing intermediate container cff3749083d9
Step 2 : ENV HOME /root

kn1kn1

(ns reich.core
  (:use overtone.live))

;; Steve Reich's Piano Phase
(def piece [:E4 :F#4 :B4 :C#5 :D5 :F#4 :E4 :C#5 :B4 :F#4 :D5 :C#5])

(definst beep [freq 440 amp 0.1]
  (let [env (env-gen (perc 0.1 0.2) :action FREE)]
    (* amp (* env (sin-osc freq)))))

kn1kn1

Context Free Art Playgound on Heroku

Kenichi Kanai (kn1kn1)

• GitHub
• language-context-free
• Testing / CI For Packages On Linux - Atom Discussion
• kn1kn1/atom-apm-test Repository | Docker Hub Registry - Repositories of Docker Images

Notes

kn1kn1

{:user {

 :plugins [[cider/cider-nrepl "0.9.1"]
           [refactor-nrepl "1.1.0"]]
 :dependencies [[org.clojure/tools.nrepl "0.2.7"]]
 }}

kn1kn1

(ns #^{:author "Roger Allen"
       :doc "Shadertoy meets Overtone.  A demonstration for 'lein run'"}
  shadertone.core
  (:use [overtone.live])
  (:require [shadertone.tone :as t])
  (:gen-class))

;; See examples/00demo_intro_tour.clj for the example code that was
;; once here.

kn1kn1

#
# ex-generative.rb
#  ported from https://github.com/naokinomoto/ex_music_sandbox/blob/master/lib/piece/generative_sup.ex
#
use_bpm 55

c_major_scale = scale(:C4, :major, num_octaves: 2) # :C4 = 60
puts c_major_scale

r = 3.8

kn1kn1

// cf. https://github.com/brunoruviaro/SynthDefs-for-Patterns/blob/master/laserbeam.scd
(
SynthDef("laserbeam", {
    arg out = 0, pan = 0.0, freq = 440, amp = 0.1, dur = 0.25;
    var snd, freqenv, ampenv;
    // frequency envelope
    freqenv = EnvGen.ar(Env([1, 0.25], [dur/2]));
    // amplitude envelope
    // no gate: fixed-time envelope, self-terminating.
    ampenv = EnvGen.ar(

kn1kn1

scale 0.1
move -32,0,0
for i: 0 to 32 step 1
  box fft(i)
  move 2,0,0
end

kn1kn1

background gray

color gray
stroke random
do 3 times
 move
 rotate FRAME / 0.01,100,100,100
 ball 10 + (wave(2000) * 2)
 box random
end

kn1kn1

// cf. https://github.com/brunoruviaro/SynthDefs-for-Patterns/blob/master/laserbeam.scd
// cf. https://gist.github.com/kn1kn1/bfb750a57895b804907c
(
SynthDef("laserbeam", {
    arg out = 0, pan = 0.0, freq = 440, amp = 0.1, dur = 0.25;
    var snd, freqenv, ampenv;
    // frequency envelope
    freqenv = EnvGen.kr(Env([1, 0.25], [dur/2]));
    // amplitude envelope
    // no gate: fixed-time envelope, self-terminating.