Jump to content

Leaderboard

Popular Content

Showing content with the highest reputation on 05/04/2020 in all areas

  1. Tharwat
    Alright then, something like this? (defun c:foo (/ a e) (if (and (setq a (car (entsel "\nSelect text : "))) (or (= (cdr (assoc 0 (setq e (entget a)))) "TEXT") (alert "Invlaid object. Try again") ) (or (numberp (setq a (distof (cdr (assoc 1 e))))) (alert "Invalid contents of text <!>") ) ) (princ (/ a 8.0)) ) (princ) )
    1 point
  2. micky0121
    Thank you f700es . As said just started about 2 days ago so confused , never used cad before so going to be fun . Found it where you said . Mike
    1 point
  3. BIGAL
    Solution at other post.
    1 point
×
×
  • Create New...