| 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 | v.z=0;p.z=0;// ignore z dimension\r |
| 25 | switch(pChoose.Cur()) {\r |
| 26 | case 0: vMir.set(mMax); vMir.subtract(p);\r |
| 27 | return color(0,0,c1c(1 - min(v.distance(p), v.distance(vMir))*.5/cRad)); // balls\r |
| 28 | case 1: return color(0,0,c1c(1 - v.distance(p)*.5/cRad)); // ball\r |
| 29 | case 2: vMir.set(mMax.x/2,0,mMax.z/2);\r |
| 30 | return color(0,0,c1c(1 - CalcCone(p,v,vMir) * max(.02,.45-pSize.Val()))); // spot\r |
| 31 | }\r |
| 32 | return color(0,0,0);\r |
| 33 | }\r |
| 34 | }\r |
| 35 | //----------------------------------------------------------------------------------------------------------------------------------\r |
| 36 | public class NDat {\r |
| 37 | float xz, yz, zz, hue, sat, speed, angle, den;\r |
| 38 | float xoff,yoff,zoff;\r |
| 39 | float sinAngle, cosAngle;\r |
| 40 | boolean isActive;\r |
| 41 | NDat () { isActive=false; }\r |
| 42 | boolean Active() { return isActive; }\r |
| 43 | void set (float _hue, float _sat, float _xz, float _yz, float _zz, float _den, float _speed, float _angle) {\r |
| 44 | isActive = true;\r |
| 45 | hue=_hue; sat=_sat; xz=_xz; yz=_yz; zz =_zz; den=_den; speed=_speed; angle=_angle;\r |
| 46 | xoff = random(100e3); yoff = random(100e3); zoff = random(100e3);\r |
| 47 | }\r |
| 48 | }\r |
| 49 | \r |
| 50 | public class Noise extends DPat\r |
| 51 | {\r |
| 52 | int CurAnim, iSymm;\r |
| 53 | int XSym=1,YSym=2,RadSym=3;\r |
| 54 | float zTime , zTheta=0, zSin, zCos, rtime, ttime, transAdd;\r |
| 55 | DParam pSpeed , pDensity;\r |
| 56 | Pick pChoose, pSymm;\r |
| 57 | int _ND = 4;\r |
| 58 | NDat N[] = new NDat[_ND];\r |
| 59 | \r |
| 60 | Noise(GLucose glucose) {\r |
| 61 | super(glucose);\r |
| 62 | pSpeed = addParam("Fast" , .55);\r |
| 63 | pDensity = addParam("Dens" , .5);\r |
| 64 | pSymm = addPick("Symmetry" , 0, 3, new String[] {"None", "X", "Y", "Radial"} );\r |
| 65 | pChoose = addPick("Animation", 6, 7, new String[] {"Drip", "Cloud", "Rain", "Fire", "Machine", "Spark","VWave", "Wave"} );\r |
| 66 | for (int i=0; i<_ND; i++) N[i] = new NDat();\r |
| 67 | }\r |
| 68 | \r |
| 69 | void StartPattern() { zTime = random(500); zTheta=0; rtime = 0; ttime = 0; transAdd=0; }\r |
| 70 | void StartRun(double deltaMs) {\r |
| 71 | zTime += deltaMs*(pSpeed.Val()-.5)*.002 ;\r |
| 72 | zTheta += deltaMs*(pSpin .Val()-.5)*.01 ;\r |
| 73 | rtime += deltaMs;\r |
| 74 | iSymm = pSymm.Cur();\r |
| 75 | transAdd = 1*(1 - constrain(rtime - ttime,0,1000)/1000);\r |
| 76 | zSin = sin(zTheta);\r |
| 77 | zCos = cos(zTheta);\r |
| 78 | \r |
| 79 | if (pChoose.Cur() != CurAnim) {\r |
| 80 | CurAnim = pChoose.Cur(); ttime = rtime;\r |
| 81 | pSpin .reset(); zTheta = 0;\r |
| 82 | pDensity .reset(); pSpeed .reset();\r |
| 83 | for (int i=0; i<_ND; i++) { N[i].isActive = false; }\r |
| 84 | \r |
| 85 | switch(CurAnim) {\r |
| 86 | // hue sat xz yz zz den mph angle\r |
| 87 | case 0: N[0].set(0 ,0 ,75 ,75 ,150,45 ,3 ,0 ); pSharp.set(1 ); break; // drip\r |
| 88 | case 1: N[0].set(0 ,0 ,100,100,200,45 ,3 ,180); pSharp.set(0 ); break; // clouds\r |
| 89 | case 2: N[0].set(0 ,0 ,2 ,400,2 ,20 ,3 ,0 ); pSharp.set(.5); break; // rain\r |
| 90 | case 3: N[0].set(40 ,1 ,100,100,200,10 ,1 ,180); \r |
| 91 | N[1].set(0 ,1 ,100,100,200,10 ,5 ,180); pSharp.set(0 ); break; // fire 1\r |
| 92 | case 4: N[0].set(0 ,1 ,40 ,40 ,40 ,15 ,2.5,180);\r |
| 93 | N[1].set(20 ,1 ,40 ,40 ,40 ,15 ,4 ,0 );\r |
| 94 | N[2].set(40 ,1 ,40 ,40 ,40 ,15 ,2 ,90 );\r |
| 95 | N[3].set(60 ,1 ,40 ,40 ,40 ,15 ,3 ,-90); pSharp.set(.5); break; // machine\r |
| 96 | case 5: N[0].set(0 ,1 ,400,100,2 ,15 ,3 ,90 );\r |
| 97 | N[1].set(20 ,1 ,400,100,2 ,15 ,2.5,0 );\r |
| 98 | N[2].set(40 ,1 ,100,100,2 ,15 ,2 ,180);\r |
| 99 | N[3].set(60 ,1 ,100,100,2 ,15 ,1.5,270); pSharp.set(.5); break; // spark\r |
| 100 | }\r |
| 101 | \r |
| 102 | DG.UpdateLights();\r |
| 103 | }\r |
| 104 | \r |
| 105 | for (int i=0; i<_ND; i++) if (N[i].Active()) {\r |
| 106 | N[i].sinAngle = sin(radians(N[i].angle));\r |
| 107 | N[i].cosAngle = cos(radians(N[i].angle));\r |
| 108 | }\r |
| 109 | }\r |
| 110 | \r |
| 111 | color CalcPoint(xyz P) {\r |
| 112 | color c = 0;\r |
| 113 | P.RotateZ(mCtr, zSin, zCos);\r |
| 114 | \r |
| 115 | if (CurAnim == 6 || CurAnim == 7) {\r |
| 116 | P.setNorm();\r |
| 117 | return color(0,0, 100 * (\r |
| 118 | constrain(1-50*(1-pDensity.Val())*abs(P.y-sin(zTime*10 + P.x*(300))*.5 - .5),0,1) + \r |
| 119 | (CurAnim == 7 ? constrain(1-50*(1-pDensity.Val())*abs(P.x-sin(zTime*10 + P.y*(300))*.5 - .5),0,1) : 0))\r |
| 120 | );\r |
| 121 | } \r |
| 122 | \r |
| 123 | if (iSymm == XSym && P.x > mMax.x/2) P.x = mMax.x-P.x;\r |
| 124 | if (iSymm == YSym && P.y > mMax.y/2) P.y = mMax.y-P.y;\r |
| 125 | \r |
| 126 | for (int i=0;i<_ND; i++) if (N[i].Active()) {\r |
| 127 | NDat n = N[i];\r |
| 128 | float zx = zTime * n.speed * n.sinAngle,\r |
| 129 | zy = zTime * n.speed * n.cosAngle;\r |
| 130 | \r |
| 131 | float b = (iSymm==RadSym ? noise(zTime*n.speed+n.xoff-Dist(P,mCtr)/n.xz)\r |
| 132 | : noise(P.x/n.xz+zx+n.xoff,P.y/n.yz+zy+n.yoff,P.z/n.zz+n.zoff))\r |
| 133 | *1.8;\r |
| 134 | \r |
| 135 | b += n.den/100 -.4 + pDensity.Val() -1;\r |
| 136 | b += transAdd;\r |
| 137 | c = blendColor(c,color(n.hue,100*n.sat,c1c(b)),ADD);\r |
| 138 | }\r |
| 139 | return c;\r |
| 140 | }\r |
| 141 | }\r |
| 142 | //----------------------------------------------------------------------------------------------------------------------------------\r |
| 143 | public class Play extends DPat\r |
| 144 | {\r |
| 145 | public class rAngle {\r |
| 146 | float prvA, dstA, c;\r |
| 147 | float prvR, dstR, r; \r |
| 148 | float _cos, _sin, x, y;\r |
| 149 | float fixAngle (float a, float b) { return a<b ?\r |
| 150 | (abs(a-b) > abs(a+2*PI-b) ? a : a+2*PI) :\r |
| 151 | (abs(a-b) > abs(a-2*PI-b) ? a : a-2*PI) ; }\r |
| 152 | float getX(float r) { return mCtr.x + _cos*r; }\r |
| 153 | float getY(float r) { return mCtr.y + _sin*r; }\r |
| 154 | void move() { c = interp(t,prvA,dstA); \r |
| 155 | r = interp(t,prvR,dstR);\r |
| 156 | _cos = cos(c); _sin = sin(c);\r |
| 157 | x = getX(r); y = getY(r); } \r |
| 158 | void set() { prvA = dstA; dstA = random(2*PI); prvA = fixAngle(prvA, dstA);\r |
| 159 | prvR = dstR; dstR = random(mCtr.y); }\r |
| 160 | }\r |
| 161 | \r |
| 162 | int nBeats = 0;\r |
| 163 | DParam pAmp, pRadius, pBounce;\r |
| 164 | \r |
| 165 | float t,amp,rad,bnc;\r |
| 166 | float zTheta=0;\r |
| 167 | ArrayList<rWave> waves = new ArrayList<rWave>(10);\r |
| 168 | \r |
| 169 | rAngle a1 = new rAngle(), a2 = new rAngle(),\r |
| 170 | a3 = new rAngle(), a4 = new rAngle();\r |
| 171 | xyz cPrev = new xyz(), cRand = new xyz(),\r |
| 172 | cMid = new xyz(), V = new xyz(),\r |
| 173 | Theta = new xyz(), TSin = new xyz(),\r |
| 174 | TCos = new xyz(), cMidNorm = new xyz(),\r |
| 175 | Pn = new xyz();\r |
| 176 | float LastBeat=3, LastMeasure=3;\r |
| 177 | int CurRandTempo = 1, CurRandTPat = 1;\r |
| 178 | \r |
| 179 | Pick pTimePattern, pTempoMult, pShape;\r |
| 180 | int RandCube;\r |
| 181 | \r |
| 182 | Play(GLucose glucose) {\r |
| 183 | super(glucose);\r |
| 184 | pRadius = addParam("Rad" , .1 );\r |
| 185 | pBounce = addParam("Bnc" , .2 );\r |
| 186 | pAmp = addParam("Amp" , .2 );\r |
| 187 | pTempoMult = addPick ("TMult" , 0 , 5 , new String[] {"1x", "2x", "4x", "8x", "16x", "Rand" } );\r |
| 188 | pTimePattern= addPick ("TPat" , 6 , 7 , new String[] {"Bounce", "Sin", "Roll", "Quant", "Accel", "Deccel", "Slide", "Rand"} );\r |
| 189 | pShape = addPick ("Shape" , 3 , 15 , new String[] {"Line", "Tap", "V", "RandV",\r |
| 190 | "Pyramid", "Wings", "W2", "Clock",\r |
| 191 | "Triangle", "Quad", "Sphere", "Cone",\r |
| 192 | "Noise", "Wave", "?", "?"} );\r |
| 193 | }\r |
| 194 | \r |
| 195 | public class rWave {\r |
| 196 | float v0, a0, x0, t,damp,a;\r |
| 197 | boolean bDone=false;\r |
| 198 | final float len=8;\r |
| 199 | rWave(float _x0, float _a0, float _v0, float _damp) { x0=_x0*len; a0=_a0; v0=_v0; t=0; damp = _damp; }\r |
| 200 | void move(double deltaMs) {\r |
| 201 | t += deltaMs*.001;\r |
| 202 | if (t>4) bDone=true;\r |
| 203 | }\r |
| 204 | float val(float _x) {\r |
| 205 | _x*=len;\r |
| 206 | float dist = t*v0 - abs(_x-x0);\r |
| 207 | if (dist<0) { a=1; return 0; }\r |
| 208 | a = a0*exp(-dist*damp) * exp(-abs(_x-x0)/(.2*len)); // * max(0,1-t/dur)\r |
| 209 | return -a*sin(dist);\r |
| 210 | }\r |
| 211 | }\r |
| 212 | \r |
| 213 | void StartPattern() { zTheta=0; }\r |
| 214 | void StartRun(double deltaMs) {\r |
| 215 | t = lx.tempo.rampf();\r |
| 216 | amp = pAmp.Val();\r |
| 217 | rad = pRadius.getValuef();\r |
| 218 | bnc = pBounce.getValuef(); \r |
| 219 | zTheta += deltaMs*(pSpin .Val()-.5)*.01;\r |
| 220 | \r |
| 221 | Theta .set(pRotX.Val()*PI*2, pRotY.Val()*PI*2, pRotZ.Val()*PI*2 + zTheta);\r |
| 222 | TSin .set(sin(Theta.x), sin(Theta.y), sin(Theta.z));\r |
| 223 | TCos .set(cos(Theta.x), cos(Theta.y), cos(Theta.z));\r |
| 224 | \r |
| 225 | if (t<LastMeasure) {\r |
| 226 | if (random(3) < 1) { CurRandTempo = int(random(4)); if (CurRandTempo == 3) CurRandTempo = int(random(4)); }\r |
| 227 | if (random(3) < 1) { CurRandTPat = pShape.Cur() > 6 ? 2+int(random(5)) : int(random(7)); }\r |
| 228 | } LastMeasure = t;\r |
| 229 | \r |
| 230 | int nTempo = pTempoMult .Cur(); if (nTempo == 5) nTempo = CurRandTempo;\r |
| 231 | int nTPat = pTimePattern.Cur(); if (nTPat == 7) nTPat = CurRandTPat ;\r |
| 232 | \r |
| 233 | switch (nTempo) {\r |
| 234 | case 0: t = t; break;\r |
| 235 | case 1: t = (t*2. )%1.; break;\r |
| 236 | case 2: t = (t*4. )%1.; break;\r |
| 237 | case 3: t = (t*8. )%1.; break;\r |
| 238 | case 4: t = (t*16.)%1.; break;\r |
| 239 | }\r |
| 240 | \r |
| 241 | int i=0; while (i< waves.size()) {\r |
| 242 | rWave w = waves.get(i);\r |
| 243 | w.move(deltaMs); if (w.bDone) waves.remove(i); else i++;\r |
| 244 | }\r |
| 245 | \r |
| 246 | if ((t<LastBeat && !pKey.b) || DG.KeyPressed>-1) {\r |
| 247 | waves.add(new rWave(\r |
| 248 | pKey.b ? map(DG.KeyPressed,0,7,0,1) : random(1), // location\r |
| 249 | bnc*10, // bounciness\r |
| 250 | 7, // velocity\r |
| 251 | 2*(1-amp))); // dampiness\r |
| 252 | DG.KeyPressed=-1;\r |
| 253 | if (waves.size() > 5) waves.remove(0);\r |
| 254 | }\r |
| 255 | \r |
| 256 | if (t<LastBeat) {\r |
| 257 | cPrev.set(cRand); cRand.setRand();\r |
| 258 | a1.set(); a2.set(); a3.set(); a4.set();\r |
| 259 | } LastBeat = t;\r |
| 260 | \r |
| 261 | switch (nTPat) {\r |
| 262 | case 0: t = sin(PI*t); break; // bounce\r |
| 263 | case 1: t = norm(sin(2*PI*(t+PI/2)),-1,1); break; // sin\r |
| 264 | case 2: t = t; break; // roll\r |
| 265 | case 3: t = constrain(int(t*8)/7.,0,1); break; // quant\r |
| 266 | case 4: t = t*t*t; break; // accel\r |
| 267 | case 5: t = sin(PI*t*.5); break; // deccel\r |
| 268 | case 6: t = .5*(1-cos(PI*t)); break; // slide\r |
| 269 | }\r |
| 270 | \r |
| 271 | cMid.set (cPrev); cMid.interpolate (t,cRand);\r |
| 272 | cMidNorm.set (cMid); cMidNorm.setNorm();\r |
| 273 | a1.move(); a2.move(); a3.move(); a4.move();\r |
| 274 | }\r |
| 275 | \r |
| 276 | color CalcPoint(xyz Px) {\r |
| 277 | if (Theta.x != 0) Px.RotateX(mCtr, TSin.x, TCos.x);\r |
| 278 | if (Theta.y != 0) Px.RotateY(mCtr, TSin.y, TCos.y);\r |
| 279 | if (Theta.z != 0) Px.RotateZ(mCtr, TSin.z, TCos.z);\r |
| 280 | \r |
| 281 | Pn.set(Px); Pn.setNorm();\r |
| 282 | \r |
| 283 | float mp = min(Pn.x, Pn.z);\r |
| 284 | float yt = map(t,0,1,.5-bnc/2,.5+bnc/2);\r |
| 285 | float r,d;\r |
| 286 | \r |
| 287 | switch (pShape.Cur()) {\r |
| 288 | case 0: V.set(Pn.x, yt , Pn.z); break; // bouncing line\r |
| 289 | case 1: V.set(Pn.x, map(cos(PI*t * Pn.x),-1,1,0,1) , Pn.z); break; // top tap\r |
| 290 | 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 |
| 291 | case 3: V.set(Pn.x, Pn.x < cMidNorm.x ? map(Pn.x,0,cMidNorm.x, .5,yt) :\r |
| 292 | map(Pn.x,cMidNorm.x,1, yt,.5), Pn.z); break; // Random V shape\r |
| 293 | \r |
| 294 | case 4: V.set(Pn.x, .5*(Pn.x < cMidNorm.x ? map(Pn.x,0,cMidNorm.x, .5,yt) :\r |
| 295 | map(Pn.x,cMidNorm.x,1, yt,.5)) +\r |
| 296 | .5*(Pn.z < cMidNorm.z ? map(Pn.z,0,cMidNorm.z, .5,yt) :\r |
| 297 | map(Pn.z,cMidNorm.z,1, yt,.5)), Pn.z); break; // Random Pyramid shape\r |
| 298 | \r |
| 299 | 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 |
| 300 | case 6: V.set(Pn.x, bnc*map((mp -.5)*(mp -.5),0,.25,0,t-.5)+.5, Pn.z); break; // wings\r |
| 301 | \r |
| 302 | case 7: d = min(\r |
| 303 | distToSeg(Px.x, Px.y, a1.getX(70),a1.getY(70), mCtr.x, mCtr.y),\r |
| 304 | distToSeg(Px.x, Px.y, a2.getX(40),a2.getY(40), mCtr.x, mCtr.y));\r |
| 305 | d = constrain(30*(rad*40-d),0,100);\r |
| 306 | return color(0,max(0,150-d), d); // clock\r |
| 307 | \r |
| 308 | case 8: r = amp*200 * map(bnc,0,1,1,sin(PI*t));\r |
| 309 | d = min(\r |
| 310 | distToSeg(Px.x, Px.y, a1.getX(r),a1.getY(r), a2.getX(r),a2.getY(r)),\r |
| 311 | distToSeg(Px.x, Px.y, a2.getX(r),a2.getY(r), a3.getX(r),a3.getY(r)),\r |
| 312 | distToSeg(Px.x, Px.y, a3.getX(r),a3.getY(r), a1.getX(r),a1.getY(r)) // triangle\r |
| 313 | );\r |
| 314 | d = constrain(30*(rad*40-d),0,100);\r |
| 315 | return color(0,max(0,150-d), d); // clock\r |
| 316 | \r |
| 317 | case 9: r = amp*200 * map(bnc,0,1,1,sin(PI*t));\r |
| 318 | d = min(\r |
| 319 | distToSeg(Px.x, Px.y, a1.getX(r),a1.getY(r), a2.getX(r),a2.getY(r)),\r |
| 320 | distToSeg(Px.x, Px.y, a2.getX(r),a2.getY(r), a3.getX(r),a3.getY(r)),\r |
| 321 | distToSeg(Px.x, Px.y, a3.getX(r),a3.getY(r), a4.getX(r),a4.getY(r)),\r |
| 322 | distToSeg(Px.x, Px.y, a4.getX(r),a4.getY(r), a1.getX(r),a1.getY(r)) // quad\r |
| 323 | );\r |
| 324 | d = constrain(30*(rad*40-d),0,100);\r |
| 325 | return color(0,max(0,150-d), d); // clock\r |
| 326 | \r |
| 327 | case 10:\r |
| 328 | r = map(bnc,0,1,a1.r,amp*200*sin(PI*t));\r |
| 329 | return color(0,0,c1c(.9+2*rad - dist(Px.x,Px.y,a1.getX(r),a1.getY(r))*.03) ); // sphere\r |
| 330 | \r |
| 331 | case 11:\r |
| 332 | Px.z=mCtr.z; cMid.z=mCtr.z;\r |
| 333 | return color(0,0,c1c(1 - CalcCone(Px,cMid,mCtr) * 0.02 > .5?1:0)); // cone\r |
| 334 | \r |
| 335 | case 12: return color(100 + noise(Pn.x,Pn.y,Pn.z + (NoiseMove+50000)/1000.)*200,\r |
| 336 | 85,c1c(Pn.y < noise(Pn.x + NoiseMove/2000.,Pn.z)*(1+amp)-amp/2.-.1 ? 1 : 0)); // noise\r |
| 337 | \r |
| 338 | case 13: float y=0; for (rWave w : waves) y += .5*w.val(Pn.x);\r |
| 339 | V.set(Pn.x, .7+y, Pn.z);\r |
| 340 | break;\r |
| 341 | \r |
| 342 | default: return color(0,0,0);\r |
| 343 | }\r |
| 344 | \r |
| 345 | return color(0,\r |
| 346 | 150-c1c(1 - V.distance(Pn)/rad),\r |
| 347 | c1c(1 - V.distance(Pn)/rad));\r |
| 348 | }\r |
| 349 | }\r |
| 350 | //----------------------------------------------------------------------------------------------------------------------------------\r |
| 351 | // 0 - TLB, L (b), BLB, B (l) // Fwd , Down, Back, Up\r |
| 352 | // 4 - TLF, F (l), BLF, L (f) // Fwd , Down, Back, Up\r |
| 353 | // 8 - TRF, R (f), BRF, F (r) // Back, Down, Fwd , Up\r |
| 354 | // 12- TRB, B (r), BRB, R (b) // Back, Down, Fwd , Up\r |
| 355 | // 1->7, 15->9\r |
| 356 | \r |
| 357 | class dBolt {\r |
| 358 | dStrip v, h;\r |
| 359 | int vpos, hpos;\r |
| 360 | dBolt(dStrip _v, dStrip _h, int _vpos, int _hpos) {\r |
| 361 | v=_v; h=_h; vpos=_vpos; hpos=_hpos;\r |
| 362 | if (v.b0 == null) { v.b0=this; h.b0=this; } \r |
| 363 | else { v.b1=this; h.b1=this; }\r |
| 364 | }\r |
| 365 | }\r |
| 366 | \r |
| 367 | class dVertex {\r |
| 368 | dStrip s1 , s2 ;\r |
| 369 | int dir1, dir2 ;\r |
| 370 | dVertex(dStrip s, int d) {\r |
| 371 | int _a = (s.iS%4==1)? (d==1? 5: 3) :\r |
| 372 | (s.iS%4==3)? (d==1? 9:11) :\r |
| 373 | (d==1) ? (s.Top()?4:12) : (s.Top()?12:4);\r |
| 374 | dir1 = d * (s.isVert() ? -1 : 1);\r |
| 375 | dir2 = d;\r |
| 376 | s1 = DL_.DS[s.iCube() + ((s.iS+_a) % 16)];\r |
| 377 | s2 = DL_.DS[d == 1 ? (s.idx == s.iFace()+3 ? s.idx-3 : s.idx+1):\r |
| 378 | (s.idx == s.iFace() ? s.idx+3 : s.idx-1)];\r |
| 379 | swapout(1 , 6);\r |
| 380 | swapout(15,-6);\r |
| 381 | }\r |
| 382 | void swapout(int a, int b) {\r |
| 383 | if (s1.iS == a) { s1 = DL_.DS[s1.idx + b]; dir1 = -dir1; }\r |
| 384 | if (s2.iS == a) { s2 = DL_.DS[s2.idx + b]; dir2 = -dir2; }\r |
| 385 | }\r |
| 386 | \r |
| 387 | }\r |
| 388 | \r |
| 389 | class dStrip { // THIS WAS SUCH A PAIN!\r |
| 390 | int row, col, ci, idx, iS, axis; // 1-y, 2-left, 3-right\r |
| 391 | Strip s; \r |
| 392 | boolean bTop; // direction: top ccw, bottom cw.\r |
| 393 | \r |
| 394 | boolean Top (){ return axis!=1 && bTop ; }\r |
| 395 | boolean Bottom(){ return axis!=1 && !bTop; }\r |
| 396 | boolean isVert(){ return axis==1; }\r |
| 397 | boolean isHorz(){ return axis!=1; }\r |
| 398 | int iCube (){ return 16*floor(idx/16); }\r |
| 399 | int iFace (){ return iCube() + 4*floor(iS/4); }\r |
| 400 | \r |
| 401 | void init(Strip _s, int _i, int _row, int _col) {\r |
| 402 | idx = _i; row = _row; col = _col; s = _s;\r |
| 403 | iS = idx%16; bTop = (iS%4==0);\r |
| 404 | ci = s.points.get(0).index;\r |
| 405 | DL_.DQ[col][row] = iCube();\r |
| 406 | switch (iS) {\r |
| 407 | case 4: case 6 : case 12: case 14: axis=2; break;\r |
| 408 | case 0: case 2 : case 8 : case 10: axis=3; break;\r |
| 409 | default: axis=1; break;\r |
| 410 | }\r |
| 411 | }\r |
| 412 | \r |
| 413 | void addBolts() {\r |
| 414 | v0 = new dVertex(this, 1);\r |
| 415 | v1 = new dVertex(this,-1);\r |
| 416 | \r |
| 417 | \r |
| 418 | if (iS == 7 && col != 0 && row != 0) // left bottom\r |
| 419 | new dBolt(this, DL_.GetStrip(row-1,col-1,(col % 2 == 1) ? 8 : 12), \r |
| 420 | 4, (col % 2 == 1) ? 6 : 9); \r |
| 421 | \r |
| 422 | if (iS == 7 && col != 0 && row < MaxCubeHeight*2-2) // left top\r |
| 423 | new dBolt(this, DL_.GetStrip(row+1,col-1,(col % 2 == 1) ? 10 : 14), \r |
| 424 | 11, (col % 2 == 1) ? 9 : 6);\r |
| 425 | \r |
| 426 | if (iS == 9 && col < NumBackTowers-1 && row < MaxCubeHeight*2-2) // right top\r |
| 427 | new dBolt(this, DL_.GetStrip(row+1,col+1,(col % 2 == 1) ? 6 : 2), \r |
| 428 | 4, (col % 2 == 1) ? 6 : 9);\r |
| 429 | \r |
| 430 | if (iS == 9 && col < NumBackTowers-1 && row != 0) // right bottom\r |
| 431 | new dBolt(this, DL_.GetStrip(row-1,col+1,(col % 2 == 1) ? 4 : 0), \r |
| 432 | 11, (col % 2 == 1) ? 9 : 6);\r |
| 433 | }\r |
| 434 | \r |
| 435 | dBolt b0, b1;\r |
| 436 | dVertex v0, v1;\r |
| 437 | }\r |
| 438 | \r |
| 439 | class dCursor {\r |
| 440 | dStrip s, sNext;\r |
| 441 | int nLast,pos,posNext,end; // 0 - 65535\r |
| 442 | int dir; // 1 or -1\r |
| 443 | color clr;\r |
| 444 | \r |
| 445 | dCursor(color _c) { clr=_c;}\r |
| 446 | \r |
| 447 | boolean isDone() { return pos==end; }\r |
| 448 | void set(dStrip _s, int _dir) { \r |
| 449 | s=_s; dir=_dir; pos = 0; end=65536; nLast=-1; sNext=null;\r |
| 450 | }\r |
| 451 | \r |
| 452 | boolean MakeTurn(dBolt b) {\r |
| 453 | int nEnd= (s.isVert() ? b.vpos : b.hpos) <<12;\r |
| 454 | nEnd= (dir==1 ? nEnd : 65536-nEnd);\r |
| 455 | if (nEnd < pos) return false;\r |
| 456 | if (s.isVert()) { sNext = b.h; posNext = b.hpos<<12; end = nEnd; }\r |
| 457 | else { sNext = b.v; posNext = b.vpos<<12; end = nEnd; }\r |
| 458 | return true;\r |
| 459 | }\r |
| 460 | \r |
| 461 | void PickNext() {\r |
| 462 | if (sNext != null) {\r |
| 463 | if (end == 65536) exit();\r |
| 464 | end = 65536; \r |
| 465 | pos = posNext;\r |
| 466 | dir = randDir(); \r |
| 467 | if (dir<0) pos = end-pos;\r |
| 468 | s = sNext; sNext = null;\r |
| 469 | nLast = -1;\r |
| 470 | return;// could switch again!!\r |
| 471 | } else {\r |
| 472 | dVertex v = (dir == 1 ? s.v0 : s.v1);\r |
| 473 | int r = floor(random(2));\r |
| 474 | set(r==0 ? v.s1 : v.s2,r==0 ? v.dir1 : v.dir2);\r |
| 475 | }\r |
| 476 | \r |
| 477 | // plan to turn the corner\r |
| 478 | if (random(6)<1 && s.b0 != null && MakeTurn(s.b0)) return;\r |
| 479 | if (random(6)<1 && s.b1 != null && MakeTurn(s.b1)) return;\r |
| 480 | }\r |
| 481 | }\r |
| 482 | \r |
| 483 | int randDir() { return round(random(1))*2-1; }\r |
| 484 | \r |
| 485 | class dLattice {\r |
| 486 | int iTowerStrips=-1;\r |
| 487 | dStrip[] DS = new dStrip[glucose.model.strips.size()];\r |
| 488 | int[][] DQ = new int[NumBackTowers][MaxCubeHeight*2];\r |
| 489 | \r |
| 490 | int nStrips() { return iTowerStrips; }\r |
| 491 | dStrip GetStrip (int row, int col, int off) { return DS[DQ[col][row]+off]; }\r |
| 492 | dLattice() {\r |
| 493 | DL_=this;\r |
| 494 | int col = 0, row = -2, i=-1;\r |
| 495 | for (Strip strip : glucose.model.strips ) { i++; \r |
| 496 | if (i % 16 == 0) row+=2;\r |
| 497 | if (row >= MaxCubeHeight*2-1) { col++; row = (col%2==1)?1:0; }\r |
| 498 | if (col >= NumBackTowers) continue;\r |
| 499 | iTowerStrips++ ;\r |
| 500 | dStrip s = DS[iTowerStrips] = new dStrip();\r |
| 501 | s.init(strip, iTowerStrips, row, col);\r |
| 502 | }\r |
| 503 | \r |
| 504 | for (int j=0; j<iTowerStrips; j++) DS[j].addBolts();\r |
| 505 | }\r |
| 506 | dStrip rand() { return DS[floor(random(iTowerStrips))]; }\r |
| 507 | void setRand(dCursor c) { c.set(rand(),randDir()); }\r |
| 508 | }\r |
| 509 | \r |
| 510 | dLattice DL_;\r |
| 511 | //----------------------------------------------------------------------------------------------------------------------------------\r |
| 512 | class Worms extends SCPattern {\r |
| 513 | \r |
| 514 | int draw(dCursor c, int nAmount) {\r |
| 515 | int nFrom = max(c.nLast+1,c.pos >> 12);\r |
| 516 | int nTo = min(15,(c.pos+nAmount) >> 12); c.nLast=nTo;\r |
| 517 | int nMv = min(nAmount, c.end-c.pos);\r |
| 518 | c.pos += nMv;\r |
| 519 | for (int i = nFrom; i <= nTo; i++) {\r |
| 520 | int n = c.s.ci + (c.dir>0 ? i : 15-i);\r |
| 521 | colors[n] = c.clr;\r |
| 522 | }\r |
| 523 | return nAmount - nMv;\r |
| 524 | }\r |
| 525 | \r |
| 526 | float StripsPerSec = 6;\r |
| 527 | float TrailTime = 1500;\r |
| 528 | int Cursors = 40;\r |
| 529 | dCursor cur[] = new dCursor[Cursors];\r |
| 530 | \r |
| 531 | Worms(GLucose glucose) { \r |
| 532 | super(glucose); \r |
| 533 | if (DL_ == null) DL_ = new dLattice();\r |
| 534 | for (int i=0; i<Cursors; i++) { cur[i] = new dCursor(color(random(360),50+random(50),50+random(50))); DL_.setRand(cur[i]); }\r |
| 535 | }\r |
| 536 | \r |
| 537 | void run(double deltaMs) {\r |
| 538 | //Test Joints\r |
| 539 | if (false) {\r |
| 540 | for (int j=0; j<DL_.nStrips(); j++) {\r |
| 541 | dStrip s =DL_.DS[j]; dBolt d = s.b0;\r |
| 542 | if (d != null) {for (int i=0;i<16;i++) {\r |
| 543 | if (s == d.v && i <= d.vpos) colors[d.v.ci+i] = color(0,0,30);\r |
| 544 | if (s == d.h && i <= d.hpos) colors[d.h.ci+i] = color(0,0,30);\r |
| 545 | }}\r |
| 546 | \r |
| 547 | d = s.b1; \r |
| 548 | if (d != null) {for (int i=0;i<16;i++) {\r |
| 549 | if (s == d.v && i >= d.vpos) colors[d.v.ci+i] = color(0,0,30);\r |
| 550 | if (s == d.h && i >= d.hpos) colors[d.h.ci+i] = color(0,0,30);\r |
| 551 | }}\r |
| 552 | }\r |
| 553 | } else {\r |
| 554 | for (int i=0; i<Cursors; i++) {\r |
| 555 | int nLeft = floor((float)deltaMs*.001*StripsPerSec * 65536);\r |
| 556 | while(nLeft > 0) { \r |
| 557 | nLeft = draw(cur[i], nLeft);\r |
| 558 | if (cur[i].isDone()) cur[i].PickNext(); \r |
| 559 | }\r |
| 560 | }\r |
| 561 | \r |
| 562 | for (int i=0,s=model.points.size(); i<s; i++) {\r |
| 563 | float b = brightness(colors[i]); \r |
| 564 | color c = colors[i];\r |
| 565 | if (b>0) colors[i] = color(hue(c), saturation(c), \r |
| 566 | (float)(b-100*deltaMs/TrailTime));\r |
| 567 | }\r |
| 568 | }\r |
| 569 | }\r |
| 570 | }\r |
| 571 | //----------------------------------------------------------------------------------------------------------------------------------\r |