diff --git a/pkg/arvo/ted/aqua/ames.hoon b/pkg/arvo/ted/aqua/ames.hoon index ea6bd89841..7c06862d84 100644 --- a/pkg/arvo/ted/aqua/ames.hoon +++ b/pkg/arvo/ted/aqua/ames.hoon @@ -25,7 +25,6 @@ ^- (list card:agent:gall) =/ rcvr=ship (lane-to-ship lan) =/ hear-lane (ship-to-lane sndr) - ~& > [%sending-aqua sndr rcvr hear-lane] %+ emit-aqua-events our [%event rcvr //newt/0v1n.2m9vh %hear hear-lane pac]~ :: +lane-to-ship: decode a ship from an aqua lane diff --git a/pkg/arvo/ted/aqua/eyre-azimuth.hoon b/pkg/arvo/ted/aqua/eyre-azimuth.hoon index 3af5eee184..fdd85c5a60 100644 --- a/pkg/arvo/ted/aqua/eyre-azimuth.hoon +++ b/pkg/arvo/ted/aqua/eyre-azimuth.hoon @@ -260,6 +260,7 @@ |= [who=ship seed=(unit seed:able:jael)] ^- dawn-event:able:jael =/ spon=(list [ship point:azimuth]) + %- flop |- ^- (list [ship point:azimuth]) =/ =ship (^sein:title who) =/ a-point=[^ship point:azimuth] diff --git a/pkg/arvo/ted/ph/hi-az.hoon b/pkg/arvo/ted/ph/hi-az.hoon index b0c5e2b69d..b5354cdea0 100644 --- a/pkg/arvo/ted/ph/hi-az.hoon +++ b/pkg/arvo/ted/ph/hi-az.hoon @@ -4,11 +4,12 @@ ^- thread:spider |= vase =/ m (strand ,vase) -;< az=tid:spider bind:m start-azimuth -;< ~ bind:m (spawn az ~bud) -;< ~ bind:m (spawn az ~dev) -;< ~ bind:m (real-ship az ~bud) -;< ~ bind:m (real-ship az ~dev) -;< ~ bind:m (send-hi ~bud ~dev) -;< ~ bind:m end-azimuth +;< az=tid:spider + bind:m start-azimuth +;< ~ bind:m (spawn az ~bud) +;< ~ bind:m (spawn az ~dev) +;< ~ bind:m (real-ship az ~bud) +;< ~ bind:m (real-ship az ~dev) +;< ~ bind:m (send-hi ~bud ~dev) +;< ~ bind:m end-azimuth (pure:m *vase) diff --git a/pkg/arvo/ted/ph/hi-cousin-az.hoon b/pkg/arvo/ted/ph/hi-cousin-az.hoon new file mode 100644 index 0000000000..7facac1aac --- /dev/null +++ b/pkg/arvo/ted/ph/hi-cousin-az.hoon @@ -0,0 +1,19 @@ +/- spider +/+ *ph-io +=, strand=strand:spider +^- thread:spider +|= vase +=/ m (strand ,vase) +;< az=tid:spider + bind:m start-azimuth +;< ~ bind:m (spawn az ~bud) +;< ~ bind:m (spawn az ~marbud) +;< ~ bind:m (spawn az ~dev) +;< ~ bind:m (spawn az ~mardev) +;< ~ bind:m (real-ship az ~bud) +;< ~ bind:m (real-ship az ~marbud) +;< ~ bind:m (real-ship az ~dev) +;< ~ bind:m (real-ship az ~mardev) +;< ~ bind:m (send-hi ~mardev ~marbud) +;< ~ bind:m end-azimuth +(pure:m *vase) diff --git a/pkg/arvo/ted/ph/hi-linnup-az-backward.hoon b/pkg/arvo/ted/ph/hi-linnup-az-backward.hoon new file mode 100644 index 0000000000..e072f801ab --- /dev/null +++ b/pkg/arvo/ted/ph/hi-linnup-az-backward.hoon @@ -0,0 +1,17 @@ +/- spider +/+ *ph-io +=, strand=strand:spider +^- thread:spider +|= vase +=/ m (strand ,vase) +;< az=tid:spider + bind:m start-azimuth +;< ~ bind:m (spawn az ~bud) +;< ~ bind:m (spawn az ~marbud) +;< ~ bind:m (spawn az ~linnup-torsyx) +;< ~ bind:m (real-ship az ~linnup-torsyx) +;< ~ bind:m (real-ship az ~marbud) +;< ~ bind:m (real-ship az ~bud) +;< ~ bind:m (send-hi ~linnup-torsyx ~marbud) +;< ~ bind:m end-azimuth +(pure:m *vase) diff --git a/pkg/arvo/ted/ph/hi-linnup-az.hoon b/pkg/arvo/ted/ph/hi-linnup-az.hoon new file mode 100644 index 0000000000..abcfd4151b --- /dev/null +++ b/pkg/arvo/ted/ph/hi-linnup-az.hoon @@ -0,0 +1,17 @@ +/- spider +/+ *ph-io +=, strand=strand:spider +^- thread:spider +|= vase +=/ m (strand ,vase) +;< az=tid:spider + bind:m start-azimuth +;< ~ bind:m (spawn az ~bud) +;< ~ bind:m (spawn az ~marbud) +;< ~ bind:m (spawn az ~linnup-torsyx) +;< ~ bind:m (real-ship az ~bud) +;< ~ bind:m (real-ship az ~marbud) +;< ~ bind:m (real-ship az ~linnup-torsyx) +;< ~ bind:m (send-hi ~linnup-torsyx ~marbud) +;< ~ bind:m end-azimuth +(pure:m *vase) diff --git a/pkg/arvo/ted/ph/hi-marbud-az.hoon b/pkg/arvo/ted/ph/hi-marbud-az.hoon new file mode 100644 index 0000000000..a53d81a852 --- /dev/null +++ b/pkg/arvo/ted/ph/hi-marbud-az.hoon @@ -0,0 +1,15 @@ +/- spider +/+ *ph-io +=, strand=strand:spider +^- thread:spider +|= vase +=/ m (strand ,vase) +;< az=tid:spider + bind:m start-azimuth +;< ~ bind:m (spawn az ~bud) +;< ~ bind:m (spawn az ~marbud) +;< ~ bind:m (real-ship az ~bud) +;< ~ bind:m (real-ship az ~marbud) +;< ~ bind:m (send-hi ~bud ~marbud) +;< ~ bind:m end-azimuth +(pure:m *vase) diff --git a/pkg/arvo/ted/ph/hi-nephew-az.hoon b/pkg/arvo/ted/ph/hi-nephew-az.hoon new file mode 100644 index 0000000000..286367eddf --- /dev/null +++ b/pkg/arvo/ted/ph/hi-nephew-az.hoon @@ -0,0 +1,17 @@ +/- spider +/+ *ph-io +=, strand=strand:spider +^- thread:spider +|= vase +=/ m (strand ,vase) +;< az=tid:spider + bind:m start-azimuth +;< ~ bind:m (spawn az ~bud) +;< ~ bind:m (spawn az ~marbud) +;< ~ bind:m (spawn az ~dev) +;< ~ bind:m (real-ship az ~bud) +;< ~ bind:m (real-ship az ~marbud) +;< ~ bind:m (real-ship az ~dev) +;< ~ bind:m (send-hi ~dev ~marbud) +;< ~ bind:m end-azimuth +(pure:m *vase) diff --git a/pkg/arvo/ted/ph/hi-uncle-az.hoon b/pkg/arvo/ted/ph/hi-uncle-az.hoon new file mode 100644 index 0000000000..c73b10cb43 --- /dev/null +++ b/pkg/arvo/ted/ph/hi-uncle-az.hoon @@ -0,0 +1,17 @@ +/- spider +/+ *ph-io +=, strand=strand:spider +^- thread:spider +|= vase +=/ m (strand ,vase) +;< az=tid:spider + bind:m start-azimuth +;< ~ bind:m (spawn az ~bud) +;< ~ bind:m (spawn az ~marbud) +;< ~ bind:m (spawn az ~dev) +;< ~ bind:m (real-ship az ~bud) +;< ~ bind:m (real-ship az ~marbud) +;< ~ bind:m (real-ship az ~dev) +;< ~ bind:m (send-hi ~marbud ~dev) +;< ~ bind:m end-azimuth +(pure:m *vase)