(use-modules (chickadee)
             (chickadee math vector)
             (chickadee graphics sprite)
             (chickadee graphics texture))

(use-modules (gl enums))

(define sprite #f)

(define (load)
  (pk (blending-factor-src 2))
  (set! sprite (load-image "images/chickadee.png")))

(define (draw alpha)
  (draw-sprite sprite (vec2 256.0 176.0)))

(run-game #:load load #:draw draw)