org 100h

start:
	mov	cx, 0

petla:
	mov	ah, 2
	mov	si, cx
	mov	dl, [label + si]
	cmp	dl, 36	; powtarzaj do wystąpenia znaku $ (znak 36)
	je	koniecpetli
	int	21h
	inc cx
jmp	petla

koniecpetli:
	mov	ax, 4C00h
	int	21h

label	db	"TEKST DO WYPISANIA",10,13,'$'
label2	db	"$"