無限にunknown pleasuresできるスケッチを書いた
これで好きなだけunknown pleasuresを眺めることができる
Unknown Pleasures (Bonus CD) (Reis)
- アーティスト: Joy Division
- 出版社/メーカー: Warner Classics UK
- 発売日: 2007/11/13
- メディア: CD
- クリック: 3回
- この商品を含むブログ (11件) を見る
// processing int STROKECOUNT = 50; void setup(){ size(400,500); frameRate(14); } void draw(){ background(0); strokeWeight(2); smooth(); stroke(255); fill(0); int step = 4; float lastx = -999; float lasty = -999; float ynoise = float(frameCount)/10; float y; float ystep = height / STROKECOUNT; for (int yorigin = ystep*6; yorigin < height; yorigin+=ystep){ beginShape(); for (float x=20; x<=480; x+=step) { y = yorigin - noise(ynoise + x/200 + random(0.03))*80 * exp(pow((x - 250 - sin(yorigin/ystep)*random(20))/60,2)*(-0.8)); if (lastx > -999) { vertex(x, y); } lastx = x; lasty = y; ynoise += 0.1; } endShape(); lastx = -999; ynoise -= 0.1; } }