1.asm

DATAS segment
    X DB '12345+67890=$'
    y db 6 dup(?)

DATAS ENDS

CODES SEGMENT
    ASSUME CS:CODES,DS:DATAS
START:
    MOV AX,DATAS
    MOV DS,AX
    MOV DX,OFFSET X
    MOV AH,09H
    INT 21H
  
   mov cx,5
   mov di,5
  CLC
  mov al,ds:[0004h]
  adC al,ds:[000ah]
  PUSHF
  ADD AL,30H
  MOV y[di],AL

  mov al,ds:[0003h]
  POPF
  adC al,ds:[0009h]
  AAA
  PUSHF
  ADD AL,30H
  MOV y[di-1],AL

  mov al,ds:[0002h]
  POPF
  adC al,ds:[0008h]
  AAA
  PUSHF
  ADD AL,30H
  MOV y[di-2],AL

  mov al,ds:[0001h]
  POPF
  adC al,ds:[0007h]
  AAA
  PUSHF
  ADD AL,30H
  MOV y[di-3],AL

  mov al,ds:[0000h]
  POPF
  adC al,ds:[0006h]
  AAA
  PUSHF
  ADD AL,30H
  MOV y[di-4],AL

  POPF
 JNZ  W2
    MOV y[0],31H
W2:
    MOV y[0],30H
    mov cx,0ch
    mov di,0
 w3:
    mov ah,2
    mov dl,y[di]
    int 21h
    inc di
    loop w3  
   
  mov ax,4c00h
  int 21h
CODES ends
end start