/*
files = [ "Gearsleft.stl",
          "Gearsright.stl" ];
          ,
          "Grippart.stl",
          "Gripperservoplate.stl",
          "Liftgears.stl",
          "Liftparallelbar.stl",
          "Parallelbar.stl",
          "Servoconnector.stl" ];
          */


module imp( s ) {
   import_stl( s, convexity=1 );
}

module base () {
   difference() {
      union() {
         translate( v=[0,4+8,0] )
            rotate( a=90, v=[1,0,0] )
               difference() {
                  translate( v=[0,0,-4*0.001] )
                     scale( v=[1,1,2.002] )
                        imp( "Gripperservoplate.stl" );
                  translate( v=[0,23,4] )
                     cube( [100,100,5], center=false );
                  translate( v=[-1,0,4] )
                     cube( [10,100,5], center=false );
                  translate( v=[20,0,4] )
                     cube( [22,100,5], center=false );
                  translate( v=[20,0,-1] )
                     cube( [9,15,6], center=false );
               }
         translate( v=[4.5,0,0] )
            scale( v=[1,1,1.001] )
               imp( "Servoconnector.stl" );
         /*
         translate( v=[4.001,4.001,-0.001] )
            cube( [15,7.998,5], center=false );
         */
         translate( v=[48-3.999-15,4.001,-0.001] )
            cube( [15,7.998,4.002], center=false );
      }
      translate( v=[0,-1,3.999] )
         cube( [100,5,100] );
      translate( v=[0,12,3.999] )
         cube( [100,10,100] );
      translate( v=[-10,-10,-4] )
         cube( [100,100,4] );
   }
}

module grippart () {
   translate( v=[0,50,8] )
      rotate( a=180, v=[1,0,0] )
         scale( v=[1,1,2] )
            imp( "Grippart.stl" );
}

module twobar () {
   imp( "Parallelbar.stl" );
   translate( v=[37,0,0] )
      imp( "Parallelbar.stl" );
}


base();
/*
twobar();
translate( v=[0,9,0] )
   twobar();
translate( v=[74,9,0] )
   imp( "Liftgears.stl" );
translate( v=[0,18,0] ) {
   base();
   translate( v=[24,22,0] )
      imp( "Liftparallelbar.stl" );
   translate( v=[44,0,0] ) {
      grippart();
      translate( v=[10,0,0] ) {
         grippart();
      }
   }
}
*/