设备未打开是啥意思
DECL/COMMON,INTGR,PPP1,PPP2,PPP3,PPP4
EEE =PROMPT/CHECK,'A',PPP1,$
               CHECK,'B',PPP2,$
               CHECK,'C',PPP3,$
               CHECK,'D',PPP4
IF/(PPP1.EQ.1)
WRITE/DID(DEFAULTSCREEN),'A'
F(PLN3) = FEAT/PLANE,CART, -0.005519, 0.376312, 47.063041, 0.000369,$
   -0.000201, 1.000000
$$ Measurement points are created through actual points
MEAS/PLANE, F(PLN3), 4
   PTMEAS/CART,   14.270992, 7.439269, 47.059199,   0.000369, -0.000201, 1.000000
   PTMEAS/CART,   15.830516, -5.884685, 47.055942,   0.000369, -0.000201, 1.000000
   PTMEAS/CART,   -15.062542, -7.296376, 47.067049,   0.000369, -0.000201, 1.000000
   PTMEAS/CART,   -15.061042, 7.247043, 47.069975,   0.000369, -0.000201, 1.000000
ENDMES
JUMPTO/(BBB)
ENDIF
(BBB)
IF/(PPP2.EQ.1)
WRITE/DID(DEFAULTSCREEN),'B'
F(LN3) = FEAT/LINE,BND,CART, -1.686923, -9.496001, 46.356645, -12.434014,$
   -9.423611, 46.356645, -0.006736, -0.999977, 0.000000
$$ Measurement points are created through actual points
MEAS/LINE, F(LN3), 3
   PTMEAS/CART,   -1.686923, -9.496001, 46.356645,   -0.006736, -0.999977, 0.000000
   PTMEAS/CART,   -6.987137, -9.460300, 46.356645,   -0.006736, -0.999977, 0.000000
   PTMEAS/CART,   -12.434014, -9.423610, 46.356645,   -0.006736, -0.999977,$
   0.000000
ENDMES
JUMPTO/(CCC)
ENDIF
(CCC)
IF/(PPP3.EQ.1)
WRITE/DID(DEFAULTSCREEN),'C'
F(PLN6) = FEAT/PLANE,CART, 6.954574, -9.016468, 55.628507, -0.006138,$
   -0.999843, 0.016628
$$ Measurement points are created through actual points
MEAS/PLANE, F(PLN6), 4
   PTMEAS/CART,   1.687595, -9.066255, 50.690638,   -0.006138, -0.999843, 0.016628
   PTMEAS/CART,   11.896763, -9.128927, 50.690626,   -0.006138, -0.999843, 0.016628
   PTMEAS/CART,   11.898542, -8.964702, 60.566138,   -0.006138, -0.999843, 0.016628
   PTMEAS/CART,   2.335394, -8.905988, 60.566625,   -0.006138, -0.999843, 0.016628
ENDMES
JUMPTO/(DDD)
ENDIF
(DDD)
IF/(PPP4.EQ.1)
WRITE/DID(DEFAULTSCREEN),'D'
F(LN8) = FEAT/LINE,BND,CART, -9.099554, 9.069627, 52.861583, -3.707236,$
   9.034702, 52.860612, 0.006477, 0.999979, 0.000000
$$ Measurement points are created through actual points
MEAS/LINE, F(LN8), 3
   PTMEAS/CART,   -9.099554, 9.069627, 52.861583,   0.006477, 0.999979, 0.000000
   PTMEAS/CART,   -7.198416, 9.057314, 52.861241,   0.006477, 0.999979, 0.000000
   PTMEAS/CART,   -3.707237, 9.034702, 52.860611,   0.006477, 0.999979, 0.000000
ENDMES
JUMPTO/(EEE)
ENDIF
(EEE)