Найти количество положительных чисел в массиве байт - Assembler

LOCALS
 
.model small
 
.stack 200h
 
.data
        msgPressAnyKey  db      0Dh, 0Ah, 'Press any key to exit...', '$'
        N               dw      10
        Array           db      67, -30, 94, 76, -40, -40, -56, 22, -28, -55
 
.data?
        Count           dw      ?
 
.code
 
main    proc
        ;инициализация сегментного регистра ds адресом сегмента данных
        mov     ax,     @data
        mov     ds,     ax
 
        mov     bx,     0
        .for:
                lodsb
                or      al,     al
                js      .next
                inc     bx
        .next:
        loop    .for
        mov     [Count],        bx
        ;ожидание нажатия любой клавиши
        mov     ah,     09h
        lea     dx,     [msgPressAnyKey]
        int     21h
 
        mov     ah,     00h
        int     16h
 
        ;завершение программы
        mov     ax,     4C00h
        int     21h
main    endp
 
end     main