mirror of
https://github.com/urbit/shrub.git
synced 2024-12-17 23:32:56 +03:00
48 lines
1.1 KiB
Plaintext
48 lines
1.1 KiB
Plaintext
|
:: Ye broadcast
|
||
|
|
::
|
||
|
|
:::: /hook/gate/ye/bin
|
||
|
|
::
|
||
|
|
|%
|
||
|
|
++ sign ::
|
||
|
|
$% $: %a ::
|
||
|
|
$% [%went p=ship q=cape] ::
|
||
|
|
== == == ::
|
||
|
|
++ flog :: sent to %dill
|
||
|
|
$% [%crud p=@tas q=(list tank)] ::
|
||
|
|
[%text p=tape] ::
|
||
|
|
== ::
|
||
|
|
--
|
||
|
|
::
|
||
|
|
!:
|
||
|
|
|_ [hid=hide ~]
|
||
|
|
++ poke-ye-args
|
||
|
|
|= [ost=bone you=ship tex=tape ~]
|
||
|
|
:_ +>.$
|
||
|
|
=+ mez=[%txt !>((crip tex))]
|
||
|
|
:~ [ost %pass /ye %a %want [our.hid (sein our.hid)] /q/ye (crip tex)]
|
||
|
|
[ost %give %nice ~]
|
||
|
|
==
|
||
|
|
::
|
||
|
|
++ poke-txt
|
||
|
|
|= [ost=bone him=ship cor=@t]
|
||
|
|
:_ +>.$
|
||
|
|
[ost %pass /de %d %flog %text "> {<him>}: {(trip cor)}"]~
|
||
|
|
::
|
||
|
|
++ pour
|
||
|
|
|= [ost=bone pax=path sih=sign]
|
||
|
|
?> ?=([%ye ~] pax)
|
||
|
|
:_ +>.$
|
||
|
|
%+ turn (~(tap by sup.hid))
|
||
|
|
|= [ost=bone *]
|
||
|
|
:^ ost %give %rush
|
||
|
|
:- %tang :_ ~
|
||
|
|
?. ?=(%good q.sih)
|
||
|
|
leaf/"ye failed"
|
||
|
|
leaf/"ye recieved"
|
||
|
|
::
|
||
|
|
++ peer
|
||
|
|
|=
|
||
|
|
*
|
||
|
|
`+>
|
||
|
|
--
|