Automatic Bend Tolerance Application - Macro / LISP

[Anonymous]

Hello, 

My company uses AutoCAD to create two dimensional panel drawings. These drawings are made to scale, and then adjusted to account for bend tolerances. When the panel bends in the field, .025" is added to the face of each panel. This means each of our panel drawings must be shrunk by .025" per bend line so when they are bent in the field they end up the correct size. (Only the face of the panel needs adjusted)

Since we handle hundreds of panels per job, shrinking every panel manually can become time consuming. Is there a way to create a macro that would automatically do this?

Perhaps a different macro for each of the different panel types would be needed. 

1. A macro for rectangular panels (1 face panels)
2. A macro for 2 face panels and so on

I attached a dwg file with some examples of what I mean. The faces that require adjustment are in yellow.

Can this be done? If so, how should I go about doing it?

[devitg]

Hi Tim , as I can see , the final task is to shrink the cut phat .

If it is so , it´s my view point

Freeze all but not the CUT layer

Nothing more than cut phat shall be at CUT layer 

Then do a JOIN ALL so each panel will be a closed POLYLINE.

 Make "CUT-0.25 layer "

Now do a 0.25 inside offset to each polyline

Move it to CUT-0.25 layer