Custom point sumbol

Discussion in 'AutoCAD' started by MAP-DUDE, Feb 3, 2005.

  1. MAP-DUDE

    MAP-DUDE Guest

    Can you create a custom "point" symbol like a valve. Bunch of points in a drawing from GIS data. Want to convert points to custom symbol.

    Thanks
     
    MAP-DUDE, Feb 3, 2005
    #1
  2. MAP-DUDE

    lister@rfa Guest

    Are they actual point entities? or are they blocks that look like a point. If this is the case, you can use the express tool for replace one block with another. Probably no help, but the only thing I could think of.
     
    lister@rfa, Feb 3, 2005
    #2
  3. MAP-DUDE

    lister@rfa Guest

    Did a google search and came up with this lisp code:


    (defun C:pT2BLK (/ ss pt blk)
    (while (or (not (setq blk (getstring "\nBlock name: ")))
    (not (tblsearch "block" blk))))
    (prompt "\nSelect points to replace: ")
    (setq ss (ssget '((0 . "POINT"))))
    (if ss
    (progn
    (setq n (1- (sslength ss)))
    (while (>= n 0)
    (setq pt (cdr (assoc 10 (entget (ssname ss n))))
    n (1- n)
    );; setq
    (command "_.insert" blk pt "" "" "")
    );; while
    );; progn
    (alert "No POINT objects selected.")
    );; if
    (princ)
    );; defun
     
    lister@rfa, Feb 3, 2005
    #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.