;kód szegmens
KOD     SEGMENT   PARA PUBLIC 'CODE'
        ASSUME    CS:KOD,DS:ADAT,SS:VEREM,ES:NOTHING

START:  PUSH    DS        ;visszatérés segmensének mentése
        XOR     AX, AX    ;offset mindig 0
        PUSH    AX        ;visszatérés offsetjének mentése

        MOV     AX, ADAT  ;mert nincsen 'mov ds, adat'
        MOV     DS, AX

        ;főprogram kezdődik
        mov     bx,offset szoveg
ciklus: mov     al,[bx]
        cmp     al,0
        je      VEGE
        cmp     al,max
        jbe     kov
        mov     max,al
kov:    inc     bx
        jmp	    ciklus
        ;főprogram vége

VEGE:   RETF              ;visszatérés a hívó programhoz
KOD     ENDS

;adat szegmens
ADAT    SEGMENT   PARA PUBLIC 'DATA'
szoveg  DB	"HELLO WORLD!"
        DB  0
max     db  0
pos	    DB  0
ADAT    ENDS

;verem szegmens
VEREM   SEGMENT   PARA STACK
        DW      64 DUP (0) ;helyfoglalás
VEREM   ENDS

END     START