diff --git a/main/app/demo/core.hook b/main/app/demo/core.hook
index b8817994d6..e3aa67b6fb 100644
--- a/main/app/demo/core.hook
+++ b/main/app/demo/core.hook
@@ -11,7 +11,7 @@
 ++  peek
   |=  [you=ship pax=path]
   ?^  pax
-    [%txt 'demo peeking']
+    [%txt (crip "demo peeking {<p.vat>}")]
   :-  %hymn
   ^-  manx
   ;html
diff --git a/main/app/shell/core.hook b/main/app/shell/core.hook
index e4f578d8e6..86ff1fdee5 100644
--- a/main/app/shell/core.hook
+++ b/main/app/shell/core.hook
@@ -19,8 +19,13 @@
   $%  [%cide p=span]                                    ::
       [%show p=hapt q=ship r=path]                      ::
       [%sire p=term q=span]                             ::
-      [%mess p=hapt q=ship r=[%term-line vase]]         ::
+      [%mess p=hapt q=ship r=cage]                      ::
   ==  ==  ==                                            ::
+++  coma                                                ::
+  $%  [%start p=cord q=(unit tape)]                     ::
+      [%end p=cord]                                     ::
+      [%path p=path]                                    ::
+  ==                                                    ::
 ++  sign                                                ::
   $%  $:  %g                                            ::
   $%  [%gone p=hapt]                                    ::
@@ -34,10 +39,21 @@
 ::::  program
   ::
 |_  [hid=hide pax=_`path`%]
-++  parse
+++  maybe
+  |*  fel=_rule
   ;~  pose
-    (stag %start ;~(pfix col (plus ;~(pose low nud hep))))
-    (stag %end ;~(pfix sem (plus ;~(pose low nud hep))))
+    (stag ~ fel)
+    (easy ~)
+  ==
+::
+++  args
+  (maybe ;~(pfix ace (star prn)))
+::
+++  parse
+  ^-  $+(nail (like coma))
+  ;~  pose
+    (stag %start ;~(pfix col ;~(plug sym args)))
+    (stag %end ;~(pfix sem sym))
     (stag %path (sear plex rood):(vang | pax))
   ==
 ::
@@ -46,25 +62,32 @@
   ^-  [(list move) _+>]
   =+  paf=(rush txt parse)
   ?~  paf
-    :_  +>.$  :_  ~
-    (print ost you "Yup, {(trip txt)}")
+    :_  +>.$
+    :~  [ost %give %nice ~]
+        (print ost you "Clarify {(trip txt)}")
+    ==
   ?-    -.u.paf
       %path
-    :_  +>.$(pax +.u.paf)  :_  ~
-    (print ost you "=% {(spud +.u.paf)}")
+    =.  pax  p.u.paf
+    :_  +>.$
+    :~  [ost %give %nice ~]
+        (print ost you "=% {(spud p.u.paf)}")
+    ==
   ::
       %start
     :_  +>.$
-    =+  cil=(crip +.u.paf)
-    :~  [ost %pass /child/[cil]/lines %g %show [our.hid cil imp.hid] you /lines]
+    =*  cil  p.u.paf
+    :~  :^  ost  %pass  /child/[cil]/main 
+          [%g %mess [our.hid cil imp.hid] you [%txt !>((crip (fall q.u.paf "")))]]
+        [ost %pass /child/[cil]/lines %g %show [our.hid cil imp.hid] you /lines]
         [ost %pass /child/[cil] %g %sire cil cil]       ::  XX strange order?
-        (print ost you "running {+.u.paf}")
+        (print ost you "running {(trip p.u.paf)}")
     ==
   ::
       %end
     :_  +>.$
-    =+  cil=(crip +.u.paf)
-    :~  (print ost you "killing {+.u.paf}")
+    =*  cil  p.u.paf
+    :~  (print ost you "killing {(trip cil)}")
         [ost %pass /child/[cil] %g %cide cil]
     ==
   ==
@@ -77,15 +100,17 @@
   ?~  pax  ~&  %no-path  !!
   ?+    &1.pax  ~&  %strange-path  !!
       %print
-    ?>  ?=(?(%nice %mean) +<.sih)
-    [ost %give +.sih]~
+    ~
   ::
       %child
     ?~  |1.pax  ~&  %no-child  !!
     ?~  |2.pax
       ?>  ?=(%gone +<.sih)
-      ~
+      [ost %give %nice ~]~
     ?+    &3.pax  ~&  %strange-child-path  !!
+        %main
+      ?>  ?=(?(%nice %mean) +<.sih)
+      [ost %give +.sih]~
         %lines
       ?.  ?=(?(%rust %rush) +<.sih)  ~
       :_  ~  (print ost our.hid :(welp (trip &2.pax) ": " (trip q.sih)))
diff --git a/main/app/terminal/core.hook b/main/app/terminal/core.hook
index 0b7921b750..3efb53d588 100644
--- a/main/app/terminal/core.hook
+++ b/main/app/terminal/core.hook
@@ -47,7 +47,7 @@
   ;html
     ;head
       ;title: Hi
-      ;script(src "/gon/main/lib/urb.js");
+      ;script(src "/gen/main/lib/urb.js");
       ;script(src "//cdnjs.cloudflare.com/ajax/libs/jquery/2.1.1/jquery.min.js");
       ;script: urb.appl = "{(trip app.hid)}"
       ;script:'''
@@ -58,9 +58,10 @@
               }
               '''
       ;style:'''
-             body {
+             body, body * {
                background-color:  black;
                color:  greenyellow;
+               border-color: #0f2;
              }
              '''
     ==
@@ -76,6 +77,7 @@
                 jpok('line', prom.value)
                 $(this).val('')
               })
+              $(prom).focus()
               urb.subscribe({path: '/lines'}, function(e, dat){
                 if(dat.data.ok) return;
                 cont.textContent = dat.data.lines.join('\n')