From 7c540f61a710847fd59033d3d2ee1dfc6364b928 Mon Sep 17 00:00:00 2001
From: David Thompson <dthompson2@worcester.edu>
Date: Mon, 20 Jan 2014 21:10:57 -0500
Subject: Remove obsolete examples.

---
 examples/action.scm | 39 ---------------------------------------
 1 file changed, 39 deletions(-)
 delete mode 100644 examples/action.scm

(limited to 'examples/action.scm')

diff --git a/examples/action.scm b/examples/action.scm
deleted file mode 100644
index b2a43b6..0000000
--- a/examples/action.scm
+++ /dev/null
@@ -1,39 +0,0 @@
-(use-modules (2d actions)
-             (2d agenda)
-             (2d coroutine)
-             (2d game)
-             (2d scene)
-             (2d sprite)
-             (2d stage)
-             (2d vector2))
-
-(define (enter sprite)
-  (let ((size (game-resolution actions-demo)))
-    (schedule-action
-     (action-parallel
-      ;; Move horizontally across the screen in 60 frames.
-      (lerp (lambda (x)
-              (set-sprite-position!
-               sprite
-               (vector2 x (/ (vy size) 2))))
-            0 (vx size) 60)
-      ;; Rotate 1080 degrees in 120 frames.
-      (lerp (lambda (angle)
-              (set-sprite-rotation! sprite angle))
-            0 360 120)))))
-
-(define actions-scene
-  (make-scene
-   "Actions"
-   #:init (lambda ()
-            (load-sprite "images/ghost.png"
-                         #:position (vector2 320 240)))
-   #:enter enter
-   #:draw draw-sprite))
-
-(define actions-demo
-  (make-game
-   #:title "Actions"
-   #:first-scene actions-scene))
-
-(run-game actions-demo)
-- 
cgit v1.2.3