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