Leaderboard

Newer AutoCAD has this function, maybe around 2018 version. Are you on AutoCAD 2015 as shown in your information? If you have newer, there is PDFSHXTEXT. The OCR with Raster Design only does text in an image AFAIK. P.S. For future reference, PDFSHXTEXT started with AutoCAD 2017.1 from what I found.

Yes, EndARef and EndBRef should be where it couldn't identify a node at the end of the polyline I think, it should be selecting them - let me have a look and a think. There were a couple of lines it didn't like as well, will see what they are doing too EDIT: Just checked what I thought. to get the node blocks assigned to the ends of each polyline there is a 'fuzz factor' - so that if they are not exactly equal it will find them anyway - I've set this at 0.01, a couple of the nodes are slightly further away from the line ends, so we can increase the fuzz factor. Depending on the minimum pipe length you -could- increase this quite a lot, I'll go 10x larger Find and replace: (equal EndA (cdr (assoc 10 (entget BLEnt))) 0.01 ) ; compare the 2 include fuzz factor change to (equal EndA (cdr (assoc 10 (entget BLEnt))) 0.1 ) ; compare the 2 include fuzz factor and the same looking for (equal EndB ..... )

If you are using CIV3D do PURGESTYLESANDSETTINGS 1st this removes a lot of stuff from your CIV3D dwg, but a warning do at end of project. Can though IMPORTSTYLESANDSETTINGS and get them all back. Any block linked to a CIV3d style will not be purged using just purge.

A little LISP with the above: (defun c:purgea( / ) (repeat 3 (command "PURGE" "A" "*" "N") (command "PURGE" "R" "*" "N") ) (princ) ) Repeated 3 times to be sure

Try using initcommandversion.

That is strange. Here is a way to get all the prompts via lisp: (vla-sendcommand (vla-get-activedocument (vlax-get-acad-object)) "_.revcloud ") If you use dimscale or something to set these numbers, it could be a multiplier like so .. just food for thought. (defun c:foo (/ _dimscale doc n) (setq doc (vla-get-activedocument (vlax-get-acad-object))) (defun _dimscale (n) (* n (cond ;;in viewport ((and (zerop (getvar 'tilemode)) (> (getvar 'cvport) 1)) (last (trans '(0 0 1.0) 3 2))) ;;in pspace or dimscale is 0 ((or (= (getvar 'cvport) 1) (zerop (getvar 'dimscale))) 1.) ;;in modelspace ((getvar 'dimscale)) ) ) ) (setq n (vl-princ-to-string (_dimscale 0.25))) (vla-sendcommand doc (strcat "_.revcloud a " n " " n " ")) (princ) ) (vl-load-com)