ARC Pro

Upgrade to ARC Pro

Synthiam ARC Pro is a new tool that will help unleash your creativity with programming robots in just seconds!

#66  

@fxrtst good that you will be with us on this...lets try to get further into creating correctly timed and readable motion for our robot rigs! To me this is one essential element in creating an emotional believable character for the robots we are trying to build!

There are tons of good tutorials on this topic, but this one from TED kind of nails it down to the very core of it...;)

PRO
USA
#67  

Absolutely correct and the main reason I'm also trying to bring in facial motion capture into this whole thing. Ease in and ease out are crucial to animation and animatronics ( my world) We've had to create animatronic puppets that behave like real animals or creatures. The mind know what it has seen for thousands of years. It's shall we say in our programming. It's also one of the reason we all react to Boston Dynamic robots. They mimic nature. And that's where I want to continue to take robotics. But the foundation has to be importing real motion.

#68  

Motion has a big impact on how believable a character is...this is a very good talk on the topic!

Sorry for the re-post! Could not help it...:)

PRO
USA
#69  

.....yes perfect example.

PRO
USA
#70  

@Mickey666Maus

Can you export (Virtual JD) to 3ds format ?

#71  

@Mickey666Maus

Here is the script I mentioned in my recent email. One thing though. I had said you would need to modify the first 2 lines if you placed the text file in a place different than I used. It should have read to change just the first line. Originally it was 2 lines, but I combined them into 1. Let me know if there are problems with it or you need more info.

I also realized I could include the modified text at the end of the script so you could just cut and paste it into Notepad and save it. So I did. Be sure to cut it and not just copy it so it will be gone from the script.


ClearVariables()

$ServoDataPath ="C:\Users\Public\Documents\Test\ServoData.txt"
DefineArray($ServoDataArray,1,"" ) #Define an array with 1 element (used later)
 
If(FileExists($ServoDataPath))
  FileReadReset($ServoDataPath) #Set to beginning of file
  $TheText =FileReadLine($ServoDataPath) #Read a line of text
  Print($TheText)
  $ServoDataArray[0] =$TheText
  $NextLine =1
  RepeatWhile(FileReadEnd($ServoDataPath) =0) #Read until end of the file
    $TheText =FileReadLine($ServoDataPath)
    AppendArray($ServoDataArray,$TheText)
    Print($ServoDataArray[$NextLine]) #So you can see the stored data
    $NextLine++  
  EndRepeatWhile  
  FileReadClose($ServoDataPath) #ALWYS close the file after use
    
    #Now the data is in an array.
  
    #If you wish to get the individual numbers from each line of text,
    #the Split function can be used.
    
  $HighServoArray =GetArraySize("$ServoDataArray") #Find out how big it is
  $NextLine =0 #Now read from the array, character by character
  RepeatWhile($NextLine <= $HighServoArray)
    $NextNum =0
    Print($ServoDataArray[$NextLine])   
    $TheNumStr =Split($ServoDataArray[$NextLine],";",$NextNum) 
    Print($TheNumStr)
    RepeatWhile($TheNumStr != "") 
      $TheNumStr =Split($ServoDataArray[$NextLine],";",$NextNum)
        #Here is where you would do whatever it is you want to do with
        #the value just extracted. I'll just print it.  
      Print($TheNumStr)
        #I put a sleep here if you want to actually see the numbers as
        #they go by.
      Sleep(500)
      $NextNum++        
    EndRepeatWhile
    $NextLine++
  EndRepeatWhile
EndIf

#The modified text:
0;0;0;0;0;0;0;0;0;
0;0;0;0;0;1;1;1;1;
1;1;2;2;2;2;3;3;3;
4;4;5;5;6;6;7;7;8;
9;9;10;11;12;13;14;14;15;
16;17;18;20;21;22;23;24;25;
27;28;29;31;32;34;35;37;38;
40;41;43;45;46;48;50;52;53;
55;57;59;61;63;64;66;68;70;
72;74;76;78;80;82;84;86;88;
90;92;94;96;98;100;102;104;106;
108;110;112;114;116;117;119;121;123;
125;127;128;130;132;134;135;137;139;
140;142;143;145;146;148;149;151;152;
153;155;156;157;158;159;160;162;163;
164;165;166;166;167;168;169;170;171;
171;172;173;173;174;174;175;175;176;
176;177;177;177;178;178;178;178;179;
179;179;179;179;179;180;180;180;180;
180;180;180;180;180;180;180;180;180;
180;

PRO
USA
#72  

@wbs00001

I believe the code below is wrong.


$HighServoArray =GetArraySize("$ServoDataArray") 

Replace with


$HighServoArray =GetArraySize($ServoDataArray)