Jump to content

Leaderboard

Popular Content

Showing content with the highest reputation on 11/09/2021 in all areas

  1. Try this mod... (defun C:UnFormat-MTEXT ( / select ss txt entity ) (initget "All Select") (setq select (getkword "\nSelect text to change [All/Select] <Select> : ")) (if select (cond ( (= select "All") (setq SS (ssget "_X" '((0 . "MTEXT")))) ) ( (= select "Select") (setq SS (ssget "_:L")) ) ) (setq SS (ssget "_:L")) ) (foreach ent (vl-remove-if (function listp) (mapcar (function cadr) (ssnamex SS))) (setq txt (LM:gettextstring ent)) (setq txt (LM:UnFormat txt t)) (setq entity (entget ent)) (entupd (cdr (assoc -1 (entmod (subst (cons 1 txt) (assoc 1 entity) entity))))) ;;; I am not sure about DXF 1 Group Code for MTEXT... ) (princ) )
    2 points
  2. 1 point
  3. Getkwords must match initget try: (getkword "\nSelect text to change: All or Select? ") A, S, All, Select, all & select would all be valid responses as well as picking with the mouse.
    1 point
  4. More detail needed. Are you talking a 3d surface ? Then CSD could do it for you, just need to paste multi surfaces together to get a final surface. Stream + Weir + Waterfall + Base.
    1 point
  5. From what i remember about AutoCAD your standard style text height is set to 0.0938 and is overwriting anything you change it to. if you change that value to 0 it defualts to user defined heights. this is why it works when you change it to another style it has a value of 0 probably. BriscsCAD it will default to the style text height when creating any text but allows you to change it to what ever you want. --Edit-- same applys to dimsyle
    1 point
×
×
  • Create New...