.MODEL small
.STACK 100h
.DATA
Retaz DB 8 dup (?)

.CODE
Zac: mov ax,@data
	mov ds,ax
	mov dx,offset Retaz; Presunutie offsetu retazca
	mov Retaz,6; informacia o dlzke reatzca
	mov ah,0Ah
	int 21h
	mov dl,0Ah ;###########
	mov ah,2 ; presun
	int 21h ; na
	mov dl,0Dh ; novy
	mov ah,2 ; riadok
	int 21h ;###########
	mov bh,0
	mov cx,0
	mov di,2
Prevod: mov bl,[Retaz+di]
	cmp bl,0Dh
	jz Koniec
	cmp bl,'-'
jz Minus
	mov ax,10 ;##########################################
	mul cx ;prevod retazca
	mov cx,ax ;na cislo
	sub bl,'0' ;prevod ascii na cislo ;
	add cx,bx ;##########################################
	inc di
	jmp Prevod
Minus: inc di
    jmp Prevod
Minus2: mov ax,2
	mul cx
	sub cx,ax
	jmp Koniec2
Koniec: mov di,2
	mov bl,[Retaz+di]
	cmp bl,'-'
	jz Minus2
	mov ax,4c00h
	int 21h
Koniec2: mov ax,4c00h
    int 21h
END Zac