不操千曲而后晓声，观千剑而后识器。这篇文章主要讲述RationalDMIS 7.1 CASE分支选择语句之循环选择测量孔相关的知识，希望能为你提供帮助。

MODE/PROG,MAN

(START)

DECL/COMMON,CHAR,20,DEMO

KNPTN1 = PROMPT/TEXT, 请选择测量的孔号！,list,DEMO,CIR1,CIR2,CIR3,CIR4

SELECT/DEMO

CASE/CIR1
F(CIR1) = FEAT/CIRCLE,INNER,CART, -30.499999, -30.499997, -0.000000,$
0.000000, 0.000000, 1.000000, 15.000000
$$ Measurement points are created through nominal points
MEAS/CIRCLE, F(CIR1), 4
GOTO/CART,-34.967811, -31.037258, 9.000000
PTMEAS/CART,-37.946353, -31.395432, -2.000000, 0.992847, 0.119391, 0.000000
GOTO/CART,-34.422118, -32.706119, -2.000000
GOTO/CART,-33.279318, -34.039118, -2.000000
GOTO/CART,-31.713392, -34.833318, -2.000000
PTMEAS/CART,-29.604564, -37.946352, -2.000000, -0.119391, 0.992847, 0.000000
GOTO/CART,-28.293876, -34.422117, -2.000000
GOTO/CART,-26.960877, -33.279317, -2.000000
GOTO/CART,-26.166677, -31.713391, -2.000000
PTMEAS/CART,-23.053644, -29.604562, -2.000000, -0.992847, -0.119391,$
0.000000
GOTO/CART,-26.577879, -28.293875, -2.000000
GOTO/CART,-27.720679, -26.960876, -2.000000
GOTO/CART,-29.286605, -26.166676, -2.000000
PTMEAS/CART,-31.395433, -23.053642, -2.000000, 0.119391, -0.992847, 0.000000
GOTO/CART,-31.037259, -26.032184, 9.000000
ENDMES
ENDCAS
CASE/CIR2
F(CIR2) = FEAT/CIRCLE,INNER,CART, 30.500001, -30.499997, -0.000000,$
0.000000, 0.000000, 1.000000, 15.000000
$$ Measurement points are created through nominal points
MEAS/CIRCLE, F(CIR2), 4
GOTO/CART,26.007352, -30.757093, 9.000000
PTMEAS/CART,23.012252, -30.928491, -2.000000, 0.998367, 0.057133, 0.000000
GOTO/CART,26.447721, -32.456786, -2.000000
GOTO/CART,27.505013, -33.858575, -2.000000
GOTO/CART,29.018265, -34.749050, -2.000000
PTMEAS/CART,30.928495, -37.987747, -2.000000, -0.057133, 0.998367, 0.000000
GOTO/CART,32.456790, -34.552277, -2.000000
GOTO/CART,33.858579, -33.494985, -2.000000
GOTO/CART,34.749055, -31.981733, -2.000000
PTMEAS/CART,37.987751, -30.071503, -2.000000, -0.998367, -0.057133, 0.000000
GOTO/CART,34.552282, -28.543208, -2.000000
GOTO/CART,33.494990, -27.141419, -2.000000
GOTO/CART,31.981738, -26.250944, -2.000000
PTMEAS/CART,30.071507, -23.012247, -2.000000, 0.057133, -0.998367, 0.000000
GOTO/CART,30.242905, -26.007347, 9.000000
ENDMES
ENDCAS
CASE/CIR3
F(CIR3) = FEAT/CIRCLE,INNER,CART, 30.500001, 30.500003, -0.000000, 0.000000,$
0.000000, 1.000000, 15.000000
$$ Measurement points are created through nominal points
MEAS/CIRCLE, F(CIR3), 4
GOTO/CART,26.609625, 28.238373, 9.000000
PTMEAS/CART,24.016041, 26.730619, -2.000000, 0.864528, 0.502584, 0.000000
GOTO/CART,27.771251, 26.921747, -2.000000
GOTO/CART,29.348304, 26.149878, -2.000000
GOTO/CART,31.100693, 26.040276, -2.000000
PTMEAS/CART,34.269385, 24.016042, -2.000000, -0.502584, 0.864528, 0.000000
GOTO/CART,34.078258, 27.771252, -2.000000
GOTO/CART,34.850127, 29.348306, -2.000000
GOTO/CART,34.959729, 31.100694, -2.000000
PTMEAS/CART,36.983962, 34.269387, -2.000000, -0.864528, -0.502584, 0.000000
GOTO/CART,33.228752, 34.078259, -2.000000
GOTO/CART,31.651699, 34.850128, -2.000000
GOTO/CART,29.899310, 34.959730, -2.000000
PTMEAS/CART,26.730618, 36.983964, -2.000000, 0.502584, -0.864528, 0.000000
GOTO/CART,28.238371, 34.390379, 9.000000
ENDMES
ENDCAS
CASE/CIR4
F(CIR4) = FEAT/CIRCLE,INNER,CART, -30.499999, 30.500003, -0.000000,$
0.000000, 0.000000, 1.000000, 15.000000
$$ Measurement points are created through nominal points
MEAS/CIRCLE, F(CIR4), 4
GOTO/CART,-33.350447, 27.017914, 9.000000
PTMEAS/CART,-35.250745, 24.696521, -2.000000, 0.633433, 0.773798, 0.000000
GOTO/CART,-31.800931, 26.192153, -2.000000
GOTO/CART,-30.053361, 26.022223, -2.000000
GOTO/CART,-28.373787, 26.533995, -2.000000
PTMEAS/CART,-24.696516, 25.749256, -2.000000, -0.773798, 0.633433, 0.000000
GOTO/CART,-26.192149, 29.199070, -2.000000
GOTO/CART,-26.022219, 30.946641, -2.000000
GOTO/CART,-26.533990, 32.626215, -2.000000
PTMEAS/CART,-25.749252, 36.303485, -2.000000, -0.633433, -0.773798, 0.000000
GOTO/CART,-29.199066, 34.807853, -2.000000
GOTO/CART,-30.946636, 34.977783, -2.000000
GOTO/CART,-32.626210, 34.466011, -2.000000
PTMEAS/CART,-36.303481, 35.250750, -2.000000, 0.773798, -0.633433, 0.000000
GOTO/CART,-33.982088, 33.350451, 9.000000
ENDMES
ENDCAS
ENDSEL

JUMPTO/(START)