Jump to content

Leaderboard

Popular Content

Showing content with the highest reputation on 01/24/2022 in all areas

  1. If the blocks are not too heavy or not xrefs, I would simply explode them, then make a rectangular selection, put it to the clipboard, then undo the explode command, then pasteclip. Sound very noisy routine but I think it will work, If the blocks are not too heavy or not xrefs, anyway. The given lisp doesn't run copy command. It gets the block name, insertion point, scale, then insert a new one to the current space, with transformed parameters. That is good, the clipboard can be dropped off. If there is Xref, then a block name from xref database insert to current drawing database will be very tricky thing to do.
    1 point
  2. I don't think that is possible. lets say you select multiple blocks with a window how then do you tell AutoCAD what nested blocks you want to copy? I guess you could retool the lisp to allow multiple selections at once. Looks like it already does this.
    1 point
  3. You could always try a while loop and a counter - I tend to go that way by default but that's just me. Added some 'princ' to tell you how it is going on as an example below.. overkill but sometimes seeing it all written out helps (princ "\nMy List: ") (princ list) ;;Gives you the full list so you can see it (setq acount 0) (while (< acount (length list)) (setq pt (nth acount list)) (princ "\n - count: ") (princ acount) ; Position in list (princ " : pt: " ; (princ pt) ; point (command "copy" pt "" basept despt) (princ "COPY OK") ; Copied OK (setq acount (+ acount 1)) ) ; end while (princ "All Copied") If it struggles at that post what the princ statements say... should be a clue in them
    1 point
  4. WoW!!!! thanks @mhupp and @Emmanuel Delay; both lisp works well !!!! @Emmanuel Delay, actually I've want rtab_x and rtab_y It is better for " on site" to be up/down left/right @mhupp You did great Job. It is also numbering rebars. I will try to add to ask user to get firstly number of rebar; like for expample "4" and then it will number it like 4.1, 4.2, 4.3 etc. Also need to add round of the lenght. Guys! You did work for me! actually I thougt I will do this myself just with Your help, but the job is done!!! Thank You so much!
    1 point
  5. Thank you for your kind words, Dadgad. However, in the words of the Civil War General Tecumseh Sherman, "I will not accept if nominated (re: Project Proof Reader position) and will not serve if elected."
    1 point
  6. Two entities cannot reference the same extension dictionary.
    1 point
  7. This is a program made by ASMI and modified by Ronso in This Thread. This is a genius free LISP Program can be used in many trades, but has most usefulness in the HVAC, Mechanical, and Piping industry of 2D CAD Designs. It allows you to create Duct, Pipe, and Segmented Duct or Piping with automatic elbow or fittings to accurate dimensions via some initial input at the Command Prompt. Attached is a screenshot of the program in action: DUCT.LSP
    1 point
×
×
  • Create New...