;       name l28
_TEXT   segment byte public 'CODE'
        org 100h
        assume  cs:_TEXT
@start:
        mov     ax,1202h
        mov     bl,30h
        int     10h
        cmp     al,12h
        jne     @out

        mov     ax,0003h
        int     10h
        mov     ax,1111h
        mov     bl,00
        int     10h
@out:
        mov     ax,4c00h
        int     21h
_TEXT   ends
        end     @start