All Activity

Might as well join the party, yes easy task, but missing. is co-ords to be labelled in some way so know which co-ords match which point.. Need you to post a proper dwg with desired table all set up, text height, column widths and so on.

@dexus Your animations are really original although I don’t think I managed to see exactly the same thing you showed in your video. But that doesn’t matter. Today I had the whole afternoon free, and I decided to try to “stress-test” your code. I drew several irregular margins and also tried to draw something resembling a “inlet” like the ones GLAVCVS mentions. However, the result was very consistent. In no case was it possible to make the centerline “lose orientation.” It only failed in the case of closed margins, as shown in the attached image. But I assume this happens because you didn’t consider that possibility, given the context of the rest of my examples. Also, there are a few minor details in some wide curves where the centerline clearly drifts away from the middle. Overall, the result is EXCELLENT. Regarding the “inlets” that @GLAVCVS mentions, I suppose it would be great to have a tool capable of robustly handling those cases. But, normally, these situations only occur in a few places and can be handled manually. In any case, a tool like that would definitely put its author’s name on the map. PS: I've attached the drawing of the image. AxisExple3.dwg

removed

It could be as simple as changing "all" to "ss", where ss is a selection set. I am no expert on setting the exclude objects in a selection set. try this not really tested. (setq ss (ssget "_X" '((-4 . "<NOT") (0 . "3DSOLID") (-4 . "NOT>")))) or _move;(setq ss (ssget "_X" '((-4 . "<NOT") (0 . "3DSOLID") (-4 . "NOT>"))));;0,0,0;0,0,1e99;_move;ss;;0,0,0;0,0,-1e99

As above, need more information as where the data is coming from and how you want the LISP to run. The one I use "EOLA", "EOLB" (End "A" of line and End "B" of line) I run by pick line, pick text to replace - having created the template before hand (well, LISP does that). Might be you want the coordinates of circles and the table to be created in the order you select them, or ordered left to right, right to left, so could do with a bit more to work with.

"pr2" is precision - here 2 places, "pr1" at the end of the first expression is 1 decimal place

You could try the search function... maybe this thread from lasty week might help?

Below is the radius I keep getting after using a 60 item polar array for the width. I then drew 3 point arcs from offset line to the pitch intersection and then the root. I think this is where I'm going wrong, but don't know how to correct it.

hello all: I use this routine to lower all selected objects to z0 The problem is that it also affects 3D solids if I have them. Is there a way to modify the code excluding 3D solids from the selection? _move;_all;;0,0,0;0,0,1e99;_move;_p;;0,0,0;0,0,-1e99 I appreciate the comments and hope they can help me.

As the title states, I am trying my best to create this drawing for my AutoCAD class, but I am having no luck due to missing information and my lack of skills. This is the first module where we are covering 3D modeling so the textbook has been no help other than basic commands. What I am most frustrated with is not having the tooth width. I have started by drawing the diameters of the circles. Then I drew a line from center to outside most circle quadrant. From there I used polar array on the line with 60 items to hopefully get the tooth width or a way of drawing the arcs, but I am having no luck. I realize I am probably going about this wrong, so any help would be much appreciated. The lack of information in this class has been very frustrating for a beginner like myself. In what situation would I not have the tooth width when drawing? Why do I have to derive information when I'm just learning the software.... Anywho, please help me before I go insane. Thanks!!!!

Application: BricsCAD V26 Goal: To modify layer names to display as UPPER CASE from Title Case (Example: From existing layer name as "Trim" to "TRIM") Issues: As coded, the existing layer names in Title Case are not being processed. The confirmation message wrongly states that UPPER CASE was applied to the layer names when it was not. Help Needed: Please review the attached program and suggest needed edits. Resources My programming skills continue to grow. I am assembling snippets from various sources. Best regards, Clint UPPERCASE-LAYER-NAMES.lsp

There are several fields with 1 decimal place. Is there a way to convert selected fields with 1 decimal place into fields with 2 decimal places without losing the connection of fields with objects? The field is 1 decimal place %<\AcExpr (3.1416*%<\_FldPtr 1317270971888>%^2/4*0.0785*%<\_FldPtr 1317270971632>%*%<\_FldPtr 1317270971472>%/10000) \f "%lu2%pr1">% The field is 2 decimal places %<\AcExpr (3.1416*%<\_FldPtr 1317157078864>%^2/4*0.0785*%<\_FldPtr 1317157078096>%/10000) \f "%lu2%pr2">% fields.dwg

Need a little more info than "gather coordinates from multiple places" how do you want to do that? and from what places? are these entity's in the drawing or txt/cvs files? like Jonathann3891 suggestion here is one lee made for polylines https://www.lee-mac.com/polyinfo.html Attach some sample drawings or files.

This might be much easier using a simple block and utilizing data extraction on said block.

I need a lisp command that will allow me to gather coordinates from multiple places and then put that information into a table

Simply type in command line : TRIMEXTENDMODE and press enter, then change the value to "0"

Do you have the paths set up correct for where your images are saved, check Support, Trusted and Icon paths in Options, Files.

The problem I had with lambda's is getting them into a new workbook when I needed them. This VBA code will load them with a click/call. just need to convert quotes to double quotes. Sub LoadLambda() ActiveWorkbook.Names.add Name:="todec", RefersToR1C1:="=LAMBDA(imperial,[to_cFactor],LET(cf,IF(ISOMITTED(to_cFactor),1,to_cFactor),si,IF(LEFT(imperial,1)=""-"",-1,1),IF(ISBLANK(imperial),""n/a"",IF(ISNUMBER(imperial),imperial*cf,LET(ft,IFERROR(ABS(VALUE(LEFT(imperial,(FIND(""'"",imperial)-1)))),0),in,TRIM(SUBSTITUTE(SUBSTITUTE(IFERROR(RIGHT(imperial,LEN(imperial)-FIND(""'"",imperial)),imperial),""-"",""""),"""""""","""")),IFERROR(si*(ft*12+VALUE(IF(ISERR(AND(FIND("" "",in),FIND(""/"",in))),IFERROR(VALUE(""0 ""&in),in),in)))*cf,""n/a""))))))" ActiveWorkbook.Names("todec").Comment = "Convert various imperial format feet-inches to decimal with optional argument convert to-factor [cFactor]" End Sub

What programme are you using, and what level of detail do you need to model to? If you're looking to produce construction-type drawings, then, as Remark said, you need to keep the tops of your walls flat but show other elements to achieve the junction. If you're using AutoCAD Architecture to produce less detailed/non-construction drawings, then it has a command to "extend wall to roof" (I think that's what it's called-try a right click on the wall) that will sort it for you. If you're using some other software, you'll have to investigate how that software works- hopefully your training material covers it, or google or someone here will. dJE

Ufff… I see a lot has happened in this thread since my last visit I’ve been busy with a couple of very urgent matters, but I’m going to try to catch up again. The results achieved by Dexus are very good. It seems there’s not much left to improve. Maybe getting a simpler and faster code? Also, the problem of the “recodos/inlet/recess” is still there: as long as there isn’t a code that can compute a centerline for two margins, whether they have recodos/inlets/recesses or not, there will continue to be thousands of unsuccessful searches for this problem on the web. I think finding a solution for this is a good goal. I’ll try to focus my next piece of code in that direction.

hello every body , I created a CUIX file in AutoCAD and set images for the panel icons, but their images don’t load and a question mark appears. The image format is PNG even i chaned that images to .bmp format but result is same ! whats the solution? (that problem doesn't occurs in all version.)

I don’t have a lot of lisp routines to test with, only the ones I use to benchmark with, they work, except _VL-TIMES is missing I was able to compile and load Python, most of the simple scripts I tested seem to work, on the fence on whether or not publish anything. There’s some weirdness preventing me from running my unit tests.

To make walls reach the roof at an angle, you need to use a sloped wall or roof tool, or adjust the wall heights and vertices so each segment follows the desired slope. The white lines between joined boxes are internal edges or seams; to remove them, merge vertices, weld edges, or delete internal edges, and make sure all surfaces have the same material with smooth shading enabled so the lines no longer appear.

Thanks LRM i do admit the task has a lot of posts and probably skipped over the one about using TIN's.