diff --git a/pkg/arvo/mar/tape.hoon b/pkg/arvo/mar/tape.hoon
new file mode 100644
index 0000000000..a30176421a
--- /dev/null
+++ b/pkg/arvo/mar/tape.hoon
@@ -0,0 +1,12 @@
+|_  tap=tape
+++  grad  %noun 
+++  grow
+  |%
+  ++  noun  tap
+  ++  json  s+(crip tap)
+  --
+++  grab
+  |%
+  ++  noun  tape
+  --
+--
diff --git a/pkg/arvo/ted/code.hoon b/pkg/arvo/ted/code.hoon
new file mode 100644
index 0000000000..5596dbc16b
--- /dev/null
+++ b/pkg/arvo/ted/code.hoon
@@ -0,0 +1,13 @@
+/-  spider
+/+  strandio
+=,  strand=strand:spider
+^-  thread:spider
+|=  arg=vase
+=/  m  (strand ,vase)
+^-  form:m
+;<  =bowl:spider  bind:m  get-bowl:strandio
+;<  code=@p  bind:m  (scry:strandio @p /j/code/(scot %p our.bowl))
+%-  pure:m
+!>  ^-  tape
+%+  slag  1
+(scow %p code)