Copying Layers in Same Drawing
Copying Layers in Same Drawing
(OP)
I want to learn how to copy an existing Layer (Layer1) in a drawing (LT2000i) into the same drawing as Layer2. I am not able to do this no matter what I try.
Example: Existing layer with contours and data for 1999, to be saved as a different layer ("copy", different name for 2000) so I can keep the 1999 contours and data intact, and then using a copy of the 1999 layer to edit with 2000 contours and data. Result: both the original 1999 layer and a 2000 layer.
Problem is that when I attempt this using the DesignCenter instructions, I loose the old layer information. I can not make a successful copy and keep the original layer as well.
Please help with any information. It will be appreciated by this beginner.
Sincerely,
Rockjoint
Example: Existing layer with contours and data for 1999, to be saved as a different layer ("copy", different name for 2000) so I can keep the 1999 contours and data intact, and then using a copy of the 1999 layer to edit with 2000 contours and data. Result: both the original 1999 layer and a 2000 layer.
Problem is that when I attempt this using the DesignCenter instructions, I loose the old layer information. I can not make a successful copy and keep the original layer as well.
Please help with any information. It will be appreciated by this beginner.
Sincerely,
Rockjoint
Rockjoint
rockjoint@yahoo.com





RE: Copying Layers in Same Drawing
Put all entities on layer 0 (zero).
In a new drawing, create both layers.
Set each layer as the current layer and insert the drawing with all the entities on layer 0.
RE: Copying Layers in Same Drawing
RE: Copying Layers in Same Drawing
I think rockjoint wants to make a duplicate copy(?).
Copy all objects 1000 units to the left->change the layer->move them 1000 back to the right...It's like IFRs idea with only one *.dwg...
bye, Lothar
Win NT4.0 (SP6),
ACAD 2000i (SP2), ADT 3.0 (SP3),
ACAD 2002, ADT 3.3,
OCÈ 5200
RE: Copying Layers in Same Drawing
Or here's two functions that may help. CPY2L, Prompts for the layer, then copies selected elements on top of themselves to that layer. CPY2CL, makes the copies to the current layer.
(defun C:CPY2L ( / SS1 NLAYER PT1 PT2)
(setq PT1 '(0.0 0.0 0.0))
(setq PT2 '(0.0 0.0 0.0))
(setvar "cmdecho" 0)
(prompt "Objects to Copy:")
(setq SS1(ssget))
(setq NLAYER(getstring "Copy Objects to What Layer?"))
(command "copy" SS1 "" PT1 "" PT2)
(command "change" SS1 "" "P" "LAYER" NLAYER "")
(princ)
)
(defun C:CPY2CL ( / SS1 PT1 PT2)
(setq PT1 '(0.0 0.0 0.0))
(setq PT2 '(0.0 0.0 0.0))
(setvar "cmdecho" 0)
(prompt "Objects to Copy:")
(setq SS1(ssget))
(command "copy" SS1 "" PT1 "" PT2)
(command "chprop" SS1 "" "LA" (GETVAR "CLAYER") "")
(princ)
)
RE: Copying Layers in Same Drawing
Rockjoint
rockjoint@yahoo.com