Functions HI-TECH C UNGETCH