Count no of 1 in binary digit

.MODEL SMALL
.STACK 100H
.DATA
.CODE
MAIN PROC

    XOR BL,BL
    XOR AL,AL
    MOV CX,8
    MOV BL,11111010B

    TOP:

    SHR BL,1
    JNC SKIP
    INC AL
    SKIP:
    LOOP TOP

    MOV DL,AL
    ADD DL,48
    MOV AH,2
    INT 21H

    MAIN ENDP
END MAIN