urbit/try/bin/game.hoon
Steven Dee 4025898428 Ye olde whitespace cleanup
Run using
  find . -type f | xargs sed -i '\s\+$'

And not even glanced at. It's fine. Don't worry about it.
2013-12-08 21:23:03 +00:00

42 lines
935 B
Plaintext

!:
:: /=try=/bin/game/hoon
::
=> .(- `[who=@p how=path]`-)
=> .(+ =>(+ ^/=main=/lib/hume))
|= [est=time eny=@uw]
|= [neighbor=tape ~]
^- bowl
=+ messages=*(list ,@t)
%- lunt
:* who
%none
:- :~ :* :~ [%& /localhost]
[%| .127.0.0.1]
==
/game
(shas %game eny)
/try
==
==
^- vase
!> |%
++ give
|= [now=@da fig=weev]
^- [p=(list gift) q=(unit ,[p=(list slip) q=_+>.$])]
?+ -.fig
[~[la/leaf/"give other {<fig>}"] ~]
::
%form
=+ msg=(~(get by q.fig) %msg)
?~ msg
[~[la/leaf/"give odd form {<q.fig>}"] ~]
[~ [~ ~ +>.$(messages [u.msg messages])]]
==
::
++ miss
|= [pac=pact ced=cred]
^- (unit purl)
~
--
==