clr r18
clr r17
clr r16

pocetak:
cp r8,r18
brne lshift
cp r9,r18
breq kraj

lshift:
clc
lsr r9
ror r8
brcc rshift
add r12,r10
adc r13,r11
adc r14,r16
adc r15,r17

rshift:
lsl r10
rol r11
rol r16
rol r17
jmp pocetak

kraj: nop