Какой язык если бы не 1С? (пятница - время помечать о будущем)

.model small
.stack 100h
 
data segment      
   _errorCF db 'Finded overflow at ADD operation!','$'  
   _errorOF db 'Finded overflow at SUB operation!','$'             
   _INFO    db 'Types of operations:',10,13,'1. + -> sum',10,13,'2. - -> subtraction',10,13,'$'           
   _nc      db 10,13,'$'
   first    dw 65535   
   second   dw 5    
data ends
   
code segment
assume cs:code,ds:data     
begin:
        mov ax,data         
        mov ds,ax           
        mov es,ax     

        mov ah,09h         
        mov dx,offset _INFO 
        int 21h           

enter_type_operation: 
        mov ah,01h         
        int 21h             
        cmp al,'+'         
        je comm1           
        cmp al,'-'          
        je comm2            
        jmp enter_type_operation

comm1:
        mov ah,09h         
        mov dx,offset _nc     
        int 21h              
        mov ax,first          
        mov bx,second
        add ax,bx            
        jnc write_res        
        jmp errorCF       

comm2:
        mov ah,09h           
        mov dx,offset _nc    
        int 21h             
        mov ax,first         
        mov bx,second
        sub ax,bx           
        jno write_res     
        jmp errorOF          

write_res:
        test ax,ax       
        jns init             
        mov cx,ax           
        mov ah,02h           
        mov dl,'-'         
        int 21h              
        mov ax,cx        
        neg ax               
init:
        xor cx,cx           
        xor dx,dx         
    push -1             
    mov cx,10        
repeat: 
        xor dx,dx        
    div cx            
    push dx             
    cmp ax,0        
    jne repeat       
    mov ah,2h          
digit:  
        pop dx               
    cmp dx,-1       
    je exit              
    add dl,'0'       
    int 21h              
    jmp digit        

errorCF:
        mov ah,09h        
        mov dx,offset _errorCF
        int 21h              
        jmp exit            
     
errorOF:
        mov ah,09h           
        mov dx,offset _errorOF
        int 21h            
        jmp exit          
exit:
        mov ax,4c00h       
        int 21h
code ends
end begin