/**
 *  Anchors and the bridge
 *
 *  by Ricard Marxer
 *
 *  This example shows the use of anchors and distance joints in order
 *  to create a bridge.
 */

import fisica.*;


int     WND_WIDTH  = 400;
int     WND_HEIGHT = 400;

enum PhyObject_t
{
  PHYOBJECT_NONE,
  PHYOBJECT_CIRCLE, 
  PHYOBJECT_BOX,
};
/* enum 縺御ｽｿ縺医↑縺��縺ｧ縲∽ｻ｣逕ｨ*/
final static int PHYOBJECT_NONE     = 0;
final static int PHYOBJECT_CIRCLE   = 1;
final static int PHYOBJECT_BOX      = 2;
final static int PHYOBJECT_TRIANGLE = 3;

int curPhyObject = PHYOBJECT_NONE;

void setup()
{
  size(400,400);
  fw_init();
  app_init();
}

/* 繧｢繝励Μ繧ｱ繝ｼ繧ｷ繝ｧ繝ｳ縺ｮ蛻晄悄蛹�*/
void app_init()
{
  gui_init();
  phy_init();
}
/* 繧｢繝励Μ繧ｱ繝ｼ繧ｷ繝ｧ繝ｳ縺ｮ謠冗判 */
void app_render()
{
  background(255);
  phy_updateAndRender( true );
  app_renderObjectCreating();
}
/* 迴ｾ蝨ｨ邱ｨ髮�ｸｭ縺ｮ繧ｪ繝悶ず繧ｧ繧ｯ繝医ｒ謠冗判縺吶ｋ */
void app_renderObjectCreating()
{
  if( !isStartSizing )
  { 
    return ;
  }
  switch( curPhyObject )
  {
  case PHYOBJECT_NONE:
    /* 迚ｹ縺ｫ菴輔ｂ縺励↑縺�*/
    break;
  case PHYOBJECT_CIRCLE:/**/
    {
      float cx = (endPoint.x + startPoint.x)/2;
      float cy = (endPoint.y + startPoint.y)/2;
      float dx  = (endPoint.x - startPoint.x);
      float dy  = (endPoint.y - startPoint.y);
      float r   = sqrt( dx*dx+dy*dy );
      noFill();
      stroke(204, 102, 0);
      ellipse(cx, cy, r, r);
    }
    break;
  case PHYOBJECT_BOX:
    {
      float sx = startPoint.x;
      float sy = startPoint.y;
      float w  = (endPoint.x - startPoint.x);
      float h  = (endPoint.y - startPoint.y);
      noFill();
      stroke(204, 102, 0);
      rect(sx,sy,w,h);
    }
    break;
  case PHYOBJECT_TRIANGLE:
    {
      float sx = startPoint.x;
      float sy = startPoint.y;
      float w  = (endPoint.x - startPoint.x);
      float h  = (endPoint.y - startPoint.y);
      noFill();
      stroke(204, 102, 0);
      triangle(sx, sy, sx, sy+h, sx+w, sy+h );
    }
    break;

  default:
    print("UnKownObjectType");
    break;
  }
}
/* 迴ｾ蝨ｨ縺ｮ繧ｪ繝悶ず繧ｧ繧ｯ繝医Δ繝ｼ繝峨ｒ繧ｵ繝ｼ繧ｯ繝ｫ縺ｫ縺吶ｋ */
void OnChangeCreateShape_Circle()
{
  curPhyObject = PHYOBJECT_CIRCLE;
  phy_draggable( false );
  print("Change Circle");
}

/* 迴ｾ蝨ｨ縺ｮ繧ｪ繝悶ず繧ｧ繧ｯ繝医Δ繝ｼ繝峨ｒ繝懊ャ繧ｯ繧ｹ縺ｫ縺吶ｋ */
void OnChangeCreateShape_Box()
{
  curPhyObject = PHYOBJECT_BOX;
  phy_draggable( false );
  print("Change Box");
}

void OnChangeCreateShape_Triangle()
{
  curPhyObject = PHYOBJECT_TRIANGLE;
  phy_draggable( false );
  print("Change Triangle");
}

PVector startPoint = new PVector();
PVector endPoint   = new PVector();  
boolean isStartSizing = false;

/* 繝槭え繧ｹ縺梧款縺輔ｌ縺溘ｉ縲√◎縺薙ｒ襍ｷ轤ｹ縺ｫ邱壹ｒ蠑輔″蟋九ａ繧�*/
void mousePressed() 
{
  /* TODO 菴懈�繝｢繝ｼ繝�*/
  statrtCreateObjOnmousePressed_();

  /* 繧ｪ繝悶ず繧ｧ繧ｯ繝医′縺ゅｋ縺ｪ繧峨ラ繝ｩ繝�げ繝｢繝ｼ繝峨↓縺吶ｋ */
  if( phy_ishitobj(mouseX, mouseY ) ) { 
    phy_draggable( true );
  }
  else { 
    phy_draggable( false );
  }

  phy_switchStaticAt( mouseX, mouseY );
}

void statrtCreateObjOnmousePressed_()
{
  /* GUI荳翫↓縺ゅｋ縺九�繧ｪ繝悶ず繧ｧ繧ｯ繝医′荳九↓縺ゅｋ縺ｪ繧峨�繧ｪ繝悶ず繧ｧ繧ｯ繝医�逕滓�縺ｯ縺励↑縺�*/
  if( gui_isOverGUI( mouseX, mouseY ) || phy_ishitobj(mouseX, mouseY ) )
  { 
    return;
  }
  isStartSizing = true;
  startPoint.x = mouseX;
  startPoint.y = mouseY;
}

/* 繝槭え繧ｹ縺後�縺励°繧九∋縺榊�謇�〒謚ｼ縺輔ｌ縲√�繧ｦ繧ｹ縺悟虚縺�◆繧峨�縺昴�繧ｵ繧､繧ｺ縺ｫ荳�凾逧�↑繧ｪ繝悶ず繧ｧ繧ｯ繝医ｒ陦ｨ遉ｺ縺吶ｋ */
void mouseDragged() 
{
  if( !isStartSizing )
  {
    return ;
  }
  /* 蟷��縲�縺ｮ邏ｯ荵励↓縺ｪ繧九ｈ縺�↓隱ｿ謨ｴ縺吶ｋ */
  int x = (int)startPoint.x - (int)mouseX;
  int y = (int)startPoint.y - (int)mouseY;
  endPoint.x = startPoint.x-x;
  endPoint.y = startPoint.y-y;
}

/* 縺昴�謨ｰ繧定ｶ�∴縺ｪ縺�怙螟ｧ縺ｮ2縺ｮ邏ｯ荵励ｒ霑斐☆ */
int powerof2nize_( int v )
{
  boolean isMinus = false;
  if( v < 0.0f )
  {
    isMinus = true;
    v = -v;
  }

  for( int i=2;i<20;++i)
  {
    int p1 = (int)Math.pow( 2, i );
    int p2 = (int)Math.pow( 2, i+1 );
    if( p1 < v  &&   v < p2 )
    {
      if( isMinus ) { 
        return -p1;
      }
      else { 
        return p1;
      }
    }
  }
  return 4;
}

/* 繝槭え繧ｹ縺後�縺励°繧九∋縺榊�謇�〒謚ｼ縺輔ｌ縲√�繧ｦ繧ｹ縺梧叛縺輔ｌ縺溘ｉ縺昴�繧ｵ繧､繧ｺ縺ｮ繧ｪ繝悶ず繧ｧ繧ｯ繝医ｒ關ｽ荳九＆縺帙ｋ */
void mouseReleased()
{  
  if( !isStartSizing )
  {
    return ;
  }
  isStartSizing = false;

  switch( curPhyObject )
  {
  case PHYOBJECT_NONE:
    /* 迚ｹ縺ｫ菴輔ｂ縺励↑縺�*/
    break;
  case PHYOBJECT_CIRCLE:
    {
      int cx = (int)(endPoint.x + startPoint.x)/2;
      int cy = (int)(endPoint.y + startPoint.y)/2;
      float dx  = (endPoint.x - startPoint.x);
      float dy  = (endPoint.y - startPoint.y);
      float r   = sqrt( dx*dx+dy*dy );
      /* 蜊雁ｾ�′荳�ｮ壻ｻ･荳翫□縺ｨ逕滓�縺輔ｌ繧�*/
      if(r > 20.0f)
      {
        AddCircle(cx, cy, r );
      }
    }
    break;
  case PHYOBJECT_BOX:
    {
      int sx = (int)startPoint.x;
      int sy = (int)startPoint.y;
      int w  = (int)(endPoint.x - startPoint.x);
      int h  = (int)(endPoint.y - startPoint.y);
      if(w<0)
      {
        w =  -w;
        sx = sx - w;
      }
      if(h<0)
      {
        h =  -h;
        sy = sy - h;
      }
      if( w>50.0f && h > 50.0f )
      { 
        AddBox(sx, sy, w, h, 0.0f );
      }
    }
    break;
  case PHYOBJECT_TRIANGLE:
    {
      int sx = (int)startPoint.x;
      int sy = (int)startPoint.y;
      int w  = (int)(endPoint.x - startPoint.x);
      int h  = (int)(endPoint.y - startPoint.y);
      AddTriangle(sx, sy, w, h, 0.0f );
    }
    break;
  default:
    print("UnKownObjectType");
    break;
  }
}