.model small
.data
str1 db 0dh,0ah,'press any key$'
.stack
.code    ;segment
      
start:  mov ax,0a000h
        mov es,ax
        mov ah,0
        mov al,013h
        int 10h
        cld
        mov di,0
        mov ax,0
wri:    mov cx,0fh
        push cx
        mov cx,1320
dis:    stosb
        dec bx
        loop dis
        add di,1300*3
        add ax,1
        pop cx
        loop wri
        pop cx
        mov ah,0
        mov al,3
        int 10h
        mov dx,seg str1
        mov ds,dx
        mov dx,offset str1
        mov ah,9
        int 21h
        mov ah,4ch
        int 21h
;code    ends
        end start