Dimensions in looping?

Collapse
X
 
  • Filter
  • Time
  • Show
Clear All
new posts

  • Dimensions in looping?

    I have a part with 24 equally spaced slots around an outer diameter. I could have used a pattern for this example, but I have other situations where a pattern would not work.

    While the loop works just fine, what I was hoping for was that the the loop would perform the allignment rotation and all my dimension would report the true nominals and not adjust like what happens when you use a pattern.

    example: the 15.22 dim in my code below is just a radius taken on a 30.44 diameter which is done 24 times around the part. I would like the nominal to report 15.22 for each point and not change. Can this be done?

    I hope I wasnt too confusing with what I was trying to say.




    V6 =LOOP/START, ID = YES, NUMBER = 24, START = 1, SKIP = ,
    OFFSET: XAXIS = 0, YAXIS = 0, ZAXIS = 0, ANGLE = 15

    PT18 =FEAT/POINT,RECT
    THEO/15.305,-0.255,-0.12,0,1,0
    ACTL/15.3052,-0.2589,-0.12,0,1,0
    MEAS/POINT,1
    MOVE/CLEARPLANE
    HIT/BASIC,NORMAL,15.305,-0.255,-0.12,0,1,0,15.3052,-0.2589,-0.12,USE THEO = YES
    ENDMEAS/

    PT19 =FEAT/POINT,RECT
    THEO/15.305,0.255,-0.12,0,-1,0
    ACTL/15.3047,0.25,-0.12,0,-1,0
    MEAS/POINT,1
    HIT/BASIC,NORMAL,15.305,0.255,-0.12,0,-1,0,15.3047,0.25,-0.12,USE THEO = YES
    ENDMEAS/

    PT22 =FEAT/POINT,RECT
    THEO/15.305,0,-0.12,0,0,1
    ACTL/15.305,-0.0044,-0.12,0.000002,-0.0000008,1
    CONSTR/POINT,MID,PT18,PT19

    PT21 =FEAT/POINT,RECT
    THEO/15.22,0,-0.12,1,0,0
    ACTL/15.2169,0,-0.12,1,0,0
    MEAS/POINT,1
    HIT/BASIC,NORMAL,15.22,0,-0.12,1,0,0,15.2169,0,-0.12,USE THEO = YES
    ENDMEAS/

    DIM CHAR_76_5= TRUE POSITION OF POINT PT22 UNITS=IN ,$
    GRAPH=OFF TEXT=OFF MULT=10.00 OUTPUT=BOTH DEV PERPEN CENTERLINE=OFF DISPLAY=DIAMETER
    AX MEAS NOMINAL +TOL -TOL BONUS DEV OUTTOL
    X 15.3050 15.3050 0.0000
    TP RFS 0.0100 0.0000 0.0001 0.0000 #--------
    END OF DIMENSION CHAR_76_5

    DIM DIST3= 2D DISTANCE FROM POINT PT18 TO POINT PT19 (CENTER TO CENTER), NO_RADIUS UNITS=IN ,$
    GRAPH=OFF TEXT=OFF MULT=10.00 OUTPUT=BOTH
    AX MEAS NOMINAL +TOL -TOL DEV OUTTOL
    M 0.5089 0.5100 0.0050 0.0050 -0.0011 0.0000 ---#-----

    DIM CHAR_76_6= LOCATION OF POINT PT21 UNITS=IN ,$
    GRAPH=OFF TEXT=OFF MULT=10.00 OUTPUT=BOTH
    AX MEAS NOMINAL +TOL -TOL DEV OUTTOL
    X 15.2169 15.2200 0.0050 0.0050 -0.0031 0.0000 -#-------
    END OF DIMENSION CHAR_76_6

    LOOP/END

  • #2
    Version of PCDMIS being used?

    Comment


    • #3
      its pcdmis 3.7 mr2

      Comment


      • #4
        Anyone? No answers? Surely Im not the only one that this drives nuts.

        Comment


        • #5
          1) for the radial point you could use a R instead of an X...

          2) I think you have to incorporate a coordinate system rotation in the loop. I did this not to long ago and the angle in the loop is for changing the feature locations but not rotating the CS.
          Links to my utilities for PCDMIS

          Comment


          • #6
            Try this

            Mm=0

            V6 =loop/start, Id = Yes, Number = 24, Start = 1, Skip = ,
            Offset: Xaxis = 0, Yaxis = 0, Zaxis = 0, Angle = 0

            A1 =alignment/start,recall:autoalign, List= Yes
            Alignment/rotate_offset,(mm*15),about,zplus
            Alignment/end

            Pt18 =feat/point,rect
            Theo/15.305,-0.255,-0.12,0,1,0
            Actl/15.3052,-0.2589,-0.12,0,1,0
            Meas/point,1
            Move/clearplane
            Hit/basic,normal,15.305,-0.255,-0.12,0,1,0,15.3052,-0.2589,-0.12,use Theo = Yes
            Endmeas/

            Pt19 =feat/point,rect
            Theo/15.305,0.255,-0.12,0,-1,0
            Actl/15.3047,0.25,-0.12,0,-1,0
            Meas/point,1
            Hit/basic,normal,15.305,0.255,-0.12,0,-1,0,15.3047,0.25,-0.12,use Theo = Yes
            Endmeas/

            Pt22 =feat/point,rect
            Theo/15.305,0,-0.12,0,0,1
            Actl/15.305,-0.0044,-0.12,0.000002,-0.0000008,1
            Constr/point,mid,pt18,pt19

            Pt21 =feat/point,rect
            Theo/15.22,0,-0.12,1,0,0
            Actl/15.2169,0,-0.12,1,0,0
            Meas/point,1
            Hit/basic,normal,15.22,0,-0.12,1,0,0,15.2169,0,-0.12,use Theo = Yes
            Endmeas/

            Dim Char_76_5= True Position Of Point Pt22 Units=in ,$
            Graph=off Text=off Mult=10.00 Output=both Dev Perpen Centerline=off Display=diameter
            Ax Meas Nominal +tol -tol Bonus Dev Outtol
            X 15.3050 15.3050 0.0000
            Tp Rfs 0.0100 0.0000 0.0001 0.0000 #--------
            End Of Dimension Char_76_5

            Dim Dist3= 2d Distance From Point Pt18 To Point Pt19 (center To Center), No_radius Units=in ,$
            Graph=off Text=off Mult=10.00 Output=both
            Ax Meas Nominal +tol -tol Dev Outtol
            M 0.5089 0.5100 0.0050 0.0050 -0.0011 0.0000 ---#-----

            Dim Char_76_6= Location Of Point Pt21 Units=in ,$
            Graph=off Text=off Mult=10.00 Output=both
            Ax Meas Nominal +tol -tol Dev Outtol
            X 15.2169 15.2200 0.0050 0.0050 -0.0031 0.0000 -#-------
            End Of Dimension Char_76_6

            Mm=mm+1

            Loop/end

            Comment

            Related Topics

            Collapse

            Working...
            X