AutoLISP: Easily Make Isometric Text

If you need to create isometric text  and you are tired of using so many different styles, today’s tip will be your new best friend. Note that this routine only works with DTEXT (single line text).

Here’s how:

  • ISOTEXT <enter>
  • Select the DTEXT object
  • Hit the Tab button to tab through the various isometric slants until you have found the correct one.
  • Once the text looks correct, hit enter
  • Re-position the text accordingly


;; Lee Mac
;; Found @
(defun c:isotext ( / e i j k)
 ;(setq i (/ pi 6.) j -1.)
  (setq i 0 k (/ pi 6.) j -1.)
  ;; © Lee Mac 2011
      (setq e (car (entsel "\nSelect Text: ")))
      (eq (vla-get-Objectname (setq e (vlax-ename->vla-object e))) "AcDbText")
      (princ "\nPress [Tab] to Change Projection <Accept>")
    (while (= 9 (cadr (grread nil 14 0)))
     ;(vla-put-rotation     e i)
      (vla-put-rotation     e (* k (1- (* 2 (setq i (rem (+ i (max 0 (setq j (- j)))) 3))))))
     ;(vla-put-obliqueangle e (setq i (* i (setq j (- j)))))
      (vla-put-obliqueangle e (* j k))

About AutoCAD Tips

This blog serves as a knowledge base for myself (and anyone else) so that I can reference tips & tricks that I have learned and also refer others to it as well. I hope that this blog helps you learn at least one tip to make your drafting/design experience better.
This entry was posted in AutoLISP, AutoLISP: Creating, AutoLISP: Modify, AutoLISP: Text, Isometrics. Bookmark the permalink.

4 Responses to AutoLISP: Easily Make Isometric Text

  1. Pither Rukka says:

    Good…I like that, simple routine but very help especially for piping designer.
    Thank you Greg.

  2. jed says:

    is it possible to have the explode command run before the routine starts so that i could explode the Mtext first.

  3. Godwin says:

    Text on isoplane works on multilinetext and single text

  4. sreekumar says:

    where i can get that lisp

Leave a Reply

Fill in your details below or click an icon to log in: Logo

You are commenting using your account. Log Out /  Change )

Facebook photo

You are commenting using your Facebook account. Log Out /  Change )

Connecting to %s