cortex: org/body.org comparison

comparison org/body.org @ 56:8b571c137f81

bone influence appears to be wrong! Investigating...

author	Robert McIntyre <rlm@mit.edu>
date	Tue, 15 Nov 2011 23:18:37 -0700
parents	8b95180f5c69
children	37a3256e1ed3

comparison

equal deleted inserted replaced

-:8b95180f5c69
+:8b571c137f81
 (.loadModel (asset-manager) "Models/Sinbad/Sinbad.mesh.xml"))
 (defn worm-blender
 []
 (first (seq (.getChildren (load-blender-model
-"Models/anim2/worm3.blend")))))
+"Models/anim2/simple-worm.blend")))))
 (defn skel [node]
 (doto
 (.getSkeleton
 (.getControl node SkeletonControl))
 (map
 #(.setUserControl (.getBone skeleton %) true)
 (range (.getBoneCount skeleton))))
-(let [b (.getBone skeleton 6)]
+(let [b (.getBone skeleton 2)]
 (println-repl "moving " (.getName b))
 (println-repl (.getLocalPosition b))
 (.setUserTransforms b
 Vector3f/UNIT_X
 Quaternion/IDENTITY
 )
 )))
 (defn joint-control
 [joint]
-(let [physics-space (ref nil)
+(let [physics-space (ref nil)]
-enabled? (ref true)]
 (reify PhysicsControl
 (setPhysicsSpace [this space]
 (dosync
 (ref-set physics-space space))
 (.addJoint space joint))
 (update [this tpf])
 (setSpatial [this spatial])
 (render [this rm vp])
 (getPhysicsSpace [this] (deref physics-space))
-(isEnabled [this] (deref enabled?))
+(isEnabled [this] true)
-(setEnabled [this state]
+(setEnabled [this state]))))
-(dosync (ref-set enabled? state))))))
 (defn add-joint
 "Add a joint to a particular object. When the object is added to the
 PhysicsSpace of a simulation, the joint will also be added"
 [object joint]
 Vector3f/ZERO (Vector3f. 3 3 3))]
 (add-joint sphere1 joint)
 (doto (Node. "hinge-world")
 (.attachChild sphere1)
 (.attachChild sphere2))))
+(defn test-joint []
-(defn test-joint
+(view (hinge-world)))
-[]
-(.start
-(world
-(doto (Node.)
-(.attachChild
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;;; here is the ragdoll stuff
+(def worm-mesh (.getMesh (.getChild (worm-blender) 0)))
+(def mesh worm-mesh)
+(.getFloatBuffer mesh VertexBuffer$Type/Position)
+(.getFloatBuffer mesh VertexBuffer$Type/BoneWeight)
+(.getData  (.getBuffer mesh VertexBuffer$Type/BoneIndex))
+(defn position [index]
+(.get
+(.getFloatBuffer worm-mesh VertexBuffer$Type/Position)
+index))
+(defn vec-pos [index]
+(let [offset (* index 3)]
+(Vector3f. (position offset)
+(position (inc offset))
+(position (inc(inc offset))))))
+(defn bones [index]
+(.get
+(.getData  (.getBuffer mesh VertexBuffer$Type/BoneIndex))
+index))
+(defn bone-control-color [index]
+(get {[1 0 0 0] ColorRGBA/Red
+[1 2 0 0] ColorRGBA/Magenta
+[2 0 0 0] ColorRGBA/Blue}
+(vec (map (comp int bones) (range (* index 4) (+ (* index 4) 4))))
+ColorRGBA/White))
+(defn bone-weights [index]
+(.get
+(.getFloatBuffer mesh VertexBuffer$Type/BoneWeight)
+index))
+(defn influence-color [index bone-num]
+(get
+{(float 0)   ColorRGBA/Blue
+(float 0.5) ColorRGBA/Green
+(float 1)   ColorRGBA/Red}
+(bone-weights (+ (* 4 index) bone-num))))
+(defn test-info []
+(let [points (Node.)]
+(dorun
+(map #(.attachChild points %)
+(map #(sphere 0.01
+:position (vec-pos %)
+:color (influence-color % 0)
+:physical? false)
+(range 12))))
+(view points)))
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 #+end_src

Mercurial > cortex

comparison org/body.org @ 56:8b571c137f81