diff --git a/main/app/sync/core.hook b/main/app/sync/core.hook new file mode 100644 index 000000000..8616e61c0 --- /dev/null +++ b/main/app/sync/core.hook @@ -0,0 +1,18 @@ +!: +|_ [hid=hide ~] +++ poke-sync-args + |= [ost=bone you=ship syd=@tas her=@p sud=@tas ~] + :_ +>.$ + :* [ost %pass /sync %c %font our.hid syd her sud] + [ost %give %nice ~] + %+ turn (~(tap by sup.hid)) + |= [ost=bone *] + :^ ost %give %rush + :- %tang :_ ~ + leaf/"synced" + == +++ peer + |= + * + `+> +-- diff --git a/main/app/unsync/core.hook b/main/app/unsync/core.hook new file mode 100644 index 000000000..ad506023f --- /dev/null +++ b/main/app/unsync/core.hook @@ -0,0 +1,18 @@ +!: +|_ [hid=hide ~] +++ poke-unsync-args + |= [ost=bone you=ship syd=@tas her=@p sud=@tas ~] + :_ +>.$ + :* [ost %pass /sync %c %plug our.hid syd her sud] + [ost %give %nice ~] + %+ turn (~(tap by sup.hid)) + |= [ost=bone *] + :^ ost %give %rush + :- %tang :_ ~ + leaf/"unsynced" + == +++ peer + |= + * + `+> +-- diff --git a/main/mar/begin-args/door.hook b/main/mar/begin-args/door.hook new file mode 100644 index 000000000..cd6cabfae --- /dev/null +++ b/main/mar/begin-args/door.hook @@ -0,0 +1,15 @@ +:: +:::: /hoon/core/zing/pro + :: +/? 314 +/- begin-args +|_ arg=begin-args +:: +++ grab :: convert from + |% + ++ noun :: convert from %noun + |= src=* + ^+ +>+ + +>+(arg (begin-args src)) + -- +-- diff --git a/main/mar/sync-args/door.hook b/main/mar/sync-args/door.hook new file mode 100644 index 000000000..a6266cabc --- /dev/null +++ b/main/mar/sync-args/door.hook @@ -0,0 +1,15 @@ +:: +:::: /hoon/core/zing/pro + :: +/? 314 +/- sync-args +|_ arg=sync-args +:: +++ grab :: convert from + |% + ++ noun :: convert from %noun + |= src=* + ^+ +>+ + +>+(arg (sync-args src)) + -- +-- diff --git a/main/mar/unsync-args/door.hook b/main/mar/unsync-args/door.hook new file mode 100644 index 000000000..15f8f73ce --- /dev/null +++ b/main/mar/unsync-args/door.hook @@ -0,0 +1,15 @@ +:: +:::: /hoon/core/zing/pro + :: +/? 314 +/- unsync-args +|_ arg=unsync-args +:: +++ grab :: convert from + |% + ++ noun :: convert from %noun + |= src=* + ^+ +>+ + +>+(arg (unsync-args src)) + -- +-- diff --git a/main/mar/will/door.hook b/main/mar/will/door.hook new file mode 100644 index 000000000..e6145a299 --- /dev/null +++ b/main/mar/will/door.hook @@ -0,0 +1,11 @@ +:: +:::: /hook/door/will/mar + :: +/? 314 +|_ wyl=will +:: +++ grab :: convert from + |% + ++ noun will :: clam from %noun + -- +-- diff --git a/main/sur/begin-args/gate.hook b/main/sur/begin-args/gate.hook new file mode 100644 index 000000000..7de1ef7a8 --- /dev/null +++ b/main/sur/begin-args/gate.hook @@ -0,0 +1 @@ +,[his=@p tic=@p eny=@t ges=gens ~] diff --git a/main/sur/sync-args/gate.hook b/main/sur/sync-args/gate.hook new file mode 100644 index 000000000..7f395c290 --- /dev/null +++ b/main/sur/sync-args/gate.hook @@ -0,0 +1 @@ +,[syd=@tas her=@p sud=@tas ~] diff --git a/main/sur/unsync-args/gate.hook b/main/sur/unsync-args/gate.hook new file mode 100644 index 000000000..7f395c290 --- /dev/null +++ b/main/sur/unsync-args/gate.hook @@ -0,0 +1 @@ +,[syd=@tas her=@p sud=@tas ~]