.model tiny
.code
org 100h

@main:
		xor bl, bl
@start:

        mov ah, 02h
        mov dl, bl
        int 21h

        inc bx

		mov cx, bx
		xor bh, bh
		mov ax, bx
		mov bx, 15
		div bl
		mov bx, cx

		cmp ah, 0
;        test bl, 15
        jne @start

        mov dl, 0dh
        int 21h
        mov dl, 0ah
        int 21h

		test bl, bl
        jne @start

        ret
end @main