Update haunt.scm.

1 files changed, 28 insertions, 16 deletions

diff --git a/haunt.scm b/haunt.scm
index 798567c..050cbac 100644
--- a/haunt.scm
+++ b/haunt.scm
@@ -303,18 +303,18 @@ Learning" "http://vistahigherlearning.com")
    "Projects"
    "projects.html"
    `((h1 "Projects")
+     (p ,(anchor "Haunt" "projects/haunt.html")
+        " — Functional, hackable static site generator")
      (p ,(anchor "Chickadee" "projects/chickadee.html")
         " — Game development toolkit for Guile Scheme")
      (p ,(anchor "guile-SDL2" "projects/guile-sdl2.html")
         " — SDL2 bindings for Guile Scheme")
      (p ,(anchor "guile-syntax-highlight" "projects/guile-syntax-highlight.html")
         " — Syntax highlighting library for Guile Scheme")
-     (p ,(anchor "Haunt" "projects/haunt.html")
-        " — Functional, hackable static site generator")
      (p ,(anchor "Shroud" "projects/shroud.html")
         " — GPG-based password manager")
      (p ,(anchor "Sly" "projects/sly.html")
-        " — Functional reactive game engine")
+        " — Functional reactive game engine (abandoned)")
      (p ,(anchor "srt2vtt" "projects/srt2vtt.html")
         " — SRT to WebVTT subtitle converter"))))
 
@@ -323,7 +323,8 @@ Learning" "http://vistahigherlearning.com")
    #:name "Sly"
    #:file-name "sly.html"
    #:description
-   `((p "Sly is a fun, free software 2D/3D game engine written in "
+   `((p (strong "note: this project is no longer being developed!"))
+     (p "Sly is a fun, free software 2D/3D game engine written in "
         ,(anchor "Guile Scheme" "https://gnu.org/s/guile") ".")
      ,(centered-image "/images/sly/logo.png" "Sly fox mascot")
      (p "Sly differentiates itself from most other game engines by encouraging
@@ -510,19 +511,23 @@ and smile, because you've just generated your first Haunt site!"))
    `((p "Chickadee is a game development toolkit for "
         ,(anchor "Guile Scheme" "https://gnu.org/s/guile") ".")
      ,(centered-image "/images/chickadee/logo.png" "Chickadee logo")
-     (p "Chickadee aims to provide all the features that
-parenthetically inclined game developers need to make games in Scheme,
-such as:")
-     (ul
-      (li "extensible, fixed-timestep game loop")
-      (li "OpenGL-based rendering engine")
-      (li "keyboard, mouse, controller input events")
-      (li "vectors, matrices, bounding boxes, easing functions, etc.")
-      (li "asynchronous scripting"))
-     (p "Here is a simple example:")
+     (p "Chickadee provides all the essential tools that
+parenthetically inclined game developers need to make games in
+Scheme.")
+     (p "Here is the obligatory “Hello, world” program:")
+     ,(highlight-scheme
+       "(use-modules (chickadee math vector)
+             (chickadee render font)
+             (chickadee sdl))
+
+(define (draw alpha)
+  (draw-text \"Hello, world!\" #v(260.0 240.0)))
+
+(run-game/sdl #:draw draw)
+")
+     (p "And here's how to draw a sprite:")
      ,(highlight-scheme
-       "(use-modules (chickadee)
-             (chickadee math vector)
+       "(use-modules (chickadee math vector)
              (chickadee render sprite)
              (chickadee render texture)
              (chickadee sdl))
@@ -537,6 +542,13 @@ such as:")
 
 (run-game/sdl #:load load #:draw draw)
 ")
+     (p "Features include:")
+     (ul
+      (li "extensible, fixed-timestep game loop")
+      (li "OpenGL-based rendering engine")
+      (li "keyboard, mouse, controller input events")
+      (li "vectors, matrices, bounding boxes, easing functions, etc.")
+      (li "asynchronous scripting"))
      (p (small ,(anchor "chickadee sprite by Refuzzle, CC0"
                         "http://opengameart.org/content/winter-birds"))))
    #:requirements '("GNU Guile >= 2.1.4"