(princ "\njgw file NOT found or not correctly formatted!") (princ (strcat "\njgw File Read - " jgw)) (setq bpt (polar bpt (+ (/ pi 2.) rot) (* hgt l1))) (progn (vla-put-imageheight image (* hgt l1)) (setq mvpt (list (nth 4 data) (nth 5 data) 0.0)) (setq data (mapcar 'atof (_readfile jgw))) (setq pre (strcat (vl-filename-directory jgw) "\\")) (setq jgw (getfiled (strcat "***Select >***") pre "jgw" 16)) (setq jgw (findfile (strcat imgpath "\\" name ".jgw"))) (if (and (or (setq jgw (findfile (strcat pre name ".jgw"))) Imgpath (vl-filename-directory (vlax-get image 'imagefile)) (setq opt (cond ((getkword (strcat "\nImage World File : "))) (while (setq line (read-line file)) (setq result (cons (vl-string-trim " " line) result))) ((and (eq 'str (type filename)) (setq file (open filename "r"))) (defun _readfile (filename / file result) (cond ((and (eq 'str (type filename)) (setq file (open filename "w"))) (defun _writefile (filename lst / file result) (while (setq e (ssname ss (setq n (1+ n)))) (setq out (cons (vlax-ename->vla-object e) out))) Needs a file with 6 lines (ScaleX Rotation -Rotation -ScaleY TopLeftXCoord TopLeftYCoord) Added support to create jgw files as well as support rotated images
not in the same directory, the user can browse for the file. it will automatically be found and the image will be scaled and placed. If the jgw exists in same directory and is named the same as the image selected, First insert all tiff images into drawing at whatever scale and insertion point. Reads world tiff file (.jgw) to scale and place image correctly in autocad. This option is a nice workaround if you don’t have the possibility to import directly LandXML in your Revit model.The jgw has the answers here is a lisp version of pick an image and rescale an relocate you should be able to say do a excel of the same thing and copy and paste the insertraster to the command line. Now, you can export the coordinates of these COGO point as a Comma Separated text file, and use this file to create your toposurface in Revit.
Here, make sure to set the Prompt for Description to Automatic, or you will have to type a description for every one of these point, which can be somehow tedious for thousands of points. Then, extract these points as simple AutoCAD points and convert them to COGO points.
To do so, you first have to change the style of your surface to display all its points. You can also import AutoCAD Civil 3D points directly in Revit.
#INSERTAR PDF EN AUTOCAD CIVIL 3D 2014 CODE#
I didn’t found any free plug-in to import directly LandXML in your Revit model, but if you are of the DIY type, you can use the example of code provided by Jeremy Tammik on his blog. The resulting Revit toposurface contains ten times less points than the version created from contour lines, which can be game-changing, especially if your are dealing with large or complex surfaces. Then use the Site Designer to import it back in Revit. Start by exporting your AutoCAD Civil 3D surface in LandXML. If you are a Subscription customer, you have access to the LandXML import from Site Designer, recently added to Revit. Revit creates a surface point along every surface contour, and rebuilts our surface. In the Toposurface tools, I select the imported DWG, and check the layers containing these polylines. I use the Extract Object surface function in AutoCAD Civil 3D to transform every surface contour in a 3D polyline.īack in Revit, I import my surface as a set of 3D polylines following contours in my AutoCAD Civil Surface. But a Civil 3D surface object is not identified when imported in Revit. My first impulse was to import the surface as a DWG, and use it to create my toposurface. I recently worked with AutoCAD Civil 3D and explored the various possibilities for creating toposurfaces in Revit from Civil 3D objects.