Author Topic: MatchProp LISP  (Read 8138 times)

0 Members and 2 Guests are viewing this topic.

CAB

  • Global Moderator
  • Seagull
  • Posts: 10369
MatchProp LISP
« on: June 14, 2008, 10:37:41 PM »
I started this routine a year or so ago & was distracted, so I never finished it.
Question is with the built in ACAD command would there be any need or use for my version?
The only advantage mine might have is a greater list of properties to match.
I've reached the age where the happy hour is a nap. (°¿°)
Windows 10 core i7 4790k 4Ghz 32GB GTX 970
Please support this web site.

qjchen

  • Bull Frog
  • Posts: 285
  • Best wishes to all
Re: MatchProp LISP
« Reply #1 on: June 15, 2008, 06:32:53 AM »
I think it is a very useful rountine to match only part of the property. Just like, sometimes I only need to match the color or width of Text, but not the rotation, then the default Match of Autocad is hard to use.
dear CAB, could you share your code or give a vlx file? Thank you very much.
http://qjchen.mjtd.com
My blog http://chenqj.blogspot.com (Chinese, can be translate into English)

DinØsaur

  • Certified Bovine Scat Distributor...I lay it on THICK
  • Needs a day job
  • Posts: 5424
  • But I don't WANT a Day Job
Re: MatchProp LISP
« Reply #2 on: June 15, 2008, 11:06:14 AM »
The one thing with the built in function that I had severe issues with when used for mtext was that it forced changing rotation.  Many of my mtext entities HAD to remain at a precise angle and that all or none feature prevented or limited its use for my needs.  Looking at you dialog box, this would not be an issue with your routine.
Stephen R. Sherrill,
The DinØsaur
Civil 3D Specialist Emeritus

YAY ME !!!  I made it out alive !

Slim©

  • Needs a day job
  • Posts: 6560
  • The Dude Abides...
Re: MatchProp LISP
« Reply #3 on: June 15, 2008, 12:21:10 PM »
What they said...
I drink beer and I know things....

CAB

  • Global Moderator
  • Seagull
  • Posts: 10369
Re: MatchProp LISP
« Reply #4 on: June 15, 2008, 12:46:02 PM »
I'll try to get version one working next week. It's still too buggy to release. 8-)
I've reached the age where the happy hour is a nap. (°¿°)
Windows 10 core i7 4790k 4Ghz 32GB GTX 970
Please support this web site.

alanjt

  • Needs a day job
  • Posts: 5327
  • Standby for witty remark...
Re: MatchProp LISP
« Reply #5 on: June 16, 2008, 07:42:03 AM »
1.  an option to match the layer of one object with another.
2.  an option to add the layer of a selected object to the layer state of another object's layer

i know you have the text matching options, but i've noticed that it would be especially nice to be able to match the internal changes of mtext with another (we will change the color of our general notes in the ares that will be altered for the drawings specifics. right now, we just open the mtext, select all, and change color back to by layer.

looks really nice alan, i would def. use it.
Civil 3D 2019 ~ Windohz 7 64bit
Dropbox

jonesy

  • SuperMod
  • Seagull
  • Posts: 15502
Re: MatchProp LISP
« Reply #6 on: June 16, 2008, 07:50:59 AM »
This looks really useful Alan.

Its one of the things I liked about Microstation, the ability to choose what to match, but this looks like it goes further than that... so it could be a great asset
Thanks for explaining the word "many" to me, it means a lot.

Alan Cullen

  • Guest
Re: MatchProp LISP
« Reply #7 on: June 16, 2008, 07:55:29 AM »
Dunno if this is of any use at all......

I have a lisp that works for me. Feel free to attack it and do what ever with it. Hope it helps.........

Code: [Select]
(defun c:cprop ()
 (setq ocmd (getvar "CMDECHO"))
 (setvar "CMDECHO" 0)
 (princ "\n CHANGE OBJECTS TO PROPERTIES OF A SELECTED OBJECT - Mar 2007 - Alan CULLEN")
 (setq sset (ssget (prompt "\n               Select entities to change to new properties.......")))
 (setq ss   (ssget (prompt "\n               Select entity with required properties..............")))
 (if (/= ss nil)
  (progn
   (setq name (ssname ss 0))
   (setq data (entget name))
   (setq newlay (cdr (assoc 8 data)))
   (setq newcol (cdr (assoc 62 data)))
   (setq newltype (cdr (assoc 6 data)))
 ))
 (command "chprop" sset "" "C" newcol "LT" newltype "LA" newlay "")
 (princ "\n              Selected objects changed to new properties.......")
 (setvar "CMDECHO" ocmd)
 (princ)
)

T.Willey

  • Needs a day job
  • Posts: 5218
Re: MatchProp LISP
« Reply #8 on: June 16, 2008, 12:14:31 PM »
Maybe this thread will be of some help.  It is the one for my edit properties routine.
Tim

I don't want to ' end-up ', I want to ' become '. - Me

Please think about donating if this post helped you.

FengK

  • Guest
Re: MatchProp LISP
« Reply #9 on: June 17, 2008, 12:54:16 PM »

CAB

  • Global Moderator
  • Seagull
  • Posts: 10369
Re: MatchProp LISP
« Reply #10 on: June 17, 2008, 02:10:35 PM »
Hey, thanks for all the help.
I'll post some code when I get it working.
I've reached the age where the happy hour is a nap. (°¿°)
Windows 10 core i7 4790k 4Ghz 32GB GTX 970
Please support this web site.

andy_lee

  • Newt
  • Posts: 147
Re: MatchProp LISP
« Reply #11 on: June 05, 2015, 10:48:56 PM »
Looks  Nice ! Alan . Do you finish it yet?
andy.
Best regards.

lamarn

  • Swamp Rat
  • Posts: 606
Re: MatchProp LISP
« Reply #12 on: June 06, 2015, 10:48:49 AM »
Great to see !,please include transparency ..
Design is something you should do with both hands. My 2d hand , my 3d hand ..

roy_043

  • Water Moccasin
  • Posts: 1738
  • BricsCAD 18
Re: MatchProp LISP
« Reply #13 on: June 06, 2015, 11:07:32 AM »
Great to see !,please include transparency ..
Note: In AutoCAD the default MatchProp command already includes a transparency option.

lamarn

  • Swamp Rat
  • Posts: 606
Re: MatchProp LISP
« Reply #14 on: June 06, 2015, 12:35:16 PM »
I know. But ti replace one command for the other it is nice to include it..
Design is something you should do with both hands. My 2d hand , my 3d hand ..