1.1 --- a/org/test-creature.org	Sat Feb 04 10:00:37 2012 -0700
     1.2 +++ b/org/test-creature.org	Sat Feb 04 10:13:15 2012 -0700
     1.3 @@ -132,24 +132,28 @@
     1.4          (box 0.01 1 0.01 :physical? false :color ColorRGBA/Green)
     1.5          z-axis
     1.6          (box 0.01 0.01 1 :physical? false :color ColorRGBA/Blue)
     1.7 -        creature (doto 
     1.8 -                     (load-blender-model thing)
     1.9 -                   (body!))
    1.10 +
    1.11 +        creature (doto (load-blender-model thing) (body!))
    1.12 +
    1.13          touch (touch! creature)
    1.14          touch-display (view-touch)
    1.15 +
    1.16          vision (vision! creature)
    1.17          vision-display (view-vision)
    1.18 -        me (sphere 0.5 :color ColorRGBA/Blue :physical? false)
    1.19 -        hearing-senses (hearing! creature)
    1.20 -        hearing-windows (map (fn [_] (debug-hearing-window 50))
    1.21 -                             hearing-senses)
    1.22 -        bell (AudioNode. (asset-manager)
    1.23 -                         "Sounds/pure.wav" false)
    1.24 +
    1.25 +        hearing (hearing! creature)
    1.26 +        hearing-display (view-hearing)
    1.27 +
    1.28          prop (proprioception! creature)
    1.29          prop-debug (proprioception-debug-window)
    1.30  
    1.31          muscle-fns (movement! creature)
    1.32 -        ;; dream
    1.33 +
    1.34 +
    1.35 +        me (sphere 0.5 :color ColorRGBA/Blue :physical? false)
    1.36 +        bell (AudioNode. (asset-manager)
    1.37 +                         "Sounds/pure.wav" false)
    1.38 +       
    1.39          fix-display (runonce
    1.40                       (fn [world] (add-camera! world (.getCamera world) no-op)))
    1.41          ]
    1.42 @@ -211,10 +215,8 @@
    1.43            (touch-display (map #(% (.getRootNode world)) touch))
    1.44  
    1.45            (vision-display (map #(% world) vision))
    1.46 -          
    1.47 -          (dorun
    1.48 -           (map #(%1 (%2 world)) hearing-windows hearing-senses))
    1.49 -          
    1.50 +
    1.51 +          (hearing-display (map #(% world) hearing))
    1.52            
    1.53            ;;(println-repl (vision-data))
    1.54            (.setLocalTranslation me (.getLocation (.getCamera world)))