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
#2
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 DMDOOR)
And the routine doesn't work, am I missing something?
Regards
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 DMDOOR)
And the routine doesn't work, am I missing something?
Regards
#3
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..
Hope this helps..