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