init commit

master
Nova deViator 2015-09-09 14:03:24 +02:00
commit 81fb74dc00
12 changed files with 3103 additions and 0 deletions

237
pde/IF3Si/IF3Si.pde Normal file
View File

@ -0,0 +1,237 @@
/* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
Interface Fractures III - SILICON
(c) nova@deviator.si
IF3Si.pde
*/
// undecorate window (remove window borders etc) - - - - - - - - - - - - - - -
public void init() { frame.removeNotify(); frame.setUndecorated(true);
frame.addNotify(); super.init(); }
// load libs
import oscP5.*; // Open Sound Control
import netP5.*;
// declarations - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
// declare OSC object
OscP5 oscP5;
// IMAGE POOL, a 2D array
PImage[][] imgPool;
// texture (tiles)
float texX = 0;
float texY = 0;
// generate an array of random numbers
int[] rands = new int[500];
IntList randz; // arrayList
// for draw cube
int cubesnum = 20;
PGraphics[] cubes = new PGraphics[cubesnum];
PShader blur;
PGraphics bpass1, bpass2;
// spheres
int ptsW, ptsH;
int numPointsW;
int numPointsH_2pi;
int numPointsH;
float[] coorX;
float[] coorY;
float[] coorZ;
float[] multXZ;
PGraphics sphere;
void setup() { // - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
float sizefactor = 1; // define the size of the screen, 1 = 1080p
size( int( 1920 * sizefactor ),
int( 1080 * sizefactor ),
P3D ); // renderer
// framerate
frameRate(60);
smooth(32); // 32??
noCursor();
background(10);
println("\n\n~~~ Hello. Starting Interface Fractures III - SILICON." +
" - - - - - - - - - - - - - - - - - - - - - -\n");
// start oscP5, listening for incoming messages at port 12000
println("~~~ starting oscP5 ...");
oscP5 = new OscP5(this,12000);
oscP5.plug(this,"ctlin","/ctlin"); // to be converted for PD OSC input
// get all textures into an image pool
println("\n\n~~~ loading textures into image pool ...\n");
imgPool = getImages("/images/");
// create an array of random value between -50 and 50
for (int i=0; i < 500; i++) { rands[i] = i-250; }
shuffle(rands);
// drawCube ` ` ` ` ` ` ` ` ` ` ` ` ` ` ` ` ` ` `
// an array of PGraphics
for (int i = 0; i < cubesnum; i++) {
cubes[i] = createGraphics(width, height, P3D);
}
blur = loadShader("blur.glsl");
bpass1 = createGraphics(width, height, P3D);
bpass1.smooth();
bpass2 = createGraphics(width, height, P3D);
bpass2.smooth();
randz = new IntList(width);
for (int i=0; i < width; i++) {
randz.set(i, i);
}
randz.shuffle();
//println(randz);
// spheres
ptsW=30;
ptsH=30;
initializeSphere(ptsW, ptsH); // number of vertices around the width and height
sphere = createGraphics(width, height, P3D);
}
void draw() { // - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
// clean screen ````````````````````````````````````````````````````|
/*
blendMode(BLEND);
screenClean(color(50));
// SPHERES -----------------------------------------------------------
//offscreen render spheres
sphere.beginDraw();
sphere.blendMode(BLEND);
sphere.rect(0, 0, width, height);
sphere.blendMode(DARKEST);
sphere.noStroke();
sphere.pushMatrix();
sphere.translate(width/2+(width/8), height/2, 580);
sphere.rotateX(radians(float(frameCount) * 0.1));
sphere.rotateY(radians(float(frameCount) * 0.23));
sphere.rotateZ(radians(float(frameCount) * 0.2));
textureSphere(sphere, 400, 400, 400, imgPool[3][1]);
sphere.popMatrix();
sphere.pushMatrix();
sphere.translate(width/2+(width/8), height/2, 580);
sphere.rotateX(radians(float(frameCount) * 0.2));
sphere.rotateY(radians(float(frameCount) * 0.13));
sphere.rotateZ(radians(float(frameCount) * 0.01));
textureSphere(sphere, 390, 390, 390, imgPool[3][1]);
sphere.popMatrix();
sphere.endDraw();
// tint(0);
// image(sphere, 0, 0);
textureWrap(REPEAT);
//textureMode(NORMAL);
pushMatrix();
//tint(255);
translate(width/2, height/2); // center coordinate system
translate(((frameCount*1) % width) - width/2,0);
//stroke(0,50);
//strokeWeight(1);
noStroke();
float quadW = 500;
float quadH = height;
float v1x = 0; // sin(radians(frameCount))*250+400;
pushMatrix() ;
//rotate(PI/PI);
beginShape(QUADS);
texture(sphere);
vertex(-quadW/2, -quadH/2, 0, 0);
vertex( quadW/2, -quadH/2, quadW, 0);
vertex( quadW/2, quadH/2, quadW, quadH);
vertex(-quadW/2, quadH/2, 0, quadH);
endShape();
popMatrix();
popMatrix();
*/
// --------------------------------------------------------------------------
// SCENENGINES
// draw tiles `````````````````````````````````````````````````````|
tiles(boolean(1), // render on/off
color(0, 0, 0, 80), // background color (HSBA)
color(80, 70, 20, 100), // tile color
20, // tile hue distance
0, // blendMode
6, // number of tiles on X axis
1, // number of tiles on Y axis
2, // texture bank number
0, // texture number/id
10, // texture speed X
1, // texture speed Y
64 // overlap. 127 = 300%
);
// draw cubes `````````````````````````````````````````````````````|
drawCube(boolean(0), cubes,
100, height/2, -100,
400, 300, 300,
radians(frameCount), radians(frameCount*0.7), PI/2,
0);
// test pattern```````````````````````````````````````````````````|
testPattern(boolean(0), // on/off
2, 0, // img bank & ID
255, // image alpha
10, // number of horizontal 'lanes'
10, // density
4, // stroke width
255, // stroke alpha
2 // speed
);
// debug `````````````````````````````````````````````````````````|
// draw test picture
testPicture(boolean(0));
// frames per second
displayFps(true);
// document
autoSnap(false);
} // --------------------------------------------------------------------------

59
pde/IF3Si/blur.glsl Normal file
View File

@ -0,0 +1,59 @@
// Adapted from:
// http://callumhay.blogspot.com/2010/09/gaussian-blur-shader-glsl.html
#ifdef GL_ES
precision mediump float;
precision mediump int;
#endif
#define PROCESSING_TEXTURE_SHADER
uniform sampler2D texture;
// The inverse of the texture dimensions along X and Y
uniform vec2 texOffset;
varying vec4 vertColor;
varying vec4 vertTexCoord;
uniform int blurSize;
uniform int horizontalPass; // 0 or 1 to indicate vertical or horizontal pass
uniform float sigma; // The sigma value for the gaussian function: higher value means more blur
// A good value for 9x9 is around 3 to 5
// A good value for 7x7 is around 2.5 to 4
// A good value for 5x5 is around 2 to 3.5
// ... play around with this based on what you need :)
const float pi = 3.14159265;
void main() {
float numBlurPixelsPerSide = float(blurSize / 2);
vec2 blurMultiplyVec = 0 < horizontalPass ? vec2(1.0, 0.0) : vec2(0.0, 1.0);
// Incremental Gaussian Coefficent Calculation (See GPU Gems 3 pp. 877 - 889)
vec3 incrementalGaussian;
incrementalGaussian.x = 1.0 / (sqrt(2.0 * pi) * sigma);
incrementalGaussian.y = exp(-0.5 / (sigma * sigma));
incrementalGaussian.z = incrementalGaussian.y * incrementalGaussian.y;
vec4 avgValue = vec4(0.0, 0.0, 0.0, 0.0);
float coefficientSum = 0.0;
// Take the central sample first...
avgValue += texture2D(texture, vertTexCoord.st) * incrementalGaussian.x;
coefficientSum += incrementalGaussian.x;
incrementalGaussian.xy *= incrementalGaussian.yz;
// Go through the remaining 8 vertical samples (4 on each side of the center)
for (float i = 1.0; i <= numBlurPixelsPerSide; i++) {
avgValue += texture2D(texture, vertTexCoord.st - i * texOffset *
blurMultiplyVec) * incrementalGaussian.x;
avgValue += texture2D(texture, vertTexCoord.st + i * texOffset *
blurMultiplyVec) * incrementalGaussian.x;
coefficientSum += 2.0 * incrementalGaussian.x;
incrementalGaussian.xy *= incrementalGaussian.yz;
}
gl_FragColor = avgValue / coefficientSum;
}

456
pde/IF3Si/functions.pde Normal file
View File

@ -0,0 +1,456 @@
/* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
Interface Fractures III - SILICON
(c) nova@deviator.si
functions.pde
*/
// loads all images into an array - - - - - - - - - - - - - - - - - - - - - - - - -
PImage[][] getImages(String folder) {
PImage[][] imgPool; // declare 2D array imgPool
File dir = new File(dataPath(sketchPath + folder)); // first folder
String[] dirlist = dir.list(); // an array of folders (strings)
dirlist = sort(dirlist); //
imgPool = new PImage[dirlist.length][10]; // create 2d array imgPool
for (int i = 0; i < dirlist.length; i++) {
String fulldir = dataPath(sketchPath + folder + dirlist[i]) + "/";
File dir2 = new File(fulldir);
String[] filelist = dir2.list(); // an array of image names
filelist = sort(filelist);
if (filelist.length != 0) {
for (int j = 0; j < filelist.length; j++) {
println("imgPool[" + i + "][" + j + "]: " + fulldir + filelist[j]);
imgPool[i][j] = loadImage(fulldir + filelist[j]);
}
} else {
println("No files in this folder: " + fulldir);
}
}
return imgPool;
}
// function to shuffle an array of integers - - - - - - - - - - - - - - - - - - - - -
void shuffle(int[] a)
{
int temp, pick;
for(int i=0; i<a.length; i++)
{
temp = a[i];
pick = (int)random(a.length);
a[i] = a[pick];
a[pick] = temp;
}
}
void switchBlendMode(int blendMode) // - - - - - - - - - - - - - - - - - - - - - - -
{
switch(blendMode) {
case 0:
blendMode(ADD); // additive blending with white clip: C = min(A*factor + B, 255)
break;
case 1:
blendMode(SUBTRACT); // subtractive blend w/ black clip: C = max(B - A*factor, 0)
break;
case 2:
blendMode(LIGHTEST); // only the lightest colour succeeds: C = max(A*factor, B)
break;
case 3:
blendMode(DARKEST); // only the darkest colour succeeds: C = min(A*factor, B)
break;
case 4:
blendMode(SCREEN); // opposite multiply, uses inverse values of the colors.
break;
case 5:
blendMode(MULTIPLY); // multiply the colors, result will always be darker.
break;
case 6:
blendMode(EXCLUSION); // similar to DIFFERENCE, but less extreme.
break;
case 7:
blendMode(REPLACE); // pixels entirely replace others + don't utilize alpha values
break;
default:
blendMode(BLEND); // linear interp. of colours: C = A*factor + B. Default.
break;
} // DIFFERENCE: subtract colors from underlying image. NOT SUPPORTED BY P3D!! */
}
// TILES - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/* TODO:
- different zooms (random?)
- better rotation
- multiple instances of the same thing - with
different texture & some parameters + parameterize
- zoom variations
- ?amount of speed variations accross tiles
*/
void tiles( boolean render, // should we render or not?
color bgfill, // backgorund color
color tilecolor, // tile color
int huedist, // tile color distance for interpolation
int blendMode, // blending mode of tiles
int numx, // number of tiles on X
int numy, // number of tiles on Y
int texBank,
int texNum,
float texSpeedX,
float texSpeedY,
float overlap )
{
if (render) {
colorMode(HSB, 360, 100, 100, 100);
blendMode(BLEND);
fill(bgfill);
noStroke();
rect(0, 0, width, height);
switchBlendMode(blendMode); // blendMode function using integers
texSpeedX *= 0.01;
texSpeedY *= 0.01;
texX += sq(texSpeedX);
texY += sq(texSpeedY);
float numxfact = 1 / float(numx);
float numyfact = 1 / float(numy);
float aspectRatio = (height / float(numy)) / (width / float(numx));
float offsetPerc = overlap * (300/127);
float uniZoom = numxfact * (float(width)/1024);
float offsetX = width * numxfact * offsetPerc * 0.01;
float offsetY = height * numyfact * offsetPerc * 0.01;
float texoffsetX = 1 + 0.01 * offsetPerc ;
float texoffsetY = texoffsetX;
float huefactor = float(huedist) / (numx * numy);
for (int nx=0; nx < numx; nx++) {
for (int ny=0; ny < numy; ny++) {
int tileID = nx * numy + ny;
float randX = rands[ (tileID % rands.length) ] * 0.01;
float randY = rands[ ((tileID + 50) % rands.length) ] * 0.01;
float newhue = hue(tilecolor) + huefactor * tileID;
tint(newhue, saturation(tilecolor), brightness(tilecolor), alpha(tilecolor));
textureWrap(REPEAT);
textureMode(NORMAL);
beginShape();
texture(imgPool[texBank][texNum]);
vertex(width * numxfact * nx - offsetX, height * numyfact * ny - offsetY, 0 + texX * randX, 0 + texY * randY);
vertex(width * numxfact * (nx + 1) + offsetX, height * numyfact * ny - offsetY, 1 * uniZoom * texoffsetX + texX * randX, 0 + texY * randY);
vertex(width * numxfact * (nx + 1) + offsetX, height * numyfact * (ny + 1) + offsetY, 1 * uniZoom * texoffsetX + texX * randX, aspectRatio * uniZoom * texoffsetY + texY * randY);
vertex(width * numxfact * nx - offsetX, height * numyfact * (ny + 1) + offsetY, 0 + texX * randX, aspectRatio * uniZoom * texoffsetY + texY * randY);
endShape();
}
}
}
}
// TEST PICTURE - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
void testPicture(boolean render) {
if (render) {
fill(127);
stroke(255);
strokeWeight(1);
rect(1, 1, width-2, height-2);
ellipse(width/2, height/2, height-4, height-4);
ellipse(height/4, height/4, height/2-4, height/2-4);
ellipse(height/4, 3*height/4, height/2-4, height/2-4);
ellipse(width-height/4, height/4, height/2-4, height/2-4);
ellipse(width-height/4, 3*height/4, height/2-4, height/2-4);
line(width/2, 0, width/2, height);
line(0, height/2, width, height/2);
fill(0);
textSize(50);
textAlign(CENTER,CENTER);
text("Interface Fractures III", width/2, height/2,4);
/* more tests:
- horizontal and vertical block, moving fast!
- flicker test, black&white, 60Hz
- color and gray stripes of interpolation
*/
}
}
// DRAW CUBE - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
void drawCube( boolean render, PGraphics cubes[],
int posX, int posY, int posZ,
int dimW, int dimH, int dimL,
float rotX, float rotY, float rotZ,
int blurAmount
//float xd, float yd
)
{
if (render) {
blendMode(BLEND);
fill(0);
rect(0, 0, width, height);
//blendMode(LIGHTEST);
for (int i=0; i < cubes.length; i++) {
posX += 100;
cubes[i].beginDraw();
cubes[i].clear();
cubes[i].smooth();
cubes[i].lights();
cubes[i].stroke(255);
cubes[i].strokeWeight(10);
cubes[i].fill(127);
//cubes[i].noFill();
cubes[i].translate(posX, posY, posZ);
cubes[i].rotateX(rotX);
cubes[i].rotateY(rotY);
cubes[i].rotateZ(rotZ);
cubes[i].box(dimW, dimH, dimL);
cubes[i].endDraw();
if (blurAmount != 0) { // this blur chokes graphic processor
blur.set("blurSize", blurAmount);
blur.set("sigma", 9.0f);
blur.set("horizontalPass", 0);
bpass1.beginDraw();
bpass1.clear();
//bpass1.noLights();
bpass1.shader(blur);
bpass1.image(cubes[i], 0, 0);
bpass1.endDraw();
blur.set("horizontalPass", 1);
cubes[i].beginDraw();
cubes[i].clear();
//cubes[i].noLights();
cubes[i].shader(blur);
cubes[i].image(bpass1, 0, 0);
cubes[i].endDraw();
}
image(cubes[i], 0, 0);
}
}
}
// TEST PATTERN - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
/* TO BE ADDED:
- use quads
- add textures
>- more TO BE EXPANDED / REFINED!!! */
void testPattern( boolean render,
int imgBank, int imgID,
int imgAlpha,
int ylines,
int density,
int lwidth,
int lalpha,
int speed
)
{
if (render) {
tint(imgAlpha);
image(imgPool[imgBank][imgID], 0, 0);
blendMode(BLEND);
int yheight = height/ylines;
for (int y=0; y < ylines; y++) {
int yloc = int((y+1)*height/(ylines+1));
for (int x=0; x < width; x++) {
int index = x + (y * (width/ylines));
index = index % width;
if (randz.get(index) < density * 0.01 * randz.get((index + x + y) % randz.size())) {
int fx = (x + frameCount); // move!
fx = fx * speed * 1 * randz.get((abs(index - x + y) % randz.size())) / randz.size(); // speed!
fx %= width; // wrap at the right edge
color imgC = imgPool[imgBank][imgID].get(fx, yloc);
stroke(imgC, lalpha);
strokeWeight(1 + map(brightness(imgC), 0, 255, 0, lwidth));
line(fx, yheight * y + (yheight/30), fx, yheight * (y+1) - (yheight/30));
}
}
}
}
}
// SPHERES - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
// A 3D textured sphere with simple rotation control.
// thanks to https://processing.org/examples/texturesphere.html
// Texture Sphere written by Gillian Ramsay to better display the poles.
// Previous version by Mike 'Flux' Chang (and cleaned up by Aaron Koblin).
// Original based on code by Toxi.
// modified to accomodate offscreen PGraphics
void initializeSphere(int numPtsW, int numPtsH_2pi) {
// The number of points around the width and height
numPointsW=numPtsW+1;
numPointsH_2pi=numPtsH_2pi; // How many actual pts around the sphere (not just from top to bottom)
numPointsH=ceil((float)numPointsH_2pi/2)+1; // How many pts from top to bottom (abs(....) b/c of the possibility of an odd numPointsH_2pi)
coorX=new float[numPointsW]; // All the x-coor in a horizontal circle radius 1
coorY=new float[numPointsH]; // All the y-coor in a vertical circle radius 1
coorZ=new float[numPointsW]; // All the z-coor in a horizontal circle radius 1
multXZ=new float[numPointsH]; // The radius of each horizontal circle (that you will multiply with coorX and coorZ)
for (int i=0; i<numPointsW ;i++) { // For all the points around the width
float thetaW=i*2*PI/(numPointsW-1);
coorX[i]=sin(thetaW);
coorZ[i]=cos(thetaW);
}
for (int i=0; i<numPointsH; i++) { // For all points from top to bottom
if (int(numPointsH_2pi/2) != (float)numPointsH_2pi/2 && i==numPointsH-1) { // If the numPointsH_2pi is odd and it is at the last pt
float thetaH=(i-1)*2*PI/(numPointsH_2pi);
coorY[i]=cos(PI+thetaH);
multXZ[i]=0;
}
else {
//The numPointsH_2pi and 2 below allows there to be a flat bottom if the numPointsH is odd
float thetaH=i*2*PI/(numPointsH_2pi);
//PI+ below makes the top always the point instead of the bottom.
coorY[i]=cos(PI+thetaH);
multXZ[i]=sin(thetaH);
}
}
}
void textureSphere(PGraphics pg, float rx, float ry, float rz, PImage t) {
// These are so we can map certain parts of the image on to the shape
float changeU=t.width/(float)(numPointsW-1);
float changeV=t.height/(float)(numPointsH-1);
float u=0; // Width variable for the texture
float v=0; // Height variable for the texture
pg.beginShape(TRIANGLE_STRIP);
pg.texture(t);
for (int i=0; i<(numPointsH-1); i++) { // For all the rings but top and bottom
// Goes into the array here instead of loop to save time
float coory=coorY[i];
float cooryPlus=coorY[i+1];
float multxz=multXZ[i];
float multxzPlus=multXZ[i+1];
for (int j=0; j<numPointsW; j++) { // For all the pts in the ring
pg.normal(coorX[j]*multxz, coory, coorZ[j]*multxz);
pg.vertex(coorX[j]*multxz*rx, coory*ry, coorZ[j]*multxz*rz, u, v);
pg.normal(coorX[j]*multxzPlus, cooryPlus, coorZ[j]*multxzPlus);
pg.vertex(coorX[j]*multxzPlus*rx, cooryPlus*ry, coorZ[j]*multxzPlus*rz, u, v+changeV);
u+=changeU;
}
v+=changeV;
u=0;
}
pg.endShape();
}
// TOOLS - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
void screenClean(color c) { // -----------------------------------------
fill(c);
noStroke();
rect(0, 0, width, height);
}
void displayFps(boolean render) { // -----------------------------------
if (render){
// Display Fps
fill(0); noStroke(); rect(width-80, height-30, 80, 30, 4);
fill(200); text(int(frameRate)+"fps", width-40, height-10, 5);}
}
void autoSnap(boolean render) { // -------------------------------------
// auto-save snapshots
if (frameCount == 1000) {
saveFrame("../snapshots/"
+ year() + nf(month(),2)
+ nf(day(),2)
+ nf(hour(),2)
+ nf(minute(),2)
+ nf(second(),2)
+ "_.png");
}
}

BIN
rnx/IF3Si.xrns Normal file

Binary file not shown.

1
scd/.#snd_lines.scd Symbolic link
View File

@ -0,0 +1 @@
random@trin.5102:1441790855

69
scd/IF3Si.scd Normal file
View File

@ -0,0 +1,69 @@
(/* Interface Fractures III - Silicon
(c) Luka Prinčič / Nova deViator
nova@deviator.si
SuperCollider main patch
.______________________ _________.__
| \_ _____/\_____ \ / _____/|__|
| || __) _(__ < \_____ \ | |
| || \ / \/ \| |
|___|\___ / /______ /_______ /|__|
\/ \/ \/
*/
// Be nice. Say hi!
postln("\n\n
- - - - - - - - - - - - - - - - - - - - - - - - - - - - -
>>> Hello. Starting Interface Fractures III - SILICON <<<
.______________________ _________.__
| \\_ _____/\\_____ \\ \/ _____\/|__|
| || __) _(__ < \\_____ \\ | |
| || \\ / \\/ \\| |
|___|\\___ / /______ /_______ /|__|
\\/ \\/ \\/
");
Server.default.waitForBoot {
// where are we?
var dir = PathName(thisProcess.nowExecutingPath).pathOnly;
// this might go to separate file at some point... ---------------------|
// will load samples for granular synthesis
// var dir = PathName(thisProcess.nowExecutingPath).pathOnly; //
var granSmp = PathName(dir +/+ "../smp/granul/").files;
var granBfr = List();
postln("\n~~~ Loading samples for granular synthesis ..." );
granSmp.do({ |item, i|
postln(" " + i + "" + item.folderName +/+ item.fileName);
granBfr.add(Buffer.readChannel(s, item.fullPath, channels:[0])); // [0] forces mono!
});
postln("");
// ---------------------------------------------------------------------|
// what are the files?
~files = List[
"sdefs.scd", // SynthDef definitions
"snd_lines.scd", // converting Si spectra lines to sound
"gui_core.scd", // basic general GUI setup
"gui_chaos.scd", // chaos tab
"gui_granul.scd", //
"gui_main.scd"
];
// for each file in list, load/execute it
~files.do({|item, i| this.executeFile(dir +/+ item) });
}
)
//s.meter;
//s.plotTree;
EnvirGui

835
scd/gui_chaos.scd Normal file
View File

@ -0,0 +1,835 @@
/*
part of: Interface Fractures III - Silicon
(c) Luka Prinčič / Nova deViator
nova@deviator.si
gui_chaos.scd - takes care of all GUI elements under
the chaos tab...
********************************************************** */
~tab_views[~tab_names.at("chaos")].layout = HLayout();
~tab_views[~tab_names.at("chaos")].layout.margins = 0;
~tab_views[~tab_names.at("chaos")].layout.add(nil);
// create a view for StandardMap synth ---------------------------------------------------------
~standardMapView = View.new(~tab_views[~tab_names.at("chaos")]);
~standardMapView.background = Color.gray(0.5);
~standardMapView.layout = VLayout( // vert. layout:
Button()
.states_([
["Standard"],
["Standard", Color.gray(0.2), Color.grey(0.8)] ])
.mouseDownAction_({ | state |
switch(state.value,
0, {~standard2D = Synth(\StandardMap, [\amp, 0]);},
1, {~standard2D.free;}
);
})
.minHeight_(40).minWidth_(70),
HLayout(
VLayout( // parameters
StaticText().string_("frq"),
RangeSlider(nil,Rect(0,0,20,270))
.minWidth_(70) .minHeight_(270)
.lo_(0) .hi_(0.11)
.action_({ | slider |
var minfreq, maxfreq;
minfreq = slider.lo.value.linexp(0, 1, 10, 15000);
maxfreq = slider.hi.value.linexp(0, 1, 10, 15000);
~standard2D.set(\minfreq, minfreq.value);
~standard2D.set(\maxfreq, maxfreq.value);
}),
StaticText().string_("k"),
Knob() .centered_(true) .value_(0.5) .mode_(\horiz) .step_(0.003) .minHeight_(60).minWidth_(60)
.action_({ | val |
val = val.value.linlin(0, 1, 0, 2.8);
~standard2D.set(\k, val);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("x0"),
Knob() .centered_(true) .value_(0.5) .mode_(\horiz) .step_(0.003) .minHeight_(60).minWidth_(60)
.action_({ | val |
val = val.value.linlin(0, 1, 0, 4.9789799812499 * 2);
~standard2D.set(\x0, val);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("y0"),
Knob() .centered_(true) .value_(0.5) .mode_(\horiz) .step_(0.003) .minHeight_(60).minWidth_(60)
.action_({ | val |
val = val.value.linlin(0, 1, 0, 5.7473416156381 * 2);
if(~standard2D.isPlaying, {
~standard2D.set(\x0, val); }
);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
nil
),
VLayout( // gains and filters section
StaticText().string_("OUT"),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("N"),
Knob().value_(0).mode_(\horiz).step_(0.003).minHeight_(60).minWidth_(60)
.action_({ arg amp;
amp = amp.value.linexp(0, 1, 0.01, 1) - 0.01;
~standard2D.set(\ampN, amp);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("L"),
Knob().value_(0).mode_(\horiz).step_(0.003).minHeight_(60).minWidth_(60)
.action_({ arg amp;
amp = amp.value.linexp(0, 1, 0.01, 1) - 0.01;
~standard2D.set(\ampL, amp);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("C"),
Knob().value_(0).mode_(\horiz).step_(0.003).minHeight_(60).minWidth_(60)
.action_({ arg amp;
amp = amp.value.linexp(0, 1, 0.01, 1) - 0.01;
~standard2D.set(\ampC, amp);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("f"),
Knob() .value_(1) .mode_(\horiz) .step_(0.003) .minHeight_(60).minWidth_(60)
.action_({arg freq;
freq = freq.value.linexp(0, 1, 40, 20000);
~standard2D.set(\bpffreq, freq);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().align_(\left).string_("q"),
Knob() .value_(0) .mode_(\horiz) .step_(0.003) .minHeight_(60).minWidth_(60)
.action_({ arg rq;
rq = abs(rq.value - 1);
rq = rq.value.linexp(0, 1, 0.1, 100);
~standard2D.set(\bpfrq, rq);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("A"),
Knob().value_(0).mode_(\horiz).step_(0.003).minHeight_(60).minWidth_(60)
.action_({ arg amp;
amp = amp.value.linexp(0, 1, 0.01, 1) - 0.01;
~standard2D.set(\amp, amp);
}),
nil
)
),
nil;
);
// -------------------------------------------------------------------------------------------------
// create a view for GbmanMap synth ---------------------------------------------------------
~gbmanMapView = View.new(~tab_views[~tab_names.at("chaos")]);
~gbmanMapView.background = Color.gray(0.5);
~gbmanMapView.layout = VLayout( // vert. layout:
Button()
.states_([
["Gbman"],
["Gbman", Color.gray(0.2), Color.grey(0.8)] ])
.mouseDownAction_({ | state |
switch(state.value,
0, {~gbman2D = Synth(\GbmanMap, [\amp, 0]);},
1, {~gbman2D.free;}
);
})
.minHeight_(40).minWidth_(70),
HLayout(
VLayout( // parameters
StaticText().string_("frq"),
RangeSlider(nil,Rect(0,0,20,270))
.minWidth_(70) .minHeight_(270)
.lo_(0) .hi_(0.11)
.action_({ | slider |
var minfreq, maxfreq;
minfreq = slider.lo.value.linexp(0, 1, 10, 15000);
maxfreq = slider.hi.value.linexp(0, 1, 10, 15000);
~gbman2D.set(\minfreq, minfreq.value);
~gbman2D.set(\maxfreq, maxfreq.value);
}),
StaticText().string_("x0"),
Knob() .centered_(true) .value_(0.5) .mode_(\horiz) .step_(0.003) .minHeight_(60).minWidth_(60)
.action_({ | val |
val = val.value.linlin(0, 1, 0, 1.2 * 2);
~gbman2D.set(\x0, val);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("y0"),
Knob() .centered_(true) .value_(0.5) .mode_(\horiz) .step_(0.003) .minHeight_(60).minWidth_(60)
.action_({ | val |
val = val.value.linlin(0, 1, 0, 2.1 * 2);
~gbman2D.set(\y0, val);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
nil
),
VLayout( // gains and filters section
StaticText().string_("OUT"),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("N"),
Knob().value_(0).mode_(\horiz).step_(0.003).minHeight_(60).minWidth_(60)
.action_({ arg amp;
amp = amp.value.linexp(0, 1, 0.01, 1) - 0.01;
~gbman2D.set(\ampN, amp);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("L"),
Knob().value_(0).mode_(\horiz).step_(0.003).minHeight_(60).minWidth_(60)
.action_({ arg amp;
amp = amp.value.linexp(0, 1, 0.01, 1) - 0.01;
~gbman2D.set(\ampL, amp);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("C"),
Knob().value_(0).mode_(\horiz).step_(0.003).minHeight_(60).minWidth_(60)
.action_({ arg amp;
amp = amp.value.linexp(0, 1, 0.01, 1) - 0.01;
~gbman2D.set(\ampC, amp);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("f"),
Knob() .value_(1) .mode_(\horiz) .step_(0.003) .minHeight_(60).minWidth_(60)
.action_({arg freq;
freq = freq.value.linexp(0, 1, 40, 20000);
~gbman2D.set(\bpffreq, freq);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().align_(\left).string_("q"),
Knob() .value_(0) .mode_(\horiz) .step_(0.003) .minHeight_(60).minWidth_(60)
.action_({ arg rq;
rq = abs(rq.value - 1);
rq = rq.value.linexp(0, 1, 0.1, 100);
~gbman2D.set(\bpfrq, rq);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("A"),
Knob().value_(0).mode_(\horiz).step_(0.003).minHeight_(60).minWidth_(60)
.action_({ arg amp;
amp = amp.value.linexp(0, 1, 0.01, 1) - 0.01;
~gbman2D.set(\amp, amp);
}),
nil
)
),
nil;
);
// -------------------------------------------------------------------------------------------------
// create a view for HenonMap synth ---------------------------------------------------------
~henonMapView = View.new(~tab_views[~tab_names.at("chaos")]);
~henonMapView.background = Color.gray(0.5);
~henonMapView.layout = VLayout( // vert. layout:
Button()
.states_([
["Henon"],
["Henon", Color.gray(0.2), Color.grey(0.8)] ])
.mouseDownAction_({ | state |
switch(state.value,
0, {~henon2D = Synth(\HenonMap, [\amp, 0]);},
1, {~henon2D.free;}
);
})
.minHeight_(40).minWidth_(70),
HLayout(
VLayout( // parameters
StaticText().string_("frq"),
RangeSlider(nil,Rect(0,0,20,270))
.minWidth_(70) .minHeight_(270)
.lo_(0) .hi_(0.11)
.action_({ | slider |
var minfreq, maxfreq;
minfreq = slider.lo.value.linexp(0, 1, 10, 15000);
maxfreq = slider.hi.value.linexp(0, 1, 10, 15000);
~henon2D.set(\minfreq, minfreq.value);
~henon2D.set(\maxfreq, maxfreq.value);
}),
StaticText().string_("a"),
Knob() .centered_(true) .value_(0.9) .mode_(\horiz) .step_(0.003) .minHeight_(60).minWidth_(60)
.action_({ | val |
val = val.value.explin(0.01, 1, 0, 1.42);
~henon2D.set(\a, val);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
nil
),
VLayout( // gains and filters section - - - -
StaticText().string_("OUT"),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("N"),
Knob().value_(0).mode_(\horiz).step_(0.003).minHeight_(60).minWidth_(60)
.action_({ arg amp;
amp = amp.value.linexp(0, 1, 0.01, 1) - 0.01;
~henon2D.set(\ampN, amp);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("L"),
Knob().value_(0).mode_(\horiz).step_(0.003).minHeight_(60).minWidth_(60)
.action_({ arg amp;
amp = amp.value.linexp(0, 1, 0.01, 1) - 0.01;
~henon2D.set(\ampL, amp);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("C"),
Knob().value_(0).mode_(\horiz).step_(0.003).minHeight_(60).minWidth_(60)
.action_({ arg amp;
amp = amp.value.linexp(0, 1, 0.01, 1) - 0.01;
~henon2D.set(\ampC, amp);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("f"),
Knob() .value_(1) .mode_(\horiz) .step_(0.003) .minHeight_(60).minWidth_(60)
.action_({arg freq;
freq = freq.value.linexp(0, 1, 40, 20000);
~henon2D.set(\bpffreq, freq);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().align_(\left).string_("q"),
Knob() .value_(0) .mode_(\horiz) .step_(0.003) .minHeight_(60).minWidth_(60)
.action_({ arg rq;
rq = abs(rq.value - 1);
rq = rq.value.linexp(0, 1, 0.1, 100);
~henon2D.set(\bpfrq, rq);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("A"),
Knob().value_(0).mode_(\horiz).step_(0.003).minHeight_(60).minWidth_(60)
.action_({ arg amp;
amp = amp.value.linexp(0, 1, 0.01, 1) - 0.01;
~henon2D.set(\amp, amp);
}),
nil
)
),
nil;
);
// -------------------------------------------------------------------------------------------------
// create a view for LatoocarfianMap synth ---------------------------------------------------------
~latoocarfianMapView = View.new(~tab_views[~tab_names.at("chaos")]);
~latoocarfianMapView.background = Color.gray(0.5);
~latoocarfianMapView.layout = VLayout( // vert. layout:
Button()
.states_([
["Latoocarfian"],
["Latoocarfian", Color.gray(0.2), Color.grey(0.8)] ])
.mouseDownAction_({ | state |
switch(state.value,
0, {~latoocarfian2D = Synth(\LatoocarfianMap, [\amp, 0]);},
1, {~latoocarfian2D.free;}
);
})
.minHeight_(40).minWidth_(70),
HLayout(
VLayout( // parameters
StaticText().string_("frq"),
RangeSlider(nil,Rect(0,0,20,180))
.minWidth_(70) .minHeight_(180)
.lo_(0) .hi_(0.11)
.action_({ | slider |
var minfreq, maxfreq;
minfreq = slider.lo.value.linexp(0, 1, 10, 15000);
maxfreq = slider.hi.value.linexp(0, 1, 10, 15000);
~latoocarfian2D.set(\minfreq, minfreq.value);
~latoocarfian2D.set(\maxfreq, maxfreq.value);
}),
StaticText().string_("a"),
Knob().centered_(true) .value_(0.5).mode_(\horiz).step_(0.003).minHeight_(60).minWidth_(60)
.action_({ arg a;
a = a.value.linlin(0, 1, 0, 2);
~latoocarfian2D.set(\a, a);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("b"),
Knob().centered_(true) .value_(0.5) .mode_(\horiz).step_(0.003).minHeight_(60).minWidth_(60)
.action_({ arg b;
b = b.value.linlin(0, 1, 0, 6);
~latoocarfian2D.set(\b, b);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("c"),
Knob().centered_(true) .value_(0.5) .mode_(\horiz).step_(0.003).minHeight_(60).minWidth_(60)
.action_({ arg c;
c = c.value;
~latoocarfian2D.set(\c, c);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("d"),
Knob().centered_(true) .value_(0.5) .mode_(\horiz).step_(0.003).minHeight_(60).minWidth_(60)
.action_({ arg d;
d = d.value;
~latoocarfian2D.set(\d, d);
}),
nil
),
VLayout( // gains and filters section
StaticText().string_("OUT"),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("N"),
Knob().value_(0).mode_(\horiz).step_(0.003).minHeight_(60).minWidth_(60)
.action_({ arg amp;
amp = amp.value.linexp(0, 1, 0.01, 1) - 0.01;
~latoocarfian2D.set(\ampN, amp);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("L"),
Knob().value_(0).mode_(\horiz).step_(0.003).minHeight_(60).minWidth_(60)
.action_({ arg amp;
amp = amp.value.linexp(0, 1, 0.01, 1) - 0.01;
~latoocarfian2D.set(\ampL, amp);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("C"),
Knob().value_(0).mode_(\horiz).step_(0.003).minHeight_(60).minWidth_(60)
.action_({ arg amp;
amp = amp.value.linexp(0, 1, 0.01, 1) - 0.01;
~latoocarfian2D.set(\ampC, amp);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("f"),
Knob() .value_(1) .mode_(\horiz) .step_(0.003) .minHeight_(60).minWidth_(60)
.action_({arg freq;
freq = freq.value.linexp(0, 1, 40, 20000);
~latoocarfian2D.set(\bpffreq, freq);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().align_(\left).string_("q"),
Knob() .value_(0) .mode_(\horiz) .step_(0.003) .minHeight_(60).minWidth_(60)
.action_({ arg rq;
rq = abs(rq.value - 1);
rq = rq.value.linexp(0, 1, 0.1, 100);
~latoocarfian2D.set(\bpfrq, rq);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("A"),
Knob().value_(0).mode_(\horiz).step_(0.003).minHeight_(60).minWidth_(60)
.action_({ arg amp;
amp = amp.value.linexp(0, 1, 0.01, 1) - 0.01;
~latoocarfian2D.set(\amp, amp);
}),
nil
)
),
nil;
);
// create a view for LorenzMap synth ---------------------------------------------------------
~lorenzMapView = View.new(~tab_views[~tab_names.at("chaos")]);
~lorenzMapView.background = Color.gray(0.5);
~lorenzMapView.layout = VLayout( // vert. layout:
Button()
.states_([
["Lorenz"],
["Lorenz", Color.gray(0.2), Color.grey(0.8)] ])
.mouseDownAction_({ | state |
switch(state.value,
0, {~lorenz2D = Synth(\LorenzMap, [\amp, 0]);},
1, {~lorenz2D.free;}
);
})
.minHeight_(40).minWidth_(70),
HLayout(
VLayout( // parameters
StaticText().string_("frq"),
RangeSlider(nil,Rect(0,0,20,270))
.minWidth_(70) .minHeight_(270)
.lo_(0) .hi_(0.11)
.action_({ | slider |
var minfreq, maxfreq;
minfreq = slider.lo.value.linexp(0, 1, 10, 15000);
maxfreq = slider.hi.value.linexp(0, 1, 10, 15000);
~lorenz2D.set(\minfreq, minfreq.value);
~lorenz2D.set(\maxfreq, maxfreq.value);
}),
StaticText().string_("x0"),
Knob() .centered_(true) .value_(0.5) .mode_(\horiz) .step_(0.003) .minHeight_(60).minWidth_(60)
.action_({ | val |
val = val.value.linlin(0, 1, 0, 0.090879182417163 * 2);
~lorenz2D.set(\x0, val);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("y0"),
Knob() .centered_(true) .value_(0.5) .mode_(\horiz) .step_(0.003) .minHeight_(60).minWidth_(60)
.action_({ | val |
val = val.value.linlin(0, 1, 0, 2.97077458055 * 2);
~lorenz2D.set(\y0, val);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("z0"),
Knob() .centered_(true) .value_(0.5) .mode_(\horiz) .step_(0.003) .minHeight_(60).minWidth_(60)
.action_({ | val |
val = val.value.linlin(0, 1, 0, 24.282041054363 * 2);
~lorenz2D.set(\z0, val);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
nil
),
VLayout(
nil,
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("s"),
Knob() .centered_(true) .value_(0.5) .mode_(\horiz) .step_(0.003) .minHeight_(60).minWidth_(60)
.action_({ | val |
val = val.value.linlin(0, 1, 0, 10 * 2);
~lorenz2D.set(\s, val);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("r"),
Knob() .centered_(true) .value_(0.5) .mode_(\horiz) .step_(0.003) .minHeight_(60).minWidth_(60)
.action_({ | val |
val = val.value.linlin(0, 1, 0, 28 * 2);
~lorenz2D.set(\r, val);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("b"),
Knob() .centered_(true) .value_(0.5) .mode_(\horiz) .step_(0.003) .minHeight_(60).minWidth_(60)
.action_({ | val |
val = val.value.linlin(0, 1, 0, 2.666666667 * 2);
~lorenz2D.set(\b, val);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("h"),
Knob() .centered_(true) .value_(0.5) .mode_(\horiz) .step_(0.003) .minHeight_(60).minWidth_(60)
.action_({ | val |
val = val.value.linlin(0, 1, 0, 0.02 * 2);
~lorenz2D.set(\h, val);
}),
nil
),
VLayout( // gains and filters section
StaticText().string_("OUT"),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("N"),
Knob().value_(0).mode_(\horiz).step_(0.003).minHeight_(60).minWidth_(60)
.action_({ arg amp;
amp = amp.value.linexp(0, 1, 0.01, 1) - 0.01;
~lorenz2D.set(\ampN, amp);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("L"),
Knob().value_(0).mode_(\horiz).step_(0.003).minHeight_(60).minWidth_(60)
.action_({ arg amp;
amp = amp.value.linexp(0, 1, 0.01, 1) - 0.01;
~lorenz2D.set(\ampL, amp);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("C"),
Knob().value_(0).mode_(\horiz).step_(0.003).minHeight_(60).minWidth_(60)
.action_({ arg amp;
amp = amp.value.linexp(0, 1, 0.01, 1) - 0.01;
~lorenz2D.set(\ampC, amp);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("f"),
Knob() .value_(1) .mode_(\horiz) .step_(0.003) .minHeight_(60).minWidth_(60)
.action_({arg freq;
freq = freq.value.linexp(0, 1, 40, 20000);
~lorenz2D.set(\bpffreq, freq);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().align_(\left).string_("q"),
Knob() .value_(0) .mode_(\horiz) .step_(0.003) .minHeight_(60).minWidth_(60)
.action_({ arg rq;
rq = abs(rq.value - 1);
rq = rq.value.linexp(0, 1, 0.1, 100);
~lorenz2D.set(\bpfrq, rq);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("A"),
Knob().value_(0).mode_(\horiz).step_(0.003).minHeight_(60).minWidth_(60)
.action_({ arg amp;
amp = amp.value.linexp(0, 1, 0.01, 1) - 0.01;
~lorenz2D.set(\amp, amp);
}),
nil
)
),
nil;
);
// create a view for FhnMap synth ---------------------------------------------------------
~fhnMapView = View.new(~tab_views[~tab_names.at("chaos")]);
~fhnMapView.background = Color.gray(0.5);
~fhnMapView.layout = VLayout( // vert. layout:
Button()
.states_([
["Fhn"],
["Fhn", Color.gray(0.2), Color.grey(0.8)] ])
.mouseDownAction_({ | state |
switch(state.value,
0, {~fhn2D = Synth(\FhnMap, [\amp, 0]);},
1, {~fhn2D.free;}
);
})
.minHeight_(40).minWidth_(70),
HLayout(
VLayout( // parameters
StaticText().string_("frq"),
RangeSlider(nil,Rect(0,0,20,270))
.minWidth_(70) .minHeight_(270)
.lo_(0) .hi_(0.11)
.action_({ | slider |
var minfreq, maxfreq;
minfreq = slider.lo.value.linexp(0, 1, 10, 15000);
maxfreq = slider.hi.value.linexp(0, 1, 10, 15000);
~fhn2D.set(\minfreq, minfreq.value);
~fhn2D.set(\maxfreq, maxfreq.value);
}),
/* urate: 0.1, wrate: 0.1,
b0: 0.6, b1: 0.8,
i: 0, u0: 0, w0: 0, */
StaticText().string_("urate"),
Knob() .centered_(true) .value_(0.5) .mode_(\horiz) .step_(0.003) .minHeight_(60).minWidth_(60)
.action_({ | val |
val = val.value.linlin(0, 1, 0, 0.1 * 2);
~fhn2D.set(\urate, val);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("wrate"),
Knob() .centered_(true) .value_(0.5) .mode_(\horiz) .step_(0.003) .minHeight_(60).minWidth_(60)
.action_({ | val |
val = val.value.linlin(0, 1, 0, 0.1 * 2);
~fhn2D.set(\wrate, val);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
nil
),
VLayout(
nil,
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("b0"),
Knob() .centered_(true) .value_(0.5) .mode_(\horiz) .step_(0.003) .minHeight_(60).minWidth_(60)
.action_({ | val |
val = val.value.linlin(0, 1, 0, 0.6 * 2);
~fhn2D.set(\b0, val);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("b1"),
Knob() .centered_(true) .value_(0.5) .mode_(\horiz) .step_(0.003) .minHeight_(60).minWidth_(60)
.action_({ | val |
val = val.value.linlin(0, 1, 0, 0.8 * 2);
~fhn2D.set(\b1, val);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("i"),
Knob() .centered_(true) .value_(0.5) .mode_(\horiz) .step_(0.003) .minHeight_(60).minWidth_(60)
.action_({ | val |
val = val.value.linlin(0, 1, -1, 1);
~fhn2D.set(\i, val);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("u0"),
Knob() .centered_(true) .value_(0.5) .mode_(\horiz) .step_(0.003) .minHeight_(60).minWidth_(60)
.action_({ | val |
val = val.value.linlin(0, 1, -1, 1);
~fhn2D.set(\u0, val);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("w0"),
Knob() .centered_(true) .value_(0.5) .mode_(\horiz) .step_(0.003) .minHeight_(60).minWidth_(60)
.action_({ | val |
val = val.value.linlin(0, 1, -1, 1);
~fhn2D.set(\w0, val);
}),
nil
),
VLayout( // gains and filters section
StaticText().string_("OUT"),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("N"),
Knob().value_(0).mode_(\horiz).step_(0.003).minHeight_(60).minWidth_(60)
.action_({ arg amp;
amp = amp.value.linexp(0, 1, 0.01, 1) - 0.01;
~fhn2D.set(\ampN, amp);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("L"),
Knob().value_(0).mode_(\horiz).step_(0.003).minHeight_(60).minWidth_(60)
.action_({ arg amp;
amp = amp.value.linexp(0, 1, 0.01, 1) - 0.01;
~fhn2D.set(\ampL, amp);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("C"),
Knob().value_(0).mode_(\horiz).step_(0.003).minHeight_(60).minWidth_(60)
.action_({ arg amp;
amp = amp.value.linexp(0, 1, 0.01, 1) - 0.01;
~fhn2D.set(\ampC, amp);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("f"),
Knob() .value_(1) .mode_(\horiz) .step_(0.003) .minHeight_(60).minWidth_(60)
.action_({arg freq;
freq = freq.value.linexp(0, 1, 40, 20000);
~fhn2D.set(\bpffreq, freq);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().align_(\left).string_("q"),
Knob() .value_(0) .mode_(\horiz) .step_(0.003) .minHeight_(60).minWidth_(60)
.action_({ arg rq;
rq = abs(rq.value - 1);
rq = rq.value.linexp(0, 1, 0.1, 100);
~fhn2D.set(\bpfrq, rq);
}),
StaticText().maxHeight_(1).background_(Color.gray(0.1,0.2)),
StaticText().string_("A"),
Knob().value_(0).mode_(\horiz).step_(0.003).minHeight_(60).minWidth_(60)
.action_({ arg amp;
amp = amp.value.linexp(0, 1, 0.01, 1) - 0.01;
~fhn2D.set(\amp, amp);
}),
nil
)
),
nil;
);
// -------------------------------------------------------------------------------------------------
~tab_views[~tab_names.at("chaos")].layout.add(nil);
// -------------------------------------------------------------------------------------------------

146
scd/gui_core.scd Normal file
View File

@ -0,0 +1,146 @@
/*
part of: Interface Fractures III - Silicon
(c) Luka Prinčič / Nova deViator
nova@deviator.si
gui_core.scd - takes care of core GUI things: layouts,
tabs, window, sizes...
********************************************************** */
// general color palette
QtGUI.palette = QPalette.dark;
~screenWidth = 1348;
~screenHeight = 753;
~pagerbuttonwidth = 90;
~pagerbuttonheight = 55;
~pagerbuttonpadding = 3;
~pagerwidth = ~pagerbuttonpadding + ~pagerbuttonwidth * ~tabs.size - ~pagerbuttonpadding;
~pagerheight = ~pagerbuttonheight;
// make a window
w = Window.new( name: "Interface Fractures III",
bounds: Rect(0, 2, ~screenWidth, ~screenHeight),
//bounds: w.availableBounds,
resizable: true,
border: false,
server: s,
scroll: true
).front;
w.fullScreen;
postln("~~~ Created window ..." + w.bounds);
w.background_(Color.gray(0.2));
~pager = View.new(w, Rect(0,0,100,100))
.minHeight_(~pagerheight)
.minWidth_(~pagerwidth)
.background_(Color.gray(0.4,0.0));
~content = View.new(w, w.view.bounds)
.minWidth_(w.view.bounds.width - 2)
.minHeight_(w.view.bounds.height - ~pagerheight - 20)
.background_(Color.gray(0.3,0.2));
w.layout = VLayout( [~pager, align:\top],
[~content, align:\center], nil );
w.layout.margins = 2;
~pager.layout = HLayout();//margins=1;
~pager.layout.margins = 1;
// CREATE TABS ---------------------------------------------------------------
~tabs = List["chaos", "granul", "players", "processing", "main"];
~tab_btns = List();
~tab_views = List();
~tab_names = Dictionary.new;
//~tab_btns_view = View.new();
// go through all of tabs and make buttons and views
~tabs.do(
{ |item, i|
~tab_names.put(item, i);
// views / containers / pages - - - - -
~tab_views.add(
View.new(~content,Rect(0, 0, 1344, 700))
.background_(Color.gray(0.4,0.4))
//.layout(HLayout)
.visible_(0);
);
// buttons / tabs - - - - -
~tab_btns.add(
//Button(~pager, Rect((~pagerbuttonpadding + ~pagerbuttonwidth * i), 0, ~pagerbuttonwidth, ~pagerbuttonheight))
Button(~pager, Rect((~pagerbuttonpadding + ~pagerbuttonwidth * i), 0, ~pagerbuttonwidth, ~pagerbuttonheight))
.states_([[item],
[item, Color.white, Color.gray(0.6)]])
.action_({arg btn;
switch(btn.value,
0, { postln("~~~ Hide:" + item);
~tab_views[i].visible = 0; },
1, { ~tab_btns.do(
{ |b_item,b_i|
if (b_i != i, {
~tab_btns[b_i].enabled_(1);
~tab_btns[b_i].valueAction = 0;
})
});
~tab_btns[i].enabled_(0);
postln("~~~ Show:" + item + "\n");
~tab_views[i].visible = 1;
})
})
.minHeight_(~pagerbuttonheight).minWidth_(~pagerbuttonwidth);
);
}
);
// CLOSING ////////////////////////////////////////////////////////////////////////
w.view.keyDownAction_({ |view, char, modifiers, unicode, keycode, key|
if (unicode == 27) {
postln("\n- - - - - - - - - - - - - - - - - - - - - - - - - - - - - \n");
postln("~~~ Cought an ESC key. Closing window, freeing synths...");
postln("~~~ Wait, let me see the window bounds:" + w.bounds + "!\n");
w.close;
postln("\n\n<<< So long and thanks for all the fish! >>>"
+ "\n- - - - - - - - - - - - - - - - - - - - - - - - - - - - - ");
}
});
// free all UGens on server (stop sound, etc)
w.onClose_({
postln("<<< Platform IDE:" + Platform.ideName);
s.freeAll;
// when running 'standalone' from shell:
if (Platform.ideName == "none") {
postln("<<< ... sclang is killed. Stockhausen forgives you!");
0.exit;
} {
postln("<<< ... stopping Main.");
thisProcess.stop;
};
postln("- - - - - - - - - - - - - - - - - - - - - - - - - - - - - \n");
});

588
scd/gui_granul.scd Normal file
View File

@ -0,0 +1,588 @@
/*
part of: Interface Fractures III - Silicon
(c) Luka Prinčič / Nova deViator
nova@deviator.si
gui_granul.scd - takes care of all GUI elements under
the 'granul' tab...
********************************************************** */
~tab_views[~tab_names.at("granul")].layout = HLayout(
VLayout( // left half starts here
//~tab_views[~tab_names.at("granul")].layout.add(nil);
//~granSynth1 = View.new(~tab_views[~tab_names.at("granul")]);
//~granSynth1.background = Color.gray(0.5);
//~granSynth1.layout = HLayout( // vert. layout:
// Synth starts here --------------------------------------------------------------------
HLayout(
VLayout(
StaticText().string_("GRANULATOR"),
Button()
.states_([
["OFF", Color.gray(0.2), Color.gray(0.8)],
["ON", Color.gray(0.8), Color.grey(0.2)] ])
.mouseDownAction_({
arg state;
state.value.postln;
if (state.value == 0) {
~granSynth = Synth(\Granny, [\bufnum, b]);
} {
~granSynth.free;
}
})
.minHeight_(70)
.minWidth_(70),
nil
),
VLayout(
PopUpMenu().items_(["buffer1","file2","file3"]).font_(Font("Sans",20)),
StaticText().string_("Filter vs. Position"),
Slider2D()
.x_(0.05)
.y_(0.05)
.action_({ arg slider;
~granSynth.set(\pos, slider.x);
~granSynth.set(\lpfFreq, slider.y.value.linexp(0,1,30,20000,nil))}),
StaticText().string_("Position variation"),
Slider(nil,Rect(0,0,50,10))
.minHeight_(20)
.thumbSize_(50)
.action_({ arg posvar;
posvar = posvar.value;
~granSynth.set(\posvar, posvar.value);
})
),
VLayout(
StaticText().string_("Frequency of grains"),
HLayout(
Slider(nil,Rect(0,0,2,1)).minHeight_(50).thumbSize_(50)
.action_({ arg freq;
freq = ((freq.value * 200) + 1).asInt;
~granSynth.set(\freq, freq.value); freq.value.postln;
~nbf.value_(freq)}),
VLayout(nil,
~nbf = NumberBox(nil,Rect(0,0,1,1))
.font_(Font("Sans",20))
.maxWidth_(50)
.minHeight_(30);
)
),
HLayout(
StaticText().string_("variation"),
Slider(nil,Rect(0,0,2,1)).thumbSize_(50)
.action_({ arg fvar;
fvar = fvar.value * 2;
~granSynth.set(\fvar, fvar.value);
})
),
nil,
StaticText().string_("Duration of grains"),
HLayout(
Slider(nil,Rect(0,0,2,1)).minHeight_(50).thumbSize_(50)
.action_({ arg dur;
dur = dur.value;
~granSynth.set(\dur, dur.value);
~nbd.value_((dur.value * 100).asInt); }),
VLayout(nil,
~nbd = NumberBox(nil,Rect(0,0,1,1))
.font_(Font("Sans", 20))
.maxWidth_(50)
.minHeight_(30);)
),
HLayout(StaticText().string_("variation"),
Slider(nil,Rect(0,0,2,1)).thumbSize_(50)
.action_({ arg durvar;
durvar = durvar.value * 2;
~granSynth.set(\durvar, durvar.value);
})
),
nil,
StaticText().string_("Pitch"),
HLayout(
Slider(nil,Rect(0,0,2,1)).minHeight_(20).thumbSize_(50)
.action_({ arg pitch;
pitch = pitch.value * 2;
~granSynth.set(\pitch, pitch.value);
~nbp.value_(pitch.value); }),
VLayout(nil,
~nbp = NumberBox()
.font_(Font("Sans", 20))
.maxWidth_(50)
.minHeight_(30);)
),
HLayout(StaticText().string_("variation"),
Slider(nil,Rect(0,0,2,1)).thumbSize_(50)
.action_({ arg pitchvar;
pitchvar = pitchvar.value;
~granSynth.set(\pitchvar, pitchvar.value);
})
),
nil,
StaticText().string_("Width (Stereo)"),
HLayout(
Slider(nil,Rect(0,0,2,1)).minHeight_(20).thumbSize_(50)
.action_({ arg width;
width = width.value;
~granSynth.set(\width, width.value);
~nbw.value_(width.value);
}),
VLayout(nil,
~nbw = NumberBox()
.font_(Font("Sans", 20))
.maxWidth_(50)
.minHeight_(30);)
)
),
VLayout(
StaticText().string_("Gain")
.align_(\center),
Slider(nil, Rect(0,0,1,2))
.minWidth_(50)
.thumbSize_(50)
.action_({ arg gain;
~granSynth.set(\gain, gain.value.linexp(0,1,0.01,10,nil)-0.01 * 0.05)})
.valueAction_(0)
;
)
), // synth ends here
HLayout( // bottom left synth starts here --------------------------------------------------------------------
VLayout(
StaticText().string_("GRANULATOR"),
Button()
.states_([
["OFF", Color.gray(0.2), Color.gray(0.8)],
["ON", Color.gray(0.8), Color.grey(0.2)] ])
.mouseDownAction_({
arg state;
state.value.postln;
if (state.value == 0) {
~granSynth = Synth(\Granny, [\bufnum, b]);
} {
~granSynth.free;
}
})
.minHeight_(70)
.minWidth_(70),
nil
),
VLayout(
PopUpMenu().items_(["buffer1","file2","file3"]).font_(Font("Sans",20)),
StaticText().string_("Filter vs. Position"),
Slider2D()
.x_(0.05)
.y_(0.05)
.action_({ arg slider;
~granSynth.set(\pos, slider.x);
~granSynth.set(\lpfFreq, slider.y.value.linexp(0,1,30,20000,nil))}),
StaticText().string_("Position variation"),
Slider(nil,Rect(0,0,50,10))
.minHeight_(20)
.thumbSize_(50)
.action_({ arg posvar;
posvar = posvar.value;
~granSynth.set(\posvar, posvar.value);
})
),
VLayout(
StaticText().string_("Frequency of grains"),
HLayout(
Slider(nil,Rect(0,0,2,1)).minHeight_(50).thumbSize_(50)
.action_({ arg freq;
freq = ((freq.value * 200) + 1).asInt;
~granSynth.set(\freq, freq.value); freq.value.postln;
~nbf.value_(freq)}),
VLayout(nil,
~nbf = NumberBox(nil,Rect(0,0,1,1))
.font_(Font("Sans",20))
.maxWidth_(50)
.minHeight_(30);
)
),
HLayout(
StaticText().string_("variation"),
Slider(nil,Rect(0,0,2,1)).thumbSize_(50)
.action_({ arg fvar;
fvar = fvar.value * 2;
~granSynth.set(\fvar, fvar.value);
})
),
nil,
StaticText().string_("Duration of grains"),
HLayout(
Slider(nil,Rect(0,0,2,1)).minHeight_(50).thumbSize_(50)
.action_({ arg dur;
dur = dur.value;
~granSynth.set(\dur, dur.value);
~nbd.value_((dur.value * 100).asInt); }),
VLayout(nil,
~nbd = NumberBox(nil,Rect(0,0,1,1))
.font_(Font("Sans", 20))
.maxWidth_(50)
.minHeight_(30);)
),
HLayout(StaticText().string_("variation"),
Slider(nil,Rect(0,0,2,1)).thumbSize_(50)
.action_({ arg durvar;
durvar = durvar.value * 2;
~granSynth.set(\durvar, durvar.value);
})
),
nil,
StaticText().string_("Pitch"),
HLayout(
Slider(nil,Rect(0,0,2,1)).minHeight_(20).thumbSize_(50)
.action_({ arg pitch;
pitch = pitch.value * 2;
~granSynth.set(\pitch, pitch.value);
~nbp.value_(pitch.value); }),
VLayout(nil,
~nbp = NumberBox()
.font_(Font("Sans", 20))
.maxWidth_(50)
.minHeight_(30);)
),
HLayout(StaticText().string_("variation"),
Slider(nil,Rect(0,0,2,1)).thumbSize_(50)
.action_({ arg pitchvar;
pitchvar = pitchvar.value;
~granSynth.set(\pitchvar, pitchvar.value);
})
),
nil,
StaticText().string_("Width (Stereo)"),
HLayout(
Slider(nil,Rect(0,0,2,1)).minHeight_(20).thumbSize_(50)
.action_({ arg width;
width = width.value;
~granSynth.set(\width, width.value);
~nbw.value_(width.value);
}),
VLayout(nil,
~nbw = NumberBox()
.font_(Font("Sans", 20))
.maxWidth_(50)
.minHeight_(30);)
)
),
VLayout(
StaticText().string_("Gain")
.align_(\center),
Slider(nil, Rect(0,0,1,2))
.minWidth_(50)
.thumbSize_(50)
.action_({ arg gain;
~granSynth.set(\gain, gain.value.linexp(0,1,0.01,10,nil)-0.01 * 0.05)})
.valueAction_(0)
;
)
); // bottom left synth ends here
), // left half ends here
VLayout( // right half starts here
// left top synth starts here --------------------------------------------------------------------
HLayout(
VLayout(
StaticText().string_("GRANULATOR"),
Button()
.states_([
["OFF", Color.gray(0.2), Color.gray(0.8)],
["ON", Color.gray(0.8), Color.grey(0.2)] ])
.mouseDownAction_({
arg state;
state.value.postln;
if (state.value == 0) {
~granSynth = Synth(\Granny, [\bufnum, b]);
} {
~granSynth.free;
}
})
.minHeight_(70)
.minWidth_(70),
nil
),
VLayout(
PopUpMenu().items_(["buffer1","file2","file3"]).font_(Font("Sans",20)),
StaticText().string_("Filter vs. Position"),
Slider2D()
.x_(0.05)
.y_(0.05)
.action_({ arg slider;
~granSynth.set(\pos, slider.x);
~granSynth.set(\lpfFreq, slider.y.value.linexp(0,1,30,20000,nil))}),
StaticText().string_("Position variation"),
Slider(nil,Rect(0,0,50,10))
.minHeight_(20)
.thumbSize_(50)
.action_({ arg posvar;
posvar = posvar.value;
~granSynth.set(\posvar, posvar.value);
})
),
VLayout(
StaticText().string_("Frequency of grains"),
HLayout(
Slider(nil,Rect(0,0,2,1)).minHeight_(50).thumbSize_(50)
.action_({ arg freq;
freq = ((freq.value * 200) + 1).asInt;
~granSynth.set(\freq, freq.value); freq.value.postln;
~nbf.value_(freq)}),
VLayout(nil,
~nbf = NumberBox(nil,Rect(0,0,1,1))
.font_(Font("Sans",20))
.maxWidth_(50)
.minHeight_(30);
)
),
HLayout(
StaticText().string_("variation"),
Slider(nil,Rect(0,0,2,1)).thumbSize_(50)
.action_({ arg fvar;
fvar = fvar.value * 2;
~granSynth.set(\fvar, fvar.value);
})
),
nil,
StaticText().string_("Duration of grains"),
HLayout(
Slider(nil,Rect(0,0,2,1)).minHeight_(50).thumbSize_(50)
.action_({ arg dur;
dur = dur.value;
~granSynth.set(\dur, dur.value);
~nbd.value_((dur.value * 100).asInt); }),
VLayout(nil,
~nbd = NumberBox(nil,Rect(0,0,1,1))
.font_(Font("Sans", 20))
.maxWidth_(50)
.minHeight_(30);)
),
HLayout(StaticText().string_("variation"),
Slider(nil,Rect(0,0,2,1)).thumbSize_(50)
.action_({ arg durvar;
durvar = durvar.value * 2;
~granSynth.set(\durvar, durvar.value);
})
),
nil,
StaticText().string_("Pitch"),
HLayout(
Slider(nil,Rect(0,0,2,1)).minHeight_(20).thumbSize_(50)
.action_({ arg pitch;
pitch = pitch.value * 2;
~granSynth.set(\pitch, pitch.value);
~nbp.value_(pitch.value); }),
VLayout(nil,
~nbp = NumberBox()
.font_(Font("Sans", 20))
.maxWidth_(50)
.minHeight_(30);)
),
HLayout(StaticText().string_("variation"),
Slider(nil,Rect(0,0,2,1)).thumbSize_(50)
.action_({ arg pitchvar;
pitchvar = pitchvar.value;
~granSynth.set(\pitchvar, pitchvar.value);
})
),
nil,
StaticText().string_("Width (Stereo)"),
HLayout(
Slider(nil,Rect(0,0,2,1)).minHeight_(20).thumbSize_(50)
.action_({ arg width;
width = width.value;
~granSynth.set(\width, width.value);
~nbw.value_(width.value);
}),
VLayout(nil,
~nbw = NumberBox()
.font_(Font("Sans", 20))
.maxWidth_(50)
.minHeight_(30);)
)
),
VLayout(
StaticText().string_("Gain")
.align_(\center),
Slider(nil, Rect(0,0,1,2))
.minWidth_(50)
.thumbSize_(50)
.action_({ arg gain;
~granSynth.set(\gain, gain.value.linexp(0,1,0.01,10,nil)-0.01 * 0.05)})
.valueAction_(0)
;
)
), // synth ends here
HLayout( // bottom right synth starts here --------------------------------------------------------------------
VLayout(
StaticText().string_("GRANULATOR"),
Button()
.states_([
["OFF", Color.gray(0.2), Color.gray(0.8)],
["ON", Color.gray(0.8), Color.grey(0.2)] ])
.mouseDownAction_({
arg state;
state.value.postln;
if (state.value == 0) {
~granSynth = Synth(\Granny, [\bufnum, b]);
} {
~granSynth.free;
}
})
.minHeight_(70)
.minWidth_(70),
nil
),
VLayout(
PopUpMenu().items_(["buffer1","file2","file3"]).font_(Font("Sans",20)),
StaticText().string_("Filter vs. Position"),
Slider2D()
.x_(0.05)
.y_(0.05)
.action_({ arg slider;
~granSynth.set(\pos, slider.x);
~granSynth.set(\lpfFreq, slider.y.value.linexp(0,1,30,20000,nil))}),
StaticText().string_("Position variation"),
Slider(nil,Rect(0,0,50,10))
.minHeight_(20)
.thumbSize_(50)
.action_({ arg posvar;
posvar = posvar.value;
~granSynth.set(\posvar, posvar.value);
})
),
VLayout(
StaticText().string_("Frequency of grains"),
HLayout(
Slider(nil,Rect(0,0,2,1)).minHeight_(50).thumbSize_(50)
.action_({ arg freq;
freq = ((freq.value * 200) + 1).asInt;
~granSynth.set(\freq, freq.value); freq.value.postln;
~nbf.value_(freq)}),
VLayout(nil,
~nbf = NumberBox(nil,Rect(0,0,1,1))
.font_(Font("Sans",20))
.maxWidth_(50)
.minHeight_(30);
)
),
HLayout(
StaticText().string_("variation"),
Slider(nil,Rect(0,0,2,1)).thumbSize_(50)
.action_({ arg fvar;
fvar = fvar.value * 2;
~granSynth.set(\fvar, fvar.value);
})
),
nil,
StaticText().string_("Duration of grains"),
HLayout(
Slider(nil,Rect(0,0,2,1)).minHeight_(50).thumbSize_(50)
.action_({ arg dur;
dur = dur.value;
~granSynth.set(\dur, dur.value);
~nbd.value_((dur.value * 100).asInt); }),
VLayout(nil,
~nbd = NumberBox(nil,Rect(0,0,1,1))
.font_(Font("Sans", 20))
.maxWidth_(50)
.minHeight_(30);)
),
HLayout(StaticText().string_("variation"),
Slider(nil,Rect(0,0,2,1)).thumbSize_(50)
.action_({ arg durvar;
durvar = durvar.value * 2;
~granSynth.set(\durvar, durvar.value);
})
),
nil,
StaticText().string_("Pitch"),
HLayout(
Slider(nil,Rect(0,0,2,1)).minHeight_(20).thumbSize_(50)
.action_({ arg pitch;
pitch = pitch.value * 2;
~granSynth.set(\pitch, pitch.value);
~nbp.value_(pitch.value); }),
VLayout(nil,
~nbp = NumberBox()
.font_(Font("Sans", 20))
.maxWidth_(50)
.minHeight_(30);)
),
HLayout(StaticText().string_("variation"),
Slider(nil,Rect(0,0,2,1)).thumbSize_(50)
.action_({ arg pitchvar;
pitchvar = pitchvar.value;
~granSynth.set(\pitchvar, pitchvar.value);
})
),
nil,
StaticText().string_("Width (Stereo)"),
HLayout(
Slider(nil,Rect(0,0,2,1)).minHeight_(20).thumbSize_(50)
.action_({ arg width;
width = width.value;
~granSynth.set(\width, width.value);
~nbw.value_(width.value);
}),
VLayout(nil,
~nbw = NumberBox()
.font_(Font("Sans", 20))
.maxWidth_(50)
.minHeight_(30);)
)
),
VLayout(
StaticText().string_("Gain")
.align_(\center),
Slider(nil, Rect(0,0,1,2))
.minWidth_(50)
.thumbSize_(50)
.action_({ arg gain;
~granSynth.set(\gain, gain.value.linexp(0,1,0.01,10,nil)-0.01 * 0.05)})
.valueAction_(0)
;
)
); // bottom right synth ends here
); // right half ends here
);
~tab_views[~tab_names.at("granul")].layout.margins = 2;

45
scd/gui_main.scd Normal file
View File

@ -0,0 +1,45 @@
/*
part of: Interface Fractures III - Silicon
(c) Luka Prinčič / Nova deViator
nova@deviator.si
gui_main.scd - responsible for GUI elements under
the 'main' tab ...
********************************************************** */
~tab_views[~tab_names.at("main")].layout = HLayout(
nil,
VLayout(
nil,
Button()
.states_([
["Clock"],
["Clock", Color.gray(0.2), Color.grey(0.8)] ])
.mouseDownAction_({ | state |
switch(state.value,
0, {
postln("\n- - - - - - - - - - - - - - - - - - - - - - - - - - - - ");
postln("~~~ starting clock!");
TempoClock.default.sched(0, ~mainTimeline);
~mainTimeline.reset;
},
1, {
postln("\n~~~ stopping clock!");
~mainTimeline.stop;
//~mainTimeline.reset;
postln("~~~ some synths might still be running");
}
);
})
.minHeight_(70).minWidth_(70),
nil),
nil);

265
scd/sdefs.scd Normal file
View File

@ -0,0 +1,265 @@
/*
part of: Interface Fractures III - Silicon
(c) Luka Prinčič / Nova deViator
nova@deviator.si
sdefs.scd - should contain most of SynthDefs ...
********************************************************** */
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
// NOISE
SynthDef(\StandardMap, {
arg out=0, minfreq=10, maxfreq=22,
k=1.4, x0=4.9789799812499, y0=5.7473416156381,
ampN=0, ampL=0, ampC=0,
amp=0, bpffreq=20000, bpfrq = 100 ;
var signal ;
postln("~~~ Loading StandardMap to server...");
// poor man's stereo expander
minfreq = [minfreq, minfreq +1 ];
maxfreq = [maxfreq, maxfreq -1 ];
/* Standard2DN.ar(minfreq: 11025, maxfreq: 22050,
k: 1.4, x0: 4.9789799812499, y0: 5.7473416156381, mul: 1, add: 0) */
signal = Standard2DN.ar( minfreq, maxfreq, k, x0, y0, ampN )
+ Standard2DL.ar( minfreq, maxfreq, k, x0, y0, ampL )
+ Standard2DC.ar( minfreq, maxfreq, k, x0, y0, ampC );
// band pass filter // ----- BPF.ar(in: 0, freq: 440, rq: 1, mul: 1, add: 0)
signal = BPF.ar(in: signal, freq: bpffreq.min(bpffreq / bpfrq), rq: bpfrq);
signal = signal * amp;
signal = signal.clip2(0.99);
Out.ar(out, signal)
}).add;
//Gbman2DN Gbman2DL Gbman2DC GbmanTrig
//(minfreq: 11025, maxfreq: 22050, x0: 1.2, y0: 2.1, mul: 1, add: 0)
SynthDef(\GbmanMap, {
arg out=0, minfreq=10, maxfreq=22,
x0=1.2, y0=2.1,
ampN=0, ampL=0, ampC=0,
amp=0, bpffreq=20000, bpfrq = 100 ;
var signal ;
postln("~~~ Loading GbmanMap to server...");
// poor man's stereo expander
minfreq = [minfreq, minfreq +1 ];
maxfreq = [maxfreq, maxfreq -1 ];
signal = Gbman2DN.ar( minfreq, maxfreq, x0, y0, ampN )
+ Gbman2DL.ar( minfreq, maxfreq, x0, y0, ampL )
+ Gbman2DC.ar( minfreq, maxfreq, x0, y0, ampC );
// band pass filter // ----- BPF.ar(in: 0, freq: 440, rq: 1, mul: 1, add: 0)
signal = BPF.ar(in: signal, freq: bpffreq.min(bpffreq / bpfrq), rq: bpfrq);
signal = signal * amp;
signal = signal.clip2(0.99);
Out.ar(out, signal)
}).add;
//Henon2DN
// a: 1.4, b: 0.3,
// x0: 0.30501993062401, y0: 0.20938865431933,
SynthDef(\HenonMap, {
arg out=0, minfreq=10, maxfreq=22,
a = 1.4, b = 0.3,
x0 = 0.30501993062401, y0 = 0.20938865431933,
ampN=0, ampL=0, ampC=0,
amp=0, bpffreq=20000, bpfrq = 100 ;
var signal ;
// poor man's stereo expander
minfreq = [minfreq, minfreq +1 ];
maxfreq = [maxfreq, maxfreq -1 ];
signal = Henon2DN.ar( minfreq, maxfreq, a, b, x0, y0, ampN )
+ Henon2DL.ar( minfreq, maxfreq, a, b, x0, y0, ampL )
+ Henon2DC.ar( minfreq, maxfreq, a, b, x0, y0, ampC );
// band pass filter // ----- BPF.ar(in: 0, freq: 440, rq: 1, mul: 1, add: 0)
signal = BPF.ar(in: signal, freq: bpffreq.min(bpffreq / bpfrq), rq: bpfrq);
signal = signal * amp;
signal = signal.clip2(0.99);
Out.ar(out, signal);
postln("~~~ Loading HenonMap to server...");
}).add;
SynthDef(\LatoocarfianMap, {
/* a: 1, b: 3, c: 0.5, d: 0.5,
x0: 0.34082301375036, y0: -0.38270086971332, */
arg out=0, minfreq=10, maxfreq=22,
a = 1, b = 3, c = 0.5, d = 0.5,
x0 = 0.34082301375036, y0 = -0.38270086971332,
ampN=0, ampL=0, ampC=0,
amp=0, bpffreq=20000, bpfrq = 100 ;
var signal ;
// poor man's stereo expander
minfreq = [minfreq, minfreq +1 ];
maxfreq = [maxfreq, maxfreq -1 ];
/* Latoocarfian2DN.ar(minfreq: 11025, maxfreq: 22050,
k: 1.4, x0: 4.9789799812499, y0: 5.7473416156381, mul: 1, add: 0) */
signal = Latoocarfian2DN.ar( minfreq, maxfreq, a, b, c, d, x0, y0, ampN )
+ Latoocarfian2DL.ar( minfreq, maxfreq, a, b, c, d, x0, y0, ampL )
+ Latoocarfian2DC.ar( minfreq, maxfreq, a, b, c, d, x0, y0, ampC );
// band pass filter // ----- BPF.ar(in: 0, freq: 440, rq: 1, mul: 1, add: 0)
signal = BPF.ar(in: signal, freq: bpffreq.min(bpffreq / bpfrq), rq: bpfrq);
signal = signal * amp;
signal = signal.clip2(0.99);
Out.ar(out, signal);
postln("~~~ Loading LatoocarfianMap to server...");
}).add;
/*
s: 10, r: 28, b: 2.6666667, h: 0.02,
x0: 0.090879182417163, y0: 2.97077458055, z0: 24.282041054363, */
SynthDef(\LorenzMap, {
/* a: 1, b: 3, c: 0.5, d: 0.5,
x0: 0.34082301375036, y0: -0.38270086971332, */
arg out=0, minfreq=10, maxfreq=22,
s = 10, r = 28, b = 2.6666667, h = 0.02,
x0 = 0.090879182417163, y0 = 2.97077458055, z0 = 24.282041054363,
ampN=0, ampL=0, ampC=0,
amp=0, bpffreq=20000, bpfrq = 100 ;
var signal ;
// poor man's stereo expander
minfreq = [minfreq, minfreq +1 ];
maxfreq = [maxfreq, maxfreq -1 ];
signal = Lorenz2DN.ar( minfreq, maxfreq, s, r, b, h, x0, y0, z0, ampN )
+ Lorenz2DL.ar( minfreq, maxfreq, s, r, b, h, x0, y0, z0, ampL )
+ Lorenz2DC.ar( minfreq, maxfreq, s, r, b, h, x0, y0, z0, ampC );
// band pass filter // ----- BPF.ar(in: 0, freq: 440, rq: 1, mul: 1, add: 0)
signal = BPF.ar(in: signal, freq: bpffreq.min(bpffreq / bpfrq), rq: bpfrq);
signal = signal * amp;
signal = signal.clip2(0.99);
Out.ar(out, signal);
postln("~~~ Loading LorenzMap to server...");
}).add;
/* urate: 0.1, wrate: 0.1,
b0: 0.6, b1: 0.8,
i: 0, u0: 0, w0: 0, */
SynthDef(\FhnMap, {
arg out=0, minfreq=10, maxfreq=22,
urate = 0.1, wrate = 0.1,
b0 = 0.6, b1 = 0.8,
i = 0, u0 = 0, w0 = 0,
ampN=0, ampL=0, ampC=0,
amp=0, bpffreq=20000, bpfrq = 100 ;
var signal ;
// poor man's stereo expander
minfreq = [minfreq, minfreq +1 ];
maxfreq = [maxfreq, maxfreq -1 ];
signal = Fhn2DN.ar( minfreq, maxfreq, urate, wrate, b0, b1, i, u0, w0, ampN )
+ Fhn2DL.ar( minfreq, maxfreq, urate, wrate, b0, b1, i, u0, w0, ampL )
+ Fhn2DC.ar( minfreq, maxfreq, urate, wrate, b0, b1, i, u0, w0, ampC );
// band pass filter // ----- BPF.ar(in: 0, freq: 440, rq: 1, mul: 1, add: 0)
signal = BPF.ar(in: signal, freq: bpffreq.min(bpffreq / bpfrq), rq: bpfrq);
signal = signal * amp;
signal = signal.clip2(0.99);
Out.ar(out, signal);
postln("~~~ Loading FhnMap to server...");
}).add;
// GRANULATORS
SynthDef(\Granny, {
arg bufnum,
freq = 10, fvar = 1,
dur = 0.1, durvar = 0,
pos = 0, posvar = 0,
pitch = 1, pitchvar = 0,
width = 0.2,
gain = 0.5,
lpfFreq = 400
;
var signal;
signal = GrainBuf.ar(
numChannels: 2, // we want stereo!
trigger: Impulse.kr(freq + (freq * (fvar * LFNoise2.kr(freq)))), // a UGen?
dur: dur + (durvar * LFNoise2.kr(freq)), // in seconds
sndbuf: bufnum,
rate: pitch + (pitchvar * LFNoise2.kr(5)), // pitch !! WHAT IS THE SPEED OF VARIATIONS? setable??
pos: pos + (posvar * LFNoise2.kr(freq)), // position 0-1
interp: 2, // interpolation for pitchshifting
pan: LFNoise1.kr(10).range(width.neg, width), // if numChannels=2, similar to Pan2, -1 left, +1 right
// envbunum: -1, // the buffer number cont. grain envelope
maxGrains: 512,
mul: gain,
add: 0
);
signal = LPF.ar(
in: signal,
freq: lpfFreq);
Out.ar(0, signal);
postln("~~~ adding SynthDef: Granny ...");
}).add;

402
scd/snd_lines.scd Normal file
View File

@ -0,0 +1,402 @@
/*
part of: Interface Fractures III - Silicon
(c) Luka Prinčič / Nova deViator
nova@deviator.si
snd_lines.scd - deals with converting spectral lines
of silicon into sound in time...
********************************************************** */
var dir = PathName(thisProcess.nowExecutingPath).pathOnly;
var siLines = FileReader.read(path: dir +/+ "../dev/silicon_lines.txt", skipBlanks:true, skipEmptyLines:true);
( /////////////////////////////////////////////////////////////////////////////////////////////
// split function:
// 1) List-generation
// 2) draw the spectrum/score
// add 3) synth uses generated List
~siLinesData = List[];
~printLines = {
var dir = PathName(thisProcess.nowExecutingPath).pathOnly;
var siLines = FileReader.read(path: dir +/+ "../dev/silicon_lines.txt", skipBlanks:true, skipEmptyLines:true);
var intensity, minutes, seconds, freq1, freq2, midi1, midi2, red, green, blue;
var colors = [ // these are taken from http://astro.u-strasbg.fr/~koppen/discharge/discharge.html
[ 3800.0, 0, 0, 0],
[ 4000.0, 150, 0, 150],
[ 4400.0, 120, 0, 255], // violet
[ 4500.0, 0, 0, 255], // blue
[ 4800.0, 0, 255, 255], // cyan
[ 5200.0, 0, 255, 0], // green
[ 5800.0, 255, 255, 0], // yellow
[ 6500.0, 255, 0, 0], // red
[ 7000.0, 80, 0, 0],
[ 7300.0, 0, 0, 0] ];
//
var threshold = 0;
var linewidth = 3;
var spectrumheight = 750;
var colorpenlen = 40;
var siLinesData = List.newClear(0);
var w = Window("TempSpectre", Rect(600, 5, width:560, height:spectrumheight));
w.view.background_(Color.black);
w.drawFunc = {
siLinesData = List.newClear(0);
spectrumheight = w.bounds.height;
Pen.smoothing_(false);
Pen.translate(0,0);
Pen.fillColor = Color.white;
Pen.fillRect(Rect(colorpenlen * 3, 0, w.bounds.width - (colorpenlen * 3), spectrumheight));
// function that prints a table of data from lines and draws a window with lines
~processItem = { |item, i, reverse=false, layer=0, tscale=1, toffset=0|
// if(i == 0, { post("\n--- processing spectrum ...\n")}); // nice output
if((item[1].asInt > threshold) && (item[0].asInt < 6741) && (item[0].asInt > 3950), {
var peny, penx;
var alpha = item[1].asFloat.linlin(0, 1000, 10, 255);
var color;
var time, time_end = 60*37+5;
// wavelength
//post(item[0]);
//post("nm");
// intensity
intensity = item[1].asInt;
//post(item[1].asString.padLeft(5, " "));
//post(" ");
// time
if(reverse == false,
// then
{ time = (item[0].asFloat.linlin(3950, 6741, 0, time_end)); },
// else:
{ time = (item[0].asFloat.linlin(3950, 6741, time_end, 0)); } );
time = time * tscale ;
time = time + (toffset * time_end);
minutes = (time / 60).round(1);
seconds = (time % 60).round(1);
/*
post(time.round(0.001) + "");
if ( minutes < 10, {post("0")});
post(minutes);
post(":");
if(seconds < 10, {post("0")});
post(seconds);
post(" ");
*/
//freq1
freq1 = item[0].asFloat.linexp(3900, 7200, 16000, 40 ).asInt;
freq1 = freq1.asString.padLeft(5, " ");
// post(freq1); post("hz"); post(" ");
// freq2
freq2 = item[0].asFloat.linexp(3900, 7200, 40, 16000 ).asInt;
freq2 = freq2.asString.padLeft(5, " ");
// post(freq2); post("Hz"); post(" ");
// midi
midi1 = item[0].asFloat.linlin(3900, 7200, 0, 12 ).round(0.01);
// post(midi1.asString.padRight(5, " "));
// post(" ");
midi2 = item[0].asFloat.linlin(3900, 7200, 12, 0 ).round(0.01);
// post(midi2.asString.padRight(6, " "));
colors.do({ |colordb, i|
var thisboundary = colors[i][0];
if (i+1 < colors.size, {
var nextboundary = colors[i+1][0];
if ((item[0].asFloat > thisboundary) && (item[0].asFloat < nextboundary), {
var range = nextboundary - thisboundary;
var koef = (item[0].asFloat-thisboundary / range).round(0.0001);
var red = colors[i][1] + ( ( (colors[i+1][1] - colors[i][1]) / (colors[i+1][0] - colors[i][0]) )
* (item[0].asFloat - colors[i][0]) );
var green = colors[i][2] + ( ( (colors[i+1][2] - colors[i][2]) / (colors[i+1][0] - colors[i][0]) )
* (item[0].asFloat - colors[i][0]) );
var blue = colors[i][3] + ( ( (colors[i+1][3] - colors[i][3]) / (colors[i+1][0] - colors[i][0]) )
* (item[0].asFloat - colors[i][0]) );
var color = Color.new255(red.round(1),green.round(1),blue.round(1), alpha);
var colorHSV = color.asHSV;
peny = time.linlin(0, time_end, 0, spectrumheight);
penx = 2 - layer * colorpenlen;
Pen.fillColor = color;
Pen.fillRect(Rect(penx, peny, colorpenlen, alpha.linlin(0,255,1,linewidth)));
Pen.fillColor = Color.black.alpha_(alpha.linlin(0,255,0,1));
Pen.fillRect(Rect( colorpenlen*3, peny,
w.bounds.width - (colorpenlen * 3) * intensity.linlin(0,1000,0,1),
alpha.linlin(0,255,1,linewidth)));
Pen.stroke; // draw the path
/*
post("R");
post( red.round(1));
post(" G");
post(green.round(1));
post(" B");
post( blue.round(1));
post(" H");
post((colorHSV[0]*360).round(1));
post(" S");
post((colorHSV[1]*100).round(1));
post(" V");
post((colorHSV[2]*100).round(1));
post(" A");
post((colorHSV[3]*100).round(1));
post("");
*/
// add line data as a List to the siLinesData List
~siLinesData.add(List[
time,
layer,
item[0],
intensity,
freq1, freq2,
midi1, midi2,
// R, G, B,
red.round(1), green.round(1), blue.round(1),
// H, S, V, Alpha
(colorHSV[0] * 360).round(1), // hue
(colorHSV[1] * 100).round(1), // saturation
(colorHSV[2] * 100).round(1), // value
(colorHSV[3] * 100).round(1), // ALPHA
item[0]
]);
});
});
});
//post("\n");
});
}; // end of function
siLines.do({ |item, i| ~processItem.value(item, i, layer:0); });
siLines.do({ | item, i| ~processItem.value(item, i, layer:1, reverse:true,
tscale:0.618); });
siLines.do({ | item, i| ~processItem.value(item, i, layer:1, reverse:true,
tscale: 0.618.squared, toffset:0.618); });
siLines.do({ | item, i| ~processItem.value(item, i, layer:2, reverse:false,
tscale: 0.618.cubed, toffset:(0.618.squared-0.618.cubed)+0.618); });
}; // end of drawFunc
w.refresh;
w.front;
siLinesData;
};
// execute it
~siLinesData = ~printLines.value;
// table of all data, sorted
~siLinesData = ~siLinesData.sortBy(0);
~siLinesData.do({ |item, i|
post(i + "");
item.do({ |value, i|
post(value);
post(" ");
});
post("\n");
});
)
// move to sdefs.scd at one point? --------------------------------------------
SynthDef(\siliconSynth, { |freq = 440, amp = 0.2, attack = 1, release = 1|
var sig, env, frequency, amply;
frequency = [freq * 1.005, freq];
amply = amp * 0.3;
env = EnvGen.kr(Env.perc(attack, release, 1, [10, -10]), doneAction: 2); // ENVELOPE
sig // -----------------------------------------------------------------------------------------
= SinOsc.ar( freq: frequency, mul: amply * 0.9)
+ SinOsc.ar( freq: frequency * 0.5 * LFNoise1.kr(0.1).linlin(-1, 1, 0.998, 1.002), mul: amply)
+ SinOsc.ar( freq: frequency * 0.25 * LFNoise1.kr(0.1).linlin(-1, 1, 0.998, 1.002), mul: amply)
+ Saw.ar( freq: frequency * LFNoise1.kr(0.1).linlin(-1, 1, 0.998, 1.002), mul: amply * 0.5)
+ Saw.ar( freq: frequency * 0.5 * LFNoise1.kr(0.1).linlin(-1, 1, 0.998, 1.002), mul: amply * 0.5)
+ Saw.ar( freq: frequency * 0.25 * LFNoise1.kr(0.1).linlin(-1, 1, 0.998, 1.002), mul: amply * 0.5)
+ Pulse.ar( freq: frequency * LFNoise1.kr(0.1).linlin(-1, 1, 0.998, 1.002), mul: amply * 0.5)
+ Pulse.ar( freq: frequency * 0.5 * LFNoise1.kr(0.1).linlin(-1, 1, 0.998, 1.002), mul: amply * 0.5)
+ Pulse.ar( freq: frequency * 0.24 * LFNoise1.kr(0.1).linlin(-1, 1, 0.998, 1.002), mul: amply * 0.5)
+ BPF.ar(BrownNoise.ar(), freq: frequency * LFNoise1.kr(0.01).linlin(-1, 1, 0.8, 1.2), rq: 0.1)
+ BPF.ar(WhiteNoise.ar(), freq: frequency * 0.5 * LFNoise1.kr(0.01).linlin(-1, 1, 0.8, 1.2), rq: 0.1)
+ BPF.ar(Crackle.ar(SinOsc.kr(0.1).linlin(-1, 1, 0.8, 2)), frequency * LFNoise1.kr(0.01).linlin(-1, 1, 0.8, 1.2), rq:0.1, mul:2)
+ BPF.ar(Crackle.ar(SinOsc.kr(0.1).linlin(-1, 1, 0.8, 2)), frequency * 0.5 * LFNoise1.kr(0.01).linlin(-1, 1, 0.8, 1.2), rq:0.1, mul:2)
; // -------------------------------------------------------------------------------------------
sig = sig * env; // envlope the final sound
Out.ar(0, sig); // output
postln("\n~~~ adding SynthDef: siliconSynth ...");
}).add;
// -----------------------------------------------------------------------------
postln("~~~ loading mainTimeline routine");
~mainTimeline = Routine({
var delta, playhead, frequency, amp, step=0,
nextdelta, nextplayhead, nextfrequency, nextamp,
frequency_alt, nextfrequency_alt;
while {
step < siLines.size;
} {
// exposition
frequency = siLines[step][0].asFloat.linexp(3900, 7200, 16000, 40);
frequency_alt = siLines[step][0].asFloat.linexp(3900, 7200, 40, 16000);
nextfrequency = siLines[step+1][0].asFloat.linexp(3900, 7200, 16000, 40);
nextfrequency_alt = siLines[step+1][0].asFloat.linexp(3900, 7200, 40, 16000);
nextplayhead = siLines[step+1][0].asFloat.linlin(3905.52, 7193.9, 0, (60*37+5));
playhead = siLines[step][0].asFloat.linlin(3905.52, 7193.9, 0, (60*37+5));
delta = nextplayhead - playhead;
amp = siLines[step][1].asInt * 0.001;
nextamp = siLines[step+1][1].asInt * 0.001;
nextdelta = siLines[step+2][0].asFloat.linlin(3905.52, 7193.9, 0, (60*37+5)) - nextplayhead;
//action::documentation
post("\n~" + step + "| ");
post((playhead/60).round(1));
post(":");
post((playhead%60).round(1));
post(" | ");
post(siLines[step][0]);
post( "nm | " );
post(frequency.round(1));
post("Hz | ");
post(frequency_alt.round(1));
post("Hz | ");
post(amp.ampdb.round(1));
post("dB \\ ");
post(delta.round(1));
postln("s");
post(" ");
post(delta.round(1));
post("s / ");
post(nextfrequency.round(1));
post("Hz | ");
post(nextfrequency_alt.round(1));
post("Hz | ");
post(nextamp.ampdb.round(1));
post("dB \\ ");
post(nextdelta.round(1));
postln("s");
Synth(\siliconSynth, [
freq: nextfrequency,
amp: nextamp,
attack: delta,
release: nextdelta
]);
Synth(\siliconSynth, [
freq: nextfrequency_alt,
amp: nextamp,
attack: delta,
release: nextdelta
]);
// epilogue
step = step + 1;
delta.yield;
}
});
TempoClock.default.tempo = 1; // beats/sec /BPS
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// DEBUG
//~siLines = FileReader.read(path:"../dev/silicon_lines.txt", skipBlanks:true, skipEmptyLines:true);
//~siLines[124][0].postln;
//siLines.size.postln;
//r.next;
//r.stop;
// if (siLines[step-1].notNil, {
// playhead = siLines[step-1][0].asFloat.linlin(3900, 7200, 0, (60*37+5)); // at the end these are seconds!
// }, { playhead = 0 });
// nextdelta = siLines[step][0].asFloat.linlin(3900, 7200, 0, (60*37+5)) - playhead;
// delta = playhead - prevplayhead;
// prevplayhead = playhead;
/*
post("t:" + item[0].asFloat.linlin(3900, 7200, 0, 12 ).asStringPrec(5) + Char.tab ); // tone
post("t:" + item[0].asFloat.linlin(3900, 7200, 12, 0 ).asStringPrec(5) ); // tone reverse
//{SinOsc.ar((item[0].asFloat.linlin(3900, 7200, 0, 12)+60).midicps, mul:item[1].asInt * 0.000005)}.play;
/*{LFPar.ar((
item[0].asFloat.linlin(3900, 7200, 0, 12)
+ ( ( (i+1) % 1) * 12) + 60).midicps,
mul:(item[1].asInt.linlin(0, 1000, 0.0, 0.5) + item[1].asInt.linexp(0, 1000, 0.01, 0.5)) * [i%2,abs(i%2-1)] * 0.05)}.play;
*/
//{SinOsc.ar(item[0].asFloat.linexp(3900, 7200, 20000, 40 ).asInt, mul:item[1].asInt * 0.000005)}.play;
{SinOsc.ar(item[0].asFloat.linexp(3900, 7200, 20000, 40).asInt, mul:item[1].asInt * 0.00005)}.play;
*/