AUSAM/source/libS/intss.c
intss() { return(ttyn(0) != 'x'); }