MODULE Module1
CONST jointtarget yd:=[lbk][lbk]-0.00012126,0.000333907,-0.000340351,-9.64093E-43,90,-0.00011689[rbk],[lbk]9E+9,9E+9,9E+9,9E+9,9E+9,9E+9[rbk][rbk];
CONST robtarget p10:=[lbk][lbk]234.90,245.39,22.20[rbk],[lbk]1.02348E-7,-2.18315E-8,-1,-1.8248E-8[rbk],[lbk]1,0,1,0[rbk],[lbk]9E+9,9E+9,9E+9,9E+9,9E+9,9E+9[rbk][rbk];
CONST robtarget gd1:=[lbk][lbk]234.90,245.39,307.35[rbk],[lbk]9.27509E-8,-2.1467E-8,-1,2.66251E-8[rbk],[lbk]1,0,1,0[rbk],[lbk]9E+9,9E+9,9E+9,9E+9,9E+9,9E+9[rbk][rbk];
CONST robtarget gd11:=[lbk][lbk]360.18,94.75,31.16[rbk],[lbk]6.30928E-8,8.84124E-7,-1,1.34176E-7[rbk],[lbk]1,0,1,0[rbk],[lbk]9E+9,9E+9,9E+9,9E+9,9E+9,9E+9[rbk][rbk];
CONST robtarget p20:=[lbk][lbk]189.00,138.02,27.68[rbk],[lbk]5.93194E-8,8.13769E-7,-1,1.1483E-7[rbk],[lbk]1,0,1,0[rbk],[lbk]9E+9,9E+9,9E+9,9E+9,9E+9,9E+9[rbk][rbk];
CONST robtarget gd21:=[lbk][lbk]160.00,109.02,35.00[rbk],[lbk]6.46065E-8,-4.17217E-8,-1,1.11484E-7[rbk],[lbk]1,0,1,0[rbk],[lbk]9E+9,9E+9,9E+9,9E+9,9E+9,9E+9[rbk][rbk];
CONST robtarget p30:=[lbk][lbk]119.70,244.98,21.24[rbk],[lbk]1.0261E-7,-2.42297E-8,-1,1.52361E-8[rbk],[lbk]1,0,1,0[rbk],[lbk]9E+9,9E+9,9E+9,9E+9,9E+9,9E+9[rbk][rbk];
CONST robtarget p40:=[lbk][lbk]131.00,138.02,28.00[rbk],[lbk]0.0164699,-0.00464378,-0.999839,0.00548854[rbk],[lbk]1,0,1,0[rbk],[lbk]9E+9,9E+9,9E+9,9E+9,9E+9,9E+9[rbk][rbk];
CONST robtarget p50:=[lbk][lbk]369.96,244.68,21.21[rbk],[lbk]8.09778E-8,1.17126E-8,-1,1.77961E-7[rbk],[lbk]1,0,1,0[rbk],[lbk]9E+9,9E+9,9E+9,9E+9,9E+9,9E+9[rbk][rbk];
CONST robtarget gd51:=[lbk][lbk]158.41,80.06,27.22[rbk],[lbk]6.21829E-8,-4.50615E-8,-1,1.14651E-7[rbk],[lbk]1,0,1,0[rbk],[lbk]9E+9,9E+9,9E+9,9E+9,9E+9,9E+9[rbk][rbk];
VAR num rand_num;
PROC main()
rand_num := Random() * 3;
IF rand_num < 1 THEN
proc_place_object1;
ELSIF rand_num < 2 THEN
proc_place_object2;
ELSIF rand_num < 3 THEN
proc_place_object3;
ENDIF
zpbox;
ENDPROC
FOR idx FROM 1 TO 3 DO
TEST arr_order{idx}
CASE 1: proc_place_object1;
CASE 2: proc_place_object2;
CASE 3: proc_place_object3;
ENDTEST
ENDFOR
zpbox;
ENDPROC
PROC proc_place_object1()
zpy;
ENDPROC
PROC proc_place_object2()
zpr;
ENDPROC
PROC proc_place_object3()

18和20行的ELSEIF拼错了
25行多了个ENDPROC，或者说下面的FOR循环没有加PROC名称

还有两个报错