;       Static Name Aliases
;
        TITLE   cls
;       NAME    cls.C

        .287
_TEXT   SEGMENT  BYTE PUBLIC 'CODE'
_TEXT   ENDS
_DATA   SEGMENT  WORD PUBLIC 'DATA'
_DATA   ENDS
CONST   SEGMENT  WORD PUBLIC 'CONST'
CONST   ENDS
_BSS    SEGMENT  WORD PUBLIC 'BSS'
_BSS    ENDS
DGROUP  GROUP   CONST,  _BSS,   _DATA
        ASSUME  CS: _TEXT, DS: DGROUP, SS: DGROUP, ES: DGROUP
_TEXT      SEGMENT

        PUBLIC  _cls
_cls    PROC NEAR

        push    bp
        mov     bp,sp
        push    bp
        mov     ax,600h
        mov     cx,0
        mov     dx,184fh
        mov     bh,7
        int     10h
        mov     ah,2
        mov     bh,0
        mov     dx,0
        int     10h
        pop     bp
        mov     sp,bp
        pop     bp
        ret

_cls    ENDP
_TEXT   ENDS
END
