knight.scm 385 B

12345678910111213141516
  1. ;; https://opengameart.org/content/classic-knight-animated
  2. (use-modules (chickadee)
  3. (chickadee math vector)
  4. (chickadee render sprite)
  5. (chickadee render texture))
  6. (define sprite #f)
  7. (define (load)
  8. (set! sprite (load-image "images/knight.png")))
  9. (define (draw alpha)
  10. (draw-sprite sprite #v(256.0 176.0)))
  11. (run-game #:load load #:draw draw)