Jump to content

All Activity

This stream auto-updates

  1. Past hour
  2. Good start. A few points if you like: - what would happen if a user pressed ESC while Mleader command is active? - What's the need of function vl-load-com in your routine? - You assumed that the system variable CMDECHO was set to 1 but it could be the contrary.
  3. Problem is we cannot always set the length prior to flip as we need to find the right size after the flip. I am trying a few different methods hopefully I can get this to work
  4. @HypnoS use the previous, reattached, It will ask for distance only once , and ask for the straight line start point to paste each block cpy-blk-2-poly.lsp copy block 2 poly 2025-08-05 10-37-41.rar
  5. Today
  6. Here's the code. I hope this helps you. The MLeader style follows your current style. Looking for tools to speed up your workflow? Explore this resource: https://lispautocad.gumroad.com/l/eezilo (defun C:DV_MLP (/ pt x y text) (vl-load-com) (setvar "CMDECHO" 0) (setq pt (getpoint "\nPick point: ")) (if pt (progn (setq x (rtos (car pt) 2 3)) (setq y (rtos (cadr pt) 2 3)) (setq text (strcat "(" x " ; " y ")")) (command "._MLEADER" pt pause text) ) (princ "\nNo Point selected!") ) (setvar "CMDECHO" 1) (princ) )
  7. Think this can also be done with dynamic blocks less automated but will prompt you for inputs when inserted into a drawing.
  8. Now that I think about it... let's assume there will be multiple attributes.
  9. There has to some consistency in what's being sorted. Will there always be just one attribute?
  10. SLW210

    Need better multiline

    There are several LISPs and programs around for cable trays. @Tharwat has a program. Cable tray program | Tharwat Al Choufi Here's a thread on T-Connections... Draw cable tray T connection - AutoLISP, Visual LISP & DCL - AutoCAD Forums
  11. No time for me to look at your blocks, but have you looked into constraints? I have some dynamic block with lots of actions and even constrained if you do things in a weird order they can get a little off. So make sure length is set before the flip action. Probably could constrain them more or different. I don't know. I'll see what time I have today, but I am at work for a shorter time today than usual.
  12. well I hoped for this lisp to work with any blocks with attributes. here are the same b locks Im using. example [2].dwg
  13. AutoCAD gets strange sometimes when objects get far away from 0,0,0. That's all I can come up with.
  14. TCOUNT Express Tool. There used to be quite a few LISPs and Programs around to do that, you'll need to find one that suits your needs best. I use Lee Mac's from time to time. AutoCAD Mechanical has Balloon which works with a BOM and all sorts of options.
  15. My code only gives that error if there are letters in the ATTRIBUTE, works no errors on the drawing you posted. Maybe you should post an actual drawing that you are using this on. Even the images you posted are different by a lot from the drawing you posted.
  16. Is this what you're looking for ? DynBlock101_modified.dwg
  17. @devitgcode acts weird. It asks me to type distance,and when I do it places only one block and asks for distance again to pace another block, and on and on.
  18. This is a good video that explains lisp and how to do autocount block
  19. You may consider using this tool, which enables viewport panning with a customizable layer interface, retains coordinate memory, and functions even when the viewport is locked. I hope this helps you: https://lispautocad.gumroad.com/l/bgesj
  20. If your original drawing has saved Layer States, you can: - Open the original drawing. - Go to Layer Properties Manager → click Layer States Manager. - Export the layer state. - In the new drawing, import that layer state and apply it to the viewport. This preserves layer visibility, color, linetype...
  21. Yesterday
  22. motee-z

    strange behavior of 3dface

    where are experts of autocad no answer since five days
  23. I agree with separating the constituent parts . have broken the assembly into separate dynamic blocks so that the central trusses, roof tracking , edge beams and ridge units are separate dynamics . I have run into a few issues that I have uploaded as a new thread . ive tried running the lisp above but struggling to see how I can use this to add data to the lookup tables??
  24. I have developed the attached dynamic block which positions nested blocks according to the distance value set in a block properties table. To avoid text mirroring of the nested block labels I have used attributes and added a flip action. This all works well until I try and change the length after a flip. It appears the xpos value in the block properties table is applied as positive despite the flip state. I have tried changing the point parameters to stretch parameters but have similar problems, especially when rotating the assembly to different angles. I was hoping something as simple as adding a formulae into the block properties table ie dist*flipstate would work but there doesn't seem to be anyway to do this. Is there a way to solve this? jam3.dwg
  25. @HypnoS Find attached cpy-blk-2-poly-01.lsp
  26. Should have known.... LeeMac
  27. Not sure how to even frame the question... Given a block like this: If it is inserted and is the first instance, change the text to 01, each additional insert will be numbered based upon the total number of that particular block being inserted. Can the text be text/mtext or would it have to be an attribute? I suppose it would search the block table when it is run and number additional inserts based upon the total existing in the drawing at the time of the insert. Has anyone seen such a routing/proggie that does that? If I used diesel (or other) could the numbers update automatically if one is deleted either by regen or some other trigger? Based upon their order within the blocktable? I do not even know how to search on something like this... Since I figured something would have to be written, I asked here but other forums might know of solutions..
  28. HypnoS

    Need better multiline

    Overall, Lisp works as expected. I mainly use it to draw simple cable trays. I know that creating things like T-junctions and branches will be impossible, so I'm not even asking for that. Width range we use between 50-500mm most often 100mm and 200mm.
  1. Load more activity
×
×
  • Create New...