; ------------------------------------
; P0 - sablona jednoducheho programu |
;-------------------------------------

S1	SEGMENT	STACK
	dw	100 dup (?)
S1	ENDS

; -------------------------- 

D1	SEGMENT
var1	dw	?
var2	dw	?
text1	db	"Libovolny text"
D1	ENDS

; -------------------------- 

C1	SEGMENT
	nop
	nop
tudy:	mov	ax,D1
	mov	ds,ax
	assume	ds:D1
	assume	cs:C1
	mov	ax,var1
	mov	bx,word ptr text1
	mov	cx,offset text1
;
	mov	ax,4C00h
	int	21h
;
C1	ENDS

; -------------------------- 
	END	tudy