{{ |c}}
#USE "cou.b"
PROC  (CHAN BYTE c!)
  u.("H !*c*", 0, c)
: