Чётность числа единиц в числе (Assembler)

[Eshik v tumane]

Мне сказали, чт помимо логического умножения необходимо делать побайтовый сдвиг. Вот написал код

.include "m16def.inc"

ldi R16, high(RAMEND)
out SPH, R16
ldi R16, low(RAMEND)
out SPL, R16

ldi R18, high(0x030)
ldi R17, low(0x030)

Call EEPROM_read
M0:
ldi R19, 0x0F ; записываем 0F в R19

OR R16, R19 ; складываем значения в регистрах
MOV R22, R16

M3: ldi R21, 0xFF

LSR R22 ; побайтовый сдвиг вправо
AND R21, R22 ; логическое умножение на 1
OR R23, R21 ; логическое умножение результатов
BRCS M3
brne M0
breq M1

M1:
ldi R18, high(0x080)
ldi R17, low(0x080)
Call EEPROM_write


end: rjmp end

Но программа не выходит на метку 1. Не подскажете ошибку?

[Step_UA]

Call EEPROM_read ; чтение 
ORI R16, 0x0F ; логическое сложение регистра R16 с 0x0F
; подсчет количества установленных бит
MOV R20,0   ; количество установленных бит
MOV R21,8   ; количество бит
MOV R22, R16 ; значение
loop:
LSR R22      ; логический сдвиг вправо, младший бит в флаг переноса
BRCC noOne ; перейти если флаг переноса =0
INC R20     ; иначе увеличить количество установленных бит на 1
noOne:
DEC R21   ; уменьшить количество оставшихся бит на 1
BRNE loop ; если не ноль в предыдущей операции тогда перейти на метку

дальше проверяйте на четность значение регистра R20. Если младший бит регистра =0 => значение четное.