Tuns Posted January 28, 2014 Share Posted January 28, 2014 I can write a macro for it. -Jesus;$M=$(getvar,flyingpig);; That should do the trick. Quote Link to comment Share on other sites More sharing options...
a3dtot Posted January 28, 2014 Share Posted January 28, 2014 I tried it and it didn't work maybe need to add (setvar pinkelephant 1) Quote Link to comment Share on other sites More sharing options...
BIGAL Posted January 29, 2014 Share Posted January 29, 2014 A house waffle panels about 15 mins to draw and trim up all the lines and ribs with my lisp about 20 seconds. Just think of something you do over and over then ask here. Quote Link to comment Share on other sites More sharing options...
Sbeth85 Posted January 29, 2014 Author Share Posted January 29, 2014 Wow, all the functions you guys are describing are amazing... However I'm not sure the work I do is complicated enough to justify learning how to do LISPS... When it comes to customization I altered my Home panel a bit and have made new CUI Aliases for stuff that I use often, and that seems to suffice for now... Beyond a Macro for cleaning a file, I can't think of anything I'd need to automate. Could a LISP be used for DrawOrder? As in, I always want my Flooring layer to be below my Furniture layer? Quote Link to comment Share on other sites More sharing options...
Sbeth85 Posted January 29, 2014 Author Share Posted January 29, 2014 This is like a Christmas Wishlist... Could I create a Macro/Lisp that would be like a "Back" button (or like on a TV remote, the LAST button), where I could toggle between the last 2 places I'd been? (Aka Model and a Certain Layout I'm working on, instead of having to search each one out?) Quote Link to comment Share on other sites More sharing options...
BIGAL Posted January 30, 2014 Share Posted January 30, 2014 You need a reactor program that remembers what layout you are in and stores it somewere then you would just use some simple keystroke to jump. Here is a goto layout for lots of pages Model is 0 etc (defun C:goto ( / lay num) (setq num (getint "\nEnter tab number")) (vlax-for lay (vla-get-Layouts (vla-get-activedocument (vlax-get-acad-object))) (if (= num (vla-get-taborder lay)) (setvar "ctab" (vla-get-name lay)) ) ; if ) ; for ) ; defun (C:goto) Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.