Untitled

data segment 
    a dw 0xffff
    b dw 0xff12
    c dw 0,0
    msg db "Eulin are $"    
data ends
    
stack segment
    dw 128 dup(0)    
stack ends

code segment
    start:
    
    ;initializare segment de date
    mov ax, data ; data e adresa 
    mov DS, ax   ; in ds poti muta DOAR alte REGISTRE
    
    ;initializare segment de stiva
    mov ax, stack
    mov ss, ax
    
    call print_mesaj
             
    proc print_mesaj   
        ;shit got real really fast
        mov ah, 09h 
        mov dx, offset msg 
        int 21h ;syscall print
    endp print_mesaj
    
    call print_value_al
            
            
    proc print_value_al
        mov al, 51
        mov ah, 0eh
        int 10h
    endp print_value_al
                     
    call calcul_dubla_precizie               
                        
    proc calcul_dubla_precizie
        mov ax, a
        add ax, b
        adc dx, 0
        mov c, ax
        mov [c+2], dx
        
    endp calcul_dubla_precizie

        ;syscall exit
    mov ah, 4ch
    int 21h       
           
    code ends
end start