Author Topic: Autoloading Polyout  (Read 826 times)

0 Members and 1 Guest are viewing this topic.

mohan

  • Newt
  • Posts: 98
Autoloading Polyout
« on: June 29, 2022, 02:24:04 AM »
Can anyone fix this for me !

My Option always "_N" (Not to delete the Polyline)

Code - Auto/Visual Lisp: [Select]
  1. (defun c:polyout () (if (not C:POLYOUTLINE) (load "C:\\Users\\MOHAN\\Downloads\\PolyOutline.lsp" "PolyOutline Failed to Load.")) (C:POLYOUTLINE) (command "" pause "_N"))
Thanks
« Last Edit: June 29, 2022, 04:17:34 AM by mohan »
"Save Energy"

dexus

  • Bull Frog
  • Posts: 206
Re: Autoloading Polyout
« Reply #1 on: June 29, 2022, 03:56:12 AM »
It should be possible to change PolyOutline.lsp so it doesn't ask you to remove the polyline.
I don't think you can control custom functions with command functions.

mhupp

  • Bull Frog
  • Posts: 250
Re: Autoloading Polyout
« Reply #2 on: June 30, 2022, 01:10:58 AM »
Code - Auto/Visual Lisp: [Select]
  1. (initget "Yes No")
  2. (setq rep
  3.   (cond
  4.     ((getkword "\nDelete Origonal [Yes/No]<No>:")) ( "No")
  5.   )
  6. )

mohan

  • Newt
  • Posts: 98
Re: Autoloading Polyout
« Reply #3 on: June 30, 2022, 12:56:39 PM »
Thanks for the reply to my thread . . .  :smitten:

Original Route
Code - Auto/Visual Lisp: [Select]
  1.  (initget "Yes No")
  2.      (setq d (/= "Yes" (getkword "\nDelete Original? [Yes/No] <No>: ")))
"Save Energy"