Write Assembly Level Program to Find the Even Numbers Sum

Write a assembly level program to find the even numbers sum.
Write ALP program to find the even sum from 1, 2,3,4,5,6,7,8,9,10.
ALP program to find the even sum of numbers 1, 2,3,4,5,6,7,8,9,10.

ALP Code


.MODEL SMALL 
.STACK
.DATA
 X DB 1,2,3,4,5,6,7,8,9,10
 MSG DB "SUM IS: $"
.CODE
PRIN MACRO
 AAM
 ADD AX,3030H

 MOV DH,AL
 MOV DL,AH
 MOV AH,02H
 INT 21H

 MOV DL,DH
 MOV AH,02H
 INT 21H
 ENDM
MAIN PROC
 MOV AX,@DATA
 MOV DS,AX

 MOV DX,OFFSET MSG
 MOV AH,09H
 INT 21H

 mov si,0 
 mov bl,0
 top:mov ax,0
 mov al,x[si]

 mov cl,2
 div cl
 cmp ah,0
 jne l1
 add bl,x[si]
 l1: inc si
 cmp si,10
 jnz top

 mov ax,0
 mov al,bl
 PRIN

 mov ah,4ch
 int 21h
 main endp
 end main
MAIN ENDP
END MAIN