nachalo:
ldi r16,skoka_bit ; Bit shift counter
nextbit:
ldi r17,dlina ; Array byte counter
ldi xl,low(nachalo_massiva) ; Init byte array ptr
ldi xh,high(nachalo_massiva);
nextbyte:
ld r4,x ; Load a byte from RAM
rol r4 ; Rotate a byte 1 bit left
st x+,r4 ; Store a shifted byte back to RAM, increment byte ptr
dec r17 ; Repeat a bit iteration sequence until all bytes are processed
brne nextbyte;
dec r16
brne nextbit ; Do a next bit shift iteration until all bit shifts completed
ret