| 1 | //----------------------------------------------------------------------------------------------------------------------------------\r |
| 2 | public class Pong extends DPat {\r |
| 3 | SinLFO x,y,z,dx,dy,dz; \r |
| 4 | float cRad; DParam pSize;\r |
| 5 | Pick pChoose;\r |
| 6 | xyz v = new xyz(), vMir = new xyz();\r |
| 7 | \r |
| 8 | Pong(GLucose glucose) {\r |
| 9 | super(glucose);\r |
| 10 | cRad = mMax.x/10;\r |
| 11 | addModulator(dx = new SinLFO(6000, 500, 30000 )).trigger();\r |
| 12 | addModulator(dy = new SinLFO(3000, 500, 22472 )).trigger();\r |
| 13 | addModulator(dz = new SinLFO(1000, 500, 18420 )).trigger();\r |
| 14 | addModulator(x = new SinLFO(cRad, mMax.x - cRad, 0)).trigger(); x.modulateDurationBy(dx);\r |
| 15 | addModulator(y = new SinLFO(cRad, mMax.y - cRad, 0)).trigger(); y.modulateDurationBy(dy);\r |
| 16 | addModulator(z = new SinLFO(cRad, mMax.z - cRad, 0)).trigger(); z.modulateDurationBy(dz);\r |
| 17 | pSize = addParam ("Size" , 0.4 );\r |
| 18 | pChoose = addPick ("Animiation" , 0, 2, new String[] {"Pong", "Ball", "Cone"} );\r |
| 19 | }\r |
| 20 | \r |
| 21 | void StartRun(double deltaMs) { cRad = mMax.x*pSize.Val()/6; }\r |
| 22 | color CalcPoint(xyz p) {\r |
| 23 | v.set(x.getValuef(), y.getValuef(), z.getValuef());\r |
| 24 | switch(pChoose.Cur()) {\r |
| 25 | case 0: vMir.set(mMax); vMir.subtract(p);\r |
| 26 | return color(0,0,c1c(1 - min(v.distance(p), v.distance(vMir))*.5/cRad)); // balls\r |
| 27 | case 1: return color(0,0,c1c(1 - v.distance(p)*.5/cRad)); // ball\r |
| 28 | case 2: vMir.set(mMax.x/2,0,mMax.z/2);\r |
| 29 | return color(0,0,c1c(1 - CalcCone(p,v,vMir) * max(.02,.45-pSize.Val()))); // spot\r |
| 30 | }\r |
| 31 | return color(0,0,0);\r |
| 32 | }\r |
| 33 | }\r |
| 34 | //----------------------------------------------------------------------------------------------------------------------------------\r |
| 35 | public class NDat {\r |
| 36 | float xz, yz, zz, hue, sat, speed, angle, den;\r |
| 37 | float xoff,yoff,zoff;\r |
| 38 | float sinAngle, cosAngle;\r |
| 39 | boolean isActive;\r |
| 40 | NDat () { isActive=false; }\r |
| 41 | boolean Active() { return isActive; }\r |
| 42 | void set (float _hue, float _sat, float _xz, float _yz, float _zz, float _den, float _speed, float _angle) {\r |
| 43 | isActive = true;\r |
| 44 | hue=_hue; sat=_sat; xz=_xz; yz=_yz; zz =_zz; den=_den; speed=_speed; angle=_angle;\r |
| 45 | xoff = random(100e3); yoff = random(100e3); zoff = random(100e3);\r |
| 46 | }\r |
| 47 | }\r |
| 48 | \r |
| 49 | public class Noise extends DPat\r |
| 50 | {\r |
| 51 | int CurAnim, iSymm;\r |
| 52 | int XSym=1,YSym=2,RadSym=3;\r |
| 53 | float zTime , zTheta=0, zSin, zCos, rtime, ttime, transAdd;\r |
| 54 | DParam pSpeed , pDensity, pRotZ;\r |
| 55 | Pick pChoose, pSymm;\r |
| 56 | int _ND = 4;\r |
| 57 | NDat N[] = new NDat[_ND];\r |
| 58 | \r |
| 59 | Noise(GLucose glucose) {\r |
| 60 | super(glucose);\r |
| 61 | pRotZ = addParam("RotZ" , .5 ); pSpeed = addParam("Fast", .55);\r |
| 62 | pDensity= addParam("Dens" , .5);\r |
| 63 | pSymm = addPick("Symmetry" , 0, 3, new String[] {"None", "X", "Y", "Radial"} );\r |
| 64 | pChoose = addPick("Animation", 1, 5, new String[] {"Drip", "Cloud", "Rain", "Fire", "Machine", "Spark"} );\r |
| 65 | for (int i=0; i<_ND; i++) N[i] = new NDat();\r |
| 66 | }\r |
| 67 | \r |
| 68 | void StartPattern() { zTime = random(500); zTheta=0; rtime = 0; ttime = 0; transAdd=0; }\r |
| 69 | void StartRun(double deltaMs) {\r |
| 70 | zTime += deltaMs*(pSpeed.Val()-.5)*.002 ;\r |
| 71 | zTheta += deltaMs*(pRotZ .Val()-.5)*.01 ;\r |
| 72 | rtime += deltaMs;\r |
| 73 | iSymm = pSymm.Cur();\r |
| 74 | transAdd = 1*(1 - constrain(rtime - ttime,0,1000)/1000);\r |
| 75 | zSin = sin(zTheta);\r |
| 76 | zCos = cos(zTheta);\r |
| 77 | \r |
| 78 | if (pChoose.Cur() != CurAnim) {\r |
| 79 | CurAnim = pChoose.Cur(); ttime = rtime;\r |
| 80 | pRotZ .reset(); zTheta = 0;\r |
| 81 | pDensity .reset(); pSpeed .reset(); \r |
| 82 | for (int i=0; i<_ND; i++) { N[i].isActive = false; }\r |
| 83 | \r |
| 84 | switch(CurAnim) {\r |
| 85 | // hue sat xz yz zz den mph angle\r |
| 86 | case 0: N[0].set(0 ,0 ,75 ,75 ,150,45 ,3 ,0 ); pSharp.set(1 ); break; // drip\r |
| 87 | case 1: N[0].set(0 ,0 ,100,100,200,45 ,3 ,180); pSharp.set(0 ); break; // clouds\r |
| 88 | case 2: N[0].set(0 ,0 ,2 ,400,2 ,20 ,3 ,0 ); pSharp.set(.5); break; // rain\r |
| 89 | case 3: N[0].set(40 ,1 ,100,100,200,10 ,1 ,180); \r |
| 90 | N[1].set(0 ,1 ,100,100,200,10 ,5 ,180); pSharp.set(0 ); break; // fire 1\r |
| 91 | case 4: N[0].set(0 ,1 ,40 ,40 ,40 ,15 ,2.5,180);\r |
| 92 | N[1].set(20 ,1 ,40 ,40 ,40 ,15 ,4 ,0 );\r |
| 93 | N[2].set(40 ,1 ,40 ,40 ,40 ,15 ,2 ,90 );\r |
| 94 | N[3].set(60 ,1 ,40 ,40 ,40 ,15 ,3 ,-90); pSharp.set(.5); break; // machine\r |
| 95 | case 5: N[0].set(0 ,1 ,400,100,2 ,15 ,3 ,90 );\r |
| 96 | N[1].set(20 ,1 ,400,100,2 ,15 ,2.5,0 );\r |
| 97 | N[2].set(40 ,1 ,100,100,2 ,15 ,2 ,180);\r |
| 98 | N[3].set(60 ,1 ,100,100,2 ,15 ,1.5,270); pSharp.set(.5); break; // spark\r |
| 99 | }\r |
| 100 | \r |
| 101 | DG.UpdateLights();\r |
| 102 | }\r |
| 103 | \r |
| 104 | for (int i=0; i<_ND; i++) if (N[i].Active()) {\r |
| 105 | N[i].sinAngle = sin(radians(N[i].angle));\r |
| 106 | N[i].cosAngle = cos(radians(N[i].angle));\r |
| 107 | }\r |
| 108 | }\r |
| 109 | \r |
| 110 | color CalcPoint(xyz P) {\r |
| 111 | color c = 0;\r |
| 112 | P.RotateZ(mCtr, zSin, zCos);\r |
| 113 | \r |
| 114 | if (iSymm == XSym && P.x > mMax.x/2) P.x = mMax.x-P.x;\r |
| 115 | if (iSymm == YSym && P.y > mMax.y/2) P.y = mMax.y-P.y;\r |
| 116 | \r |
| 117 | for (int i=0;i<_ND; i++) if (N[i].Active()) {\r |
| 118 | NDat n = N[i];\r |
| 119 | float zx = zTime * n.speed * n.sinAngle,\r |
| 120 | zy = zTime * n.speed * n.cosAngle;\r |
| 121 | \r |
| 122 | float b = (iSymm==RadSym ? noise(zTime*n.speed+n.xoff-Dist(P,mCtr)/n.xz)\r |
| 123 | : noise(P.x/n.xz+zx+n.xoff,P.y/n.yz+zy+n.yoff,P.z/n.zz+n.zoff))\r |
| 124 | *1.8;\r |
| 125 | \r |
| 126 | b += n.den/100 -.4 + pDensity.Val() -1;\r |
| 127 | b += transAdd;\r |
| 128 | c = blendColor(c,color(n.hue,100*n.sat,c1c(b)),ADD);\r |
| 129 | }\r |
| 130 | return c;\r |
| 131 | }\r |
| 132 | }\r |
| 133 | //----------------------------------------------------------------------------------------------------------------------------------\r |
| 134 | public class Play extends DPat\r |
| 135 | {\r |
| 136 | public class rAngle {\r |
| 137 | float prvA, dstA, c;\r |
| 138 | float prvR, dstR, r; \r |
| 139 | float _cos, _sin, x, y;\r |
| 140 | float fixAngle (float a, float b) { return a<b ?\r |
| 141 | (abs(a-b) > abs(a+2*PI-b) ? a : a+2*PI) :\r |
| 142 | (abs(a-b) > abs(a-2*PI-b) ? a : a-2*PI) ; }\r |
| 143 | float getX(float r) { return mCtr.x + _cos*r; }\r |
| 144 | float getY(float r) { return mCtr.y + _sin*r; }\r |
| 145 | void move() { c = interp(t,prvA,dstA); \r |
| 146 | r = interp(t,prvR,dstR);\r |
| 147 | _cos = cos(c); _sin = sin(c);\r |
| 148 | x = getX(r); y = getY(r); } \r |
| 149 | void set() { prvA = dstA; dstA = random(2*PI); prvA = fixAngle(prvA, dstA);\r |
| 150 | prvR = dstR; dstR = random(mCtr.y); }\r |
| 151 | }\r |
| 152 | int nBeats = 0;\r |
| 153 | DParam pAmp, pRadius, pBounce;\r |
| 154 | DParam pRotX, pRotY, pRotZ;\r |
| 155 | \r |
| 156 | float t,amp,rad,bnc;\r |
| 157 | rAngle a1 = new rAngle(), a2 = new rAngle(),\r |
| 158 | a3 = new rAngle(), a4 = new rAngle();\r |
| 159 | xyz cPrev = new xyz(), cRand = new xyz(),\r |
| 160 | cMid = new xyz(), V = new xyz(),\r |
| 161 | Theta = new xyz(), TSin = new xyz(),\r |
| 162 | TCos = new xyz(), cMidNorm = new xyz(),\r |
| 163 | Pn = new xyz();\r |
| 164 | float LastBeat=3, LastMeasure=3;\r |
| 165 | int CurRandTempo = 1, CurRandTPat = 1;\r |
| 166 | \r |
| 167 | \r |
| 168 | Pick pTimePattern, pTempoMult, pShape, pForm;\r |
| 169 | int RandCube;\r |
| 170 | \r |
| 171 | Play(GLucose glucose) {\r |
| 172 | super(glucose);\r |
| 173 | pRotX = addParam("RotX", .5);\r |
| 174 | pRotY = addParam("RotY", .5);\r |
| 175 | pRotZ = addParam("RotZ", .5);\r |
| 176 | pRadius = addParam("Rad" , .1 );\r |
| 177 | pBounce = addParam("Bnc" , .2 );\r |
| 178 | pAmp = addParam("Amp" , .2 );\r |
| 179 | pTempoMult = addPick ("TMult" , 0 , 5 , new String[] {"1x", "2x", "4x", "8x", "16x", "Rand" } );\r |
| 180 | pTimePattern= addPick ("TPat" , 6 , 7 , new String[] {"Bounce", "Sin", "Roll", "Quant", "Accel", "Deccel", "Slide", "Rand"} );\r pShape = addPick ("Shape" , 13, 15 , new String[] {"Line", "Tap", "V", "RandV",\r |
| 181 | "Pyramid", "Wings", "W2", "Clock",\r |
| 182 | "Triangle", "Quad", "Sphere", "Cone",\r |
| 183 | "Noise", "Wave", "?", "?"} );\r |
| 184 | pForm = addPick ("Form" , 2 , 2 , new String[] {"Bar", "Volume", "Fade"} );\r |
| 185 | }\r |
| 186 | \r |
| 187 | \r |
| 188 | float zTime = random(1000);\r |
| 189 | void StartRun(double deltaMs) {\r |
| 190 | zTime += deltaMs*.001; zTime = zTime % 1000.;\r |
| 191 | t = lx.tempo.rampf();\r |
| 192 | amp = pAmp.Val();\r |
| 193 | rad = pRadius.getValuef();\r |
| 194 | bnc = pBounce.getValuef(); \r |
| 195 | \r |
| 196 | Theta .set(pRotX.Val()*PI*2, pRotY.Val()*PI*2, pRotZ.Val()*PI*2);\r |
| 197 | TSin .set(sin(Theta.x), sin(Theta.y), sin(Theta.z));\r |
| 198 | TCos .set(cos(Theta.x), cos(Theta.y), cos(Theta.z));\r |
| 199 | \r |
| 200 | if (t<LastMeasure) {\r |
| 201 | if (random(3) < 1) { CurRandTempo = int(random(4)); if (CurRandTempo == 3) CurRandTempo = int(random(4)); }\r |
| 202 | if (random(3) < 1) { CurRandTPat = pShape.Cur() > 6 ? 2+int(random(5)) : int(random(7)); }\r |
| 203 | } LastMeasure = t;\r |
| 204 | \r |
| 205 | int nTempo = pTempoMult .Cur(); if (nTempo == 5) nTempo = CurRandTempo;\r |
| 206 | int nTPat = pTimePattern.Cur(); if (nTPat == 7) nTPat = CurRandTPat ;\r |
| 207 | \r |
| 208 | switch (nTempo) {\r |
| 209 | case 0: t = t; break;\r |
| 210 | case 1: t = (t*2. )%1.; break;\r |
| 211 | case 2: t = (t*4. )%1.; break;\r |
| 212 | case 3: t = (t*8. )%1.; break;\r |
| 213 | case 4: t = (t*16.)%1.; break;\r |
| 214 | }\r |
| 215 | \r |
| 216 | if (t<LastBeat) {\r |
| 217 | cPrev.set(cRand); cRand.setRand();\r |
| 218 | a1.set(); a2.set(); a3.set(); a4.set();\r |
| 219 | } LastBeat = t;\r |
| 220 | \r |
| 221 | switch (nTPat) {\r |
| 222 | case 0: t = sin(PI*t); break; // bounce\r |
| 223 | case 1: t = norm(sin(2*PI*(t+PI/2)),-1,1); break; // sin\r |
| 224 | case 2: t = t; break; // roll\r |
| 225 | case 3: t = constrain(int(t*8)/7.,0,1); break; // quant\r |
| 226 | case 4: t = t*t*t; break; // accel\r |
| 227 | case 5: t = sin(PI*t*.5); break; // deccel\r |
| 228 | case 6: t = .5*(1-cos(PI*t)); break; // slide\r |
| 229 | }\r |
| 230 | \r |
| 231 | cMid.set (cPrev); cMid.interpolate (t,cRand);\r |
| 232 | cMidNorm.set (cMid); cMidNorm.setNorm();\r |
| 233 | \r |
| 234 | a1.move(); a2.move(); a3.move(); a4.move();\r |
| 235 | }\r |
| 236 | \r |
| 237 | color CalcPoint(xyz Px) {\r |
| 238 | if (Theta.x != 0) Px.RotateX(mCtr, TSin.x, TCos.x);\r |
| 239 | if (Theta.y != 0) Px.RotateY(mCtr, TSin.y, TCos.y);\r |
| 240 | if (Theta.z != 0) Px.RotateZ(mCtr, TSin.z, TCos.z);\r |
| 241 | \r |
| 242 | Pn.set(Px); Pn.setNorm();\r |
| 243 | \r |
| 244 | float mp = min(Pn.x, Pn.z);\r |
| 245 | float yt = map(t,0,1,.5-bnc/2,.5+bnc/2);\r |
| 246 | float r;\r |
| 247 | \r |
| 248 | switch (pShape.Cur()) {\r |
| 249 | case 0: V.set(Pn.x, yt , Pn.z); break; // bouncing line\r |
| 250 | case 1: V.set(Pn.x, map(cos(PI*t * Pn.x),-1,1,0,1) , Pn.z); break; // top tap\r |
| 251 | case 2: V.set(Pn.x, bnc*map(Pn.x<.5?Pn.x:1-Pn.x,0,.5 ,0,t-.5)+.5, Pn.z); break; // V shape\r |
| 252 | case 3: V.set(Pn.x, Pn.x < cMidNorm.x ? map(Pn.x,0,cMidNorm.x, .5,yt) :\r |
| 253 | map(Pn.x,cMidNorm.x,1, yt,.5), Pn.z); break; // Random V shape\r |
| 254 | \r |
| 255 | case 4: V.set(Pn.x, .5*(Pn.x < cMidNorm.x ? map(Pn.x,0,cMidNorm.x, .5,yt) :\r |
| 256 | map(Pn.x,cMidNorm.x,1, yt,.5)) +\r |
| 257 | .5*(Pn.z < cMidNorm.z ? map(Pn.z,0,cMidNorm.z, .5,yt) :\r |
| 258 | map(Pn.z,cMidNorm.z,1, yt,.5)), Pn.z); break; // Random Pyramid shape\r |
| 259 | \r |
| 260 | case 5: V.set(Pn.x, bnc*map((Pn.x-.5)*(Pn.x-.5),0,.25,0,t-.5)+.5, Pn.z); break; // wings\r |
| 261 | case 6: V.set(Pn.x, bnc*map((mp -.5)*(mp -.5),0,.25,0,t-.5)+.5, Pn.z); break; // wings\r |
| 262 | \r |
| 263 | \r |
| 264 | \r |
| 265 | case 7: return color(0,0, min(\r |
| 266 | distToSeg(Px.x, Px.y, a1.getX(70),a1.getY(70), mCtr.x, mCtr.y),\r |
| 267 | distToSeg(Px.x, Px.y, a2.getX(40),a2.getY(40), mCtr.x, mCtr.y)) <rad*40?100:0); // clock\r |
| 268 | \r |
| 269 | case 8: r = amp*200 * map(bnc,0,1,1,sin(PI*t)); return color(0,0, min(\r |
| 270 | distToSeg(Px.x, Px.y, a1.getX(r),a1.getY(r), a2.getX(r),a2.getY(r)),\r |
| 271 | distToSeg(Px.x, Px.y, a2.getX(r),a2.getY(r), a3.getX(r),a3.getY(r)),\r |
| 272 | distToSeg(Px.x, Px.y, a3.getX(r),a3.getY(r), a1.getX(r),a1.getY(r)) // triangle\r |
| 273 | ) <rad*40?100:0);\r |
| 274 | \r |
| 275 | case 9: r = amp*200 * map(bnc,0,1,1,sin(PI*t)); return color(0,0, min(\r |
| 276 | distToSeg(Px.x, Px.y, a1.getX(r),a1.getY(r), a2.getX(r),a2.getY(r)),\r |
| 277 | distToSeg(Px.x, Px.y, a2.getX(r),a2.getY(r), a3.getX(r),a3.getY(r)),\r |
| 278 | distToSeg(Px.x, Px.y, a3.getX(r),a3.getY(r), a4.getX(r),a4.getY(r)),\r |
| 279 | distToSeg(Px.x, Px.y, a4.getX(r),a4.getY(r), a1.getX(r),a1.getY(r)) // quad\r |
| 280 | ) <rad*40?100:0); // shape\r |
| 281 | \r |
| 282 | \r |
| 283 | case 10: r = map(bnc,0,1,a1.r,amp*200*sin(PI*t)); \r |
| 284 | return color(0,0,c1c(.9+2*rad - dist(Px.x,Px.y,a1.getX(r),a1.getY(r))*.03) ); // sphere\r |
| 285 | \r |
| 286 | case 11: return color(0,0,c1c(1 - CalcCone(Px,cMid,mCtr) * 0.02 > .5?1:0)); // cone\r |
| 287 | \r |
| 288 | case 12: return color(100 + noise(Pn.x,Pn.y,Pn.z + (NoiseMove+50000)/1000.)*200,\r |
| 289 | 85,c1c(Pn.y < noise(Pn.x + NoiseMove/2000.,Pn.z)*(1+amp)-amp/2.-.1 ? 1 : 0)); // noise\r |
| 290 | \r |
| 291 | case 13: V.set(Pn.x, map(\r |
| 292 | sin( zTime*3.7 + Pn.x*2.0*PI)\r |
| 293 | + sin( zTime*4.2 + Pn.x*1.7*PI)\r |
| 294 | + sin( -zTime*4.7 + Pn.x*2.1*PI)\r |
| 295 | + sin( -zTime*5.2 + Pn.x*1.5*PI)\r |
| 296 | ,-2,2,.2,.8), Pn.z); break;\r |
| 297 | \r |
| 298 | \r |
| 299 | default: return color(0,0,0);\r |
| 300 | }\r |
| 301 | \r |
| 302 | switch (pForm.Cur()) {\r |
| 303 | case 0: return color(0,0,c1c(1 - V.distance(Pn)/rad > .5?1:0));\r |
| 304 | case 1: return color(0,0,c1c(Pn.y < V.y ?1:0));\r |
| 305 | case 2: return color(0,0,c1c(1 - V.distance(Pn)/rad));\r |
| 306 | \r |
| 307 | default: return color(0,0,c1c(Pn.y < V.y ?1:0));\r |
| 308 | }\r |
| 309 | }\r |
| 310 | }\r |
| 311 | //----------------------------------------------------------------------------------------------------------------------------------\r |