.CODE
   arrayEX:
      mov  ax,@data
      mov  ds,ax
   mov es,ax
 &n
bsp; ;set DS to point to the data segment... same for ES
      mov cx,10
      xor si,si; fastest way to zero
up:   add array[si],cl
      inc si
 
      loop up ;loop #1
   mov cx,10
      mov di,offset array
top: mov dl,[byte ptr di]
      inc di
     mov ah
,6
     int 21h
     loop top ;loop #2
   mov  ax,04c00h                     
;DOS terminate program function
   int  21h                        
;terminate the program
   END 
;   arrayEX