assembly language program to separate even and odd numbers in 8086
snippet in assembly

assembly language program to separate even and odd numbers in 8086

user9046

.model small

.data 
     arr1    db 1,2,3,1,3,5,6,3,4,5
     OddArr  db 10 dup(?)
     EvenArr db 10 dup(?)
     OddAdd  db 0
     EvenAdd db 0

.code
     mov ax,@data
     mov ds,ax

     LEA BX,arr1
     LEA SI,OddArr
     LEA DI,EvenArr
     mov cx,10
     mov dh,02

     L1:
          mov ah,00
          mov al,[BX]
          mov dl,al
          div dh
          cmp ah,00
          je EVEN1
          mov [DI],dl
          add OddAdd,dl
          INC DI
          INC BX
          Loop L1
          jmp CAL


     EVEN1:
          mov [SI],dl
          add EvenAdd,dl
          INC SI 
          INC BX
          Loop L1

     CAL:     
          mov ax,0000
          mov bx,0000
          mov al,OddAdd
          mov bl,EvenAdd

          mov ax,4C00h
          int 21h

end