DDMDOOR - Door insertion routine

Bonus Lisp, Vba, Tutorials etc.

Moderator: CMS Inc

Post Reply
avaernes
Valued Contributor
Posts: 129
Joined: Wed Oct 04, 2000 11:01 pm
Location: Oslo, Norway

DDMDOOR - Door insertion routine

Post by avaernes » Mon Aug 06, 2001 3:22 am

This is a routine I wrote a while back, which I have now updated. In addition to the obvious (inserting doors and trimming the wall opening), it has the following features:

- Four different door types.
- several modes of door creation and optional detail.
- automated layer handling.
- create door entity as polyline/block.
- units in/mm/cm/m.
- editable preset door widths
- door center/offset positioning

New features are support for imperial units and the center/offset option.

DDMDOOR v2.1

Image
Alberto

Post by Alberto » Mon Aug 06, 2001 11:08 am

My friend:

I'm getting this message:
Loading SmartPixel ImageEnabler...done.

: ddmdoor

1 UCS deleted.error: bad argument type
(OPEN FNAME "r")
(SETQ #LST_IMPERIAL_OFFSETS (LIST nil) #LST_METRIC_OFFSETS (LIST nil) #LST_IMPERIAL_OFFDESC (LIST nil) #LST_METRIC_OFFDESC (LIST nil) FNAME (FINDFILE FIL_DOOR) FILE (OPEN FNAME "r") LST_METRIC (READ (READ-LINE FILE)) LST_IMPERIAL (READ (READ-LINE FILE)))
(DDM_READ_OFFSET "ddmdoor.off")
(DDM_PRERUN)
(C ImageDMDOOR)


And the routine doesn't work, am I missing something?

Regards
avaernes
Valued Contributor
Posts: 129
Joined: Wed Oct 04, 2000 11:01 pm
Location: Oslo, Norway

Post by avaernes » Mon Aug 06, 2001 12:28 pm

It looks like the routine can't locate one of the config files ("ddmdoor.off"). All the files in the .zip must be in the Intellicad search path. Try creating a directory (e.g. "lisp"), extract files to this directory, then put this directory in the "Drawings" search path (Options>Paths/Files).

Hope this helps..
Lynn T
Newbie
Posts: 5
Joined: Mon Aug 06, 2001 11:01 pm

Post by Lynn T » Tue Aug 07, 2001 5:46 am

Thanks for the routine. I did not have any problems getting it to work when I made the directory called Lisp and also added it to my path.

Lynn
Alberto

Post by Alberto » Tue Aug 07, 2001 7:41 am

This is excellent!!! It has worked fine and is a great routine, thank you very much!!!
sln8458
Valued Contributor
Posts: 75
Joined: Mon May 19, 2003 11:01 pm
Contact:

Post by sln8458 » Mon May 24, 2004 10:56 am

Avaernes,

This in brill' will save me lots of time THANK YOU.

Do you have a program like this for windows also??

SteveN
Post Reply