top: read r1
disp r1
add r1 r0 r0
disp r1
jmp top