comparison org/test-creature.org @ 178:6fba17a74a57

refactored touch
author Robert McIntyre <rlm@mit.edu>
date Sat, 04 Feb 2012 07:05:54 -0700
parents 0b9ae09eaec3
children f1b078375484
comparison
equal deleted inserted replaced
177:5af4ebe72b97 178:6fba17a74a57
170 z-axis 170 z-axis
171 (box 0.01 0.01 1 :physical? false :color ColorRGBA/Blue) 171 (box 0.01 0.01 1 :physical? false :color ColorRGBA/Blue)
172 creature (doto 172 creature (doto
173 (load-blender-model thing) 173 (load-blender-model thing)
174 (body!)) 174 (body!))
175 touch-nerves (touch creature) 175 touch-nerves (touch! creature)
176 touch-debug-windows (map (fn [_] (debug-touch-window)) touch-nerves) 176 touch-debug-windows (map (fn [_] (debug-touch-window)) touch-nerves)
177 vision-data (vision! creature) 177 vision-data (vision! creature)
178 vision-debug (map (fn [_] (debug-vision-window)) vision-data) 178 vision-debug (map (fn [_] (debug-vision-window)) vision-data)
179 me (sphere 0.5 :color ColorRGBA/Blue :physical? false) 179 me (sphere 0.5 :color ColorRGBA/Blue :physical? false)
180 hearing-senses (hearing! creature) 180 hearing-senses (hearing! creature)