dimension value in autocad reverse rotation

[mdchuyen]

Drawing1.dwgFetching info...

Hello friends
I have a drawing where the dimension values are currently being reversed. Do you guys have any solution to handle my attached drawing. Hope the helping

[mhupp]

@SLW210 This isn't really a lisp issue its more of a interface one.

 

They were made when facing the wrong way (Bottom view I think). So their 210 looks like (210 0.0 0.0 -1.0)

 

This will mirror them around but the right way but also wont 100% fix the issue. because some will have to be adjusted.

;;----------------------------------------------------------------------------;;
;; Flips Backwards ploylines
(defun C:SWAP (/ SS)
  (if (setq SS (ssget "_X" '((210 0.0 0.0 -1.0))))
    (progn
      (vl-cmdf "_.Mirror3d" SS "" "xy" "0,0,0" "y")
      (prompt (strcat "\nEntities Swapped: " (itoa (sslength SS))))
    )
    (prompt "\nNothing to Swap!")
  )
  (princ)
)

 

 

 

[mdchuyen]

  On 1/13/2023 at 3:20 AM, mhupp said:

@SLW210 This isn't really a lisp issue its more of a interface one.

 

They were made when facing the wrong way (Bottom view I think). So their 210 looks like (210 0.0 0.0 -1.0)

 

This will mirror them around but the right way but also wont 100% fix the issue. because some will have to be adjusted.

;;----------------------------------------------------------------------------;;
;; Flips Backwards ploylines
(defun C:SWAP (/ SS)
  (if (setq SS (ssget "_X" '((210 0.0 0.0 -1.0))))
    (progn
      (vl-cmdf "_.Mirror3d" SS "" "xy" "0,0,0" "y")
      (prompt (strcat "\nEntities Swapped: " (itoa (sslength SS))))
    )
    (prompt "\nNothing to Swap!")
  )
  (princ)
)

 

 

 

Expand  

thank you very much. It helps me a lot

[mdchuyen]

  On 1/13/2023 at 3:20 AM, mhupp said:

@SLW210 This isn't really a lisp issue its more of a interface one.

 

They were made when facing the wrong way (Bottom view I think). So their 210 looks like (210 0.0 0.0 -1.0)

 

This will mirror them around but the right way but also wont 100% fix the issue. because some will have to be adjusted.

;;----------------------------------------------------------------------------;;
;; Flips Backwards ploylines
(defun C:SWAP (/ SS)
  (if (setq SS (ssget "_X" '((210 0.0 0.0 -1.0))))
    (progn
      (vl-cmdf "_.Mirror3d" SS "" "xy" "0,0,0" "y")
      (prompt (strcat "\nEntities Swapped: " (itoa (sslength SS))))
    )
    (prompt "\nNothing to Swap!")
  )
  (princ)
)

 

 

 

Expand  

This is what it is, isn't it?

[mhupp]

Yes, whomever was in that view when the dimension where made or they got flipped somehow. making them upside down when viewed from top