Visual LISP, AutoLISP and General Customization
cancel
Showing results for 
Show  only  | Search instead for 
Did you mean: 

(C:Reslay) not working in Acad2002

3 REPLIES 3
Reply
Message 1 of 4
Anonymous
141 Views, 3 Replies

(C:Reslay) not working in Acad2002

For R14, I had mymenu.mns and mymenu.mnl set up so that when I inserted my
blocks from my menus and toolbuttons: the current layer state was saved
prior to inserting the block(C:Clayer) then a new layer was created and the
block was inserted, Then would revert to the previous layer (c:reslay).
However when I loaded these menus to Acad2002, non of this works, then new
layer is created and the block is inserted. Has anyone run into run into
this issue? I have pasted a sample menu macro, and my mymenu.mnl entry below
Thanks in advance.
**Typical Block insertion macro***
^C^C-layer;N;QCIRCLE;c;3;QCIRCLE;;(c:ChgLay"QCIRCLE");_-INSERT;QCIRCLE;\4;4;
;;;;;;DDATTE;LAST;\;(c:ResLay)
***.mnl entry***
(defun c:ChgLay (l)
(setq GV:Slay (getvar "CLAYER"))
(setvar "CLAYER" l)
(princ)
) ;_ end of defun
;;;-------------------------------------------------------------------------
----
;;; (c:ResLay )
;;; Revives the layer set by c:ChgLay
;;;-------------------------------------------------------------------------
----
(defun c:ResLay ()
(setvar "CLAYER" GV:Slay)
(princ)
) ;_ end of defun
3 REPLIES 3
Message 2 of 4
Anonymous
in reply to: Anonymous

Scott,

^C^C-layer;N;QCIRCLE;c;3;QCIRCLE;;(c:ChgLay"QCIRCLE");+
_-INSERT;QCIRCLE;\4;4;;;;;;;DDATTE;LAST;(c:ResLay)

Notice the removal of the extraneous pause and after the DDAttE
command...

Also, I see nothing in the menu macro that explicitly sets AttDia to 0, so
that is something to think about.

--
R. Robert Bell, MCSE
www.AcadX.com


"Scott R Smith" wrote in message
news:EC54462BC7B666170FBC50B8C08C98C3@in.WebX.maYIadrTaRb...
| For R14, I had mymenu.mns and mymenu.mnl set up so that when I inserted my
| blocks from my menus and toolbuttons: the current layer state was saved
| prior to inserting the block(C:Clayer) then a new layer was created and
the
| block was inserted, Then would revert to the previous layer (c:reslay).
| However when I loaded these menus to Acad2002, non of this works, then new
| layer is created and the block is inserted. Has anyone run into run into
| this issue? I have pasted a sample menu macro, and my mymenu.mnl entry
below
| Thanks in advance.
| **Typical Block insertion macro***
|
^C^C-layer;N;QCIRCLE;c;3;QCIRCLE;;(c:ChgLay"QCIRCLE");_-INSERT;QCIRCLE;\4;4;
| ;;;;;;DDATTE;LAST;\;(c:ResLay)
| ***.mnl entry***
| (defun c:ChgLay (l)
| (setq GV:Slay (getvar "CLAYER"))
| (setvar "CLAYER" l)
| (princ)
| ) ;_ end of defun
|
;;;-------------------------------------------------------------------------
| ----
| ;;; (c:ResLay )
| ;;; Revives the layer set by c:ChgLay
|
;;;-------------------------------------------------------------------------
| ----
| (defun c:ResLay ()
| (setvar "CLAYER" GV:Slay)
| (princ)
| ) ;_ end of defun
|
|
Message 3 of 4
Anonymous
in reply to: Anonymous

Thanks Robert, you are correct my issue was macro syntax, not differances
between acad R14 and Acad2002(chair-to-keyboard interface problems can be
the worst:).
"R. Robert Bell" wrote in message
news:ADD2B6348F2F331256E6BDCAC8588A19@in.WebX.maYIadrTaRb...
> Scott,
>
> ^C^C-layer;N;QCIRCLE;c;3;QCIRCLE;;(c:ChgLay"QCIRCLE");+
> _-INSERT;QCIRCLE;\4;4;;;;;;;DDATTE;LAST;(c:ResLay)
>
> Notice the removal of the extraneous pause and after the DDAttE
> command...
>
> Also, I see nothing in the menu macro that explicitly sets AttDia to 0, so
> that is something to think about.
>
> --
> R. Robert Bell, MCSE
> www.AcadX.com
>
>
> "Scott R Smith" wrote in message
> news:EC54462BC7B666170FBC50B8C08C98C3@in.WebX.maYIadrTaRb...
> | For R14, I had mymenu.mns and mymenu.mnl set up so that when I inserted
my
> | blocks from my menus and toolbuttons: the current layer state was saved
> | prior to inserting the block(C:Clayer) then a new layer was created and
> the
> | block was inserted, Then would revert to the previous layer (c:reslay).
> | However when I loaded these menus to Acad2002, non of this works, then
new
> | layer is created and the block is inserted. Has anyone run into run into
> | this issue? I have pasted a sample menu macro, and my mymenu.mnl entry
> below
> | Thanks in advance.
> | **Typical Block insertion macro***
> |
>
^C^C-layer;N;QCIRCLE;c;3;QCIRCLE;;(c:ChgLay"QCIRCLE");_-INSERT;QCIRCLE;\4;4;
> | ;;;;;;DDATTE;LAST;\;(c:ResLay)
> | ***.mnl entry***
> | (defun c:ChgLay (l)
> | (setq GV:Slay (getvar "CLAYER"))
> | (setvar "CLAYER" l)
> | (princ)
> | ) ;_ end of defun
> |
>
;;;-------------------------------------------------------------------------
> | ----
> | ;;; (c:ResLay )
> | ;;; Revives the layer set by c:ChgLay
> |
>
;;;-------------------------------------------------------------------------
> | ----
> | (defun c:ResLay ()
> | (setvar "CLAYER" GV:Slay)
> | (princ)
> | ) ;_ end of defun
> |
> |
>
>
Message 4 of 4
Anonymous
in reply to: Anonymous

(chair-to-keyboard interface problems)
Very good. I will have to remember this one.

Dave Alexander

Scott R Smith wrote:

> Thanks Robert, you are correct my issue was macro syntax, not differances
> between acad R14 and Acad2002(chair-to-keyboard interface problems can be
> the worst:).
> "R. Robert Bell" wrote in message
> news:ADD2B6348F2F331256E6BDCAC8588A19@in.WebX.maYIadrTaRb...
> > Scott,
> >
> > ^C^C-layer;N;QCIRCLE;c;3;QCIRCLE;;(c:ChgLay"QCIRCLE");+
> > _-INSERT;QCIRCLE;\4;4;;;;;;;DDATTE;LAST;(c:ResLay)
> >
> > Notice the removal of the extraneous pause and after the DDAttE
> > command...
> >
> > Also, I see nothing in the menu macro that explicitly sets AttDia to 0, so
> > that is something to think about.
> >
> > --
> > R. Robert Bell, MCSE
> > www.AcadX.com
> >
> >
> > "Scott R Smith" wrote in message
> > news:EC54462BC7B666170FBC50B8C08C98C3@in.WebX.maYIadrTaRb...
> > | For R14, I had mymenu.mns and mymenu.mnl set up so that when I inserted
> my
> > | blocks from my menus and toolbuttons: the current layer state was saved
> > | prior to inserting the block(C:Clayer) then a new layer was created and
> > the
> > | block was inserted, Then would revert to the previous layer (c:reslay).
> > | However when I loaded these menus to Acad2002, non of this works, then
> new
> > | layer is created and the block is inserted. Has anyone run into run into
> > | this issue? I have pasted a sample menu macro, and my mymenu.mnl entry
> > below
> > | Thanks in advance.
> > | **Typical Block insertion macro***
> > |
> >
> ^C^C-layer;N;QCIRCLE;c;3;QCIRCLE;;(c:ChgLay"QCIRCLE");_-INSERT;QCIRCLE;\4;4;
> > | ;;;;;;DDATTE;LAST;\;(c:ResLay)
> > | ***.mnl entry***
> > | (defun c:ChgLay (l)
> > | (setq GV:Slay (getvar "CLAYER"))
> > | (setvar "CLAYER" l)
> > | (princ)
> > | ) ;_ end of defun
> > |
> >
> ;;;-------------------------------------------------------------------------
> > | ----
> > | ;;; (c:ResLay )
> > | ;;; Revives the layer set by c:ChgLay
> > |
> >
> ;;;-------------------------------------------------------------------------
> > | ----
> > | (defun c:ResLay ()
> > | (setvar "CLAYER" GV:Slay)
> > | (princ)
> > | ) ;_ end of defun
> > |
> > |
> >
> >

Can't find what you're looking for? Ask the community or share your knowledge.

Post to forums  

Autodesk Design & Make Report

”Boost