INCLUDE	PCMAC.INC

        .MODEL  SMALL

        .STACK  100h

        .DATA

char	DB	1

        .CODE
chart   PROC
	EXTRN	PutDec : NEAR
        mov     ax, @data
        mov     ds, ax
	mov	cx, 255
	jcxz	Done
Prnt:
        
	mov	al, Char
	mov	ah, 0
	call	PutDec

	_PutCh	32, '-', 32, Char

	add	Char, 1
	
	_putCh	13, 10
Nxt:
	loop	Prnt
Done:
        
        mov     al, 0   ; Return code of 0
        mov     ah, 4ch ;       Exit back to MS/PCDOS
        int     21h
chart   ENDP

        END     chart