| 1 | //----------------------------------------------------------------------------------------------------------------------------------\r |
| 2 | public class Pong extends DPat {\r |
| 3 | SinLFO x,y,z,dx,dy,dz; \r |
| 4 | float cRad; _DhP pSize;\r |
| 5 | Pick pChoose;\r |
| 6 | \r |
| 7 | Pong(GLucose glucose) {\r |
| 8 | super(glucose);\r |
| 9 | cRad = xdMax/15;\r |
| 10 | addModulator(dx = new SinLFO(6000, 500, 30000 )).trigger();\r |
| 11 | addModulator(dy = new SinLFO(3000, 500, 22472 )).trigger();\r |
| 12 | addModulator(dz = new SinLFO(1000, 500, 18420 )).trigger();\r |
| 13 | addModulator(x = new SinLFO(cRad, xdMax - cRad, 0)).trigger(); x.modulateDurationBy(dx);\r |
| 14 | addModulator(y = new SinLFO(cRad, ydMax - cRad, 0)).trigger(); y.modulateDurationBy(dy);\r |
| 15 | addModulator(z = new SinLFO(cRad, zdMax - cRad, 0)).trigger(); z.modulateDurationBy(dz);\r |
| 16 | pSize = addParam ("Size" , 0.4 );\r |
| 17 | pChoose = addPick ("Animiation" , 0 , 3, new String[] {"Pong", "Ball", "Cone"} );\r |
| 18 | }\r |
| 19 | \r |
| 20 | void StartRun(double deltaMs) { cRad = xdMax*pSize.Val()/6; }\r |
| 21 | color CalcPoint(xyz p) {\r |
| 22 | xyz v = new xyz(x.getValuef(), y.getValuef(), z.getValuef());\r |
| 23 | switch(pChoose.Cur()) {\r |
| 24 | case 0: return color(0,0,c1c(1 - min(v.distance(p), v.distance(xyzdMax.minus(p)))*.5/cRad)); // balls\r |
| 25 | case 1: return color(0,0,c1c(1 - v.distance(p)*.5/cRad)); // ball\r |
| 26 | case 2: return color(0,0,c1c(1 - CalcCone(p,v,new xyz(xdMax/2,0,zdMax/2)) * max(.02,.45-pSize.Val()))); // spot\r |
| 27 | }\r |
| 28 | return color(0,0,0);\r |
| 29 | } \r |
| 30 | }\r |
| 31 | //----------------------------------------------------------------------------------------------------------------------------------\r |
| 32 | public class NDat {\r |
| 33 | float xz, yz, zz, hue, sat, speed, angle, den;\r |
| 34 | float xoff,yoff,zoff;\r |
| 35 | float sinAngle, cosAngle;\r |
| 36 | boolean isActive;\r |
| 37 | NDat () { isActive=false; }\r |
| 38 | boolean Active() { return isActive; }\r |
| 39 | void set (float _hue, float _sat, float _xz, float _yz, float _zz, float _den, float _speed, float _angle) {\r |
| 40 | isActive = true;\r |
| 41 | hue=_hue; sat=_sat; xz=_xz; yz=_yz; zz =_zz; den=_den; speed=_speed; angle=_angle;\r |
| 42 | xoff = random(100e3); yoff = random(100e3); zoff = random(100e3);\r |
| 43 | }\r |
| 44 | }\r |
| 45 | \r |
| 46 | public class Noise extends DPat\r |
| 47 | {\r |
| 48 | int CurAnim, iSymm;\r |
| 49 | int XSym=1,YSym=2,RadSym=3;\r |
| 50 | float zTime = random(10000), zTheta=0, zSin, zCos;\r |
| 51 | float rtime = 0, ttime = 0, transAdd=0;\r |
| 52 | _DhP pSpeed , pDensity, pRotZ;\r |
| 53 | Pick pChoose, pSymm;\r |
| 54 | int _ND = 4;\r |
| 55 | NDat N[] = new NDat[_ND];\r |
| 56 | \r |
| 57 | Noise(GLucose glucose) {\r |
| 58 | super(glucose);\r |
| 59 | pRotZ = addParam("RotZ" , .5 ); pSpeed = addParam("Fast", .55);\r |
| 60 | pDensity= addParam("Dens" , .5);\r |
| 61 | pSymm = addPick("Symmetry" , 0, 4, new String[] {"None", "X", "Y", "Radial"} );\r |
| 62 | pChoose = addPick("Animation", 1, 6, new String[] {"Drip", "Cloud", "Rain", "Fire", "Machine", "Spark"} );\r |
| 63 | for (int i=0; i<_ND; i++) N[i] = new NDat();\r |
| 64 | }\r |
| 65 | \r |
| 66 | void StartRun(double deltaMs) {\r |
| 67 | zTime += deltaMs*(pSpeed.Val()-.5)*.002 ;\r |
| 68 | zTheta += deltaMs*(pRotZ .Val()-.5)*.01 ;\r |
| 69 | rtime += deltaMs;\r |
| 70 | iSymm = pSymm.Cur();\r |
| 71 | transAdd = 1*(1 - constrain(rtime - ttime,0,1000)/1000);\r |
| 72 | zSin = sin(zTheta);\r |
| 73 | zCos = cos(zTheta);\r |
| 74 | \r |
| 75 | if (pChoose.Cur() != CurAnim) {\r |
| 76 | CurAnim = pChoose.Cur(); ttime = rtime;\r |
| 77 | pRotZ .reset(); zTheta = 0;\r |
| 78 | pDensity .reset(); pSpeed .reset(); \r |
| 79 | for (int i=0; i<_ND; i++) { N[i].isActive = false; }\r |
| 80 | \r |
| 81 | switch(CurAnim) {\r |
| 82 | // hue sat xz yz zz den mph angle\r |
| 83 | case 0: N[0].set(0 ,0 ,75 ,75 ,150,45 ,3 ,0 ); pSharp.Set(1 ); break; // drip\r |
| 84 | case 1: N[0].set(0 ,0 ,100,100,200,45 ,3 ,180); pSharp.Set(0 ); break; // clouds\r |
| 85 | case 2: N[0].set(0 ,0 ,2 ,400,2 ,20 ,3 ,0 ); pSharp.Set(.5); break; // rain\r |
| 86 | case 3: N[0].set(40 ,1 ,100,100,200,10 ,1 ,180); \r |
| 87 | N[1].set(0 ,1 ,100,100,200,10 ,5 ,180); pSharp.Set(0 ); break; // fire 1\r |
| 88 | case 4: N[0].set(0 ,1 ,40 ,40 ,40 ,15 ,2.5,180);\r |
| 89 | N[1].set(20 ,1 ,40 ,40 ,40 ,15 ,4 ,0 );\r |
| 90 | N[2].set(40 ,1 ,40 ,40 ,40 ,15 ,2 ,90 );\r |
| 91 | N[3].set(60 ,1 ,40 ,40 ,40 ,15 ,3 ,-90); pSharp.Set(.5); break; // machine\r |
| 92 | case 5: N[0].set(0 ,1 ,400,100,2 ,15 ,3 ,90 );\r |
| 93 | N[1].set(20 ,1 ,400,100,2 ,15 ,2.5,0 );\r |
| 94 | N[2].set(40 ,1 ,100,100,2 ,15 ,2 ,180);\r |
| 95 | N[3].set(60 ,1 ,100,100,2 ,15 ,1.5,270); pSharp.Set(.5); break; // spark\r |
| 96 | }\r |
| 97 | \r |
| 98 | DG.UpdateLights();\r |
| 99 | }\r |
| 100 | \r |
| 101 | for (int i=0; i<_ND; i++) if (N[i].Active()) {\r |
| 102 | N[i].sinAngle = sin(radians(N[i].angle));\r |
| 103 | N[i].cosAngle = cos(radians(N[i].angle));\r |
| 104 | }\r |
| 105 | }\r |
| 106 | \r |
| 107 | color CalcPoint(xyz P) {\r |
| 108 | color c = 0;\r |
| 109 | P.RotateZ(xyzMid, zSin, zCos);\r |
| 110 | \r |
| 111 | if (iSymm == XSym && P.x > xdMax/2) P.x = xdMax-P.x;\r |
| 112 | if (iSymm == YSym && P.y > ydMax/2) P.y = ydMax-P.y;\r |
| 113 | \r |
| 114 | for (int i=0;i<_ND; i++) if (N[i].Active()) {\r |
| 115 | NDat n = N[i];\r |
| 116 | float zx = zTime * n.speed * n.sinAngle,\r |
| 117 | zy = zTime * n.speed * n.cosAngle;\r |
| 118 | \r |
| 119 | float b = (iSymm==RadSym ? noise(zTime*n.speed+n.xoff-Dist(P,xyzMid)/n.xz)\r |
| 120 | : noise(P.x/n.xz+zx+n.xoff,P.y/n.yz+zy+n.yoff,P.z/n.zz+n.zoff))\r |
| 121 | *1.8;\r |
| 122 | \r |
| 123 | b += n.den/100 -.4 + pDensity.Val() -1;\r |
| 124 | b += transAdd;\r |
| 125 | c = blendColor(c,color(n.hue,100*n.sat,c1c(b)),ADD);\r |
| 126 | }\r |
| 127 | return c;\r |
| 128 | }\r |
| 129 | }\r |
| 130 | //----------------------------------------------------------------------------------------------------------------------------------\r |
| 131 | public class Play extends DPat\r |
| 132 | {\r |
| 133 | int nBeats = 0;\r |
| 134 | _DhP pAmp, pRad;\r |
| 135 | _DhP pRotX, pRotY, pRotZ;\r |
| 136 | xyz Theta = new xyz();\r |
| 137 | xyz TSin = new xyz();\r |
| 138 | xyz TCos = new xyz();\r |
| 139 | \r |
| 140 | Pick pTimePattern, pTempoMult, pShape, pForm;\r |
| 141 | int RandCube;\r |
| 142 | \r |
| 143 | Play(GLucose glucose) {\r |
| 144 | super(glucose);\r |
| 145 | pRotX = addParam("RotX", .5);\r |
| 146 | pRotY = addParam("RotY", .5);\r |
| 147 | pRotZ = addParam("RotZ", .5);\r |
| 148 | pAmp = addParam("Amp" , .2);\r |
| 149 | pRad = addParam("Rad" , .1 );\r |
| 150 | pTempoMult = addPick ("TMult" , 0 , 6 , new String[] {"1x", "2x", "4x", "8x", "16x", "Rand" } );\r |
| 151 | pTimePattern= addPick ("TPat" , 0 , 5 , new String[] {"Bounce", "Sin", "Roll", "Quant", "Accel" } );\r |
| 152 | pShape = addPick ("Shape" , 0 , 10 , new String[] {"Line", "Tap", "V", "RandV", "Pyramid",\r |
| 153 | "Wings", "W2", "Sphere", "Cone", "Noise" } );\r |
| 154 | pForm = addPick ("Form" , 0 , 3 , new String[] {"Bar", "Volume", "Fade" } );\r |
| 155 | }\r |
| 156 | \r |
| 157 | float t,a;\r |
| 158 | xyz cPrev = new xyz(), cCur = new xyz(), cMid = new xyz(), cMidNorm;\r |
| 159 | float LastBeat=3, LastMeasure=3;\r |
| 160 | int CurRandTempo = 1;\r |
| 161 | \r |
| 162 | void StartRun(double deltaMs) {\r |
| 163 | t = lx.tempo.rampf();\r |
| 164 | a = pAmp.Val();\r |
| 165 | \r |
| 166 | Theta .set(pRotX.Val()*PI*2, pRotY.Val()*PI*2, pRotZ.Val()*PI*2);\r |
| 167 | TSin .set(sin(Theta.x), sin(Theta.y), sin(Theta.z));\r |
| 168 | TCos .set(cos(Theta.x), cos(Theta.y), cos(Theta.z));\r |
| 169 | \r |
| 170 | if (t<LastMeasure) { CurRandTempo = int(random(4)); } LastMeasure = t;\r |
| 171 | \r |
| 172 | switch (pTempoMult.Cur()) {\r |
| 173 | case 0: t = t; break;\r |
| 174 | case 1: t = (t*2. )%1.; break;\r |
| 175 | case 2: t = (t*4. )%1.; break;\r |
| 176 | case 3: t = (t*8. )%1.; break;\r |
| 177 | case 4: t = (t*16.)%1.; break;\r |
| 178 | case 5: t = (t*pow(2,CurRandTempo))%1.; break;\r |
| 179 | }\r |
| 180 | \r |
| 181 | if (t<LastBeat) { cPrev = cCur; cCur = cCur.setRand(); } LastBeat = t;\r |
| 182 | \r |
| 183 | switch (pTimePattern.Cur()) {\r |
| 184 | case 0: t = sin(PI*t); break;\r |
| 185 | case 1: t = norm(sin(2*PI*(t+PI/2)),-1,1); break;\r |
| 186 | case 2: t = t; break;\r |
| 187 | case 3: t = constrain(int(t*8)/7.,0,1); break;\r |
| 188 | case 4: t = t*t*t; break;\r |
| 189 | }\r |
| 190 | \r |
| 191 | \r |
| 192 | cMid = cPrev.interpolate(t,cCur);\r |
| 193 | cMidNorm = cMid.setNorm();\r |
| 194 | }\r |
| 195 | \r |
| 196 | color CalcPoint(xyz Px) {\r |
| 197 | xyz V = new xyz();\r |
| 198 | xyz P = Px.setNorm();\r |
| 199 | if (Theta.x != 0) P.RotateX(xyzHalf, TSin.x, TCos.x);\r |
| 200 | if (Theta.y != 0) P.RotateY(xyzHalf, TSin.y, TCos.y);\r |
| 201 | if (Theta.z != 0) P.RotateZ(xyzHalf, TSin.z, TCos.z);\r |
| 202 | \r |
| 203 | float mp = min(P.x, P.z);\r |
| 204 | float yt = map(t,0,1,.5-a/2,.5+a/2);\r |
| 205 | \r |
| 206 | switch (pShape.Cur()) {\r |
| 207 | case 0: V.set(P.x, yt , P.z); break; // bouncing line\r |
| 208 | case 1: V.set(P.x, map(cos(PI*t * P.x),-1,1,0,1) , P.z); break; // top tap\r |
| 209 | case 2: V.set(P.x, a*map(P.x<.5?P.x:1-P.x,0,.5 ,0,t-.5)+.5, P.z); break; // V shape\r |
| 210 | case 3: V.set(P.x, P.x < cMidNorm.x ? map(P.x,0,cMidNorm.x, .5,yt) :\r |
| 211 | map(P.x,cMidNorm.x,1, yt,.5), P.z); break; // Random V shape\r |
| 212 | \r |
| 213 | case 4: V.set(P.x, .5*(P.x < cMidNorm.x ? map(P.x,0,cMidNorm.x, .5,yt) :\r |
| 214 | map(P.x,cMidNorm.x,1, yt,.5)) +\r |
| 215 | .5*(P.z < cMidNorm.z ? map(P.z,0,cMidNorm.z, .5,yt) :\r |
| 216 | map(P.z,cMidNorm.z,1, yt,.5)), P.z); break; // Random Pyramid shape\r |
| 217 | \r |
| 218 | case 5: V.set(P.x, a*map((P.x-.5)*(P.x-.5),0,.25,0,t-.5)+.5, P.z); break; // wings\r |
| 219 | case 6: V.set(P.x, a*map((mp -.5)*(mp -.5),0,.25,0,t-.5)+.5, P.z); break; // wings\r |
| 220 | \r |
| 221 | case 7: V.set(cMid.x,cMid.y,cMid.z);\r |
| 222 | return color(0,0,c1c(1 - (V.distance(Px) > (pRad.getValuef()+.1)*150?1:0)) ); // sphere\r |
| 223 | \r |
| 224 | case 8: V.set(cMid.x,cMid.y,cMid.z);\r |
| 225 | return color(0,0,c1c(1 - CalcCone(Px,V,xyzMid) * 0.02 > .5?1:0)); // cone\r |
| 226 | \r |
| 227 | case 9: return color(100 + noise(P.x,P.y,P.z + (NoiseMove+50000)/1000.)*200,\r |
| 228 | 85,c1c(P.y < noise(P.x + NoiseMove/2000.,P.z)*(1+a)-a/2.-.1 ? 1 : 0)); //\r |
| 229 | }\r |
| 230 | \r |
| 231 | \r |
| 232 | switch (pForm.Cur()) {\r |
| 233 | case 0: return color(0,0,c1c(1 - V.distance(P)/pRad.getValuef() > .5?1:0));\r |
| 234 | case 1: return color(0,0,c1c(P.y < V.y ?1:0));\r |
| 235 | case 2: return color(0,0,c1c(1 - V.distance(P)/pRad.getValuef()));\r |
| 236 | \r |
| 237 | default: return color(0,0,c1c(P.y < V.y ?1:0));\r |
| 238 | }\r |
| 239 | }\r |
| 240 | }\r |
| 241 | //----------------------------------------------------------------------------------------------------------------------------------\r |