Change Dimension Text Orientation

[GreyHippo]

When I place a vertical dimension the orientation of the text is top to bottom, is there a way to change the orientation so that it reads from bottom to top? I am using AutoCAD 2008.

[jaberwok]

The only way I can create a vertical dimension with text reading from top to bottom is to have the UCS rotated 180 degrees. :shock:

[irneb]

Or you could select the dims, open properties palette (Ctrl+1) and change the text rotation to one of 0, 90, 180, or 270 (depending on scenario).

But as jaberwok's stated, the quickest way is to create the dim in a UCS which would orient it properly. Unfortunately ACad doesn't have a way of changing an existing dim to a new ucs. Therefore I made a lisp for myself a while back:
;;; Command for setting dimension to current UCS
(defun c:DimUCS (/ ss n en ed ucs)
(prompt "\nSelect dimensions to set to current UCS: ")
(if (and (setq ss (ssget '((0 . "DIMENSION"))))
(> (setq n (sslength ss)) 0)
) ;_ end of and
(repeat n
(setq en (ssname ss (setq n (1- n))) ;Get the nth entity and decrement the counter
ed (entget en) ;Get the DXF data
) ;_ end of setq
(setq ucs (- 0 (angle '(0.0 0.0 0.0) (getvar "UCSXDIR")))) ;Get the current UCS's X-axis direction
(setq ed (subst (cons 51 ucs) (assoc 51 ed) ed)) ;Modify the data
(entmod ed) ;Modify the entity
) ;_ end of repeat
(princ "\nNothing selected ... exiting.")
) ;_ end of if
(princ)
) ;_ end of defunIf loaded, the new command is DimUCS, you're asked to select the dims, and they'll be updated to the current UCS.

[ppombinho]

fantastic

easy to find and works great
thanks

[gellias416117]

Excellent!