diff --git a/tools/clog-builder-repl.clog b/tools/clog-builder-repl.clog
new file mode 100644
index 0000000..be9639f
--- /dev/null
+++ b/tools/clog-builder-repl.clog
@@ -0,0 +1 @@
+<data id="I3867322519" data-in-package="clog-tools" data-custom-slots="" data-clog-next-id="2" data-clog-title="clog-builder-repl"></data><div style="--pixel-density:1; --char-width:7.20312; box-sizing: content-box; position: absolute; inset: 0px;" class="terminal" data-clog-type="clog-terminal" data-clog-composite-control="t" data-clog-terminal-prompt="> " data-clog-terminal-greetings="CLOG Builder REPL" data-on-command="(clog-terminal:echo target (capture-eval data))" data-clog-name="clog-terminal-1"></div>
\ No newline at end of file
diff --git a/tools/clog-builder-repl.lisp b/tools/clog-builder-repl.lisp
new file mode 100644
index 0000000..105216b
--- /dev/null
+++ b/tools/clog-builder-repl.lisp
@@ -0,0 +1,11 @@
+(in-package "CLOG-TOOLS")
+(defclass clog-builder-repl (clog:clog-panel)
+  (    (clog-terminal-1 :reader clog-terminal-1)
+))
+(defun create-clog-builder-repl (clog-obj &key (hidden nil) (class nil) (html-id nil) (auto-place t))
+  (let ((panel (change-class (clog:create-div clog-obj :content "<div style=\"--pixel-density:1; --char-width:7.20312; box-sizing: content-box; position: absolute; inset: 0px;\" class=\"terminal\" id=\"CLOGB3867322458\" data-clog-name=\"clog-terminal-1\"></div>"
+         :hidden hidden :class class :html-id html-id :auto-place auto-place) 'clog-builder-repl)))
+    (setf (slot-value panel 'clog-terminal-1) (attach-as-child clog-obj "CLOGB3867322458" :clog-type 'CLOG-TERMINAL:CLOG-TERMINAL-ELEMENT :new-id t))
+    (let ((target (clog-terminal-1 panel))) (declare (ignorable target)) (clog-terminal:attach-clog-terminal target :greetings "CLOG Builder REPL") (clog-terminal:prompt target "> "))
+    (clog-terminal:set-on-command (clog-terminal-1 panel) (lambda (target data) (declare (ignorable target data)) (clog-terminal:echo target (capture-eval data :clog-obj clog-obj))))
+    panel))