diff --git a/clog-window.lisp b/clog-window.lisp
index 3a30508..2c75266 100644
--- a/clog-window.lisp
+++ b/clog-window.lisp
@@ -196,6 +196,76 @@ window."))
 (defmethod pixel-ratio ((obj clog-window))
   (query obj "devicePixelRatio"))
 
+;;;;;;;;;;;;;;;;;;
+;; screen-width ;;
+;;;;;;;;;;;;;;;;;;
+
+(defgeneric screen-width (clog-window)
+  (:documentation "Get screen width."))
+
+(defmethod screen-width ((obj clog-window))
+  (query obj "screen.width"))
+
+;;;;;;;;;;;;;;;;;;;
+;; screen-height ;;
+;;;;;;;;;;;;;;;;;;;
+
+(defgeneric screen-height (clog-window)
+  (:documentation "Get screen height."))
+
+(defmethod screen-height ((obj clog-window))
+  (query obj "screen.height"))
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;; screen-available-width ;;
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+(defgeneric screen-available-width (clog-window)
+  (:documentation "Get available screen width."))
+
+(defmethod screen-available-width ((obj clog-window))
+  (query obj "screen.availWidth"))
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;; screen-available-height ;;
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+(defgeneric screen-available-height (clog-window)
+  (:documentation "Get available screen height."))
+
+(defmethod screen-available-height ((obj clog-window))
+  (query obj "screen.availHeight"))
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;; screen-available-left ;;
+;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+(defgeneric screen-available-left (clog-window)
+  (:documentation "Get available screen left."))
+
+(defmethod screen-available-left ((obj clog-window))
+  (query obj "screen.availLeft"))
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;
+;; screen-available-top ;;
+;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+(defgeneric screen-available-top (clog-window)
+  (:documentation "Get available screen top."))
+
+(defmethod screen-available-top ((obj clog-window))
+  (query obj "screen.availTop"))
+
+;;;;;;;;;;;;;;;;;;;;;;;;
+;; screen-color-depth ;;
+;;;;;;;;;;;;;;;;;;;;;;;;
+
+(defgeneric screen-color-depth (clog-window)
+  (:documentation "Get screen color depth."))
+
+(defmethod screen-color-depth ((obj clog-window))
+  (query obj "screen.colorDepth"))
+
 ;;;;;;;;;;;
 ;; alert ;;
 ;;;;;;;;;;;
diff --git a/clog.lisp b/clog.lisp
index 6b6d881..ba05363 100644
--- a/clog.lisp
+++ b/clog.lisp
@@ -123,16 +123,23 @@ application."
   (clog-window class)
 
   "CLOG-Window - Properties"
-  (window-name  generic-function)
-  (inner-height generic-function)
-  (inner-width  generic-function)
-  (outer-height generic-function)
-  (outer-width  generic-function)
-  (x-offset     generic-function)
-  (y-offset     generic-function)
-  (left         generic-function)
-  (top          generic-function)
-  (pixel-ratio  generic-function)
+  (window-name             generic-function)
+  (inner-height            generic-function)
+  (inner-width             generic-function)
+  (outer-height            generic-function)
+  (outer-width             generic-function)
+  (x-offset                generic-function)
+  (y-offset                generic-function)
+  (left                    generic-function)
+  (top                     generic-function)
+  (pixel-ratio             generic-function)
+  (screen-width            generic-function)
+  (screen-height           generic-function)
+  (screen-available-width  generic-function)
+  (screen-available-height generic-function)
+  (screen-available-top    generic-function)
+  (screen-available-left   generic-function)
+  (screen-color-depth      generic-function)
 
   "CLOG-Window - Methods"
   (alert            generic-function)
@@ -182,6 +189,7 @@ application."
   "CLOG-Navigator - CLOG Navigator Objects"
   (clog-navigator class)
 
+  "CLOG-Navigator - Properties"
   (cookie-enabled generic-function)
   (language       generic-function)
   (user-agent     generic-function)
diff --git a/doc/clog-manual.html b/doc/clog-manual.html
index 95a4650..e70923b 100644
--- a/doc/clog-manual.html
+++ b/doc/clog-manual.html
@@ -711,6 +711,62 @@ window.</p></li>
 <p>Get device pixel ratio.</p></li>
 </ul>
 
+<p><a id='x-28CLOG-3ASCREEN-WIDTH-20GENERIC-FUNCTION-29'></a></p>
+
+<ul>
+<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[generic-function]</span> <span class="reference-object"><a href="#x-28CLOG-3ASCREEN-WIDTH-20GENERIC-FUNCTION-29" >SCREEN-WIDTH</a></span></span> <span class="locative-args">CLOG-WINDOW</span></span></p>
+
+<p>Get screen width.</p></li>
+</ul>
+
+<p><a id='x-28CLOG-3ASCREEN-HEIGHT-20GENERIC-FUNCTION-29'></a></p>
+
+<ul>
+<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[generic-function]</span> <span class="reference-object"><a href="#x-28CLOG-3ASCREEN-HEIGHT-20GENERIC-FUNCTION-29" >SCREEN-HEIGHT</a></span></span> <span class="locative-args">CLOG-WINDOW</span></span></p>
+
+<p>Get screen height.</p></li>
+</ul>
+
+<p><a id='x-28CLOG-3ASCREEN-AVAILABLE-WIDTH-20GENERIC-FUNCTION-29'></a></p>
+
+<ul>
+<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[generic-function]</span> <span class="reference-object"><a href="#x-28CLOG-3ASCREEN-AVAILABLE-WIDTH-20GENERIC-FUNCTION-29" >SCREEN-AVAILABLE-WIDTH</a></span></span> <span class="locative-args">CLOG-WINDOW</span></span></p>
+
+<p>Get available screen width.</p></li>
+</ul>
+
+<p><a id='x-28CLOG-3ASCREEN-AVAILABLE-HEIGHT-20GENERIC-FUNCTION-29'></a></p>
+
+<ul>
+<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[generic-function]</span> <span class="reference-object"><a href="#x-28CLOG-3ASCREEN-AVAILABLE-HEIGHT-20GENERIC-FUNCTION-29" >SCREEN-AVAILABLE-HEIGHT</a></span></span> <span class="locative-args">CLOG-WINDOW</span></span></p>
+
+<p>Get available screen height.</p></li>
+</ul>
+
+<p><a id='x-28CLOG-3ASCREEN-AVAILABLE-TOP-20GENERIC-FUNCTION-29'></a></p>
+
+<ul>
+<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[generic-function]</span> <span class="reference-object"><a href="#x-28CLOG-3ASCREEN-AVAILABLE-TOP-20GENERIC-FUNCTION-29" >SCREEN-AVAILABLE-TOP</a></span></span> <span class="locative-args">CLOG-WINDOW</span></span></p>
+
+<p>Get available screen top.</p></li>
+</ul>
+
+<p><a id='x-28CLOG-3ASCREEN-AVAILABLE-LEFT-20GENERIC-FUNCTION-29'></a></p>
+
+<ul>
+<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[generic-function]</span> <span class="reference-object"><a href="#x-28CLOG-3ASCREEN-AVAILABLE-LEFT-20GENERIC-FUNCTION-29" >SCREEN-AVAILABLE-LEFT</a></span></span> <span class="locative-args">CLOG-WINDOW</span></span></p>
+
+<p>Get available screen left.</p></li>
+</ul>
+
+<p><a id='x-28CLOG-3ASCREEN-COLOR-DEPTH-20GENERIC-FUNCTION-29'></a></p>
+
+<ul>
+<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[generic-function]</span> <span class="reference-object"><a href="#x-28CLOG-3ASCREEN-COLOR-DEPTH-20GENERIC-FUNCTION-29" >SCREEN-COLOR-DEPTH</a></span></span> <span class="locative-args">CLOG-WINDOW</span></span></p>
+
+<p>Get screen color depth.</p></li>
+</ul>
+
 <p>CLOG-Window - Methods</p>
 
 <p><a id='x-28CLOG-3AALERT-20GENERIC-FUNCTION-29'></a></p>
@@ -1141,10 +1197,12 @@ is nil unbind the event.</p></li>
 <p><a href="#x-28-22clog-22-20ASDF-2FSYSTEM-3ASYSTEM-29" title="(\&quot;clog\&quot; ASDF/SYSTEM:SYSTEM)"><code>CLOG</code></a> Navigator Objects encapsulate the navigator.</p></li>
 </ul>
 
+<p>CLOG-Navigator - Properties</p>
+
 <p><a id='x-28CLOG-3ACOOKIE-ENABLED-20GENERIC-FUNCTION-29'></a></p>
 
 <ul>
-<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[generic-function]</span> <span class="reference-object"><a href="#x-28CLOG-3ACOOKIE-ENABLED-20GENERIC-FUNCTION-29" >COOKIE-ENABLED</a></span></span> <span class="locative-args">CLOG-LOCATION</span></span></p>
+<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[generic-function]</span> <span class="reference-object"><a href="#x-28CLOG-3ACOOKIE-ENABLED-20GENERIC-FUNCTION-29" >COOKIE-ENABLED</a></span></span> <span class="locative-args">CLOG-NAVIGATOR</span></span></p>
 
 <p>Get if cookie enabled.</p></li>
 </ul>
@@ -1152,7 +1210,7 @@ is nil unbind the event.</p></li>
 <p><a id='x-28CLOG-3ALANGUAGE-20GENERIC-FUNCTION-29'></a></p>
 
 <ul>
-<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[generic-function]</span> <span class="reference-object"><a href="#x-28CLOG-3ALANGUAGE-20GENERIC-FUNCTION-29" >LANGUAGE</a></span></span> <span class="locative-args">CLOG-LOCATION</span></span></p>
+<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[generic-function]</span> <span class="reference-object"><a href="#x-28CLOG-3ALANGUAGE-20GENERIC-FUNCTION-29" >LANGUAGE</a></span></span> <span class="locative-args">CLOG-NAVIGATOR</span></span></p>
 
 <p>Get user prefered language.</p></li>
 </ul>
@@ -1160,7 +1218,7 @@ is nil unbind the event.</p></li>
 <p><a id='x-28CLOG-3AUSER-AGENT-20GENERIC-FUNCTION-29'></a></p>
 
 <ul>
-<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[generic-function]</span> <span class="reference-object"><a href="#x-28CLOG-3AUSER-AGENT-20GENERIC-FUNCTION-29" >USER-AGENT</a></span></span> <span class="locative-args">CLOG-LOCATION</span></span></p>
+<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[generic-function]</span> <span class="reference-object"><a href="#x-28CLOG-3AUSER-AGENT-20GENERIC-FUNCTION-29" >USER-AGENT</a></span></span> <span class="locative-args">CLOG-NAVIGATOR</span></span></p>
 
 <p>Get user agent.</p></li>
 </ul>
@@ -1168,7 +1226,7 @@ is nil unbind the event.</p></li>
 <p><a id='x-28CLOG-3AVENDOR-20GENERIC-FUNCTION-29'></a></p>
 
 <ul>
-<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[generic-function]</span> <span class="reference-object"><a href="#x-28CLOG-3AVENDOR-20GENERIC-FUNCTION-29" >VENDOR</a></span></span> <span class="locative-args">CLOG-LOCATION</span></span></p>
+<li><p><span class=reference-bullet><span class=reference><span class="locative-type">[generic-function]</span> <span class="reference-object"><a href="#x-28CLOG-3AVENDOR-20GENERIC-FUNCTION-29" >VENDOR</a></span></span> <span class="locative-args">CLOG-NAVIGATOR</span></span></p>
 
 <p>Get browser vendor.</p></li>
 </ul>