BIGAL Posted July 25 Posted July 25 (setq plent (entsel "\nPick pline near end "))) (setq pt (cadr plent)) (setq co-ord (mapcar 'cdr (vl-remove-if-not '(lambda (x) (= (car x) 10)) (entget (car plent))))) (setq obj (vlax-ename->vla-object plent)) (setq pt1 (vlax-curve-getstartPoint obj)) (setq pt2 (vlax-curve-getendPoint obj)) (setq d1 (distance pt pt1)) (setq d2 (distance pt pt2)) (if (> d1 d2)d (setq co-ord (reverse co-ord)) ) To reverse direction of a line or pline, "It is a task that takes 5 seconds." No its instant. Quote
HypnoS Posted Friday at 08:04 AM Author Posted Friday at 08:04 AM TBH devito code meets my needs, for what i send big thanks once more. One thing I'd like to be added is to let me change distance between blocks Quote
SLW210 Posted Friday at 10:37 AM Posted Friday at 10:37 AM 2 hours ago, HypnoS said: TBH devito code meets my needs, for what i send big thanks once more. One thing I'd like to be added is to let me change distance between blocks Did you bother to try my code? It asks for a line and distance between blocks. Quote
HypnoS Posted Friday at 11:44 AM Author Posted Friday at 11:44 AM @SLW210 I tried yours but I cant get it to work, I think Im missing something. "Enter the tag to use" What tag am I supposed to type in? Attribute name or value does not work. Quote
devitg Posted Friday at 02:08 PM Posted Friday at 02:08 PM 6 hours ago, HypnoS said: TBH devito code meets my needs, for what i send big thanks once more. One thing I'd like to be added is to let me change distance between blocks It ask you to set such distance Or you mean to set distance for each block at the straight line? Quote
SLW210 Posted Friday at 08:38 PM Posted Friday at 08:38 PM 8 hours ago, HypnoS said: @SLW210 I tried yours but I cant get it to work, I think Im missing something. "Enter the tag to use" What tag am I supposed to type in? Attribute name or value does not work. The actual TAG name, in the drawing you posted it is ADRES Quote
HypnoS Posted 9 hours ago Author Posted 9 hours ago @devitgYeh! Distance between blocks on a new straight polly. @SLW210Sorry but typing block atribute or even clicling on it seems to no work for me Enter the tag to use: ADRES ; error: bad argument type: numberp: --- Quote
SLW210 Posted 6 hours ago Posted 6 hours ago I'll look into that, I might have posted the wrong one. I was working on one to just use the block clicked assuming a single attribute. Quote
devitg Posted 2 hours ago Posted 2 hours ago On 7/24/2025 at 1:26 PM, HypnoS said: Yours works great. the only thing I would like to add is to set a distance between blocks on the line, just like the copyblockstocurve has. @HypnoS Find attached cpy-blk-2-poly-01.lsp Quote
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.