DATA   SEGMENT
BUF    DW  3000H,0200H,0010H
CNT    EQU ($-BUF)/2
SUM    DW  ?
DATA   ENDS
CODE   SEGMENT
ASSUME CS:CODE,DS:DATA
BEGIN: MOV  AX,DATA
       MOV  DS,AX
       MOV  AX,0
       MOV  BX,0    ;MOV  BX,OFFSET  BUF
       MOV  CX,CNT
NEXT:  ADD  AX,BUF[BX]  ;   AX,[BX]
       INC  BX
       INC  BX
       LOOP NEXT
       MOV  SUM,AX
       MOV  AH,4CH
       INT  21H
CODE   ENDS
       END  BEGIN