(define-module (game util assets)
  #:use-module (chickadee graphics texture)
  #:use-module (chickadee graphics color)
  #:export (assets-load assets-file-name tile-texture tile-atlas hero-texture hero-atlas)
  
  )

(define tile-texture #f)
(define tile-atlas #f)

(define hero-texture #f)
(define hero-atlas #f)

(define prefix (or (getenv "ASSET_DIR") "." ))


(define (assets-file-name name)
  (string-append prefix "/" name)
  )

(define (assets-load)
  (set! tile-texture (load-image (assets-file-name "assets/images/simples_pimples.png")
                                 #:transparent-color black))
  (set! tile-atlas (split-texture tile-texture 16 16))
  
  (set! hero-texture (load-image (assets-file-name "assets/images/lr_penguin2.png")))
  (set! hero-atlas (split-texture hero-texture 32 32)))