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