Mercurial > cortex
comparison org/movement.org @ 317:bb3f8a4af87f
removed references to defvar from clojure.contrib.def since the def from 1.4 now allows for docstrings
| author | Robert McIntyre <rlm@mit.edu> |
|---|---|
| date | Tue, 28 Feb 2012 14:04:21 -0600 |
| parents | 2c7fbcbd5ebb |
| children | 702b5c78c2de |
comparison
equal
deleted
inserted
replaced
| 316:2c7fbcbd5ebb | 317:bb3f8a4af87f |
|---|---|
| 61 | 61 |
| 62 #+name: muscle-meta-data | 62 #+name: muscle-meta-data |
| 63 #+begin_src clojure | 63 #+begin_src clojure |
| 64 (in-ns 'cortex.movement) | 64 (in-ns 'cortex.movement) |
| 65 | 65 |
| 66 (defvar | 66 (def |
| 67 ^{:arglists '([creature])} | 67 ^{:doc "Return the children of the creature's \"muscles\" node." |
| 68 :arglists '([creature])} | |
| 68 muscles | 69 muscles |
| 69 (sense-nodes "muscles") | 70 (sense-nodes "muscles")) |
| 70 "Return the children of the creature's \"muscles\" node.") | 71 |
| 71 | 72 |
| 72 (defn muscle-profile-image | 73 (defn muscle-profile-image |
| 73 "Get the muscle-profile image from the node's blender meta-data." | 74 "Get the muscle-profile image from the node's blender meta-data." |
| 74 [#^Node muscle] | 75 [#^Node muscle] |
| 75 (if-let [image (meta-data muscle "muscle")] | 76 (if-let [image (meta-data muscle "muscle")] |
| 290 (ns cortex.movement | 291 (ns cortex.movement |
| 291 "Give simulated creatures defined in special blender files the power | 292 "Give simulated creatures defined in special blender files the power |
| 292 to move around in a simulated environment." | 293 to move around in a simulated environment." |
| 293 {:author "Robert McIntyre"} | 294 {:author "Robert McIntyre"} |
| 294 (:use (cortex world util sense body)) | 295 (:use (cortex world util sense body)) |
| 295 (:use clojure.contrib.def) | |
| 296 (:import java.awt.image.BufferedImage) | 296 (:import java.awt.image.BufferedImage) |
| 297 (:import com.jme3.scene.Node) | 297 (:import com.jme3.scene.Node) |
| 298 (:import com.jme3.math.Vector3f) | 298 (:import com.jme3.math.Vector3f) |
| 299 (:import com.jme3.bullet.control.RigidBodyControl)) | 299 (:import com.jme3.bullet.control.RigidBodyControl)) |
| 300 #+end_src | 300 #+end_src |
| 302 #+name: test-header | 302 #+name: test-header |
| 303 #+begin_src clojure | 303 #+begin_src clojure |
| 304 (ns cortex.test.movement | 304 (ns cortex.test.movement |
| 305 (:use (cortex world util sense body movement)) | 305 (:use (cortex world util sense body movement)) |
| 306 (:use cortex.test.body) | 306 (:use cortex.test.body) |
| 307 (:use clojure.contrib.def) | |
| 308 (:import java.io.File) | 307 (:import java.io.File) |
| 309 (:import java.awt.image.BufferedImage) | 308 (:import java.awt.image.BufferedImage) |
| 310 (:import com.jme3.scene.Node) | 309 (:import com.jme3.scene.Node) |
| 311 (:import (com.jme3.math Quaternion Vector3f)) | 310 (:import (com.jme3.math Quaternion Vector3f)) |
| 312 (:import (com.aurellem.capture Capture RatchetTimer)) | 311 (:import (com.aurellem.capture Capture RatchetTimer)) |