Mercurial > cortex

comparison org/skin.org @ 15:c32f3eb9fdeb

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
modified fire-cannon-ball to place the ball on a specific node
author Robert McIntyre <rlm@mit.edu>
date Sun, 23 Oct 2011 11:50:17 -0700
parents 3aa1ee6c6308
children d2e9f0d09475
comparison
equal deleted inserted replaced
14:3aa1ee6c6308 15:c32f3eb9fdeb
246 (.attachChild debug-node)) 246 (.attachChild debug-node))
247 ] 247 ]
248 248
249 (world 249 (world
250 root-node 250 root-node
251 {"key-return" (fire-cannon-ball)} 251 {"key-return" (fire-cannon-ball node)}
252 ;;no-op 252 ;;no-op
253 (fn [world] 253 (fn [world]
254 ;; (Capture/SimpleCaptureVideo 254 ;; (Capture/SimpleCaptureVideo
255 ;; world 255 ;; world
256 ;; (file-str "/home/r/proj/cortex/tmp/blob.avi")) 256 ;; (file-str "/home/r/proj/cortex/tmp/blob.avi"))
259 ;; (set-accuracy world (/ 1 60)) 259 ;; (set-accuracy world (/ 1 60))
260 ) 260 )
261 261
262 (fn [& _] 262 (fn [& _]
263 (let [touch-data (touch-percieve 0.2 b node)] 263 (let [touch-data (touch-percieve 0.2 b node)]
264 (println-repl touch-data) 264 ;;(println-repl touch-data)
265 (manage-ray-debug-node debug-node b touch-data 0.2)) 265 (manage-ray-debug-node debug-node b touch-data 0.2))
266 (Thread/sleep 10) 266 (Thread/sleep 10)
267 ;;(touch-print controls) 267 ;;(touch-print controls)
268 ;;(color-touch controls) 268 ;;(color-touch controls)
269 )))) 269 ))))