|
#1
|
||||
|
||||
Lisp tool for coloring ALMOST perfect...
Hi,
By using Tools > Customize > New.... I made a simple button in OSD that will give the Active Part a random color each time I click it. Saves some time when doing a quick and dirty modeling job It works great, except for the fact that I have to click in the Viewport before anything happens. So, I press my new button AND click somewhere in the Viewport, and then my Active Part has a new color. Is there a trick to make the button work without the 2nd click??? Here's the code that's used in the button: Code:
(ELAN::SET_PART_COLOR (OLI::SD-INQ-CURR-PART) :RGB (FRAME2::GPNT3D (LISP::RANDOM 1.0) (LISP::RANDOM 1.0) (LISP::RANDOM 1.0)) :DONE) Regards, Jaap |
#2
|
|||
|
|||
Re: Lisp tool for coloring ALMOST perfect...
Hi Jaap,
I believe this will do the trick for you: Code:
(progn (ELAN::SET_PART_COLOR (OLI::SD-INQ-CURR-PART) :RGB (FRAME2::GPNT3D (LISP::RANDOM 1.0) (LISP::RANDOM 1.0) (LISP::RANDOM 1.0)) :DONE) (update_screen)) The other thing to note is that when you assign code to a button, it expects a single command, which is why the "progn" statement (along with its closing parenthesis) is needed -- the (progn ...) statement allows your color randomizer and the update_screen call to be passed as a single command to the customization interface. (I know you're aware of what (progn ...) does, but maybe this will help some others who are just getting started!) I hope this helps! Merry Christmas and Happy New Year everyone! andy
__________________
Andy Poulsen AI MAXTools: Dream. Design. Done. It's that easy! Add-ins bringing new functionality and speed to Creo Elements/Direct and CoCreate products. Now available for v17-v20+! See them in action at www.ai-maxtools.com and then try them for yourself -- FREE! |
#3
|
||||
|
||||
Re: Lisp tool for coloring ALMOST perfect...
Hi,
YES!! This is working perfectly :-) Thanks! Regards, Jaap |
#4
|
||||
|
||||
Re: Lisp tool for coloring ALMOST perfect...
Jaap
Out of curiosity, what is Elan: used for? What does it mean. Thanks Tom
__________________
Tom Kirkman Creo Elements/Direct 20.1 Dell Precision 3581 https://www.o-i.com |
#5
|
||||
|
||||
Re: Lisp tool for coloring ALMOST perfect...
Quote:
Claus
__________________
CoCreate Modeling FAQ: http://www.clausbrod.de/CoCreateModeling/ |
#6
|
||||
|
||||
Re: Lisp tool for coloring ALMOST perfect...
Quote:
so: PHP Code:
__________________
|
#7
|
||||
|
||||
Re: Lisp tool for coloring ALMOST perfect...
Thanks
This clears up several other lisp programs I had questions with. Tom
__________________
Tom Kirkman Creo Elements/Direct 20.1 Dell Precision 3581 https://www.o-i.com |
#8
|
|||
|
|||
Re: Lisp tool for coloring ALMOST perfect...
Thanks a lot.
I don't speak German and I believed that all the english pages were no longer supported by PROMT.One, so I didn't get there were the lisp I was looking for. The only flaw is that the lisp doesn't work when it find a locked part, even if I chose istance and no group is locked. |
#9
|
||||
|
||||
Re: Lisp tool for coloring ALMOST perfect...
Quote:
__________________
|
Currently Active Users Viewing This Thread: 1 (0 members and 1 guests) | |
Thread Tools | Search this Thread |
Display Modes | Rate This Thread |
|
|