Sep 04
Tuesday
AutoLISP, ProgrammingAutoLISP application: LAY_DEL.LSP
|
An AutoLISP application that deletes all objects in the layer of selected entity.
Hello Daily AutoCAD readers,
I will not make any additional explanation about this application. All of the explanations are already inside the code.
Listing.1
You can download file from here.
Technorati Tags: AutoLISP, AutoCAD programming, Daily AutoCAD
Bu yazinin Turkce’sini okumak icin basiniz.
Viewed 5,526 times so far... This week: 27 Today: 3 Latest: 4 July 2009, 16:48Post Tags:
Related Posts
Popular
- Hip tip: Increasing view resolution with VIEWRES system variable
07/03/2009 04:39 am
7 Comments - Sirince – IZMIR
07/02/2009 11:02 am
1 Comment - Visual LISP: Programming user interfaces with OpenDCL
07/01/2009 10:15 pm
10 Comments - 3D Modeling 7: EXTRUDE
06/30/2009 02:14 pm
10 Comments - Ask DailyAutoCAD: Which Notebook to Buy?
06/30/2009 12:17 pm
1 Comment
Featured Articles
- AutoCAD 2009 Update 3 Released
- Speed Up As AutoCAD 2009 Ribbon Menu Helps You!
- MEP Analysis Extension for AutoCAD MEP extended to March 31, 2009
- Recap of AutoCAD-related technologies on Autodesk Labs
- Technology Preview of MEP Analysis Extension extended to 12/31/08
- Autodesk Labs: Forward and Backward utility for AutoCAD
Enjoy the Article? Subscribe!
Loading ...
Oct 22, 2007
Reply
HOW TO DO THE AUTOCAD LT 2004. WILLING TO THE LISP.
THANKS
Lucich57@gmail.com
Nov 5, 2008
Reply
Works great. I have got a LISP routine to move all layer entities to a different layer, but I cannot figure one thing out, could you help me out? Thanks
Mike
(DEFUN C:CHLAY ()
(SETVAR “CMDECHO” 0)
(SETQ LAY (GETSTRING “\nENTER LAYER TO MOVE: “))
;(SETQ LAY (entget (tblobjname “LAYER” “numbers”))) this is what i have tried, but it does not work
(SETQ SS (SSGET “X” (LIST (CONS 8 LAY))))
(COMMAND “change” SS “” “P” “C” “137″ “LA” “Contour” “” pause)
(SETVAR “CMDECHO” 1)
(setq ss nil)
(PRINC)
)