.model small
.stack 100h
.386

.code
main proc near

 mov ax,@data
 mov ds,ax
 mov es,ax

 mov ah,0fh
 int 10h
 push ax
 call b10mode
 call c10display
 mov ah,10h
 int 16h
 pop ax
 mov ah,0
 int 10h
 mov ax,4c00h
 int 21h
main endp

b10mode proc near
 mov ax,12h
 int 10h
 mov ah,0bh
 mov bx,7
 int 10h
 ret
b10mode endp
 

c10display proc near
 pusha
 xor bx,bx
 mov cx,64
 mov dx,70
@@20:
        mov ah,0ch
        mov al,bl
        int 10h
        inc cx
        cmp cx, 576
        jne @@20
        mov cx,64
        inc bl
        inc dx
        cmp dx,280
        jne @@20
        popa
        ret
c10display  endp
end main