How to set "z"

Discussion in 'AutoCAD' started by Klif, May 19, 2006.

  1. Klif

    Klif Guest

    coordinates to "0" globally in a dwg?
    TIA
    Klif
     
    Klif, May 19, 2006
    #1
  2. Klif

    Remo Shiva Guest

    FLATTEN if you have version 2004 onwards I think, if not paste the code
    below into notepad and save as Flatten.lsp


    (defun c:flatten ( / ss ans )
    (acet-error-init (list nil 1))

    (princ "\nSelect objects to convert to 2d...")
    (if (not acet:flatn-hide)
    (setq acet:flatn-hide "No")
    );if

    (if (and (setq ss (ssget "_:l" '((-4 . "<NOT") (0 . "VIEWPORT") (-4 .
    "NOT>"))));setq
    (setq ss (car (acet-ss-filter (list ss nil T))))
    );and
    (progn
    (initget "Yes No")
    (setq ans (getkword
    (acet-str-format "\nRemove hidden lines? <%1>: "
    acet:flatn-hide
    )
    );getkword
    );setq
    (if (not ans)
    (setq ans acet:flatn-hide)
    (setq acet:flatn-hide ans)
    );if
    (if (equal ans "No")
    (acet-flatn ss nil)
    (acet-flatn ss T)
    );if
    );progn then
    );if
    (acet-error-restore)
    );defun c:flatten


    (acet-autoload2 '("FLATTENSUP.LSP" (acet-flatn ss hide)))
    (princ)
     
    Remo Shiva, May 19, 2006
    #2
  3. Klif

    Forts17 Guest

    You could also adjust the coordinates via the properties tool window.
     
    Forts17, May 21, 2006
    #3
Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments (here). After that, you can post your question and our members will help you out.
Similar Threads

  1. Anyone know how to set pagesetup settings from lisp?

  2. How to set MRUNumber object

  3. How to set opened document Active with VL.

  4. How do I create and set current a Named Layer Filter?

  5. How to set default

  6. How to set default LineSpacing in MTEXT?

  7. How to set process/mismatch parameters in Ocean?

  8. Sheet set plotting with page set-up override

Loading...