проверьте код программы (ассемблер)

[Стас_с]

; Преобразовать массив X, расположив вначале его отрицатель-
;ные, а затем неотрицательные элементы, сохранив в каждой из двух
;групп исходный относительный порядок элементов.

sseg segment stack 'stack'
     db        64 dup (?)
sseg ends
  data segment
     x   dw 1, -2, 7, -3, 2, 9 	;исходный массив
	 n   dw 6
	 y   dw 6 Dup (?)
	 max dw ?
  data ends 
;
code segment
start   proc    far
assume  ss:sseg,ds:data,cs:code
        push    ds
        xor     ax,ax
        push    ax
        mov     ax,data
        mov     ds,ax
;--------------------Nachalo---------------------------------------------
     lea di,x
	 lea si,y
     mov cx,n
   c1:
      mov ax,[di]
      cmp ax,0
      jge m1
      mov [si],ax
      add si,2
   m1:
      add di,2
	  loop c1
	  lea di,x
	  mov cx,n
   c2:  
	  mov ax,[di]
	  cmp ax,0
	   jl m2
	  mov [si],ax
      add si,2
	m2:  
      add di,2
	  loop m2
ret

code    ends
        end     start

заранее спасибо за помощь ...
ещё если кто может помогите с выводом ответа на экран.

[Стас_с]

хм... что никто так и не поможет ?

[Serge_Bliznykov]

1) окончание вашего кода должно быть примерно таким:

      ret
start endp
code ends
end start

2) я не разобрался в вашем алгоритме. но он точно не работает! (распишите в виде словесного описания, что Вы делаете... ну или блок-схему дайте)
Исходный массив вообще без изменений остаётся,
а в массив Y попали только отрицательные элементы

Кстати, я бы по условию задачи понял так, что нужно обойтись одним массивом.
Нет?..

ну и с выводом результатов пока можно не заморачиваться..


p.s. и ещё. Вы АБСОЛЮТНО зря создали тему - практически кросспост существующей... Поймите, раз никто не отвечает, значит тех людей, которые способны ответить, либо нет на форуме, либо они заняты...

[Стас_с]

нужно использовать два массива , то что в него попадают только отрицательные элементы это правда ( и это проблема)

полное задание которое мне сегодня выдали звучит так :
Лабораторна робота №3
; Преобразовать массив X, расположив вначале его отрицатель-
;ные, а затем неотрицательные элементы, сохранив в каждой из двух
;групп исходный относительный порядок элементов. Оценить, как при
;этом изменилось положение максимального по модулю элемента масси-
;ва X.

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

вот то что надумал.

sseg segment stack 'stack'
     db        64 dup (?)
sseg ends
  data segment
     max dw       ? 
     x   dw 1, -2, 6,9, -3, 2, 7 	;исходный массив
	 n   dw 7
	 y   dw 7 Dup (?)
	 buf dw ?
	 
  data ends 
;
code segment
start   proc    far
assume  ss:sseg,ds:data,cs:code
        push    ds
        xor     ax,ax
        push    ax
        mov     ax,data
        mov     ds,ax
;--------------------------------
       lea  di,x
	   mov  cx,n 	   
       mov  bx,[di]
	   mov dx,di
;========================
c4: 
     mov ax,[di]
     cmp ax, bx
     jle m4
     mov bx,ax
     mov dx,di
  m4:	 
	 add di,2
     loop c4
     push dx	 
;------посмотрим что получится----
     lea di,x
	 lea si,y
	 mov cx,n
   c1:
      mov ax,[di]
      cmp ax,0
      jge m1
      mov [si],ax
      add si,2
   m1:
      add di,2
	  loop c1
	  lea di,x
	  mov cx,n
   c2:  
	  mov ax,[di]
	  cmp ax,0
	   jl m2
	  mov [si],ax
      add si,2
	m2:  
      add di,2
	  loop m2
;---------------------------
       lea si,y
	   mov cx,n
	   mov bx, [si]
	   mov dx,si
	   c5: 
     mov ax,[si]
     cmp ax, bx
     jle m5
     mov bx,ax
     mov dx,si
  m5:	 
	 add di,2
     loop c5    
;---------------------------
     lea ax,y 
	 sub ax,dx
	 mov bx, 2
	 cwd 
	 idiv bx
	 mov cx,ax
	 pop dx
	 lea ax,x
	 sub ax,dx
	 mov bx, 2
	 cwd 
	 idiv bx
	 sub ax,cx
	 mov max,ax
;============================
ret
start	endp
code    ends
        end     start

кто поможет с решением проблемы буду благодарен