CSEG  SEGMENT 'CODE'
      ASSUME CS:CSEG,DS:DSEG

MAIN  PROC
      MOV  AX,DSEG
      MOV  DS,AX
      MOV  AX,0
      MOV  SI,0
      MOV  CX,10
ADDI: ADD  AX,WERTE[SI]
      ADD  SI,2
      LOOP ADDI
      PUSH AX
      MOV  AH,9
      MOV  DX,OFFSET MELDE
      INT  21h
      POP  AX
      CALL DEZI
      MOV  AX,4C00h
      INT  21h
MAIN  ENDP

DEZI  PROC
      PUSH AX
      PUSH BX
      PUSH CX
      PUSH DX
      MOV  BX,10
      MOV  CX,0
DIVI: INC  CX
      MOV  DX,0
      DIV  BX
      PUSH DX
      CMP  AX,0
      JNE  DIVI
      MOV  AH,2
DIGIT:POP  DX
      ADD  DL,'0'
      INT  21h
      LOOP DIGIT
      POP  DX
      POP  CX
      POP  BX
      POP  AX
      RET
DEZI  ENDP

CSEG  ENDS

DSEG  SEGMENT 'DATA'
MELDE DB "Summe aller Messwerte: $"
WERTE DW 10h,40h,70h,100h,20h,50h,80h,30h,60h,90h
DSEG  ENDS

SSEG  SEGMENT STACK
      DW 128 DUP (?)
SSEG  ENDS

      END MAIN