Ricky
02-12-2012, 06:41 PM
I'm creating a simple Barbarian Course Agility script, and I'm almost fisished.
Just one thing, I'm using Case of and it won't go to the next number, it will loop inside RopeSwing.
procedure CaseProceduce;
begin
case Course of
0 : RopeSwing;
1 : LogBallance;
2 : ObstacleNet;
3 : BallancingLedge;
4 : Ladder;
5 : Wall1;
6 : Wall2;
end;
end;
for i := 0 to 6 do
begin
CaseProceduce;
end;
Just one thing, I'm using Case of and it won't go to the next number, it will loop inside RopeSwing.
procedure CaseProceduce;
begin
case Course of
0 : RopeSwing;
1 : LogBallance;
2 : ObstacleNet;
3 : BallancingLedge;
4 : Ladder;
5 : Wall1;
6 : Wall2;
end;
end;
for i := 0 to 6 do
begin
CaseProceduce;
end;