Harness the power of custom programming to increase your AutoCAD productivity. Used for dimension comparison, and the properties of the layer assigned to.
Hello there!!! Have a question, maybe someone had a deal with it.I have a coordinate with X and Y, no Z (0.00), but have Z in number near that point, I need now to assign that number to that point like this diagram maybe: 1. Pick number 2. Pick point 3. Assign number to point I have a lisp that extract Z coord from point to text (so this would be opposite reaction) I have a situation of about 2000 points that don't have Z coordinates but have a number in text format, so it would be complicated to edit every point manually.If anyone have any idea I would be grateful. Try this (when you get home ) (defun c:putZ (/ dxf txt2num ELST ENT I PT SS TLAY TLST TSS Z) (vl-load-com) (setq tLay 'Text') [color=Red][b].
Having looked at the file, I would say that a completely automatic lisp would be impossible in places, due to the relative placement of the elevation text in relation to the ground point. For example, the text is not at a consistent displacement left or right. In areas of congested detail, some levels are on top of other ground points, so a programme to search for the closest text would choose the wrong one. Zip maker for mac.
In some areas there is no elevation text for a ground point. Some of the ground points are blocks. All in all, I would go for a manual approach. I hesitate to post my lisp to do this, because last time, I was chided for producing an untidy lisp. All I know is that it works, and for 2000 points, you could do that in an hour or so. With Osnaps set to suitable settings, the work goes quite fast, even if it is one at a time. Having looked at the file, I would say that a completely automatic lisp would be impossible in places, due to the relative placement of the elevation text in relation to the ground point.
For example, the text is not at a consistent displacement left or right. In areas of congested detail, some levels are on top of other ground points, so a programme to search for the closest text would choose the wrong one. In some areas there is no elevation text for a ground point.
Some of the ground points are blocks. All in all, I would go for a manual approach. I hesitate to post my lisp to do this, because last time, I was chided for producing an untidy lisp. All I know is that it works, and for 2000 points, you could do that in an hour or so. With Osnaps set to suitable settings, the work goes quite fast, even if it is one at a time.
Thx for your time Eldon, manual approach lisp would also be good in this case, maybe much more better solution than automatic lisp8). You have to set up the Osmode variable according to the list below. It is currently set for Node, Insertion and Intersection. It works one point at a time, but by pressing the right mouse button, it starts again.
There are no error traps. I hope it works for you. Sets running Object Snap modes using the following bitcodes: 0 NONe 1 ENDpoint 2 MIDpoint 4 CENter 8 NODe 16 QUAdrant 32 INTersection 64 INSertion 128 PERpendicular 256 TANgent 512 NEArest 1024 QUIck 2048 APParent Intersection 4096 EXTension 8192 PARallel To specify more than one object snap, enter the sum of their values. Microsoft office. For example, entering 3 specifies the Endpoint (bitcode 1) and Midpoint (bitcode 2) object snaps.