[pal-cvs] CVS pal/examples

[tneste]

Update of /project/pal/cvsroot/pal/examples
In directory clnet:/tmp/cvs-serv16401/examples

Modified Files:
	hares.lisp teddy.lisp 
Log Message:
Improved FPS limiter

--- /project/pal/cvsroot/pal/examples/hares.lisp	2007/08/15 14:36:21	1.8
+++ /project/pal/cvsroot/pal/examples/hares.lisp	2007/08/30 09:02:23	1.9
@@ -84,4 +84,4 @@
 
       (draw-fps))))
 
-;; (example)
+;; (example)
\ No newline at end of file
--- /project/pal/cvsroot/pal/examples/teddy.lisp	2007/08/15 14:36:21	1.8
+++ /project/pal/cvsroot/pal/examples/teddy.lisp	2007/08/30 09:02:23	1.9
@@ -93,7 +93,7 @@
     (set-cursor (tag 'cursor) (v 18 18))
 
     (play-music (tag 'music))
-    (play-sample (tag 'engine) :loops t :volume 30)
+    (play-sample (tag 'engine) :loops t :volume 50)
 
     (make-instance 'plane :alt 20)
     (dotimes (i 20)