added bowling_ball model; infinite-loop test script

git-svn-id: svn://anubis/anaglym/trunk@216 99a6e188-d820-4881-8870-2d33a10e2619

lib/bowling_ball.mtl

@@ -0,0 +1,12 @@
+# Blender3D MTL File: bowling_ball.blend
+# Material Count: 1
+newmtl None_bowling_ball.jpg
+Ns 0
+Ka 0.000000 0.000000 0.000000
+Kd 0.8 0.8 0.8
+Ks 0.8 0.8 0.8
+d 1
+illum 2
+map_Kd bowling_ball.jpg
+
+

lib/bowling_ball.phy

@@ -0,0 +1 @@
+sphere "Sphere" 0.250000  0.000000 0.000000 0.000000

lib/demo/bowling.lua

@@ -77,8 +77,7 @@ function init_event()
     box:setVisible(false)
     box:setPosition(0, 0, lane_bottom - (maxz - minz) - 0.4)
     reference_pin:setPosition(0, 0, lane_bottom - maxz - 0.1)
-    reference_ball = ag.createSphere(0.25)
+    reference_ball = ag.loadModel("bowling_ball")
-    reference_ball:setColor(0.7, 0.1, 0.9)
     reference_ball:setMass(10)
     reference_ball:setPosition(0, -2, -1.5)
     setupStars()

tests/infinite-loop.lua

@@ -0,0 +1,5 @@
+
+function init_event()
+    while (1) do
+    end
+end