New double-buffering HeronLX implementation for threading mode
[SugarCubes.git] / DanHorwitz.pde
CommitLineData
e28f168c
AG
1//----------------------------------------------------------------------------------------------------------------------------------\r
2public class Pong extends DPat {\r
3 SinLFO x,y,z,dx,dy,dz; \r
6680a94a 4 float cRad; DParam pSize;\r
3661fcee 5 Pick pChoose;\r
6 xyz v = new xyz(), vMir = new xyz();\r
e28f168c
AG
7\r
8 Pong(GLucose glucose) {\r
9 super(glucose);\r
4404e6b8 10 cRad = mMax.x/10;\r
e28f168c
AG
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
4404e6b8 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
e28f168c 17 pSize = addParam ("Size" , 0.4 );\r
32986078 18 pChoose = addPick ("Animiation" , 0, 2, new String[] {"Pong", "Ball", "Cone"} );\r
e28f168c
AG
19 }\r
20\r
4404e6b8 21 void StartRun(double deltaMs) { cRad = mMax.x*pSize.Val()/6; }\r
e28f168c 22 color CalcPoint(xyz p) {\r
3661fcee 23 v.set(x.getValuef(), y.getValuef(), z.getValuef());\r
73687629 24 v.z=0;p.z=0;// ignore z dimension\r
e28f168c 25 switch(pChoose.Cur()) {\r
4404e6b8 26 case 0: vMir.set(mMax); vMir.subtract(p);\r
3661fcee 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
4404e6b8 29 case 2: vMir.set(mMax.x/2,0,mMax.z/2);\r
3661fcee 30 return color(0,0,c1c(1 - CalcCone(p,v,vMir) * max(.02,.45-pSize.Val()))); // spot\r
e28f168c
AG
31 }\r
32 return color(0,0,0);\r
3661fcee 33 }\r
e28f168c
AG
34}\r
35//----------------------------------------------------------------------------------------------------------------------------------\r
36public class NDat {\r
c9e7c456 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
e28f168c
AG
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
50public class Noise extends DPat\r
51{\r
c9e7c456 52 int CurAnim, iSymm;\r
e28f168c 53 int XSym=1,YSym=2,RadSym=3;\r
32986078 54 float zTime , zTheta=0, zSin, zCos, rtime, ttime, transAdd;\r
af83f61c 55 DParam pSpeed , pDensity;\r
e28f168c 56 Pick pChoose, pSymm;\r
c9e7c456 57 int _ND = 4;\r
58 NDat N[] = new NDat[_ND];\r
e28f168c
AG
59\r
60 Noise(GLucose glucose) {\r
61 super(glucose);\r
af83f61c 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
c9e7c456 66 for (int i=0; i<_ND; i++) N[i] = new NDat();\r
e28f168c
AG
67 }\r
68\r
32986078 69 void StartPattern() { zTime = random(500); zTheta=0; rtime = 0; ttime = 0; transAdd=0; }\r
a8d55ade 70 void StartRun(double deltaMs) {\r
e28f168c 71 zTime += deltaMs*(pSpeed.Val()-.5)*.002 ;\r
af83f61c 72 zTheta += deltaMs*(pSpin .Val()-.5)*.01 ;\r
e28f168c
AG
73 rtime += deltaMs;\r
74 iSymm = pSymm.Cur();\r
75 transAdd = 1*(1 - constrain(rtime - ttime,0,1000)/1000);\r
c9e7c456 76 zSin = sin(zTheta);\r
77 zCos = cos(zTheta);\r
e28f168c
AG
78\r
79 if (pChoose.Cur() != CurAnim) {\r
c9e7c456 80 CurAnim = pChoose.Cur(); ttime = rtime;\r
af83f61c 81 pSpin .reset(); zTheta = 0;\r
82 pDensity .reset(); pSpeed .reset();\r
c9e7c456 83 for (int i=0; i<_ND; i++) { N[i].isActive = false; }\r
84 \r
e28f168c
AG
85 switch(CurAnim) {\r
86 // hue sat xz yz zz den mph angle\r
3661fcee 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
c9e7c456 90 case 3: N[0].set(40 ,1 ,100,100,200,10 ,1 ,180); \r
3661fcee 91 N[1].set(0 ,1 ,100,100,200,10 ,5 ,180); pSharp.set(0 ); break; // fire 1\r
c9e7c456 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
3661fcee 95 N[3].set(60 ,1 ,40 ,40 ,40 ,15 ,3 ,-90); pSharp.set(.5); break; // machine\r
c9e7c456 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
3661fcee 99 N[3].set(60 ,1 ,100,100,2 ,15 ,1.5,270); pSharp.set(.5); break; // spark\r
e28f168c 100 }\r
e28f168c 101\r
c9e7c456 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
e28f168c
AG
109 }\r
110\r
111 color CalcPoint(xyz P) {\r
112 color c = 0;\r
4404e6b8 113 P.RotateZ(mCtr, zSin, zCos);\r
c9e7c456 114 \r
d5ce8c1c 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
4404e6b8 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
c9e7c456 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
e28f168c 130 \r
4404e6b8 131 float b = (iSymm==RadSym ? noise(zTime*n.speed+n.xoff-Dist(P,mCtr)/n.xz)\r
c9e7c456 132 : noise(P.x/n.xz+zx+n.xoff,P.y/n.yz+zy+n.yoff,P.z/n.zz+n.zoff))\r
e28f168c
AG
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
143public class Play extends DPat\r
144{\r
4404e6b8 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
d5ce8c1c 161\r
e28f168c 162 int nBeats = 0;\r
32986078 163 DParam pAmp, pRadius, pBounce;\r
3661fcee 164\r
32986078 165 float t,amp,rad,bnc;\r
73687629 166 float zTheta=0;\r
d5ce8c1c 167 ArrayList<rWave> waves = new ArrayList<rWave>(10);\r
7e3329d2 168\r
4404e6b8 169 rAngle a1 = new rAngle(), a2 = new rAngle(),\r
170 a3 = new rAngle(), a4 = new rAngle();\r
3661fcee 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
af83f61c 179 Pick pTimePattern, pTempoMult, pShape;\r
e28f168c
AG
180 int RandCube;\r
181\r
182 Play(GLucose glucose) {\r
183 super(glucose);\r
32986078 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
7e3329d2 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
32986078 190 "Pyramid", "Wings", "W2", "Clock",\r
191 "Triangle", "Quad", "Sphere", "Cone",\r
192 "Noise", "Wave", "?", "?"} );\r
e28f168c
AG
193 }\r
194\r
d5ce8c1c 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
32986078 212\r
73687629 213 void StartPattern() { zTheta=0; }\r
a8d55ade 214 void StartRun(double deltaMs) {\r
3661fcee 215 t = lx.tempo.rampf();\r
216 amp = pAmp.Val();\r
32986078 217 rad = pRadius.getValuef();\r
218 bnc = pBounce.getValuef(); \r
73687629 219 zTheta += deltaMs*(pSpin .Val()-.5)*.01;\r
e28f168c 220\r
73687629 221 Theta .set(pRotX.Val()*PI*2, pRotY.Val()*PI*2, pRotZ.Val()*PI*2 + zTheta);\r
dd00b10f 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
e28f168c 224\r
6680a94a 225 if (t<LastMeasure) {\r
4404e6b8 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
6680a94a 228 } LastMeasure = t;\r
229 \r
230 int nTempo = pTempoMult .Cur(); if (nTempo == 5) nTempo = CurRandTempo;\r
4404e6b8 231 int nTPat = pTimePattern.Cur(); if (nTPat == 7) nTPat = CurRandTPat ;\r
ef52f20b 232\r
6680a94a 233 switch (nTempo) {\r
e28f168c
AG
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
e28f168c
AG
239 }\r
240\r
d5ce8c1c 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
af83f61c 246 if ((t<LastBeat && !pKey.b) || DG.KeyPressed>-1) {\r
d5ce8c1c 247 waves.add(new rWave(\r
af83f61c 248 pKey.b ? map(DG.KeyPressed,0,7,0,1) : random(1), // location\r
d5ce8c1c 249 bnc*10, // bounciness\r
250 7, // velocity\r
251 2*(1-amp))); // dampiness\r
af83f61c 252 DG.KeyPressed=-1;\r
d5ce8c1c 253 if (waves.size() > 5) waves.remove(0);\r
af83f61c 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
4404e6b8 259 } LastBeat = t;\r
e28f168c 260\r
6680a94a 261 switch (nTPat) {\r
4404e6b8 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
e28f168c 269 }\r
ef52f20b 270 \r
3661fcee 271 cMid.set (cPrev); cMid.interpolate (t,cRand);\r
272 cMidNorm.set (cMid); cMidNorm.setNorm();\r
4404e6b8 273 a1.move(); a2.move(); a3.move(); a4.move();\r
e28f168c
AG
274 }\r
275\r
276 color CalcPoint(xyz Px) {\r
4404e6b8 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
3661fcee 280 \r
281 Pn.set(Px); Pn.setNorm();\r
e28f168c 282\r
3661fcee 283 float mp = min(Pn.x, Pn.z);\r
32986078 284 float yt = map(t,0,1,.5-bnc/2,.5+bnc/2);\r
73687629 285 float r,d;\r
e28f168c
AG
286\r
287 switch (pShape.Cur()) {\r
4404e6b8 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
32986078 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
4404e6b8 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
32986078 297 map(Pn.z,cMidNorm.z,1, yt,.5)), Pn.z); break; // Random Pyramid shape\r
4404e6b8 298 \r
32986078 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
73687629 302 case 7: d = min(\r
4404e6b8 303 distToSeg(Px.x, Px.y, a1.getX(70),a1.getY(70), mCtr.x, mCtr.y),\r
73687629 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
4404e6b8 307\r
73687629 308 case 8: r = amp*200 * map(bnc,0,1,1,sin(PI*t));\r
309 d = min(\r
32986078 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
73687629 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
4404e6b8 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
32986078 322 distToSeg(Px.x, Px.y, a4.getX(r),a4.getY(r), a1.getX(r),a1.getY(r)) // quad\r
73687629 323 );\r
324 d = constrain(30*(rad*40-d),0,100);\r
325 return color(0,max(0,150-d), d); // clock\r
4404e6b8 326\r
73687629 327 case 10:\r
328 r = map(bnc,0,1,a1.r,amp*200*sin(PI*t));\r
32986078 329 return color(0,0,c1c(.9+2*rad - dist(Px.x,Px.y,a1.getX(r),a1.getY(r))*.03) ); // sphere\r
4404e6b8 330\r
73687629 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
4404e6b8 334\r
32986078 335 case 12: return color(100 + noise(Pn.x,Pn.y,Pn.z + (NoiseMove+50000)/1000.)*200,\r
4404e6b8 336 85,c1c(Pn.y < noise(Pn.x + NoiseMove/2000.,Pn.z)*(1+amp)-amp/2.-.1 ? 1 : 0)); // noise\r
337\r
d5ce8c1c 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
4404e6b8 342 default: return color(0,0,0);\r
343 }\r
e28f168c 344\r
73687629 345 return color(0,\r
346 150-c1c(1 - V.distance(Pn)/rad),\r
347 c1c(1 - V.distance(Pn)/rad));\r
e28f168c
AG
348 }\r
349}\r
350//----------------------------------------------------------------------------------------------------------------------------------\r
7e3329d2 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
357class 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
367class 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
389class 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
439class 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
483int randDir() { return round(random(1))*2-1; }\r
484\r
485class 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
510dLattice DL_;\r
511//----------------------------------------------------------------------------------------------------------------------------------\r
063fdce2 512class Worms extends SCPattern {\r
7e3329d2 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
063fdce2 531 Worms(GLucose glucose) { \r
7e3329d2 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