.TITLE HEGM ; Heath Enter Graphics Mode .MCALL .REGDEF,.PRINT .REGDEF .GLOBL HEGM HEGM: .PRINT #M ;SEND ESCAPE SEQUENCE TO TERMINAL RTS PC M: .BYTE 33,106,200,0 .END