Leaderboard

Hi, From the help document and note the last sentence. ENTMOD FUNCTION

There are only four "Boundary lines". These would be the rear property lines for the lots. The Right-of-Way lines define the extents of the streets themselves.

(defun c:MyImportDatTest () (setq fp (getfiled "Select File:" "" "dat" 16)) (if fp (progn (setq f (open fp "r")) (setq numDePlle (read-line f)) (princ (strcat "\nNum De Plle: " numDePlle)) (setq nombreDePoints (read (read-line f))) (princ (strcat "\nNombre De Points: " (rtos nombreDePoints 2 0 ))) (while (setq line (read-line f)) (setq tokens (dos_StrTokens line " ")) (setq pName (nth 0 tokens)) (setq pX (read (nth 1 tokens))) (setq pY (read (nth 2 tokens))) (princ (strcat "\n" pName "," (rtos px 2 2) "," (rtos py 2 2))) ) ) ) (princ) ) Above is a quick example as to how to do this. Note: the above code does require Dos_Lib to be installed prior to running the code. Dos_Lib can be downloaded here: https://wiki.mcneel.com/doslib/home I hope that this helps, regards, hippe013

Thats good to know Tharwat Thank you for that valuable information.

First of all, the "X" at ssget filter will select absolutely all "POLYLINE" on the drawing, and i mean ALL , I take it most it not all blocks are slightly off and you want an easy way to do it. and next you will be needing to align the blocks, etc.. I would suggest to go back to where the original code was "found" and post you're request there. EDIT: I see that this requst is related to this, why not continue that thread instead of craeting a new one Hosyn?