Rapid help!

Robot Controller
1

Hi!

Im doing a program witch i have an array {10,10,10}. And i want to in the beginning choose som parameters for the operation, with then is saved in the array like this example.
After i did it once i want to, add some new parameters but this time not in the same array (area!?) so that i can ex enter ten different programs and then choose them from a question.

PROC init()

TPErase;

TPReadFK programID,“1 XXX 2 XXX”,“1”,“2”,“”,“”,“”;

TPErase;

Test programID

case 1:

TPErase;

TPReadNum ProgramNR, “ProgramID”; !THE CHOOSE PART OF WICH PROGRAM!

TPErase;

case 2:

TPErase;

TPReadNum BorrData{1,1,1}, “XXXX”;

TPErase;

TPReadNum BorrData{1,1,2}, “XXXX”;

TPErase;

TPReadNum BorrData{1,1,3}, “XXX”;

TPErase;

TPReadNum BorrData{1,1,4}, "XXXX ";

TPErase;

TPReadNum BorrData{1,1,5}, “XXXX”;

TPErase;

TPReadNum BorrData{1,1,6}, “XXXX”;

TPErase;

EndTest

EndProc

PROC CCC()

Speed.v_tcp:=BorrData{1,1,6};

ZZZZZ:=Borrdata{1,1,2};

WHILE AntalRakning < BorrData{1,1,5} DO

WHILE Klart < BorrData{1,1,2} DO

!Manipulerar possitionen i Z led

Start:=Offs(Start,(0),0,(BorrData{1,1,3}));

!**

MoveL StartBorr,BorrSpeed,z50,toolborr1WObj:=wobjborr1;

!**

Add BorrningKlart, BorrData{1,1,3};

WaitTime 0.5;

ENDWHILE

!**

Start:=Offs(Start,(0),0,-nollLage);

MoveL start,Speed,z50,toolborr1WObj:=wobjborr1;

WaitTime 2.0;

!**

INCR AntalRakning;

!**

Klart:=0;

!**

StartBorr:=Offs(StartBorr,0,(BorrData{1,1,4}),0);

!RA-RELSE FRAM

MoveL Start,Speed,z50,toolborr1WObj:=wobjborr1;

WaitTime 2.0;

ENDWHILE

EndProc

A’

Im greateful of any kind of help!

BR