*** NESTANDARTNE DEFINOVANIE PROCEDURY ***

DATA    SEGMENT                 ;zaciatok datoveho segmentu
TEXT    DB      'AHOJ$'         ;definicia retazca
DATA    ENDS                    ;koniec datoveho segmentu

CODE    SEGMENT                 ;zaciatok kodoveho segmentu
        ASSUME  CS:CODE, DS:DATA        ;direktiva oznamuje
 
start:  MOV AX, SEG DATA        ;do AX vloz adresu segmentu DATA
        MOV DS, AX              ;segmentovu adresu presun do DS
	call p
        MOV Ax, 4C00H           ;funkcia ukoncenie programu
        INT 21H                 ;prerusenie na vykonanie ukoncenia programu
p	proc 
	mov ah,9
	mov dx,offset text
	int 21h
	ret
p	endp

code	ends	
	end start
