24 lines
1018 B
Clojure
24 lines
1018 B
Clojure
(ns advent.achievements
|
|
(:import [com.badlogic.gdx Gdx Application])
|
|
(:require [advent.steam :as steam]
|
|
[advent.utils :as utils]))
|
|
|
|
(def android-ids {"DESTINY" "CgkIwc6UgfgZEAIQAQ"
|
|
"PARDON" "CgkIwc6UgfgZEAIQBw"
|
|
"EX_CON" "CgkIwc6UgfgZEAIQBg"
|
|
"PRO_WRESTLER" "CgkIwc6UgfgZEAIQBA"
|
|
"SHEEP_HORDER" "CgkIwc6UgfgZEAIQAw"
|
|
"SAFE_AND_SOUND" "CgkIwc6UgfgZEAIQAg"
|
|
"FOOLISH_LULLABY" "CgkIwc6UgfgZEAIQCQ"
|
|
"WISE_UP" "CgkIwc6UgfgZEAIQDA"
|
|
"TONGUESBANE" "CgkIwc6UgfgZEAIQCA"
|
|
"KITTY_KISS" "CgkIwc6UgfgZEAIQBQ"
|
|
"BEHOLDER" "CgkIwc6UgfgZEAIQCg"
|
|
"MOUTH_DIVER" "CgkIwc6UgfgZEAIQCw"})
|
|
|
|
(defn set-achievement [achievement]
|
|
(utils/platformify
|
|
(.reportAchievement (advent.core.GameCenter.) achievement)
|
|
(.setAchievement (advent.core.GooglePlay.) (Gdx/app) (android-ids achievement))
|
|
(steam/set-achievement achievement)))
|