!:
|=  mad=[who=@p now=@da eny=@uw ced=cred]
|=  zab=[sud=scud quy=quay]
^-  love
:-  %ham
:~  %html
  :~  %body
    +"urbit: {neighbor} ready at {<now.mad>}."
  ::
    :-  %ul
    |-  ^-  marl
    ?~  messages  ~
    :_  $(messages t.messages)
    ~[%li +"someone said: {(trip i.messages)}"]
  ::
    :~  ~[%form action/"fun" method/"post"]
      -"message: {%[%input type/"text" name/"msg"]}"
    ==
  ==
==