Topic Title

[Mark F. Madura]

The following keyboard macro was originally developed at Madura Studios for Mike Hallor so he could insert a door with one click.

I've re-created the sequence of commands (in the form of a command-line alias) to perform under DataCAD 11.

When prompted to "Click near hinge to insert door", click near the corner (i.e. where two walls intersect) where the door will be hinged, closest to the wall line where the door will be cut, and on the side of the wall toward the direction of swing.

Here is the command-line alias...

[id]
comment=insert door
alias=^;^ªClick near hinge to insert door^S0^¶^:^F0^F3^S1^X^S1^F2^F3^F7^S0^n^X^S1^F1^S0^n^55#^Ü^`^X^S1^F2^F3^F7^S0^n^ ^.6^$^0^$^ ^3^$^0^$^$^$^:^F0^F3^F7^S1^$^1^$^$^;^´^

Here is the breakdown...

^;^ªClick near hinge to insert door
(Go to Edit menu and prompt user to "Click near hinge to insert door)

^S0
(Right-click after user clicks)

^¶
(Set input mode to Relative Polar)

^:^F0^F3^S1
(Go to Utility, Settings, Angle Type, Start Angle menu)

^X^S1^F2^F3^F7^S0
(Set Object Snap to End Point, Mid Point, and Intersect only)

^n
(Object Snap to inside corner)

^X^S1^F1^S0
(Set Object Snap to Nearest only)

^n
(Object Snap to nearest point on line near cursor to set Start Angle)

^55#
(Go to Architect, Door Swing Menu)

^Ü
(Set Door Swing by Sides)

^`
(Enter Reference Point for hinge side of door)

^X^S1^F2^F3^F7^S0^n
(Set Object Snap method and snap to inside corner)

^ ^.6^$^0^$
(Enter hinge 6" away from inside corner)

^ ^3^$^0^$
(Enter strike side 3' away from hinge)

^$^$
(Set direction of swing and outside of door)

^:^F0^F3^F7^S1^$^1^$^$^;
(Reset Start Angle to "Normal" (i.e., zero to the right))

^´^
(Set Input Mode to Relative Cartesian)

Give it a try and offer any ideas you may have to make inserting doors easier.

MFM