Mercurial > cortex
diff org/games.org @ 50:b1b90c4ab0bf
trying to resolve problem with skeleton debugging
author | Robert McIntyre <rlm@mit.edu> |
---|---|
date | Mon, 14 Nov 2011 18:46:34 -0700 |
parents | 183744c179e6 |
children | 1381a6ebd08b |
line wrap: on
line diff
1.1 --- a/org/games.org Sat Nov 12 16:52:38 2011 -0700 1.2 +++ b/org/games.org Mon Nov 14 18:46:34 2011 -0700 1.3 @@ -155,28 +155,6 @@ 1.4 (set-gravity game new-value) 1.5 (set-gravity game gravity)))) 1.6 1.7 -(defn fire-cannon-ball 1.8 - ([node] 1.9 - (fn [game value] 1.10 - (if (not value) 1.11 - (let [camera (.getCamera game) 1.12 - cannon-ball 1.13 - (sphere 0.7 1.14 - :material "Common/MatDefs/Misc/Unshaded.j3md" 1.15 - :texture "Textures/PokeCopper.jpg" 1.16 - :position 1.17 - (.add (.getLocation camera) 1.18 - (.mult (.getDirection camera) (float 1))) 1.19 - :mass 3)] ;200 0.05 1.20 - (.setShadowMode cannon-ball RenderQueue$ShadowMode/CastAndReceive) 1.21 - (.setLinearVelocity 1.22 - (.getControl cannon-ball RigidBodyControl) 1.23 - (.mult (.getDirection camera) (float 50))) ;50 1.24 - (add-element game cannon-ball (if node node (.getRootNode game))))))) 1.25 - ([] 1.26 - (fire-cannon-ball false))) 1.27 - 1.28 - 1.29 (defn floor* [] 1.30 (doto (box 10 0.1 5 :name "floor" ;10 0.1 5 ; 240 0.1 240 1.31 :material "Common/MatDefs/Misc/Unshaded.j3md"