.TITLE HCUU ; Heath CUrsor Up .MCALL .REGDEF,.PRINT .REGDEF .GLOBL HCUU HCUU: .PRINT #M ;SEND ESCAPE SEQUENCE TO TERMINAL RTS PC M: .BYTE 33,101,200,0 .END