tween_example.clj

(ns game.scenes.one-two.core)

(defn glitch [duration]
  (timeline [(tween {:analog-glitch {:color-drift 0.3 :scanline-jitter 0.3}} Camera/main duration)
       (tween {:analog-glitch {:color-drift 0 :scanline-jitter 0}} Camera/main duration)])))
  
(defn init-scene []
  (setup-scene))

(deftween [:analog-glitch :color-drift] [this]
    {:get (.colorDrift this)
     :base (a/cmpt this AnalogGlitch)
     :base-tag AnalogGlitch
     :tag System.Single})
(deftween [:analog-glitch :scanline-jitter] [this]
  {:get (.scanLineJitter this)
   :base (a/cmpt this AnalogGlitch)
   :base-tag AnalogGlitch
   :tag System.Single})


;==========================

(ns game.scene-manager
 (:require [game.scenes.one-two.core :as one-two])
  
(defn start-game [])
  
(hook+ some-obj :start #start-game)
; invoked only by the REPL ^^