diff --git a/desktop/resources/Bluezone-Abyss-sound-017.wav b/desktop/resources/Bluezone-Abyss-sound-017.wav
new file mode 100755
index 00000000..5265b3e5
Binary files /dev/null and b/desktop/resources/Bluezone-Abyss-sound-017.wav differ
diff --git a/desktop/resources/dream/SUCCESS CHEERS Win Cute Vocal Chime 03.ogg b/desktop/resources/dream/SUCCESS CHEERS Win Cute Vocal Chime 03.ogg
new file mode 100644
index 00000000..33304e53
Binary files /dev/null and b/desktop/resources/dream/SUCCESS CHEERS Win Cute Vocal Chime 03.ogg differ
diff --git a/desktop/resources/dream/appear.ogg b/desktop/resources/dream/appear.ogg
new file mode 100644
index 00000000..88ad886c
Binary files /dev/null and b/desktop/resources/dream/appear.ogg differ
diff --git a/desktop/resources/dream/appear.wav b/desktop/resources/dream/appear.wav
new file mode 100755
index 00000000..1342bae5
Binary files /dev/null and b/desktop/resources/dream/appear.wav differ
diff --git a/desktop/resources/ego/breakglass.ogg b/desktop/resources/ego/breakglass.ogg
new file mode 100644
index 00000000..670ceb86
Binary files /dev/null and b/desktop/resources/ego/breakglass.ogg differ
diff --git a/desktop/resources/ego/breakglass.wav b/desktop/resources/ego/breakglass.wav
new file mode 100755
index 00000000..16959ddd
Binary files /dev/null and b/desktop/resources/ego/breakglass.wav differ
diff --git a/desktop/settings.edn b/desktop/settings.edn
index 8b989154..622d97b4 100644
--- a/desktop/settings.edn
+++ b/desktop/settings.edn
@@ -1 +1 @@
-{:sound-volume 42.0, :music-volume 59.0}
\ No newline at end of file
+{:sound-volume 97.0, :music-volume 77.0}
\ No newline at end of file
diff --git a/desktop/src-common/advent/screens/#title.clj# b/desktop/src-common/advent/screens/#title.clj#
new file mode 100644
index 00000000..1630170e
--- /dev/null
+++ b/desktop/src-common/advent/screens/#title.clj#
@@ -0,0 +1,220 @@
+(ns advent.screens.title
+  (:require [play-clj.core :refer :all]
+            [play-clj.math :refer :all]
+            [play-clj.ui :refer :all]
+            [play-clj.utils :refer :all]
+            [play-clj.g2d :refer :all]
+            [advent.utils :as utils]
+            [advent.tween :as tween]
+            [advent.screens.scene :as scene]
+            [advent.screens.dialogue :as dialogue]
+            [advent.screens.title :as title]
+            [advent.screens.inventory :as inventory]
+            [advent.screens.safe :as safe]
+            [advent.screens.fade :as fade]
+            )
+  (:import [com.badlogic.gdx.graphics Pixmap Pixmap$Filter Texture Texture$TextureFilter]
+           [com.badlogic.gdx.graphics.g2d TextureRegion]
+           [com.badlogic.gdx.utils.viewport FitViewport]
+           [com.badlogic.gdx.scenes.scene2d.ui Slider$SliderStyle]
+           [com.badlogic.gdx.scenes.scene2d.utils Align]
+           [com.badlogic.gdx Application Audio Files Game Gdx Graphics Input
+            InputMultiplexer InputProcessor Net Preferences Screen]))
+
+
+(defn get-color [e mouse-pos]
+  (if (utils/intersects? e mouse-pos)
+    (color :yellow)
+    (color 0.6 1.0 1.0 1.0)))
+
+(defn style-label [e font mouse-pos]
+  (label! e :set-style (style :label font (get-color e mouse-pos)))
+  e)
+
+(defn style-slider [s mouse-pos]
+  (if (utils/intersects? s mouse-pos)
+    (slider! s :set-style (:hover s))
+    (slider! s :set-style (:default s)))
+  s)
+
+(defn center [e]
+  (assoc e :x (- (/ 1280 2) (/ (or (:width e) (.getWidth (:object e))) 2))))
+
+
+(defn get-dir [old-x new-x]
+  (if (< old-x new-x)
+    :right
+    :left))
+
+(defn fly-ego [screen entities]
+  (let [speed 0.07
+        pos-f (- (* (:total-time screen) speed) (int (* (:total-time screen) speed)))
+        v (vector-2 0 0)
+        a (catmull-rom-spline! (:path (:flying-ego entities)) :value-at v pos-f)
+        direction (get-dir (get-in entities [:flying-ego :x]) (vector-2! v :x))
+        x (vector-2! v :x)
+        y (vector-2! v :y)]
+        (update-in entities [:flying-ego]
+                   \(update-in\ entities\ \[:flying-ego\]
+                   -\ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ merge\ {:x\ \(vector-2\!\ v\ :x\)
+                                                                        -\ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ :y\ \(vector-2\!\ v\ :y\)}
+                   -\ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \(get-in\ entities\ \[:flying-ego\ direction\]\)
+                   -\ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \)\)\)
+                   assoc :x xb :y y
+                  
+                   
+                   )))
+
+(defn flip [t]
+  (let [flipped (texture t)]
+    (texture! flipped :flip true false)
+    flipped))
+
+(defscreen title-screen
+  :on-show
+  (fn [screen entities]
+    
+    (utils/setup-viewport screen 1280 960)
+    (utils/load-settings!)
+    (let [font (utils/get-font "ego/font.fnt")
+          start-playing (assoc (label "Begin quest" (style :label font (color 0.6 1.0 1.0 1.0))) :x 0 :y 280 :height 32 :origin-x 0 :origin-y 0)
+          start-playing (center start-playing) 
+          fullscreen (assoc (label "Windowed" (style :label font (color 0.6 1.0 1.0 1.0))) :x 0 :y (- 280 (* 32 5)) :height 32 :origin-x 0 :origin-y 0)
+          fullscreen (center fullscreen) 
+          quit (assoc (label "End quest" (style :label font (color 0.6 1.0 1.0 1.0))) :x 0 :y (- 280 (* 32 6)) :height 32 :origin-x 0 :origin-y 0)
+          quit (center quit) 
+          music (utils/make-music "intro.ogg")
+          ui-skin (skin "ui/ui.json")
+          ]
+      (label! start-playing :set-alignment Align/center)
+      (label! quit :set-alignment Align/center)
+      (label! fullscreen :set-alignment Align/center)
+      
+      {:overlay  (assoc (texture "title.png" ) :x 0 :y 0 :scale-x 4 :scale-y 4 :origin-x 0 :origin-y 0)
+       :fade (assoc (texture "black.png")
+                    :scale-x 80
+                    :scale-y 80 
+                    :opacity 1.0
+                    :origin-x 0
+                    :origin-y 0)
+       :flying-ego (assoc (texture "ego/flying.png")
+                     :left (flip (texture "ego/flying.png"))
+                     :right (texture "ego/flying.png")
+                     :scale-x 5
+                     :scale-y 5
+                     :origin-x 2
+                     :origin-y 0
+                     :path (catmull-rom-spline (map #(apply vector-2* %)  [[-800 450] [1280 450] [2000 100] [0 100] [-800 300] [1280 300] [2000 450]]) true)
+                     :x 450
+                     :y 650)
+       :clouds (assoc (particle-effect "titleclouds" :reset :start) :x 640 :y 480 )
+       :toolbox (center (assoc (nine-patch {:region (:object (texture "talk-bg-2.png")) :left 9 :top 9 :right 9 :bottom 9})
+                          :y 58 :width 500 :height 282))
+
+       :music-label (-> (label "Music" (style :label font (color 1.0 1.0 1.0 1.0)))
+                        (assoc  :x 0 :y (- 280 (* 32 1)) :height 32 :origin-x 0 :origin-y 0)
+                        center)
+       :music-volume-slider (-> (slider {:min 0 :max 100 :step 1} ui-skin :set-value (:music-volume @utils/settings))
+                                (assoc :x (- (/  1280 2) 150)
+                                       :width 300
+                                       :y (- 280 (* 32 2))
+                                       :hover (skin! ui-skin :get "default-horizontal-hover" Slider$SliderStyle)
+                                       :default (skin! ui-skin :get "default-horizontal" Slider$SliderStyle)))
+
+       :sound-label (->
+                     (label "FX" (style :label font (color 1.0 1.0 1.0 1.0)))
+                     (assoc  :x 0 :y (- 280 (* 32 3)) :height 32 :origin-x 0 :origin-y 0)
+                     center)
+       
+       
+       :sound-volume-slider (assoc (slider {:min 0 :max 100 :step 1 } ui-skin :set-value (:sound-volume @utils/settings))
+                                   :width 300
+                                   :x ( - (/  1280 2)
+                                          150)
+                                   :y (- 280 (* 32 4))
+                                   :hover (skin! ui-skin :get "default-horizontal-hover" Slider$SliderStyle)
+                                   :default (skin! ui-skin :get "default-horizontal" Slider$SliderStyle))
+       :font font
+       :music music
+       :volume 1.0
+       :start-playing start-playing
+       :quit quit
+       :fullscreen fullscreen
+       :tweens {:fade-in (tween/tween :fade-in screen [:fade :opacity] 1.0 0.0 1.0
+                                      :finish #(do (utils/play-sound (:music %)) %)
+                                      :ease tween/ease-in-quadratic)}}))
+
+  :on-render
+  (fn [screen [entities]]
+
+    (clear!)
+    (let [entities (utils/apply-tweens screen entities (:tweens entities))
+          entities (fly-ego screen entities)]
+      (music! (:music entities) :set-volume (utils/current-music-volume (:volume entities)))
+      
+      (render! screen [(:overlay entities) (:clouds entities) (:flying-ego entities) (:toolbox entities) (:start-playing entities) (:quit entities) (:fullscreen entities)  (:music-label entities) (:music-volume-slider entities) (:sound-label entities) (:sound-volume-slider entities) (:fade entities) ])
+      entities))
+
+  :show-screen (fn [entities]
+                 entities)
+
+  :on-mouse-moved (fn [screen [entities]]
+                    (let [[x y] (utils/unproject screen)]
+                      (style-label (:start-playing entities) (get-in entities [:font]) [x y])
+                      (style-label (:fullscreen entities) (get-in entities [:font]) [x y])
+                      (style-label (:quit entities) (get-in entities [:font]) [x y])
+                      (style-slider (:music-volume-slider entities) [x y])
+                      (style-slider (:sound-volume-slider entities) [x y]) 
+                      entities))
+  :on-ui-changed
+  (fn [screen [entities]]
+    (println (slider! (:music-volume-slider entities) :get-value))
+    (if (= 0.0 (slider! (:music-volume-slider entities) :get-value))
+      (throw (Exception.)))
+    (swap! utils/settings
+           assoc
+           :music-volume (slider! (:music-volume-slider entities) :get-value)
+           :sound-volume (slider! (:sound-volume-slider entities) :get-value))
+    
+    (utils/save-settings!)
+    entities)
+
+  :on-touch-up (fn [screen [entities]]
+                 (when-not (get-in entities [:tweens :fade-out])
+                   (let [[x y] (utils/unproject screen)]
+                     (cond
+                       (utils/intersects? (:start-playing entities) [x y])
+                       (-> entities
+                           (assoc-in [:tweens :fade-out]
+                                     (tween/tween :fade-out screen [:fade :opacity] 0.0 1.0 1.0
+                                                  :finish (fn [entities]
+                                                            (utils/stop-sound (:music entities))
+                                                            (set-screen! @(resolve 'advent.core/advent) scene/scene scene/hud dialogue/talking-screen dialogue/choice-screen inventory/inventory-screen safe/safe-screen fade/fade-screen)
+                                                            entities)
+                                                  :ease tween/ease-in-cubic))
+                           (assoc-in [:tweens :fade-out-music]
+                                     (tween/tween :fade-out-music screen [:volume] 1.0 0.0 1.0)))
+                       (utils/intersects? (:quit entities) [x y])
+                       (-> entities
+                           (assoc-in [:tweens :fade-out]
+                                     (tween/tween :fade-out screen [:fade :opacity] 0.0 1.0 1.0
+                                                  :finish (fn [entities]
+                                                            (System/exit 0)
+                                                            entities)
+                                                  :ease tween/ease-in-cubic)))
+
+                       (utils/intersects? (:fullscreen entities) [x y])
+                       (if (.isFullscreen Gdx/graphics)
+                         (on-gl (.setDisplayMode Gdx/graphics 1280 960 false)
+                                (label! (:fullscreen entities) set-text "Windowed"))
+                         (on-gl (.setDisplayMode Gdx/graphics
+                                                 (.width (.getDesktopDisplayMode Gdx/graphics))
+                                                 (.height (.getDesktopDisplayMode Gdx/graphics))
+                                                 true)
+                                (label! (:fullscreen entities) set-text "Fullscreen")))
+                       :else
+                       nil))))
+
+  :on-resize (fn [{:keys [viewport width height]} [entities]]
+               (.update viewport width height)
+               nil))
diff --git a/desktop/src-common/advent/screens/rooms/dream.clj b/desktop/src-common/advent/screens/rooms/dream.clj
index aa52915c..90641f74 100644
--- a/desktop/src-common/advent/screens/rooms/dream.clj
+++ b/desktop/src-common/advent/screens/rooms/dream.clj
@@ -151,6 +151,7 @@
 
   (Thread/sleep 500)
   (actions/talk entities :fairy-godfather "Taaaaaaaaaaaaaaaaaa-")
+  (sound! (sound "dream/appear.ogg") :play (utils/current-sound-volume))
   (particle-effect! (get-in @entities [:room :entities :magic]) :reset)
   (particle-effect! (get-in @entities [:room :entities :magic]) :start)
   (Thread/sleep 500)
@@ -169,6 +170,7 @@
                        :fairy-godfather "Behold!")
   (particle-effect! (get-in @entities [:room :entities :magic]) :reset)
   (particle-effect! (get-in @entities [:room :entities :magic]) :start)
+  (sound! (sound "dream/appear.ogg") :play (utils/current-sound-volume))
   (fade-in-tools entities)
 
   (Thread/sleep 2500)
diff --git a/desktop/src-common/advent/screens/scene.clj b/desktop/src-common/advent/screens/scene.clj
index fbf262fd..36f50110 100644
--- a/desktop/src-common/advent/screens/scene.clj
+++ b/desktop/src-common/advent/screens/scene.clj
@@ -471,6 +471,7 @@ void main()
              :step-sound-1 (sound "ego/step-1.ogg")
              :step-sound-2 (sound "ego/step-2.ogg")
              :sigh-sound (sound "ego/sigh.ogg")
+             :breakglass-sound (sound "ego/breakglass.ogg")
              :blink (sound "blink.ogg")
              :scale-x start-scale
              :scale-y start-scale
@@ -542,7 +543,9 @@ void main()
                                            (get-in ego [:right :sigh]) {1 [:sigh-sound 0.4]}
                                            (get-in ego [:left :milk]) {8 [:milk-sound 1.0]}
                                            (get-in ego [:right :milk]) {8 [:milk-sound 1.0]}
-                                           }
+
+                                           (get-in ego [:left :swing-shovel]) {3 [:breakglass-sound 1.0]}
+                                           (get-in ego [:right :swing-shovel]) {3 [:breakglass-sound 1.0]}}
                    :anim-merges {(get-in ego [:right :shock]) {:origin-x 15}
                                  (get-in ego [:left :swing-shovel]) {:origin-x 26}
                                  (get-in ego [:right :swing-shovel]) {:origin-x 26}