Missing guns.

main/app/talk/core.hook

@@ -11,7 +11,7 @@
 =>  |%                                                  ::  structures
     ++  town                                            ::  all client state
       $:  %0                                            ::  version
-          say=console-share                            ::  command lines
+          say=console-share                             ::  command lines
           live=(unit span)                              ::  present story
           stories=(map span story)                      ::  all stories
       ==                                                ::
@@ -574,6 +574,7 @@
   ++  ny-work                                           ::  user command
     |=  jaw=work-construct
     ^+  +>
+    ~&  [%ny-work jaw]
     ?-    -.jaw
         %raze  +>(moz hy-abet:(hy-transmit:(hype moz) [%design p.jaw ~]))
         %tune  (ny-tune p.jaw)

main/gun/helm/begin/gate.hook

@@ -0,0 +1,43 @@
+::
+::::  /hook/gate/begin/helm/gun
+  ::
+/?  314
+/-  *console
+::
+::::
+  !:
+=>  |%
+    ++  begs  ,[his=@p tic=@p eny=@t ges=gens]
+    --
+|=  $:  [now=@da bec=beak]
+        [~ ~]
+    ==
+^-  (console-result (cask begs))
+%+  console-lo
+  [%& %helm-begin "your ship: ~"]
+%+  console-go  fed:ag
+|=  his=@p
+%+  console-lo
+  [%& %helm-ticket "your ticket: ~"]
+%+  console-go  fed:ag
+|=  tic=@p
+%+  console-lo  
+  [%& %helm-entropy "some entropy: "]
+%+  console-go  (boss 256 (more gon qit))
+|=  eny=@t
+%+  console-so  %helm-begin
+:*  his
+    tic
+    eny
+::
+    ^-  gens
+    :-  %en
+    =+  can=(clan his)
+    ?-  can
+      %czar  [%czar ~]
+      %duke  [%duke %anon ~]
+      %earl  [%earl (scot %p his)]
+      %king  [%king (scot %p his)]
+      %pawn  [%pawn ~]
+    ==
+==

main/gun/helm/verb/gate.hook

@@ -0,0 +1,12 @@
+::
+::::  /hook/gate/verb/helm/gun
+  ::
+/?  314
+/-  *console
+::
+::::
+  !:
+|=  $:  [now=@da bec=beak]
+        [~ ~]
+    ==
+(console-so %helm-verb ~)