汇编语言 求出首地址为DATA的100字数组的最小偶数，并把它存放在AX中

datas segment                                                     
     data dw 1,2,3,4,5
datas ends
 
codes segment                                                        
main proc far                                               
assume cs:codes,ds:datas
start:                                                                       
 
    push ds                                              
    sub ax,ax                                               
    push ax                                             
 
    mov ax,datas                                       
    mov ds,ax                                              

    mov bx,0
    mov cx,5
compare:       
    mov ax,data[bx] ;取数组的第一个偶数
    add bx,2
    test ax,01H    ;是偶数吗？
    loopnz compare ;不是，比较下一个数
    jnz stop        ;没有偶数，退出
    jcxz stop       ;最后一个数是偶数，即为最小偶数，退出
compare1:       
    mov dx,data[bx];取数组的下一个偶数
    add bx,2
    test dx,01H    ;是偶数吗？
    jnz next       ;不是，比较下一个数
    cmp ax,dx      ;(AX)<(DX)吗？
    jle  next
    mov ax,dx      ;(AX)<(DX)，则置换(AX)为最小偶数
next:               
    loop compare1
stop:                
    ret
 
main endp                                                       
codes ends                                                                       
end start