# HG changeset patch # User Robert McIntyre # Date 1393909298 18000 # Node ID 36d492f4deaba9910780174cf54b9d275ade00b3 # Parent 72ee485d9179e7767554009ef83358e23a153dda finished for the night. diff -r 72ee485d9179 -r 36d492f4deab assets/Models/worm-segment/touch-guide.png Binary file assets/Models/worm-segment/touch-guide.png has changed diff -r 72ee485d9179 -r 36d492f4deab assets/Models/worm-segment/touch-profile.png Binary file assets/Models/worm-segment/touch-profile.png has changed diff -r 72ee485d9179 -r 36d492f4deab assets/Models/worm-segment/touch-profile.xcf Binary file assets/Models/worm-segment/touch-profile.xcf has changed diff -r 72ee485d9179 -r 36d492f4deab assets/Models/worm-segment/worm.blend Binary file assets/Models/worm-segment/worm.blend has changed diff -r 72ee485d9179 -r 36d492f4deab org/worm_learn.clj --- a/org/worm_learn.clj Mon Mar 03 23:24:28 2014 -0500 +++ b/org/worm_learn.clj Tue Mar 04 00:01:38 2014 -0500 @@ -19,8 +19,8 @@ (load-blender-model "Models/worm-segment/worm-segment.blend")) -(defn worm-segment [] - (load-blender-model "Models/test-touch/touch-cube.blend")) +(defn worm [] + (load-blender-model "Models/worm-segment/worm.blend")) (defn gen-worm @@ -59,7 +59,7 @@ : fire ball" ([] (test-basic-touch false)) ([record?] - (let [head (doto (worm-segment) (body!)) + (let [head (doto (worm) (body!)) touch (touch! head) touch-display (view-touch)] (world