Lbl SUB1
0→{r₁+r₂+r₃}
r₁+r₂
Return

Lbl SUB2
r₁+r₂
Return

Lbl SUB3
0→{r₁+length(r₁)-1}
r₁
Return

Lbl SUB4
inData(r₂,r₁)-1→I
0→{r₁+I+r₃}
r₁+I
Return