comparison org/test-creature.org @ 162:2cbdd7034c6c

moved ear into cortex
author Robert McIntyre <rlm@mit.edu>
date Sat, 04 Feb 2012 01:44:06 -0700
parents e401dafa5966
children 985c73659923
comparison
equal deleted inserted replaced
161:e401dafa5966 162:2cbdd7034c6c
48 48
49 ;; TODO remove this! 49 ;; TODO remove this!
50 (require 'cortex.import) 50 (require 'cortex.import)
51 (cortex.import/mega-import-jme3) 51 (cortex.import/mega-import-jme3)
52 (use '(cortex world util body hearing touch vision sense 52 (use '(cortex world util body hearing touch vision sense
53 proprioception movement)) 53 proprioception movement))
54 54
55 (rlm.rlm-commands/help) 55 (rlm.rlm-commands/help)
56 (import java.awt.image.BufferedImage) 56 (import java.awt.image.BufferedImage)
57 (import javax.swing.JPanel) 57 (import javax.swing.JPanel)
58 (import javax.swing.SwingUtilities) 58 (import javax.swing.SwingUtilities)
277 277
278 278
279 ;; the camera will stay in its initial position/rotation with relation 279 ;; the camera will stay in its initial position/rotation with relation
280 ;; to the spatial. 280 ;; to the spatial.
281 281
282
283 ;;dylan (defn follow-sense, adjoin-sense, attach-stimuli,
284 ;;anchor-qualia, augment-organ, with-organ
282 285
283 (defn follow-test 286 (defn follow-test
284 "show a camera that stays in the same relative position to a blue cube." 287 "show a camera that stays in the same relative position to a blue cube."
285 [] 288 []
286 (let [camera-pos (Vector3f. 0 30 0) 289 (let [camera-pos (Vector3f. 0 30 0)