Если в векторе есть хотя бы один отрицательный элемент, то отсортировать элементы вектора по убыванию

Dseg segment para public 'data'
 mas db -1,-2,3,4,5
 n dw 5
 kol db ?
Dseg ends
Sseg segment para stack 'stack'
 dw 30 dup(0)
Sseg ends
Cseg segment para public 'code'
osn proc near
assume cs:cseg,ds:dseg,ss:sseg
 mov ax,dseg
 mov ds,ax
 
 mov cx,n
 mov al,0
 mov di,0
 ;Нахождение кол. отрицательных эл-ов
start: cmp mas[di],0
 jge met
 inc al
met: inc di
 loop start
 mov kol, al 
 
 ;если отрицательные эл-ты присутствуют, то отсортировать массив по убыванию
 cmp al,0
 jle Cicl3
 
 ;сортировка по убыванию
 Cicl3: mov cx,n
 dec cx
Cikl2: push cx
 mov cx, n
 dec cx 
 mov si,0 ;si=j
cikl1: mov di,si
 inc di ;di=j+1
 mov cl, mas[si]
 mov bl, mas[di]
 cmp cl,bl
 jge met1
 mov mas[si],bl
 mov mas[di],al
met1: inc si
 loop cikl1
 pop cx
 loop cikl2
 
 mov ax, 4c00h
 int 21h
osn endp
cseg ends
end osn

Dseg segment para public 'data'
 mas db -1,-2,3,4,5
 n dw 5
Dseg ends
Sseg segment para stack 'stack'
 dw 30 dup(0)
Sseg ends
Cseg segment para public 'code'
osn proc near
assume cs:cseg,ds:dseg,ss:sseg
 mov ax,dseg
 mov ds,ax
 
 mov cx,n
 mov al,0
 mov di,0
start: cmp mas[di],0
 jb Cicl3
 inc di
 loop start
 ;сортировка по убыванию
 Cicl3: mov cx,n
 dec cx
Cikl2: push cx
 mov cx, n
 dec cx 
 mov si,0 ;si=j
cikl1: mov di,si
 inc di ;di=j+1
 mov cl, mas[si]
 mov bl, mas[di]
 cmp cl,bl
 jge met1
 mov mas[si],bl
 mov mas[di],al
met1: inc si
 loop cikl1
 pop cx
 loop cikl2
 
 mov ax, 4c00h
 int 21h
osn endp
cseg ends
end osn

Dseg segment para public 'data'
 mas db 1,2,-3,4,5
 n dw 5
Dseg ends
Sseg segment para stack 'stack'
 dw 30 dup(0)
Sseg ends
Cseg segment para public 'code'
osn proc near
assume cs:cseg,ds:dseg,ss:sseg
 mov ax,dseg
 mov ds,ax
 mov cx,n
 mov al,0
 mov di,0
start: cmp mas[di],0
 jb met
 jmp Cikl3
 
 met: inc di
 loop start
 
 jmp exit
 ;сортировка по убыванию
Cikl3: mov cx,n
 dec cx
Cikl2: push cx
 mov cx, n
 dec cx 
 mov si,0 ;si=j
cikl1: mov di,si
 inc di ;di=j+1
 mov al, mas[si]
 mov bl, mas[di]
 cmp al,bl
 jge met1
 mov mas[si],bl
 mov mas[di],al
met1: inc si
 loop cikl1
 pop cx
 loop cikl2
 exit:
 mov ax, 4c00h
 int 21h
osn endp
cseg ends
end osn