Подсчитать количество нулей и единиц в двоичной записи элементов массива

data segment 
mass db 11111111b,00101111b,00101111b,00101111b,00101111b
data ends
code segment                                     ; кодовый семент
assume cs:code,ds:data                         
start:                                         
mov ax,data                                      ; загрузка данных в ax
mov ds,ax                                        ; ax в сегмент данных
xor dx,dx                                        ; обнуление dx
mov cx,5                                         ; количество байтов в массиве
lea bx,mass                                      ; андресация первого элемента
Cicl1: push cx                                   ; перемещение в стек
mov cx,8                                         ; количество битов в байте
Cicl2: ror byte ptr [bx],1                       ; сдвиг на 1 бит вправо
adc dx,0                                         ; если был перенос увеличим bX на 1
loop Cicl2                                       ; Возвращение на метку c2, счетчик
inc bx                                           ; перешли к следующему байту
pop cx                                           ; извлечение байта из стека
loop Cicl1                                       ; Возвращение на метку c1, счетчик
mov ax,dx                                        ; dx переносим в ax
mov dl,10
div dl
mov dx,ax                                        ; ax переносим в dx
or dx,3030h                                      ; ввод по координатам
mov ah,2
int 21h                                          ; прерывание
mov dl,dh                                        ; dh в dl
int 21h                                          ; прерывание
mov ah,10h                                       ; считывает символ из  
int 16h                                          ; буфера
mov ax,4c00h                                     ; выход из программы
int 21h                                          ; прерывание
code ends
end start

org     100h
        mov     ebx,[dat]
        mov     cx,32
        xor     ax,ax
@@1:    rcl     ebx,1
        sbb     al,0
        loop    @@1
        add     ax,32   ; в ax - кол-во нулевых битов.
;       ....
        int     20h
 
dat     dd      11111111h