All Activity

Can you post a sample dwg, tested on dummy dwg's.

Alright, I've been searching and searching on here and I feel like an idiot but maybe it's all the OT I've been working and I'm tired but I'm TOTALLY lost on sheets 4 and 5. I was hoping to be done with this structural project today or tomorrow so I could get to working on the civil since I have a promotion waiting for me at work when it's done and this whole project is driving me nuts. I'm not even gonna use any of this whole degree. I just have to appease "pencil pushers" so here I am. Ok, rant over....lol...more specifically, where do I find the dimensions for this stuff?

I've just tried the above code with the necessary changes but cannot get it to work for some reason. Running the code as written produces no change in any attributes. I've changed the file path to be correct, as well as replacing "MATERIAL" with a tag name that is actually used in my blocks. It also seems that this portion: (foreach att atts (setq tname (vlax-get att 'Tagstring)) (if (= tname "MATERIAL") (vlax-put att 'Textstring "TEST") ) changes all tags of a certain type to a new value. I would like to change the value of the tag named "RATING1" for all components with value "CT-1" in tag named "COMPID", and do this across all drawings. All of that to say, I'm new to this and probably just using it incorrectly, but after doing all the learning that I can for now, I'm not sure what I'm doing wrong, or if the code's intention matches my goal.

I am not aware of any major changes. They may have revised the project instructions re: errors, misspellings, etc.

I might just do that!!

Have a go at adding this vehicle, they are daunting when you meet them on the road. Let alone the 3 x 19m petrol tankers. Recording 2026-03-01 183700.mp4

yep I've been on here all morning. I know there was some mention of some slight changes to the plans over the years. Do you know if any major changes were made from 2018 to now? I'm seeing some conflicting versions and I wasn't sure if there were changes or if some drawings weren't finished yet

If you finished the residential house project, then you shouldn't have any problems with the structural project. Plan view, elevation view, sectional view and details is pretty much a standard whether it is a house that is being designed or a commercial building (ex. - warehouse, office building, etc.).

Images of Plate 1, of the Penn-Foster structural project, are posted throughout various threads contained within this forum.

You have a few choices in executing this task, you can add a macro in Excel rtaher than write a script asks for a point in your CAD, Acad or Bricscad plus others, then puts the value into your spread sheet X & Y so co-ordinates are made for the pline. Your macro than adds the pline by calling a Sub in Excel. 3 pt pline for you just call the co-ords in a loop. Sub alan3() 'Dim coords(0 To n) As Double Dim coords(0 To 5) As Double coords(0) = -6: coords(1) = 1: coords(2) = 3: coords(3) = 5: coords(4) = 7.55: coords(5) = 6.25: col = 1 Call addpoly(coords, col) End Sub The other way is to read the co-ords from Excel it looks like there a fixed number of rows. Can enter X & Y from cad via a pick point, then read co-ords. That seems simplest for moment as Excel is doing the calculations. I did something similar for some one else and looked at converting to all in lisp but the lookup tables were getting immense so just wrote and read Excel. The only question I guess is which MS12, IB11 and so on.may be able to do a front end for that choice. Will have a go at say MS12 as a start. let me know if on correct path, ; https://www.cadtutor.net/forum/topic/99002-pline-script-file-keeps-failing/ ; read excel draw pline : By AlanH Feb 2026 (defun c:wow ( / myxl mysheet row lst k) (defun getcell (cellname / ) (setq myRange (vlax-get-property (vlax-get-property myxl "ActiveSheet") "Range" cellname)) (princ (vlax-variant-value (vlax-get-property myRange 'Value2))) ) ; Count will be 0 if no excel open but if no workbooks also may return same value. Nil names. ; So a double check count /=0 and wb not "" (princ "\nOpening Excel...") ;; Try to get or create Excel instance (setq myxl (vl-catch-all-apply 'vlax-get-or-create-object '("Excel.Application"))) (if (vl-catch-all-error-p myxl) (progn (prompt "\nError: Could not start Excel.") (exit) ) ) (if (= (vlax-get-property (vlax-get-property myXL 'WorkBooks) 'count) 0) (vlax-invoke-method (vlax-get-property myXL 'WorkBooks) 'Add) ) (vla-put-visible myXL :vlax-true) (vlax-put-property myxl 'ScreenUpdating :vlax-true) (vlax-put-property myXL 'DisplayAlerts :vlax-true) (setq mySheet (vl-catch-all-apply 'vlax-get-property (list (vlax-get-property myxl "Sheets") "Item" "XY Table"))) (vlax-invoke-method mySheet "Activate") (setq row 52) (setq lst '()) (repeat 7 (setq lst (cons (getcell (strcat "B" (rtos row 2 0))) lst)) (setq row (1+ row)) ) (setq lst (cons "C" lst)) (setq lst (reverse lst)) (setq oldsnap (getvar 'osmode)) (setvar 'osmode 0) (setq k -1) (command "pline") (repeat (length lst) (command (nth (setq k (1+ k)) lst)) ) (command "Zoom" "E") (setvar 'osmode oldsnap) (if (not (vlax-object-released-p myXL))(progn(vlax-release-object myXL)(setq myXL nil))) (princ) ) draw object xl bricscad.xlsm draw object xl acad.xlsm

See the two sheets attached. First one is the dimensions, second is the one where the PLINE command is written. PLINE Example.xlsm

Have a look at this it's a hatch answer, may be similar to what you want. https://forums.autodesk.com/t5/visual-lisp-autolisp-and-general/problem-with-lisp-files/td-p/14027683 Let me know if want more info.

If you have a Excel spreadsheet with the info like the DCL above, you do not need the XY points calculated as they will be calculated by the lisp. Can you post the Excel or at least an image. PS can read Excel from CAD.

I just am not that familiar with LISP commands, never used them. This is my first time where I needed many sections. Plus the geometry was defined on excel based on the contract plans. Chamfer thicknesses vary linearly.

Any reason why you would not use a lisp ? Very simple shape to make. Just ask. The DCL front end took 1 minute to make. Could add more shapes.

Am not sure if that would work, I use something along the lines of this link: But Lee Macs code - the one I use is VLA- and VLAX- so not sure it would work in LT. There is a simpler example entmake a hatch which might be what you want to do?

So I am using this to try and take a list of points to use the with the hatch Draw command, but I cant get the Hatch command to accept the points in the list. I think it has something to do with the command-s needing to start and finish in the same function call, but I am not sure. Can anyone confirm this? (initcommandversion) (command-s "hatch" "_k" "_d" "_al" "_o" "_w" "4" "_m" "_p") (while (= (getvar "cmdactive") 1 ) (repeat (setq x (length bd-lst)) (command (nth (setq x (- x 1)) bd-lst)) ) (command "") )

If anyone happens to have a picture of what Sheet 1 should look like that would be a great start. I'm kinda lost here

I am currenly working on the Structural Drafting Project and the instructions are nightmarish. Keep cadtutor open, it has been such a huge help.

Thanks Lee. I got it to work. Used this (initcommandversion) (command-s "hatch") No -hatch or it wouldnt work as intended.

Such a tool would be https://www.theswamp.org/index.php?topic=58808.0

Try using (initcommandversion) before the command call.

Alright guys, so far my cad experience through Penn foster has been pretty rough to say the least...lol...starting the Structural Drafting portion now. Anything I should be aware of? Any input would be appreciated.

Yep! That's the fix.

Hi everyone, I am using ACAD2025LT and I was looking into the newer "Draw" hatch feature, where you can type hatch and tell the command that you want to draw a hatch along a sort of polyline that you pick. You can pick Alignment, Width whether its going to be just a rectangle or circle etc etc. The only thing I can seem to figure out is if this can be access using LISP. I have a few idea for hatching as I create something using LISP, but for the life of me I cant figure out how to use the draw hatch feature with lisp. I know lisp forces the use of "-" on a command when used in a lisp routine. Like if you use (command "hatch" ) in a LISP it will actually do (command "-hatch"). Although if you use -hatch you are given a whole different set of options to pick from and the "draw" option is not there. So my question is, Has anyone been able to use this draw option in a LISP routine? Thanks.