DanUtil.pde

   1 //----------------------------------------------------------------------------------------------------------------------------------
   2 xyz                     mMax, mCtr, mHalf;
   3 int                     NumApcRows=4, NumApcCols=8;
   4
   5 boolean btwn    (int            a,int    b,int          c)              { return a >= b && a <= c;      }
   6 boolean btwn    (double         a,double b,double       c)              { return a >= b && a <= c;      }
   7 float   interp  (float a, float b, float c) { return (1-a)*b + a*c; }
   8 float   randctr (float a) { return random(a) - a*.5; }
   9 float   min             (float a, float b, float c, float d) { return min(min(a,b),min(c,d)); }
  10 float   pointDist(Point p1, Point p2) { return dist(p1.x,p1.y,p1.z,p2.x,p2.y,p2.z); }
  11 float   distToSeg(float x, float y, float x1, float y1, float x2, float y2) {
  12         float A                         = x - x1, B = y - y1, C = x2 - x1, D = y2 - y1;
  13         float dot                       = A * C + B * D, len_sq = C * C + D * D;
  14         float xx, yy,param      = dot / len_sq;
  15
  16         if (param < 0 || (x1 == x2 && y1 == y2)) {      xx = x1; yy = y1; }
  17         else if (param > 1) {                                           xx = x2; yy = y2; }
  18         else {                                                                          xx = x1 + param * C;
  19                                                                                                 yy = y1 + param * D; }
  20         float dx = x - xx, dy = y - yy;
  21         return sqrt(dx * dx + dy * dy);
  22 }
  23
  24
  25 public class Pick {
  26         int     NumPicks, Default       ,
  27                         CurRow  , CurCol        ,
  28                         StartRow, EndRow        ;
  29         String  tag             , Desc[]        ;
  30
  31         Pick    (String label, int _Def, int _Num,      int nStart, String d[]) {
  32                 NumPicks        = _Num;         Default = _Def;
  33                 StartRow        = nStart;       EndRow  = StartRow + floor((NumPicks-1) / NumApcCols);
  34                 tag                     = label;        Desc    = d;
  35                 reset();
  36         }
  37
  38         int             Cur()                   { return (CurRow-StartRow)*NumApcCols + CurCol;                                 }
  39         String  CurDesc()               { return Desc[Cur()]; }
  40         void    reset()                 { CurCol = Default % NumApcCols; CurRow = StartRow + Default / NumApcCols; }
  41
  42         boolean set(int r, int c)       {
  43                 if (!btwn(r,StartRow,EndRow) || !btwn(c,0,NumApcCols-1) ||
  44                         !btwn((r-StartRow)*NumApcCols + c,0,NumPicks-1))        return false;
  45                 CurRow=r; CurCol=c;                                                                     return true;
  46         }
  47 }
  48
  49 public class DBool {
  50         boolean def, b;
  51         String  tag;
  52         int             row, col;
  53         void    reset() { b = def; }
  54         boolean set     (int r, int c, boolean val) { if (r != row || c != col) return false; b = val; return true; }
  55         DBool(String _tag, boolean _def, int _row, int _col) {
  56                 def = _def; b = _def; tag = _tag; row = _row; col = _col;
  57         }
  58 }
  59
  60 public class DParam extends BasicParameter {
  61         double  dflt;
  62         DParam  (String label, double value)            { super(label,value); dflt=value;               }
  63         void    set                     (double value)                  { super.setValue(value);                                }
  64         void    reset           ()                                              { super.setValue(dflt);                                 }
  65         float   Val                     ()                                              { return getValuef();                                   }
  66 }
  67 //----------------------------------------------------------------------------------------------------------------------------------
  68 public class xyz {      float x,y,z;    // extends pVector; eliminate half of the functions
  69                         xyz() {x=y=z=0;}
  70                         xyz(Point p                                       ) {x=p.x      ; y=p.y; z=p.z;}
  71                         xyz(xyz p                                         ) {set(p);                             }
  72                         xyz(float _x,float _y,float _z) {x=_x   ; y=_y  ; z=_z  ;}
  73         void    set(Point p                                       ) {x=p.x      ; y=p.y; z=p.z;}
  74         void    set(xyz p                                         ) {x=p.x      ; y=p.y ; z=p.z ;}
  75         void    set(float _x,float _y,float _z) {x=_x   ; y=_y  ; z=_z  ;}
  76
  77         void    zoomX   (float zx)                              {x = x*zx - mMax.x*(zx-1)/2;                            }
  78         void    zoomY   (float zy)                              {y = y*zy - mMax.y*(zy-1)/2;                            }
  79
  80         float   distance(xyz b)                                 {return dist(x,y,z,b.x,b.y,b.z);                }
  81         float   distance(float _x, float _y)    {return dist(x,y,_x,_y);                                }
  82         float   dot     (xyz b)                                 {return x*b.x + y*b.y + z*b.z;                  }
  83         void    add             (xyz b)                                 {x += b.x; y += b.y; z += b.z;                  }
  84         void    add             (float b)                               {x += b  ; y += b  ; z += b  ;                  }
  85         void    subtract(xyz b)                                 {x -= b.x; y -= b.y; z -= b.z;                  }
  86         void    scale   (float b)                               {x *= b  ; y *= b  ; z *= b  ;                  }
  87
  88         void    rotateZ   (xyz o, float nSin, float nCos) {
  89                 float nX = nCos*(x-o.x) - nSin*(y-o.y) + o.x;
  90                 float nY = nSin*(x-o.x) + nCos*(y-o.y) + o.y;
  91                 x = nX; y = nY;
  92         }
  93
  94         void    rotateX   (xyz o, float nSin, float nCos) {
  95                 float nY = nCos*(y-o.y) - nSin*(z-o.z) + o.y;
  96                 float nZ = nSin*(y-o.y) + nCos*(z-o.z) + o.z;
  97                 y = nY; z = nZ;
  98         }
  99
 100         void    rotateY   (xyz o, float nSin, float nCos) {
 101                 float nZ = nCos*(z-o.z) - nSin*(x-o.x) + o.z;
 102                 float nX = nSin*(z-o.z) + nCos*(x-o.x) + o.x;
 103                 z = nZ; x = nX;
 104         }
 105
 106         void    setRand ()                                              { x = random(mMax.x); y = random(mMax.y); z = random(mMax.z);   }
 107         void    setNorm ()                                              { x /= mMax.x; y /= mMax.y; z /= mMax.z;                                                }
 108         void    interpolate(float i, xyz d)             { x = interp(i,x,d.x); y = interp(i,y,d.y); z = interp(i,z,d.z); }
 109 }
 110 //----------------------------------------------------------------------------------------------------------------------------------
 111 public class DPat extends SCPattern
 112 {
 113         ArrayList<Pick>   picks  = new ArrayList<Pick>  ();
 114         ArrayList<DBool>  bools  = new ArrayList<DBool> ();
 115         ArrayList<DParam> params = new ArrayList<DParam>();
 116
 117         MidiOutput  APCOut;
 118         int                     nMaxRow         = 53;
 119         float           LastQuant       = -1, LastJog = -1;
 120         float[]         xWaveNz, yWaveNz;
 121         int             nPoint  , nPoints;
 122         xyz                     xyzJog = new xyz(), vT1 = new xyz(), vT2 = new xyz();
 123         xyz                     modmin;
 124
 125         float           NoiseMove       = random(10000);
 126         DParam          pSpark, pWave, pRotX, pRotY, pRotZ, pSpin, pTransX, pTransY;
 127         DBool           pXsym, pYsym, pRsym, pXdup, pXtrip, pJog, pGrey;
 128
 129         float           lxh             ()                                                      { return lx.getBaseHuef();                                      }
 130         int                     c1c              (float a)                                      { return round(100*constrain(a,0,1));           }
 131         float           interpWv(float i, float[] vals)         { return interp(i-floor(i), vals[floor(i)], vals[ceil(i)]); }
 132
 133         float           CalcCone (xyz v1, xyz v2, xyz c)        { vT1.set(v1); vT2.set(v2); vT1.subtract(c); vT2.subtract(c);
 134                                                                                                                 return degrees( acos ( vT1.dot(vT2) / (sqrt(vT1.dot(vT1)) * sqrt(vT2.dot(vT2)) ) ));    }
 135
 136         void            StartRun(double deltaMs)                        {                                                               }
 137         color           CalcPoint(xyz p)                                        { return lx.hsb(0,0,0);                 }
 138         color           blend3(color c1, color c2, color c3){ return blendColor(c1,blendColor(c2,c3,ADD),ADD);                                          }
 139
 140         DParam          addParam(String label, double value) {
 141                 DParam P = new DParam(label, value);
 142                 super.addParameter(P);
 143                 params.add(P); return P;
 144         }
 145
 146         Pick            addPick(String name, int def, int _max, String[] desc) {
 147                 Pick P          = new Pick(name, def, _max+1, nMaxRow, desc);
 148                 nMaxRow         = P.EndRow + 1;
 149                 picks.add(P);
 150                 return P;
 151         }
 152
 153     boolean     noteOff(Note note) {
 154                 int row = note.getPitch(), col = note.getChannel();
 155                 for (int i=0; i<bools.size(); i++) if (bools.get(i).set(row, col, false)) { presetManager.dirty(this); return true; }
 156                 updateLights(); return false;
 157         }
 158
 159     boolean     noteOn(Note note) {
 160                 int row = note.getPitch(), col = note.getChannel();
 161                 for (int i=0; i<picks.size(); i++) if (picks.get(i).set(row, col))                      { presetManager.dirty(this); return true; }
 162                 for (int i=0; i<bools.size(); i++) if (bools.get(i).set(row, col, true))        { presetManager.dirty(this); return true; }
 163                 if (row == 84 && col==0) { onReset(); return true; }
 164                 println("row: " + row + "  col:   " + col); return false;
 165         }
 166
 167         void            onInactive()                    { uiDebugText.setText(""); }
 168         void            onReset()                               {
 169                 for (int i=0; i<params.size(); i++) params.get(i).reset();
 170                 for (int i=0; i<bools .size(); i++) bools.get(i).reset();
 171                 for (int i=0; i<picks .size(); i++) picks.get(i).reset();
 172                 presetManager.dirty(this);
 173                 updateLights();
 174         }
 175
 176         DPat(GLucose glucose) {
 177                 super(glucose);
 178
 179                 pSpark          =       addParam("Sprk",  0);
 180                 pWave           =       addParam("Wave",  0);
 181                 pTransX         =       addParam("TrnX", .5);
 182                 pTransY         =       addParam("TrnY", .5);
 183                 pRotX           =       addParam("RotX", .5);
 184                 pRotY           =       addParam("RotY", .5);
 185                 pRotZ           =       addParam("RotZ", .5);
 186                 pSpin           =       addParam("Spin", .5);
 187
 188                 nPoints         =       model.points.size();
 189                 pXsym           =       new DBool("X-SYM", false, 48, 0);       bools.add(pXsym );
 190                 pYsym           =       new DBool("Y-SYM", false, 48, 1);       bools.add(pYsym );
 191                 pRsym           =       new DBool("R-SYM", false, 48, 2);       bools.add(pRsym );
 192                 pXdup           =       new DBool("X-DUP", false, 48, 3);       bools.add(pXdup );
 193                 pJog            =       new DBool("JOG"  , false, 48, 4);       bools.add(pJog  );
 194                 pGrey           =       new DBool("GREY" , false, 48, 5);       bools.add(pGrey );
 195
 196                 modmin          =       new xyz(model.xMin, model.yMin, model.zMin);
 197                 mMax            =       new xyz(model.xMax, model.yMax, model.zMax); mMax.subtract(modmin);
 198                 mCtr            =       new xyz(mMax); mCtr.scale(.5);
 199                 mHalf           =       new xyz(.5,.5,.5);
 200                 xWaveNz         =       new float[ceil(mMax.y)+1];
 201                 yWaveNz         =       new float[ceil(mMax.x)+1];
 202
 203                 //println (model.xMin + " " + model.yMin + " " +  model.zMin);
 204                 //println (model.xMax + " " + model.yMax + " " +  model.zMax);
 205             for (MidiOutputDevice o: RWMidi.getOutputDevices()) { if (o.toString().contains("APC")) { APCOut = o.createOutput(); break;}}
 206         }
 207
 208         void updateLights() { if (APCOut == null) return;
 209             for (int i = 0; i < NumApcRows; ++i)
 210                 for (int j = 0; j < 8; ++j)             midiEngine.grid.setState(i, j, 0);
 211                 for (int i=0; i<picks .size(); i++)     midiEngine.grid.setState(picks.get(i).CurRow-53, picks.get(i).CurCol, 3);
 212                 for (int i=0; i<bools .size(); i++)     if (bools.get(i).b)     APCOut.sendNoteOn       (bools.get(i).col, bools.get(i).row, 1);
 213                                                                                                 else                                    APCOut.sendNoteOff      (bools.get(i).col, bools.get(i).row, 0);
 214         }
 215
 216         void run(double deltaMs)
 217         {
 218                 if (deltaMs > 100) return;
 219
 220                 if (this == midiEngine.getFocusedDeck().getActivePattern()) {
 221                         String Text1="", Text2="";
 222                         for (int i=0; i<bools.size(); i++) if (bools.get(i).b) Text1 += " " + bools.get(i).tag       + "   ";
 223                         for (int i=0; i<picks.size(); i++) Text1 += picks.get(i).tag + ": " + picks.get(i).CurDesc() + "   ";
 224                         uiDebugText.setText(Text1, Text2);
 225                 }
 226
 227                 NoiseMove       += deltaMs; NoiseMove = NoiseMove % 1e7;
 228                 StartRun                (deltaMs);
 229                 xyz P                   = new xyz(), tP = new xyz(), pSave = new xyz();
 230                 xyz pTrans              = new xyz(pTransX.Val()*200-100, pTransY.Val()*100-50,0);
 231                 nPoint  = 0;
 232
 233                 if (pJog.b) {
 234                         float tRamp     = (lx.tempo.rampf() % .25);
 235                         if (tRamp < LastJog) xyzJog.set(randctr(mMax.x*.2), randctr(mMax.y*.2), randctr(mMax.z*.2));
 236                         LastJog = tRamp;
 237                 }
 238
 239                 // precalculate this stuff
 240                 float wvAmp = pWave.Val(), sprk = pSpark.Val();
 241                 if (wvAmp > 0) {
 242                         for (int i=0; i<ceil(mMax.x)+1; i++)
 243                                 yWaveNz[i] = wvAmp * (noise(i/(mMax.x*.3)-(2e3+NoiseMove)/1500.) - .5) * (mMax.y/2.);
 244
 245                         for (int i=0; i<ceil(mMax.y)+1; i++)
 246                                 xWaveNz[i] = wvAmp * (noise(i/(mMax.y*.3)-(1e3+NoiseMove)/1500.) - .5) * (mMax.x/2.);
 247                 }
 248
 249                 for (Point p : model.points) { nPoint++;
 250                         P.set(p);
 251                         P.subtract(modmin);
 252                         P.subtract(pTrans);
 253                         if (sprk  > 0) {P.y += sprk*randctr(50); P.x += sprk*randctr(50); P.z += sprk*randctr(50); }
 254                         if (wvAmp > 0)  P.y += interpWv(p.x-modmin.x, yWaveNz);
 255                         if (wvAmp > 0)  P.x += interpWv(p.y-modmin.y, xWaveNz);
 256                         if (pJog.b)             P.add(xyzJog);
 257
 258
 259                         color cNew, cOld = colors[p.index];
 260                                                         { tP.set(P);                                                                    cNew = CalcPoint(tP);                                                   }
 261                         if (pXsym.b)    { tP.set(mMax.x-P.x,P.y,P.z);                                   cNew = blendColor(cNew, CalcPoint(tP), ADD);    }
 262                         if (pYsym.b)    { tP.set(P.x,mMax.y-P.y,P.z);                                   cNew = blendColor(cNew, CalcPoint(tP), ADD);    }
 263                         if (pRsym.b)    { tP.set(mMax.x-P.x,mMax.y-P.y,mMax.z-P.z);             cNew = blendColor(cNew, CalcPoint(tP), ADD);    }
 264                         if (pXdup.b)    { tP.set((P.x+mMax.x*.5)%mMax.x,P.y,P.z);               cNew = blendColor(cNew, CalcPoint(tP), ADD);    }
 265                         if (pGrey.b)    { cNew = lx.hsb(0, 0, lx.b(cNew)); }
 266                         colors[p.index] = cNew;
 267                 }
 268         }
 269 }
 270 //----------------------------------------------------------------------------------------------------------------------------------
 271 class dTurn {
 272         dVertex v;
 273         int pos0, pos1;
 274         dTurn(int _pos0, dVertex _v, int _pos1) { v = _v; pos0 = _pos0; pos1 = _pos1; }
 275 }
 276
 277 class dVertex {
 278         dVertex c0, c1,                 // connections on the cube
 279                         opp, same;              // opp - same strip, opp direction
 280                                                         // same - same strut, diff strip, dir
 281         dTurn   t0, t1;
 282         dStrip  s;
 283         int     dir, ci;        // dir -- 1 or -1.
 284                                                 // ci  -- color index
 285
 286         dVertex(dStrip _s, Point _p) { s = _s; ci  = _p.index; }
 287         Point   getPoint(int i)          { return s.s.points.get(dir>0 ? i : 15-i);  }
 288         void    setOpp(dVertex _opp) { opp = _opp; dir = (ci < opp.ci ? 1 : -1); }
 289 }
 290
 291 class dStrip  {
 292         dVertex v0, v1;
 293         int     row, col;
 294         Strip   s;
 295         String  desc() { return "r:" + row + " c:" + col + "i:" + floor(v0.ci/16); }
 296         dStrip(Strip _s, int _i, int _row, int _col)  { s = _s; row = _row; col = _col; }
 297 }
 298 //----------------------------------------------------------------------------------------------------------------------------------
 299 class dPixel   { dVertex v; int pos; dPixel(dVertex _v, int _pos) { v=_v; pos=_pos; } }
 300 class dLattice {
 301         private         int iTowerStrips=0;
 302
 303         dStrip[]        DS = new dStrip[glucose.model.strips.size()];
 304         //int[][]       DQ = new int[NumBackTowers][MaxCubeHeight*2];
 305         //dStrip  GetStrip (int row, int col, int off) {
 306         //      return (!btwn(off,0,15) || !btwn(row,0,MaxCubeHeight*2-1) || !btwn(col,0,NumBackTowers-1) || DQ[col][row]<0) ? null :
 307         //                      DS[DQ[col][row]+off];
 308         //}
 309
 310         void    addTurn(dVertex v0, int pos0, dVertex v1, int pos1) {   dTurn t = new dTurn(pos0, v1, pos1); if (v0.t0 == null) v0.t0=t; else v0.t1=t; }
 311         float   dist2    (Strip s1, int pos1, Strip s2, int pos2)       {       return pointDist(s1.points.get(pos1), s2.points.get(pos2)); }
 312         float   pd2      (Point p1, float x, float y, float z)          {       return dist(p1.x,p1.y,p1.z,x,y,z); }
 313         boolean sameSame (Strip s1, Strip s2)                                           {       return max(dist2(s1, 0, s2, 0), dist2(s1,15, s2,15)) < 5 ;      }       // same strut, same direction
 314         boolean sameOpp  (Strip s1, Strip s2)                                           {       return max(dist2(s1, 0, s2,15), dist2(s1,15, s2,0 )) < 5 ;      }       // same strut, opp direction
 315         boolean sameBar  (Strip s1, Strip s2)                                           {       return sameSame(s1,s2) || sameOpp(s1,s2);                                       }       // 2 strips on same strut
 316         void    addJoint (dVertex v1, dVertex v2) {
 317                 // should probably replace parallel but further with the new one
 318                 if (v1.c0 != null && sameBar(v2.s.s, v1.c0.s.s)) return;
 319                 if (v1.c1 != null && sameBar(v2.s.s, v1.c1.s.s)) return;
 320                 if              (v1.c0 == null) v1.c0 = v2;
 321                 else if (v1.c1 == null) v1.c1 = v2;
 322         }
 323
 324         dPixel getRand()                                                                                        {       return new dPixel(DS[floor(random(iTowerStrips))].v0,floor(random(15))); }
 325         dPixel getClosest(xyz p) {
 326                 dVertex v = null; int pos=0; float d = 500;
 327                 for (int j=0; j<iTowerStrips; j++) {
 328                         dStrip s = DS[j];
 329                         float nd = pd2(s.s.points.get(0),p.x,p.y,p.z); if (nd < d) { v=s.v0; d=nd; pos=0; }
 330                         if (nd > 30) continue;
 331                         for (int k=0; k<=15; k++) {
 332                                 nd = pd2(s.s.points.get(k),p.x,p.y,p.z); if (nd < d) { v = s.v0; d=nd; pos=k; }
 333                         }
 334                 }
 335                 return random(2) < 1 ? new dPixel(v,pos) : new dPixel(v.opp,15-pos);
 336         }
 337
 338         dLattice() {
 339                 lattice=this;
 340                 //for (int i=0;i<NumBackTowers;i++) for (int j=0;j<MaxCubeHeight*2;j++) DQ[i][j]=-1;
 341
 342                 int   col = 0, row = -2, i=-1;
 343                 for (Strip strip : glucose.model.strips  ) { i++;
 344                         if (i % 16 == 0) row+=2;
 345                         if (row >= MaxCubeHeight*2-1) { col++; row = (col%2==1)?1:0; }  // only include lattice parts!
 346                         iTowerStrips++;
 347                         dStrip s = DS[iTowerStrips-1] = new dStrip(strip, iTowerStrips-1, row, col);
 348                         s.v0 = new dVertex(s,strip.points.get(0 ));
 349                         s.v1 = new dVertex(s,strip.points.get(15));
 350                         s.v0.setOpp(s.v1); s.v1.setOpp(s.v0);
 351                         //if (col < NumBackTowers) DQ[col][row] = 16*floor((iTowerStrips-1)/16);
 352                         //else s.row=-1;
 353                 }
 354
 355                 for (int j=0; j<iTowerStrips; j++) { for (int k=j+1; k<iTowerStrips; k++) {
 356                         dStrip s1 = DS[j], s2 = DS[k];
 357                         int c=0;
 358                         if (sameSame(s1.s,s2.s)) {      s1.v0.same = s2.v0; s1.v1.same = s2.v1;
 359                                                                                 s2.v0.same = s1.v0; s2.v1.same = s1.v1; continue; } // parallel
 360                         if (sameOpp (s1.s,s2.s)) {      s1.v0.same = s2.v1; s1.v1.same = s2.v0;
 361                                                                                 s2.v0.same = s1.v1; s2.v1.same = s1.v0; continue; } // parallel
 362                         if (dist2(s1.s, 0, s2.s, 0) < 5) { c++; addJoint(s1.v1, s2.v0); addJoint(s2.v1, s1.v0); }
 363                         if (dist2(s1.s, 0, s2.s,15) < 5) { c++; addJoint(s1.v1, s2.v1); addJoint(s2.v0, s1.v0); }
 364                         if (dist2(s1.s,15, s2.s, 0) < 5) { c++; addJoint(s1.v0, s2.v0); addJoint(s2.v1, s1.v1); }
 365                         if (dist2(s1.s,15, s2.s,15) < 5) { c++; addJoint(s1.v0, s2.v1); addJoint(s2.v0, s1.v1); }
 366                         if (c>0) continue;
 367
 368                         // Are they touching at all?
 369                         int pos1=0, pos2=0; float d = 100;
 370
 371                         while (pos1 < 15 || pos2 < 15) {
 372                                 float oldD = d;
 373                                 if (pos1<15) { float d2 = dist2(s1.s, pos1+1, s2.s, pos2+0); if (d2 < d) { d=d2; pos1++; } }
 374                                 if (pos2<15) { float d2 = dist2(s1.s, pos1+0, s2.s, pos2+1); if (d2 < d) { d=d2; pos2++; } }
 375                                 if (d > 50  || oldD == d) break ;
 376                         }
 377
 378                         if (d>5) continue;
 379                         addTurn(s1.v0, pos1, s2.v0, pos2); addTurn(s1.v1, 15-pos1, s2.v0, pos2);
 380                         addTurn(s2.v0, pos2, s1.v0, pos1); addTurn(s2.v1, 15-pos2, s1.v0, pos1);
 381
 382                 }}
 383         }
 384 }
 385
 386 dLattice lattice;
 387 //----------------------------------------------------------------------------------------------------------------------------------