исправить программу

[МихаилД]

.model small
.stack 100h
.data
result dd 10 dup (0)	
array dd 1,2,3,4,5,6,7,8,9,10
dd        10,9,8,7,6,5,4,3,2,1

len=$-array	; ðàçìåð
buff db 20 dup (?),24h ; 
d db 10; 

.286
.code 
start:
mov ax,@data	; 
mov ds,ax
mov es,ax

mov di,offset array  
mov bx,offset result	
mov cx,len/4		
@1:
mov ax,[di]		
mov dx,[di+2]	
add [bx+4],ax		
adc word ptr [bx+2],0	
add [bx+2],dx		; 
adc word ptr [bx],0
add di,4		; 
rol word ptr [bx+4],8	; 
rol word ptr [bx+2],8	; 
rol word ptr [bx],8	; 

cld		; 
mov cx,6	;
xor al,al	; 
mov di,offset result 
repz scasb
dec di
mov bx,di	
inc cx
lea si,d-2     ; 
mov bp,cx	; 
@7:
mov di,bx 	
mov cx,bp
xor ax,ax
@q:
mov al,[di] 	; 
div d		
stosb		; 
loop @q		; 
or ah,30h	;
mov [si],ah	; 
dec si	 	; 
@a:
cmp word ptr [di-2],0	; 
jnz @7		; ï
sub di,2
cmp di,offset buff
ja @a
exit:
inc si
mov dx,si ; 
mov ah,9	; 
int 21h
xor ax,ax 	; î
int 16h


mov ah,4ch	;
int 21h
end start

чтобы элементы массивов складывались попарно. Очень прошу, экзамен

[МихаилД]

С меня 1000руб тому, кто поможет через вебмани. Но времени 20 минут от силы