Author Topic: Using LISP inside block editor  (Read 1909 times)

0 Members and 1 Guest are viewing this topic.

Rabbit

  • Guest
Using LISP inside block editor
« on: June 05, 2014, 02:51:20 PM »
I'm using LISP within the block editor to setup several parameters and actions.
How can I get a selection set for the BACTIONTOOL to use?

Code - Auto/Visual Lisp: [Select]
  1. (setq pt1 (getpoint "\nSelect move point: "))
  2.   (command "bparameter" "point" pt1 (polar pt1 1.5708 12.0) "1")
  3.   (setq pt1 (getpoint "\nSelect rotation point: "))
  4.   (command "bparameter" "rotation" (setq pt2 (polar pt1 3.66571 7.19356561)) (polar pt2 0.0 4.0) 0.0 pt2 "1")
  5.   (command "_Bactiontool" "_move" (car (entsel "\nSelect MOVE parameter: ")) (ssget)); Will need to select ROTATION parameter also.
  6.   (command "_Bactiontool" "_rotation" (car (entsel "\nSelect ROTATION parameter: ")) (ssget)); Will need to select MOVE parameter also.
  7.