Массив, макс элемент Опции

[Client]

sseg segment	
	db 128 dup(?)
sseg  ends
dseg	segment
A	db  1,2,3,4,5
B	db  5,6,7,8,9
s	db  1 dup(?)
max	db  1 dup(?)
dseg ends
cseg segment
	assumme ss:sseg,cs:cseg,ds:dseg
start:	
	mov	ax,dseg
	mov	ds,ax
	mov	al,a[0]
	mov	max,al
	mov 	si,0
	mov 	cx,5
m1:
	mov 	al,A[si] ;элемент массива в регистр
	cmp	al,max ;сравнение
	inc si ; увеличим индекс
	jg	m2 ; если больше, то переход на м2, а если нет, то куда?
m2:	
	mov max,al
	loop	m1
	mov	al,max
	mov	s,al
	mov	al,b[0]
	mov	max,al
	mov	cx,5
	mov	si,0
m3:
	mov	al,b[si]
	cmp	al,max
	inc	si	
	jg m4
m4:
	mov	max,al
	loop	m3
	mov	AL,max
	add	s,al
	mov	ah,2h
	mov	dl,s
	int	21h	
	
	mov ah,4ch
	int 21h
cseg  ends
end start

По заданию надо сложить 2 макс элемента в 2 массивах.

[Client]

Опять выручил
Спасиб!