mov r0, #50h
mov r7, #5
mov 20h, #00h ;clearing
L1: cjne @r0, #33h, L2
  mov 20h, r0
  sjmp L3
L2: inc r0
  djnz r7, L1
L3: sjmp L3
end