(ns advent.core
  (:require [play-clj.core :refer :all]
            [play-clj.ui :refer :all]
            [play-clj.utils :refer :all]
            [play-clj.g2d :refer :all]
            [advent.utils :as utils]
            [advent.screens.scene :as scene]
            [advent.screens.dialogue :as dialogue]
            [clojure.tools.logging :as log]
            [advent.screens.title :as title]
            [advent.screens.splash :as splash]
            [advent.screens.credits :as credits]
            [advent.screens.inventory :as inventory]
            [advent.screens.safe :as safe]
            [advent.screens.fade :as fade]
            [advent.steam :as steam]
            [advent.iap :as iap]
           
            [advent.pathfind])
  (:import [com.badlogic.gdx.graphics Pixmap Pixmap$Filter Texture Texture$TextureFilter]
          [com.badlogic.gdx.graphics.g2d TextureRegion]
          [com.badlogic.gdx Gdx Application]
          [java.io FileOutputStream File PrintStream]))

(defonce am (asset-manager))


(set-asset-manager! am)
(defn create-game [advent] 
  (iap/use-pref)
  
  (set-screen-wrapper! (fn [screen screen-fn]
                         (try (screen-fn)
                              (catch Exception e
                                (.log Gdx/app "ERROR" (with-out-str (.printStackTrace e)))
                                (set-screen! advent title/title-screen)))))
   (log/log-capture! *ns* :warn :error)
   (log/info "Starting game on version v" (advent.version/version))
   (utils/listen-for-screenshots)

   (set-screen! advent splash/splash-screen))
 
(defgame advent
  :on-create
  (fn [this]
    (steam/init)
    (create-game advent)))

(defn reload []
  (on-gl (set-screen! advent title/title-screen)))