2014-12-05 23:14:00 +03:00
|
|
|
::
|
|
|
|
|
:::: /hook/core/radio/sur
|
|
|
|
|
::
|
|
|
|
|
|%
|
2015-01-04 09:24:48 +03:00
|
|
|
++ ache |*([a=$+(* *) b=$+(* *)] $%([| p=b] [& p=a])) :: PM 314
|
2014-12-05 23:14:00 +03:00
|
|
|
++ audience (map station delivery) :: destination/state
|
2014-12-17 21:05:38 +03:00
|
|
|
++ atlas (map ship status) :: presence map
|
2014-12-05 23:14:00 +03:00
|
|
|
++ command :: effect on party
|
|
|
|
|
$% [%design (pair span (unit config))] :: configure/destroy
|
|
|
|
|
[%publish (list thought)] :: originate
|
|
|
|
|
[%review (list thought)] :: deliver
|
2014-12-17 21:05:38 +03:00
|
|
|
[%ping (map station presence)] :: declare status
|
2014-12-05 23:14:00 +03:00
|
|
|
== ::
|
|
|
|
|
++ config :: party configuration
|
|
|
|
|
$: sources=(set station) :: pulls from
|
2015-01-04 09:24:48 +03:00
|
|
|
cordon=control :: & white, | black
|
2014-12-05 23:14:00 +03:00
|
|
|
== ::
|
2014-12-09 22:04:09 +03:00
|
|
|
++ cousin (pair ship span) :: domestic flow
|
2015-01-04 09:24:48 +03:00
|
|
|
++ control (ache (set ship) (set ship)) :: & white, | black
|
2015-01-01 23:43:50 +03:00
|
|
|
++ delivery :: delivery state
|
|
|
|
|
$? %pending :: undelivered
|
|
|
|
|
%received :: delivered
|
|
|
|
|
%rejected :: undeliverable
|
|
|
|
|
%released :: sent one-way
|
|
|
|
|
%accepted :: fully processed
|
|
|
|
|
== ::
|
2014-12-05 23:14:00 +03:00
|
|
|
++ human :: human identifier
|
|
|
|
|
$: true=(unit (trel ,@t (unit ,@t) ,@t)) :: true name
|
|
|
|
|
hand=(unit ,@t) :: handle
|
|
|
|
|
== ::
|
|
|
|
|
++ partner :: foreign flow
|
|
|
|
|
$% [%twitter p=@t] :: twitter
|
|
|
|
|
== ::
|
2015-01-01 23:43:50 +03:00
|
|
|
++ presence ?(%gone %hear %talk) :: status type
|
|
|
|
|
++ register (pair atlas (map station atlas)) :: ping me, ping srcs
|
2014-12-05 23:14:00 +03:00
|
|
|
++ report :: unified rush/rust
|
2014-12-06 11:12:52 +03:00
|
|
|
$% [%house (set span)] :: meta-changes
|
2015-01-01 23:43:50 +03:00
|
|
|
[%grams (pair ,@ud (list telegram))] :: beginning, thoughts
|
|
|
|
|
[%group register] :: presence
|
2014-12-05 23:14:00 +03:00
|
|
|
[%config config] :: reconfigure
|
|
|
|
|
== ::
|
2015-01-01 23:43:50 +03:00
|
|
|
++ speech :: narrative action
|
|
|
|
|
:: XX unify %own and %say to %lin
|
|
|
|
|
::
|
2015-01-06 23:31:36 +03:00
|
|
|
$% [%lan p=span q=@t] :: local announce
|
|
|
|
|
[%own p=@t] :: XX @ or /me
|
|
|
|
|
[%exp p=@t] :: hoon line
|
|
|
|
|
[%non ~] :: no content
|
2015-01-01 23:43:50 +03:00
|
|
|
[%ext p=@tas q=*] :: extended action
|
2015-01-06 23:31:36 +03:00
|
|
|
[%fat p=torso q=speech] :: attachment
|
|
|
|
|
:: [%inv p=station] :: invite to station
|
2015-01-06 02:59:57 +03:00
|
|
|
[%ire p=serial q=speech] :: in-reply-to
|
2015-01-01 23:43:50 +03:00
|
|
|
[%lin p=? q=@t] :: no=@, text line
|
2015-01-06 23:31:36 +03:00
|
|
|
[%mor p=(list speech)] :: XX deleteme
|
2015-01-01 23:43:50 +03:00
|
|
|
[%say p=@t] :: XX normal line
|
|
|
|
|
== ::
|
2014-12-05 23:14:00 +03:00
|
|
|
++ serial ,@uvH :: unique identity
|
2014-12-09 22:04:09 +03:00
|
|
|
++ station (each cousin partner) :: interlocutor
|
2014-12-17 03:36:45 +03:00
|
|
|
++ status (pair presence human) :: participant
|
2014-12-06 04:18:31 +03:00
|
|
|
++ statement (pair ,@da speech) :: when this
|
2014-12-05 23:14:00 +03:00
|
|
|
++ telegram (pair ship thought) :: who which whom what
|
|
|
|
|
++ thought (trel serial audience statement) :: which whom what
|
2015-01-06 23:31:36 +03:00
|
|
|
++ torso :: attachment
|
|
|
|
|
$% [%text (list ,@t)] :: text lines
|
|
|
|
|
[%tank (list tank)] :: tank list
|
|
|
|
|
== ::
|
|
|
|
|
:: markdown
|
|
|
|
|
:: image
|
|
|
|
|
:: mime object
|
2014-12-05 23:14:00 +03:00
|
|
|
--
|
