How to program this in scl?

I have a little program in STL , can anybody help me to program it in SCL
the program is:
SET
SAVE
= L 4.2
L 1
T #i
A7d0: L i
L 4
<=
JCN A7d1
A aa
JCN A7d4
L #i
UC "fc100"
P#L 0.0
JU A7d0
JU A7d2
A7d4: CLR
LAR1

= aa
A7d2: L #i
L 1
+I
T #i
JU A7d0
A7d1: CLR
A L 4.2
SAVE
BE
I've tried to program it like this:
for i:=1 to 4 do
if aa then
fc100(a:=i);
exit;
else
aa:=false;
end_if;
end_for;
but when I complied my program and open the STL file,
JU A7d1
JU A7d2
these two lines are different.
thanks for you first.

sunnyback

I have a little program in STL , can anybody help me to program it in SCL
the program is:
SET
SAVE
= L 4.2
L 1
T #i
A7d0: L i
L 4
<=
JCN A7d1
A aa
JCN A7d4
L #i
UC "fc100"
P#L 0.0
JU A7d0
JU A7d2
A7d4: CLR
LAR1

= aa
A7d2: L #i
L 1
+I
T #i
JU A7d0
A7d1: CLR
A L 4.2
SAVE
BE
I've tried to program it like this:
for i:=1 to 4 do
if aa then
fc100(a:=i);
exit;
else
aa:=false;
end_if;
end_for;
but when I complied my program and open the STL file,
JU A7d1
JU A7d2
these two lines are different.
thanks for you first.

Thank you very much.
I've got the answer, very similarily to yours.
i:=1;
while i<= 4 do

if aa then

fc100(a:=i);

continue;

else

aa:=false;

end_if;

end_while;