DSEG SEGMENT
RESULT DW 0
DSEG ENDS
CSEG SEGMENT
ASSUME CS:CSEG,DS:DSEG
START:
MOV AX,DSEG
MOV DS,AX
;
XOR AX,AX
MOV CX,100
C1:
ADD AX,CX
LOOP C1
;
MOV RESULT,AX
;
MOV AX,4C00H
INT 21H
CSEG ENDS
END START