Import points in csv file and plot it in polyline on cad

[Spatial_Manager]

Hello. For the people who want to import CSV point files (as many others formats and data servers) into plain AutoCAD, AutoCAD Map, AutoCAD Architecture, AutoCAD Civil 3D, etc., you can do it using Spatial Manager for AutoCAD. You can download the beta version (free) from: http://www.spatialmanager.com/downloads/ . Hope this helps

 

Disclaimer: I work for Opencartis SL, developer of Spatial Manager™ products suite

[ReMark]

I think we get the message S_M. Are you planning on resurrecting all old posts where you think your program is the solution?

 

If you want to advertise here why not buy an ad? CADTutor could use the revenue.

[Spatial_Manager]

Well, we have tried to answer only the last relevant posts. If this behavior is not acceptable in this forum, there is no problem if the administrator choose to remove these replies. We are sorry

[eldon]

As your product does not appear to be free of charge, your posts seem to be completely out of context with the ethos of CADTutor.

 

Of course if you were to be permanently giving away Spatial Manager........

[Spatial_Manager]

We do not have versions on sale yet. In all our replies we encourage the readers to try the free beta versions. Sorry again

[ReMark]

Beta only? So, if I liked the program I couldn't actually buy it. Why bother then?

[Spatial_Manager]

Do not worry if you liked the program (we hope...). Beta versions will run without limitations until the versions on sale are available. We are a little company and now we are looking for users who want to test our products while they can solve their own punctual problems. Our goal was not to sell licenses when writing our replies

[ReMark]

I think that information should have been stated right up front.

[Spatial_Manager]

Maybe you're right. Thanks

[hanhphuc]

Here is an example of a excel csv auto strung this took a couple of minutes to make

 

Just copy column J then paste to autocad command line zoom E

 

suggestion pcode in different layer?

command layiso

then try Lee Mac's ptjoin

 

or manually nod2pl

 

(defun c:pcode (/ *error* fn f l p ok lay)
 (defun *error* (msg)
   (if	(and f (= (type f) 'FILE))
     (close f) ;close the file
     ) ;_ end of if
   ) ;_ end of defun
 
 (if (and (setq fn (getfiled "\n" "" "csv;pnt;txt;*" 16)) ; get csv file
   (setq f (open fn "r"))
   ) ;_ end of and
   (progn
   (while (setq $ (read-line f))
     (setq l (read (strcat "( " (vl-string-translate "," " " $) " )"))) ; retriction layer/pcode without spacing
     (if (setq ok (= (length l) 5)) ; format = '( p x y z d )
(progn (foreach x (list car last)
	 (setq l (subst (vl-princ-to-string (x l)) (x l) l)))
       (if (and	(setq lay (last l)
		      p	  (vl-remove-if-not 'numberp (cdr l))
		      ) ;_ end of setq
		(= 3 (length p)) ; format = '( x y z )
		(setq p (trans p 1 0)) ; convert point to ucs
		) ;_ end of and
	 (foreach x '((list
		       '(0 . "POINT")
		       (cons 8 lay) ;(cons 8 "POINT")
		       (cons 10 p)
		       )
		      (list
		       '(0 . "TEXT")
		       (cons 8 lay)
		       (cons 10 p)
		       (cons 1 (rtos (caddr p) 2 2))
		       (cons 40 (getvar 'textsize))
		       )
		      )
	   (entmakex (eval x)) ; create text & point entity foreach supplied dxf data 
	   ) ;_ end of foreach
	 ) ;_ end of if
       ) ;_ end of progn
(setq $ nil) ; exit invalid format
) ;_ end of if
     ) ;_ end of while
(if (not ok)(alert "Invalid format! Should be PXYZD"))
   )
       ) ;_ end of if
 (if (and f (= (type f) 'FILE))
   (close f) ;close the file
   ) ;_ end of if
 (princ)
 ) ;_ end of defun

Edited December 23, 2015 by hanhphuc
add link & comments

[ReMark]

It's nothing personal they just want to suck more money from your wallet. AutoDesk is no different.

 

I'm on subscription, for AutoCAD, which is set to renew August 1st. If the payment arrives even one day late I'll have to pay full cost should I want the next upgrade (AutoCAD 2018).