US
US = Tgetstr("us"); /* start underline */
if (*US)
if (!*US && !*UC) { /* no underline mode? */
US = SO; /* substitute standout mode */
EXT char *US INIT(NULL); /* start underline mode */
#define underline() do_tc(US,1)