.TITLE HEKS ; Heath Enter Keypad Shifted mode .MCALL .REGDEF,.PRINT .REGDEF .GLOBL HEKS HEKS: .PRINT #M ;SEND ESCAPE SEQUENCE TO TERMINAL RTS PC M: .BYTE 33,164,200,0 .END