Author Topic: [XDrX-PlugIn(3)] Shape approximately rectangular polyline elements into rectang  (Read 1157 times)

0 Members and 1 Guest are viewing this topic.

xdcad

  • Swamp Rat
  • Posts: 527
Code - Auto/Visual Lisp: [Select]
  1. (defun c:tt ()
  2.   (if (setq ss (xdrx-ssget
  3.                  "\nSelect POLYLINE<Quit>:"
  4.                  '((0 . "*polyline"))
  5.                )
  6.       )
  7.     (progn
  8.       (xdrx-begin)
  9.       (mapcar '(lambda (x)
  10.                  (xdrx-setpropertyvalue x "SetPerp")
  11.                )
  12.               (xdrx-pickset->ents ss)
  13.       )
  14.       (xdrx-end)
  15.     )
  16.   )
  17.   (princ)
  18. )
  19.  
The code I wrote uses XDRX-API,which can be downloaded from github.com and is updated at any time.
===================================
https://github.com/xdcad
https://sourceforge.net/projects/xdrx-api-zip/
http://bbs.xdcad.net

Atook

  • Swamp Rat
  • Posts: 1031
  • AKA Tim
Nice.  :-)

What software are you using for screen record? Are the cursor markers and trails in CAD or the recording software?

xdcad

  • Swamp Rat
  • Posts: 527
Nice.  :-)

What software are you using for screen record? Are the cursor markers and trails in CAD or the recording software?

XUNJIE  screen recording software
The cursor can be removed, doesn’t it look good?
The code I wrote uses XDRX-API,which can be downloaded from github.com and is updated at any time.
===================================
https://github.com/xdcad
https://sourceforge.net/projects/xdrx-api-zip/
http://bbs.xdcad.net

Atook

  • Swamp Rat
  • Posts: 1031
  • AKA Tim
XUNJIE  screen recording software
The cursor can be removed, doesn’t it look good?

Yeah I like it!
« Last Edit: November 25, 2023, 02:01:32 PM by Atook »