shrub/lib/talk.hoon

34 lines
704 B
Plaintext
Raw Normal View History

2015-01-15 22:32:04 +03:00
::
2015-12-21 00:16:39 +03:00
:::: /hoon+talk+lib
2015-01-15 22:32:04 +03:00
::
:: This file is in the public domain.
::
2015-06-05 04:32:51 +03:00
/? 314
/- talk
!:
2015-01-15 22:32:04 +03:00
::::
::
2015-09-02 03:24:18 +03:00
[. ^talk]
2015-01-15 22:32:04 +03:00
|%
++ main :: main story
2015-12-20 23:50:45 +03:00
|= our/ship ^- cord
2015-01-15 22:32:04 +03:00
=+ can=(clan our)
?+ can %porch
2015-12-09 04:54:26 +03:00
$czar %court
$king %floor
2015-01-15 22:32:04 +03:00
==
2015-06-02 21:36:56 +03:00
::
2015-06-02 02:25:22 +03:00
++ said :: app message
2015-12-20 23:50:45 +03:00
|= {our/@p dap/term now/@da eny/@uvI mes/(list tank)}
2015-06-02 02:25:22 +03:00
:- %talk-command
^- command
:- %publish
|- ^- (list thought)
?~ mes ~
2015-06-06 02:01:44 +03:00
:_ $(mes t.mes, eny (sham eny mes))
^- thought
:+ (shaf %thot eny)
[[[%& our (main our)] [*envelope %pending]] ~ ~]
[now *bouquet [%app dap (crip ~(ram re i.mes))]]
2015-01-15 22:32:04 +03:00
--