diff --git a/extra/cap/cap-docs.factor b/extra/cap/cap-docs.factor
new file mode 100644
index 0000000000..909ee8562d
--- /dev/null
+++ b/extra/cap/cap-docs.factor
@@ -0,0 +1,15 @@
+USING: cap help.markup help.syntax images opengl ui.gadgets.worlds ;
+IN: cap
+
+HELP: screenshot.
+  { $values { "window" world } }
+  { $description
+    "Opens a window with a screenshot of the currently active window."
+  } ;
+
+HELP: screenshot
+  { $values { "window" world } { "bitmap" image } }
+  { $description
+    "Creates a bitmap image of a UI window."
+  }
+  { $notes "If the current " { $link gl-scale-factor } " is " { $snippet "2.0" } ", then the " { $snippet "2x" } " slot in the resulting " { $link image } " will be " { $link t } "." } ;
\ No newline at end of file
diff --git a/extra/cap/summary.txt b/extra/cap/summary.txt
new file mode 100644
index 0000000000..3246a88354
--- /dev/null
+++ b/extra/cap/summary.txt
@@ -0,0 +1 @@
+Creating and displaying screenshots of Factor
\ No newline at end of file