74 lines (52 with data), 1.9 kB

AnyFolder ArtificialHook ={
  
  AnySeg Hook={
    Mass=0;
    Jii={0,0,0};
  };
  
  AnyKinEqSimpleDriver  HookDriver ={
    
    AnyKinLinear Lin ={
      AnySeg &ref1=..Hook;
      AnySeg &ref2=...SegToBeHold;
    };
    
    AnyKinRotational Rot ={
      AnySeg &ref1=..Hook;
      AnySeg &ref2=...SegToBeHold;
      Type=RotVector;
    };
    
    DriverPos={0.0,0.0,0.0,0,0,0};
    DriverVel={0,0,0,0,0,0};
    Reaction.Type={0,0,0,0,0,0};
  };
  
  AnyReacForce Reaction ={
    AnyKinLinear Lin ={
      AnyFixedRefFrame &ref2=...ForceProvider;
      AnySeg &ref1=..Hook;
      Ref=0;
    };
    
    AnyKinRotational Rot ={
      AnyFixedRefFrame &ref2=...ForceProvider;
      AnySeg &ref1=..Hook;
    
      Type=RotVector;
    };
  };
  
  
  
  
  AnySeg &StartNode=Hook;
  AnySeg &EndNode=.SegToBeHold;
  //The terms push and pull are determined wrt. the coordinate system of the StartNode!
  //StrenghtOfReactionsLin = {XPush,XPull,YPush,YPull,ZPush,ZPull}
  AnyVar ScaleFactor = 10;
  AnyVector StrengthOfReactionsLin = {.Strength,.Strength,.Strength,.Strength,.Strength,.Strength}; //List of strengths for the linear muscles
  AnyVector StrengthOfReactionsRot = {.RotStrength,.RotStrength,.RotStrength,.RotStrength,.RotStrength,.RotStrength}; //List of strengths for the linear muscles
 
  AnyFolder &DrawRef=Main.DrawSettings;
  #include "../Reactions/XPush.any"   
  #include "../Reactions/XPull.any"    
  #include "../Reactions/YPush.any"   
  #include "../Reactions/YPull.any"    
  #include "../Reactions/ZPush.any"   
  #include "../Reactions/ZPull.any"    
  
  #include "../Reactions/XRotNeg.any"   
  #include "../Reactions/XRotPos.any"    
  #include "../Reactions/YRotNeg.any"   
  #include "../Reactions/YRotPos.any"    
  #include "../Reactions/ZRotNeg.any"   
  #include "../Reactions/ZRotPos.any"    
  
  
  
};