;2006-1-5
;写一个子程序SKIPLINES,完成输出空行的功能.空行的行数在AX寄存器中

.model small
.stack
.data
strMsg    db    'Hello world!', '$'

.code
_main:
            mov        ax, @data
            mov        ds, ax

            mov        ax, 5
            call    SKIPLINES

            mov        dx, offset strMsg
            mov        ah, 9
            int        21H

            mov        ax, 4C00H
            int        21H
SKIPLINES    proc
            push    cx
            push    dx

            test    ax, ax
            jz        @2_SKIPLINES

            mov        cx, ax
            mov        ah, 2
    @1_SKIPLINES:
            mov        dl, 0DH
            int        21H
            mov        dl, 0AH
            int        21H
            loop    @1_SKIPLINES
    @2_SKIPLINES:
            pop        dx
            pop        cx
            ret
SKIPLINES    endp
end    _main