PC-98x1でテキスト画面をスクロールする

PC-98x1で，テキスト画面をスクロールするアセンブリ言語ソース
PC-9821Cxで作成・確認しました。

code    segment
    assume ds:code, cs:code

    org 100h

start:
    mov dx,00h
    jmp looop

MES db  'done.$'

looop:
    mov ah,0eh
    int 18h
    cmp dx,(2 * 80 * 25)
    jz  fin
    add dx,160
    jmp looop
fin:
    mov ah,0eh
    mov dx,00h
    int 18h
    mov ah,09h
    mov dx,offset MES
    int 21h
    mov ax,4c00h
    int 21h
    ends
end start