a:?read\-line();b:slength(a)+2;c:smake(b,"_");e:d:smake(b," ");if b>7 then e:concat(d,"|
|",d);printf(?t," ~a
/~a\\
|~a|
| ~a |
|~a|
\\~a/",c,d,e,a,e,c);