Inserting Dimstyles Using Lisp/Script

Help Needed: Loading Dimstyles with Lisp/Script

Hello all, I am trying to create a button for my company that will bring in our standard dimstyles into our drawings when needed.

I am not very familiar with AutoLisp and I've always been able to find a way to do what i needed to do using only scripts, until now.

The script I wrote works perfectly fine in "pure" AutoCAD. The problem is that some of our drafters use AutoCAD with Bentley Prostructures loaded into it. When my script gets to the PURGE command it will bomb out if the user is using AutoCAD with Prostructures. The reason being is that when AutoCAD is loaded with Prostructures, the PURGE command has a different sequence of Subcommands than just AutoCAD alone.

So this is where I need some help with a Lisp Routine (or maybe a modification of my script) to have the routine run the alternate PURGE command sequence if it bombs out on the first PURGE commmand sequence.

In a nutshell this what I wrote my script to do.

1. Set the STYLE to our company standard.

2. Insert a file with only our dimstyles (this was my work around from doing a Lisp routine initially)

3. Purge out only the name of the block I inserted in.

4. Run through all of the variables of our dimstyles ensuring that the dimstyles have the correct settings.

Below is the main script called "DIMSTYLE_LOAD" and another script of the alterante PURGE command sequence I need a Lisp to run if the initial PURGE sequence bombs out.

DIMSTYLE_LOAD

-STYLE
STANDARD romans.shx
0.0
.9
0
NO
NO
NO
-insert
C:\Users\hemstaim\Desktop\scriptbuttons\1_Scripts-for-Structural-Toolbar\DIMSTYLE-IMPORT.dwg
0,0,0
1  
ERASE L 
-PURGE
BLOCKS
DIMSTYLE-IMPORT
NO
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;DIMSTYLE SETUPS BELOW
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;PAPER 04
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-DIMSTYLE
SAVE
"PAPER 04"
Y
DIMADEC 3
DIMALT Off
DIMALTD 2
DIMALTF 25.40000
DIMALTRND 0
DIMALTTD 2
DIMALTTZ 0
DIMALTU 2
DIMALTZ 0
DIMARCSYM 0
DIMASZ 3/32
DIMATFIT 3
DIMAUNIT 0
DIMAZIN 0
DIMBLK .
DIMBLK1 .
DIMBLK2 .
DIMCEN 1/16
DIMCLRD 1
DIMCLRE 1
DIMCLRT 11
DIMDEC 4
DIMDLE 0
DIMDLI 3/8
DIMDSEP .
DIMEXE 3/32
DIMEXO 1/16
DIMFRAC 2
DIMFXL 1
DIMFXLON Off
DIMGAP 1/16
DIMJOGANG 45
DIMJUST 0
DIMLDRBLK .
DIMLFAC 4.00000
DIMLIM Off
DIMLTEX1 BYBLOCK
DIMLTEX2 BYBLOCK
DIMLTYPE BYBLOCK
DIMLUNIT 4
DIMLWD 9
DIMLWE 9
DIMRND 0
DIMSAH Off
DIMSCALE 1.00000
DIMSD1 Off
DIMSD2 Off
DIMSE1 Off
DIMSE2 Off
DIMSOXD Off
DIMTAD 1
DIMTDEC 4
DIMTFAC 1.00000
DIMTFILL 0
DIMTFILLCLR 0
DIMTIH Off
DIMTIX Off
DIMTM 0
DIMTMOVE 0
DIMTOFL On
DIMTOH Off
DIMTOL Off
DIMTOLJ 1
DIMTP 0
DIMTSZ 0
DIMTVP 0.00000
DIMTXSTY Standard
DIMTXT 3/32
DIMTXTDIRECTION Off
DIMTZIN 0
DIMUPT Off
DIMZIN 3
-DIMSTYLE
SAVE
"PAPER 04"
Y
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;PAPER 08
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-DIMSTYLE
SAVE
"PAPER 08"
Y
DIMADEC 3
DIMALT Off
DIMALTD 2
DIMALTF 25.40000
DIMALTRND 0
DIMALTTD 2
DIMALTTZ 0
DIMALTU 2
DIMALTZ 0
DIMARCSYM 0
DIMASZ 3/32
DIMATFIT 3
DIMAUNIT 0
DIMAZIN 0
DIMBLK .
DIMBLK1 .
DIMBLK2 .
DIMCEN 1/16
DIMCLRD 1
DIMCLRE 1
DIMCLRT 11
DIMDEC 4
DIMDLE 0
DIMDLI 3/8
DIMDSEP .
DIMEXE 3/32
DIMEXO 1/16
DIMFRAC 2
DIMFXL 1
DIMFXLON Off
DIMGAP 1/16
DIMJOGANG 45
DIMJUST 0
DIMLDRBLK .
DIMLFAC 8.00000
DIMLIM Off
DIMLTEX1 BYBLOCK
DIMLTEX2 BYBLOCK
DIMLTYPE BYBLOCK
DIMLUNIT 4
DIMLWD 9
DIMLWE 9
DIMRND 0
DIMSAH Off
DIMSCALE 1.00000
DIMSD1 Off
DIMSD2 Off
DIMSE1 Off
DIMSE2 Off
DIMSOXD Off
DIMTAD 1
DIMTDEC 4
DIMTFAC 1.00000
DIMTFILL 0
DIMTFILLCLR 0
DIMTIH Off
DIMTIX Off
DIMTM 0
DIMTMOVE 0
DIMTOFL On
DIMTOH Off
DIMTOL Off
DIMTOLJ 1
DIMTP 0
DIMTSZ 0
DIMTVP 0.00000
DIMTXSTY Standard
DIMTXT 3/32
DIMTXTDIRECTION Off
DIMTZIN 0
DIMUPT Off
DIMZIN 3
-DIMSTYLE
SAVE
"PAPER 08"
Y
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;PAPER 12
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-DIMSTYLE
SAVE
"PAPER 12"
Y
DIMADEC 3
DIMALT Off
DIMALTD 2
DIMALTF 25.40000
DIMALTRND 0
DIMALTTD 2
DIMALTTZ 0
DIMALTU 2
DIMALTZ 0
DIMARCSYM 0
DIMASZ 3/32
DIMATFIT 3
DIMAUNIT 0
DIMAZIN 0
DIMBLK .
DIMBLK1 .
DIMBLK2 .
DIMCEN 1/16
DIMCLRD 1
DIMCLRE 1
DIMCLRT 11
DIMDEC 4
DIMDLE 0
DIMDLI 3/8
DIMDSEP .
DIMEXE 3/32
DIMEXO 1/16
DIMFRAC 2
DIMFXL 1
DIMFXLON Off
DIMGAP 1/16
DIMJOGANG 45
DIMJUST 0
DIMLDRBLK .
DIMLFAC 12.00000
DIMLIM Off
DIMLTEX1 BYBLOCK
DIMLTEX2 BYBLOCK
DIMLTYPE BYBLOCK
DIMLUNIT 4
DIMLWD 9
DIMLWE 9
DIMRND 0
DIMSAH Off
DIMSCALE 1.00000
DIMSD1 Off
DIMSD2 Off
DIMSE1 Off
DIMSE2 Off
DIMSOXD Off
DIMTAD 1
DIMTDEC 4
DIMTFAC 1.00000
DIMTFILL 0
DIMTFILLCLR 0
DIMTIH Off
DIMTIX Off
DIMTM 0
DIMTMOVE 0
DIMTOFL On
DIMTOH Off
DIMTOL Off
DIMTOLJ 1
DIMTP 0
DIMTSZ 0
DIMTVP 0.00000
DIMTXSTY Standard
DIMTXT 3/32
DIMTXTDIRECTION Off
DIMTZIN 0
DIMUPT Off
DIMZIN 3
-DIMSTYLE
SAVE
"PAPER 12"
Y
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;PAPER 16
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-DIMSTYLE
SAVE
"PAPER 16"
Y
DIMADEC 3
DIMALT Off
DIMALTD 2
DIMALTF 25.40000
DIMALTRND 0
DIMALTTD 2
DIMALTTZ 0
DIMALTU 2
DIMALTZ 0
DIMARCSYM 0
DIMASZ 3/32
DIMATFIT 3
DIMAUNIT 0
DIMAZIN 0
DIMBLK .
DIMBLK1 .
DIMBLK2 .
DIMCEN 1/16
DIMCLRD 1
DIMCLRE 1
DIMCLRT 11
DIMDEC 4
DIMDLE 0
DIMDLI 3/8
DIMDSEP .
DIMEXE 3/32
DIMEXO 1/16
DIMFRAC 2
DIMFXL 1
DIMFXLON Off
DIMGAP 1/16
DIMJOGANG 45
DIMJUST 0
DIMLDRBLK .
DIMLFAC 16.00000
DIMLIM Off
DIMLTEX1 BYBLOCK
DIMLTEX2 BYBLOCK
DIMLTYPE BYBLOCK
DIMLUNIT 4
DIMLWD 9
DIMLWE 9
DIMRND 0
DIMSAH Off
DIMSCALE 1.00000
DIMSD1 Off
DIMSD2 Off
DIMSE1 Off
DIMSE2 Off
DIMSOXD Off
DIMTAD 1
DIMTDEC 4
DIMTFAC 1.00000
DIMTFILL 0
DIMTFILLCLR 0
DIMTIH Off
DIMTIX Off
DIMTM 0
DIMTMOVE 0
DIMTOFL On
DIMTOH Off
DIMTOL Off
DIMTOLJ 1
DIMTP 0
DIMTSZ 0
DIMTVP 0.00000
DIMTXSTY Standard
DIMTXT 3/32
DIMTXTDIRECTION Off
DIMTZIN 0
DIMUPT Off
DIMZIN 3
-DIMSTYLE
SAVE
"PAPER 16"
Y
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;PAPER 24
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-DIMSTYLE
SAVE
"PAPER 24"
Y
DIMADEC 3
DIMALT Off
DIMALTD 2
DIMALTF 25.40000
DIMALTRND 0
DIMALTTD 2
DIMALTTZ 0
DIMALTU 2
DIMALTZ 0
DIMARCSYM 0
DIMASZ 3/32
DIMATFIT 3
DIMAUNIT 0
DIMAZIN 0
DIMBLK .
DIMBLK1 .
DIMBLK2 .
DIMCEN 1/16
DIMCLRD 1
DIMCLRE 1
DIMCLRT 11
DIMDEC 4
DIMDLE 0
DIMDLI 3/8
DIMDSEP .
DIMEXE 3/32
DIMEXO 1/16
DIMFRAC 2
DIMFXL 1
DIMFXLON Off
DIMGAP 1/16
DIMJOGANG 45
DIMJUST 0
DIMLDRBLK .
DIMLFAC 24.00000
DIMLIM Off
DIMLTEX1 BYBLOCK
DIMLTEX2 BYBLOCK
DIMLTYPE BYBLOCK
DIMLUNIT 4
DIMLWD 9
DIMLWE 9
DIMRND 0
DIMSAH Off
DIMSCALE 1.00000
DIMSD1 Off
DIMSD2 Off
DIMSE1 Off
DIMSE2 Off
DIMSOXD Off
DIMTAD 1
DIMTDEC 4
DIMTFAC 1.00000
DIMTFILL 0
DIMTFILLCLR 0
DIMTIH Off
DIMTIX Off
DIMTM 0
DIMTMOVE 0
DIMTOFL On
DIMTOH Off
DIMTOL Off
DIMTOLJ 1
DIMTP 0
DIMTSZ 0
DIMTVP 0.00000
DIMTXSTY Standard
DIMTXT 3/32
DIMTXTDIRECTION Off
DIMTZIN 0
DIMUPT Off
DIMZIN 3
-DIMSTYLE
SAVE
"PAPER 24"
Y
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;PAPER 32
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-DIMSTYLE
SAVE
"PAPER 32"
Y
DIMADEC 3
DIMALT Off
DIMALTD 2
DIMALTF 25.40000
DIMALTRND 0
DIMALTTD 2
DIMALTTZ 0
DIMALTU 2
DIMALTZ 0
DIMARCSYM 0
DIMASZ 3/32
DIMATFIT 3
DIMAUNIT 0
DIMAZIN 0
DIMBLK .
DIMBLK1 .
DIMBLK2 .
DIMCEN 1/16
DIMCLRD 1
DIMCLRE 1
DIMCLRT 11
DIMDEC 4
DIMDLE 0
DIMDLI 3/8
DIMDSEP .
DIMEXE 3/32
DIMEXO 1/16
DIMFRAC 2
DIMFXL 1
DIMFXLON Off
DIMGAP 1/16
DIMJOGANG 45
DIMJUST 0
DIMLDRBLK .
DIMLFAC 32.00000
DIMLIM Off
DIMLTEX1 BYBLOCK
DIMLTEX2 BYBLOCK
DIMLTYPE BYBLOCK
DIMLUNIT 4
DIMLWD 9
DIMLWE 9
DIMRND 0
DIMSAH Off
DIMSCALE 1.00000
DIMSD1 Off
DIMSD2 Off
DIMSE1 Off
DIMSE2 Off
DIMSOXD Off
DIMTAD 1
DIMTDEC 4
DIMTFAC 1.00000
DIMTFILL 0
DIMTFILLCLR 0
DIMTIH Off
DIMTIX Off
DIMTM 0
DIMTMOVE 0
DIMTOFL On
DIMTOH Off
DIMTOL Off
DIMTOLJ 1
DIMTP 0
DIMTSZ 0
DIMTVP 0.00000
DIMTXSTY Standard
DIMTXT 3/32
DIMTXTDIRECTION Off
DIMTZIN 0
DIMUPT Off
DIMZIN 3
-DIMSTYLE
SAVE
"PAPER 32"
Y
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;PAPER 48
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-DIMSTYLE
SAVE
"PAPER 48"
Y
DIMADEC 3
DIMALT Off
DIMALTD 2
DIMALTF 25.40000
DIMALTRND 0
DIMALTTD 2
DIMALTTZ 0
DIMALTU 2
DIMALTZ 0
DIMARCSYM 0
DIMASZ 3/32
DIMATFIT 3
DIMAUNIT 0
DIMAZIN 0
DIMBLK .
DIMBLK1 .
DIMBLK2 .
DIMCEN 1/16
DIMCLRD 1
DIMCLRE 1
DIMCLRT 11
DIMDEC 4
DIMDLE 0
DIMDLI 3/8
DIMDSEP .
DIMEXE 3/32
DIMEXO 1/16
DIMFRAC 2
DIMFXL 1
DIMFXLON Off
DIMGAP 1/16
DIMJOGANG 45
DIMJUST 0
DIMLDRBLK .
DIMLFAC 48.00000
DIMLIM Off
DIMLTEX1 BYBLOCK
DIMLTEX2 BYBLOCK
DIMLTYPE BYBLOCK
DIMLUNIT 4
DIMLWD 9
DIMLWE 9
DIMRND 0
DIMSAH Off
DIMSCALE 1.00000
DIMSD1 Off
DIMSD2 Off
DIMSE1 Off
DIMSE2 Off
DIMSOXD Off
DIMTAD 1
DIMTDEC 4
DIMTFAC 1.00000
DIMTFILL 0
DIMTFILLCLR 0
DIMTIH Off
DIMTIX Off
DIMTM 0
DIMTMOVE 0
DIMTOFL On
DIMTOH Off
DIMTOL Off
DIMTOLJ 1
DIMTP 0
DIMTSZ 0
DIMTVP 0.00000
DIMTXSTY Standard
DIMTXT 3/32
DIMTXTDIRECTION Off
DIMTZIN 0
DIMUPT Off
DIMZIN 3
-DIMSTYLE
SAVE
"PAPER 48"
Y
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;PAPER 64
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-DIMSTYLE
SAVE
"PAPER 64"
Y
DIMADEC 3
DIMALT Off
DIMALTD 2
DIMALTF 25.40000
DIMALTRND 0
DIMALTTD 2
DIMALTTZ 0
DIMALTU 2
DIMALTZ 0
DIMARCSYM 0
DIMASZ 3/32
DIMATFIT 3
DIMAUNIT 0
DIMAZIN 0
DIMBLK .
DIMBLK1 .
DIMBLK2 .
DIMCEN 1/16
DIMCLRD 1
DIMCLRE 1
DIMCLRT 11
DIMDEC 4
DIMDLE 0
DIMDLI 3/8
DIMDSEP .
DIMEXE 3/32
DIMEXO 1/16
DIMFRAC 2
DIMFXL 1
DIMFXLON Off
DIMGAP 1/16
DIMJOGANG 45
DIMJUST 0
DIMLDRBLK .
DIMLFAC 64.00000
DIMLIM Off
DIMLTEX1 BYBLOCK
DIMLTEX2 BYBLOCK
DIMLTYPE BYBLOCK
DIMLUNIT 4
DIMLWD 9
DIMLWE 9
DIMRND 0
DIMSAH Off
DIMSCALE 1.00000
DIMSD1 Off
DIMSD2 Off
DIMSE1 Off
DIMSE2 Off
DIMSOXD Off
DIMTAD 1
DIMTDEC 4
DIMTFAC 1.00000
DIMTFILL 0
DIMTFILLCLR 0
DIMTIH Off
DIMTIX Off
DIMTM 0
DIMTMOVE 0
DIMTOFL On
DIMTOH Off
DIMTOL Off
DIMTOLJ 1
DIMTP 0
DIMTSZ 0
DIMTVP 0.00000
DIMTXSTY Standard
DIMTXT 3/32
DIMTXTDIRECTION Off
DIMTZIN 0
DIMUPT Off
DIMZIN 3
-DIMSTYLE
SAVE
"PAPER 64"
Y
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;PAPER 96
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-DIMSTYLE
SAVE
"PAPER 96"
Y
DIMADEC 3
DIMALT Off
DIMALTD 2
DIMALTF 25.40000
DIMALTRND 0
DIMALTTD 2
DIMALTTZ 0
DIMALTU 2
DIMALTZ 0
DIMARCSYM 0
DIMASZ 3/32
DIMATFIT 3
DIMAUNIT 0
DIMAZIN 0
DIMBLK .
DIMBLK1 .
DIMBLK2 .
DIMCEN 1/16
DIMCLRD 1
DIMCLRE 1
DIMCLRT 11
DIMDEC 4
DIMDLE 0
DIMDLI 3/8
DIMDSEP .
DIMEXE 3/32
DIMEXO 1/16
DIMFRAC 2
DIMFXL 1
DIMFXLON Off
DIMGAP 1/16
DIMJOGANG 45
DIMJUST 0
DIMLDRBLK .
DIMLFAC 96.00000
DIMLIM Off
DIMLTEX1 BYBLOCK
DIMLTEX2 BYBLOCK
DIMLTYPE BYBLOCK
DIMLUNIT 4
DIMLWD 9
DIMLWE 9
DIMRND 0
DIMSAH Off
DIMSCALE 1.00000
DIMSD1 Off
DIMSD2 Off
DIMSE1 Off
DIMSE2 Off
DIMSOXD Off
DIMTAD 1
DIMTDEC 4
DIMTFAC 1.00000
DIMTFILL 0
DIMTFILLCLR 0
DIMTIH Off
DIMTIX Off
DIMTM 0
DIMTMOVE 0
DIMTOFL On
DIMTOH Off
DIMTOL Off
DIMTOLJ 1
DIMTP 0
DIMTSZ 0
DIMTVP 0.00000
DIMTXSTY Standard
DIMTXT 3/32
DIMTXTDIRECTION Off
DIMTZIN 0
DIMUPT Off
DIMZIN 3
-DIMSTYLE
SAVE
"PAPER 96"
Y
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;PAPER 128
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-DIMSTYLE
SAVE
"PAPER 128"
Y
DIMADEC 3
DIMALT Off
DIMALTD 2
DIMALTF 25.40000
DIMALTRND 0
DIMALTTD 2
DIMALTTZ 0
DIMALTU 2
DIMALTZ 0
DIMARCSYM 0
DIMASZ 3/32
DIMATFIT 3
DIMAUNIT 0
DIMAZIN 0
DIMBLK .
DIMBLK1 .
DIMBLK2 .
DIMCEN 1/16
DIMCLRD 1
DIMCLRE 1
DIMCLRT 11
DIMDEC 4
DIMDLE 0
DIMDLI 3/8
DIMDSEP .
DIMEXE 3/32
DIMEXO 1/16
DIMFRAC 2
DIMFXL 1
DIMFXLON Off
DIMGAP 1/16
DIMJOGANG 45
DIMJUST 0
DIMLDRBLK .
DIMLFAC 128.00000
DIMLIM Off
DIMLTEX1 BYBLOCK
DIMLTEX2 BYBLOCK
DIMLTYPE BYBLOCK
DIMLUNIT 4
DIMLWD 9
DIMLWE 9
DIMRND 0
DIMSAH Off
DIMSCALE 1.00000
DIMSD1 Off
DIMSD2 Off
DIMSE1 Off
DIMSE2 Off
DIMSOXD Off
DIMTAD 1
DIMTDEC 4
DIMTFAC 1.00000
DIMTFILL 0
DIMTFILLCLR 0
DIMTIH Off
DIMTIX Off
DIMTM 0
DIMTMOVE 0
DIMTOFL On
DIMTOH Off
DIMTOL Off
DIMTOLJ 1
DIMTP 0
DIMTSZ 0
DIMTVP 0.00000
DIMTXSTY Standard
DIMTXT 3/32
DIMTXTDIRECTION Off
DIMTZIN 0
DIMUPT Off
DIMZIN 3
-DIMSTYLE
SAVE
"PAPER 128"
Y
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;PAPER 192
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-DIMSTYLE
SAVE
"PAPER 192"
Y
DIMADEC 3
DIMALT Off
DIMALTD 2
DIMALTF 25.40000
DIMALTRND 0
DIMALTTD 2
DIMALTTZ 0
DIMALTU 2
DIMALTZ 0
DIMARCSYM 0
DIMASZ 3/32
DIMATFIT 3
DIMAUNIT 0
DIMAZIN 0
DIMBLK .
DIMBLK1 .
DIMBLK2 .
DIMCEN 1/16
DIMCLRD 1
DIMCLRE 1
DIMCLRT 11
DIMDEC 4
DIMDLE 0
DIMDLI 3/8
DIMDSEP .
DIMEXE 3/32
DIMEXO 1/16
DIMFRAC 2
DIMFXL 1
DIMFXLON Off
DIMGAP 1/16
DIMJOGANG 45
DIMJUST 0
DIMLDRBLK .
DIMLFAC 192.00000
DIMLIM Off
DIMLTEX1 BYBLOCK
DIMLTEX2 BYBLOCK
DIMLTYPE BYBLOCK
DIMLUNIT 4
DIMLWD 9
DIMLWE 9
DIMRND 0
DIMSAH Off
DIMSCALE 1.00000
DIMSD1 Off
DIMSD2 Off
DIMSE1 Off
DIMSE2 Off
DIMSOXD Off
DIMTAD 1
DIMTDEC 4
DIMTFAC 1.00000
DIMTFILL 0
DIMTFILLCLR 0
DIMTIH Off
DIMTIX Off
DIMTM 0
DIMTMOVE 0
DIMTOFL On
DIMTOH Off
DIMTOL Off
DIMTOLJ 1
DIMTP 0
DIMTSZ 0
DIMTVP 0.00000
DIMTXSTY Standard
DIMTXT 3/32
DIMTXTDIRECTION Off
DIMTZIN 0
DIMUPT Off
DIMZIN 3
-DIMSTYLE
SAVE
"PAPER 192"
Y
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;WHL0004
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-DIMSTYLE
SAVE
WHL0004
Y
DIMADEC 3
DIMALT Off
DIMALTD 2
DIMALTF 25.40000
DIMALTRND 0
DIMALTTD 2
DIMALTTZ 0
DIMALTU 2
DIMALTZ 0
DIMARCSYM 0
DIMASZ 3/32
DIMATFIT 3
DIMAUNIT 0
DIMAZIN 0
DIMBLK .
DIMBLK1 .
DIMBLK2 .
DIMCEN 1/16
DIMCLRD 1
DIMCLRE 1
DIMCLRT 11
DIMDEC 4
DIMDLE 0
DIMDLI 3/8
DIMDSEP .
DIMEXE 3/32
DIMEXO 1/16
DIMFRAC 2
DIMFXL 1
DIMFXLON Off
DIMGAP 1/16
DIMJOGANG 45
DIMJUST 0
DIMLDRBLK .
DIMLFAC 1.00000
DIMLIM Off
DIMLTEX1 BYBLOCK
DIMLTEX2 BYBLOCK
DIMLTYPE BYBLOCK
DIMLUNIT 4
DIMLWD 9
DIMLWE 9
DIMRND 0
DIMSAH Off
DIMSCALE 4.00000
DIMSD1 Off
DIMSD2 Off
DIMSE1 Off
DIMSE2 Off
DIMSOXD Off
DIMTAD 1
DIMTDEC 4
DIMTFAC 1.00000
DIMTFILL 0
DIMTFILLCLR 0
DIMTIH Off
DIMTIX Off
DIMTM 0
DIMTMOVE 0
DIMTOFL On
DIMTOH Off
DIMTOL Off
DIMTOLJ 1
DIMTP 0
DIMTSZ 0
DIMTVP 0.00000
DIMTXSTY Standard
DIMTXT 3/32
DIMTXTDIRECTION Off
DIMTZIN 0
DIMUPT Off
DIMZIN 3
-DIMSTYLE
SAVE
WHL0004
Y
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;WHL0008
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-DIMSTYLE
SAVE
WHL0008
Y
DIMADEC 3
DIMALT Off
DIMALTD 2
DIMALTF 25.40000
DIMALTRND 0
DIMALTTD 2
DIMALTTZ 0
DIMALTU 2
DIMALTZ 0
DIMARCSYM 0
DIMASZ 3/32
DIMATFIT 3
DIMAUNIT 0
DIMAZIN 0
DIMBLK .
DIMBLK1 .
DIMBLK2 .
DIMCEN 1/16
DIMCLRD 1
DIMCLRE 1
DIMCLRT 11
DIMDEC 4
DIMDLE 0
DIMDLI 3/8
DIMDSEP .
DIMEXE 3/32
DIMEXO 1/16
DIMFRAC 2
DIMFXL 1
DIMFXLON Off
DIMGAP 1/16
DIMJOGANG 45
DIMJUST 0
DIMLDRBLK .
DIMLFAC 1.00000
DIMLIM Off
DIMLTEX1 BYBLOCK
DIMLTEX2 BYBLOCK
DIMLTYPE BYBLOCK
DIMLUNIT 4
DIMLWD 9
DIMLWE 9
DIMRND 0
DIMSAH Off
DIMSCALE 8.00000
DIMSD1 Off
DIMSD2 Off
DIMSE1 Off
DIMSE2 Off
DIMSOXD Off
DIMTAD 1
DIMTDEC 4
DIMTFAC 1.00000
DIMTFILL 0
DIMTFILLCLR 0
DIMTIH Off
DIMTIX Off
DIMTM 0
DIMTMOVE 0
DIMTOFL On
DIMTOH Off
DIMTOL Off
DIMTOLJ 1
DIMTP 0
DIMTSZ 0
DIMTVP 0.00000
DIMTXSTY Standard
DIMTXT 3/32
DIMTXTDIRECTION Off
DIMTZIN 0
DIMUPT Off
DIMZIN 3
-DIMSTYLE
SAVE
WHL0008
Y
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;WHL0012
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-DIMSTYLE
SAVE
WHL0012
Y
DIMADEC 3
DIMALT Off
DIMALTD 2
DIMALTF 25.40000
DIMALTRND 0
DIMALTTD 2
DIMALTTZ 0
DIMALTU 2
DIMALTZ 0
DIMARCSYM 0
DIMASZ 3/32
DIMATFIT 3
DIMAUNIT 0
DIMAZIN 0
DIMBLK .
DIMBLK1 .
DIMBLK2 .
DIMCEN 1/16
DIMCLRD 1
DIMCLRE 1
DIMCLRT 11
DIMDEC 4
DIMDLE 0
DIMDLI 3/8
DIMDSEP .
DIMEXE 3/32
DIMEXO 1/16
DIMFRAC 2
DIMFXL 1
DIMFXLON Off
DIMGAP 1/16
DIMJOGANG 45
DIMJUST 0
DIMLDRBLK .
DIMLFAC 1.00000
DIMLIM Off
DIMLTEX1 BYBLOCK
DIMLTEX2 BYBLOCK
DIMLTYPE BYBLOCK
DIMLUNIT 4
DIMLWD 9
DIMLWE 9
DIMRND 0
DIMSAH Off
DIMSCALE 12.00000
DIMSD1 Off
DIMSD2 Off
DIMSE1 Off
DIMSE2 Off
DIMSOXD Off
DIMTAD 1
DIMTDEC 4
DIMTFAC 1.00000
DIMTFILL 0
DIMTFILLCLR 0
DIMTIH Off
DIMTIX Off
DIMTM 0
DIMTMOVE 0
DIMTOFL On
DIMTOH Off
DIMTOL Off
DIMTOLJ 1
DIMTP 0
DIMTSZ 0
DIMTVP 0.00000
DIMTXSTY Standard
DIMTXT 3/32
DIMTXTDIRECTION Off
DIMTZIN 0
DIMUPT Off
DIMZIN 3
-DIMSTYLE
SAVE
WHL0012
Y
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;WHL0016
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-DIMSTYLE
SAVE
WHL0016
Y
DIMADEC 3
DIMALT Off
DIMALTD 2
DIMALTF 25.40000
DIMALTRND 0
DIMALTTD 2
DIMALTTZ 0
DIMALTU 2
DIMALTZ 0
DIMARCSYM 0
DIMASZ 3/32
DIMATFIT 3
DIMAUNIT 0
DIMAZIN 0
DIMBLK .
DIMBLK1 .
DIMBLK2 .
DIMCEN 1/16
DIMCLRD 1
DIMCLRE 1
DIMCLRT 11
DIMDEC 4
DIMDLE 0
DIMDLI 3/8
DIMDSEP .
DIMEXE 3/32
DIMEXO 1/16
DIMFRAC 2
DIMFXL 1
DIMFXLON Off
DIMGAP 1/16
DIMJOGANG 45
DIMJUST 0
DIMLDRBLK .
DIMLFAC 1.00000
DIMLIM Off
DIMLTEX1 BYBLOCK
DIMLTEX2 BYBLOCK
DIMLTYPE BYBLOCK
DIMLUNIT 4
DIMLWD 9
DIMLWE 9
DIMRND 0
DIMSAH Off
DIMSCALE 16.00000
DIMSD1 Off
DIMSD2 Off
DIMSE1 Off
DIMSE2 Off
DIMSOXD Off
DIMTAD 1
DIMTDEC 4
DIMTFAC 1.00000
DIMTFILL 0
DIMTFILLCLR 0
DIMTIH Off
DIMTIX Off
DIMTM 0
DIMTMOVE 0
DIMTOFL On
DIMTOH Off
DIMTOL Off
DIMTOLJ 1
DIMTP 0
DIMTSZ 0
DIMTVP 0.00000
DIMTXSTY Standard
DIMTXT 3/32
DIMTXTDIRECTION Off
DIMTZIN 0
DIMUPT Off
DIMZIN 3
-DIMSTYLE
SAVE
WHL0016
Y
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;WHL0024
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-DIMSTYLE
SAVE
WHL0024
Y
DIMADEC 3
DIMALT Off
DIMALTD 2
DIMALTF 25.40000
DIMALTRND 0
DIMALTTD 2
DIMALTTZ 0
DIMALTU 2
DIMALTZ 0
DIMARCSYM 0
DIMASZ 3/32
DIMATFIT 3
DIMAUNIT 0
DIMAZIN 0
DIMBLK .
DIMBLK1 .
DIMBLK2 .
DIMCEN 1/16
DIMCLRD 1
DIMCLRE 1
DIMCLRT 11
DIMDEC 4
DIMDLE 0
DIMDLI 3/8
DIMDSEP .
DIMEXE 3/32
DIMEXO 1/16
DIMFRAC 2
DIMFXL 1
DIMFXLON Off
DIMGAP 1/16
DIMJOGANG 45
DIMJUST 0
DIMLDRBLK .
DIMLFAC 1.00000
DIMLIM Off
DIMLTEX1 BYBLOCK
DIMLTEX2 BYBLOCK
DIMLTYPE BYBLOCK
DIMLUNIT 4
DIMLWD 9
DIMLWE 9
DIMRND 0
DIMSAH Off
DIMSCALE 24.00000
DIMSD1 Off
DIMSD2 Off
DIMSE1 Off
DIMSE2 Off
DIMSOXD Off
DIMTAD 1
DIMTDEC 4
DIMTFAC 1.00000
DIMTFILL 0
DIMTFILLCLR 0
DIMTIH Off
DIMTIX Off
DIMTM 0
DIMTMOVE 0
DIMTOFL On
DIMTOH Off
DIMTOL Off
DIMTOLJ 1
DIMTP 0
DIMTSZ 0
DIMTVP 0.00000
DIMTXSTY Standard
DIMTXT 3/32
DIMTXTDIRECTION Off
DIMTZIN 0
DIMUPT Off
DIMZIN 3
-DIMSTYLE
SAVE
WHL0024
Y
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;WHL0032
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-DIMSTYLE
SAVE
WHL0032
Y
DIMADEC 3
DIMALT Off
DIMALTD 2
DIMALTF 25.40000
DIMALTRND 0
DIMALTTD 2
DIMALTTZ 0
DIMALTU 2
DIMALTZ 0
DIMARCSYM 0
DIMASZ 3/32
DIMATFIT 3
DIMAUNIT 0
DIMAZIN 0
DIMBLK .
DIMBLK1 .
DIMBLK2 .
DIMCEN 1/16
DIMCLRD 1
DIMCLRE 1
DIMCLRT 11
DIMDEC 4
DIMDLE 0
DIMDLI 3/8
DIMDSEP .
DIMEXE 3/32
DIMEXO 1/16
DIMFRAC 2
DIMFXL 1
DIMFXLON Off
DIMGAP 1/16
DIMJOGANG 45
DIMJUST 0
DIMLDRBLK .
DIMLFAC 1.00000
DIMLIM Off
DIMLTEX1 BYBLOCK
DIMLTEX2 BYBLOCK
DIMLTYPE BYBLOCK
DIMLUNIT 4
DIMLWD 9
DIMLWE 9
DIMRND 0
DIMSAH Off
DIMSCALE 32.00000
DIMSD1 Off
DIMSD2 Off
DIMSE1 Off
DIMSE2 Off
DIMSOXD Off
DIMTAD 1
DIMTDEC 4
DIMTFAC 1.00000
DIMTFILL 0
DIMTFILLCLR 0
DIMTIH Off
DIMTIX Off
DIMTM 0
DIMTMOVE 0
DIMTOFL On
DIMTOH Off
DIMTOL Off
DIMTOLJ 1
DIMTP 0
DIMTSZ 0
DIMTVP 0.00000
DIMTXSTY Standard
DIMTXT 3/32
DIMTXTDIRECTION Off
DIMTZIN 0
DIMUPT Off
DIMZIN 3
-DIMSTYLE
SAVE
WHL0032
Y
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;WHL0048
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-DIMSTYLE
SAVE
WHL0048
Y
DIMADEC 3
DIMALT Off
DIMALTD 2
DIMALTF 25.40000
DIMALTRND 0
DIMALTTD 2
DIMALTTZ 0
DIMALTU 2
DIMALTZ 0
DIMARCSYM 0
DIMASZ 3/32
DIMATFIT 3
DIMAUNIT 0
DIMAZIN 0
DIMBLK .
DIMBLK1 .
DIMBLK2 .
DIMCEN 1/16
DIMCLRD 1
DIMCLRE 1
DIMCLRT 11
DIMDEC 4
DIMDLE 0
DIMDLI 3/8
DIMDSEP .
DIMEXE 3/32
DIMEXO 1/16
DIMFRAC 2
DIMFXL 1
DIMFXLON Off
DIMGAP 1/16
DIMJOGANG 45
DIMJUST 0
DIMLDRBLK .
DIMLFAC 1.00000
DIMLIM Off
DIMLTEX1 BYBLOCK
DIMLTEX2 BYBLOCK
DIMLTYPE BYBLOCK
DIMLUNIT 4
DIMLWD 9
DIMLWE 9
DIMRND 0
DIMSAH Off
DIMSCALE 48.00000
DIMSD1 Off
DIMSD2 Off
DIMSE1 Off
DIMSE2 Off
DIMSOXD Off
DIMTAD 1
DIMTDEC 4
DIMTFAC 1.00000
DIMTFILL 0
DIMTFILLCLR 0
DIMTIH Off
DIMTIX Off
DIMTM 0
DIMTMOVE 0
DIMTOFL On
DIMTOH Off
DIMTOL Off
DIMTOLJ 1
DIMTP 0
DIMTSZ 0
DIMTVP 0.00000
DIMTXSTY Standard
DIMTXT 3/32
DIMTXTDIRECTION Off
DIMTZIN 0
DIMUPT Off
DIMZIN 3
-DIMSTYLE
SAVE
WHL0048
Y
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;WHL0064
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-DIMSTYLE
SAVE
WHL0064
Y
DIMADEC 3
DIMALT Off
DIMALTD 2
DIMALTF 25.40000
DIMALTRND 0
DIMALTTD 2
DIMALTTZ 0
DIMALTU 2
DIMALTZ 0
DIMARCSYM 0
DIMASZ 3/32
DIMATFIT 3
DIMAUNIT 0
DIMAZIN 0
DIMBLK .
DIMBLK1 .
DIMBLK2 .
DIMCEN 1/16
DIMCLRD 1
DIMCLRE 1
DIMCLRT 11
DIMDEC 4
DIMDLE 0
DIMDLI 3/8
DIMDSEP .
DIMEXE 3/32
DIMEXO 1/16
DIMFRAC 2
DIMFXL 1
DIMFXLON Off
DIMGAP 1/16
DIMJOGANG 45
DIMJUST 0
DIMLDRBLK .
DIMLFAC 1.00000
DIMLIM Off
DIMLTEX1 BYBLOCK
DIMLTEX2 BYBLOCK
DIMLTYPE BYBLOCK
DIMLUNIT 4
DIMLWD 9
DIMLWE 9
DIMRND 0
DIMSAH Off
DIMSCALE 64.00000
DIMSD1 Off
DIMSD2 Off
DIMSE1 Off
DIMSE2 Off
DIMSOXD Off
DIMTAD 1
DIMTDEC 4
DIMTFAC 1.00000
DIMTFILL 0
DIMTFILLCLR 0
DIMTIH Off
DIMTIX Off
DIMTM 0
DIMTMOVE 0
DIMTOFL On
DIMTOH Off
DIMTOL Off
DIMTOLJ 1
DIMTP 0
DIMTSZ 0
DIMTVP 0.00000
DIMTXSTY Standard
DIMTXT 3/32
DIMTXTDIRECTION Off
DIMTZIN 0
DIMUPT Off
DIMZIN 3
-DIMSTYLE
SAVE
WHL0064
Y
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;WHL0096
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-DIMSTYLE
SAVE
WHL0096
Y
DIMADEC 3
DIMALT Off
DIMALTD 2
DIMALTF 25.40000
DIMALTRND 0
DIMALTTD 2
DIMALTTZ 0
DIMALTU 2
DIMALTZ 0
DIMARCSYM 0
DIMASZ 3/32
DIMATFIT 3
DIMAUNIT 0
DIMAZIN 0
DIMBLK .
DIMBLK1 .
DIMBLK2 .
DIMCEN 1/16
DIMCLRD 1
DIMCLRE 1
DIMCLRT 11
DIMDEC 4
DIMDLE 0
DIMDLI 3/8
DIMDSEP .
DIMEXE 3/32
DIMEXO 1/16
DIMFRAC 2
DIMFXL 1
DIMFXLON Off
DIMGAP 1/16
DIMJOGANG 45
DIMJUST 0
DIMLDRBLK .
DIMLFAC 1.00000
DIMLIM Off
DIMLTEX1 BYBLOCK
DIMLTEX2 BYBLOCK
DIMLTYPE BYBLOCK
DIMLUNIT 4
DIMLWD 9
DIMLWE 9
DIMRND 0
DIMSAH Off
DIMSCALE 96.00000
DIMSD1 Off
DIMSD2 Off
DIMSE1 Off
DIMSE2 Off
DIMSOXD Off
DIMTAD 1
DIMTDEC 4
DIMTFAC 1.00000
DIMTFILL 0
DIMTFILLCLR 0
DIMTIH Off
DIMTIX Off
DIMTM 0
DIMTMOVE 0
DIMTOFL On
DIMTOH Off
DIMTOL Off
DIMTOLJ 1
DIMTP 0
DIMTSZ 0
DIMTVP 0.00000
DIMTXSTY Standard
DIMTXT 3/32
DIMTXTDIRECTION Off
DIMTZIN 0
DIMUPT Off
DIMZIN 3
-DIMSTYLE
SAVE
WHL0096
Y
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;WHL0128
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-DIMSTYLE
SAVE
WHL0128
Y
DIMADEC 3
DIMALT Off
DIMALTD 2
DIMALTF 25.40000
DIMALTRND 0
DIMALTTD 2
DIMALTTZ 0
DIMALTU 2
DIMALTZ 0
DIMARCSYM 0
DIMASZ 3/32
DIMATFIT 3
DIMAUNIT 0
DIMAZIN 0
DIMBLK .
DIMBLK1 .
DIMBLK2 .
DIMCEN 1/16
DIMCLRD 1
DIMCLRE 1
DIMCLRT 11
DIMDEC 4
DIMDLE 0
DIMDLI 3/8
DIMDSEP .
DIMEXE 3/32
DIMEXO 1/16
DIMFRAC 2
DIMFXL 1
DIMFXLON Off
DIMGAP 1/16
DIMJOGANG 45
DIMJUST 0
DIMLDRBLK .
DIMLFAC 1.00000
DIMLIM Off
DIMLTEX1 BYBLOCK
DIMLTEX2 BYBLOCK
DIMLTYPE BYBLOCK
DIMLUNIT 4
DIMLWD 9
DIMLWE 9
DIMRND 0
DIMSAH Off
DIMSCALE 128.00000
DIMSD1 Off
DIMSD2 Off
DIMSE1 Off
DIMSE2 Off
DIMSOXD Off
DIMTAD 1
DIMTDEC 4
DIMTFAC 1.00000
DIMTFILL 0
DIMTFILLCLR 0
DIMTIH Off
DIMTIX Off
DIMTM 0
DIMTMOVE 0
DIMTOFL On
DIMTOH Off
DIMTOL Off
DIMTOLJ 1
DIMTP 0
DIMTSZ 0
DIMTVP 0.00000
DIMTXSTY Standard
DIMTXT 3/32
DIMTXTDIRECTION Off
DIMTZIN 0
DIMUPT Off
DIMZIN 3
-DIMSTYLE
SAVE
WHL0128
Y
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;WHL0192
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-DIMSTYLE
SAVE
WHL0192
Y
DIMADEC 3
DIMALT Off
DIMALTD 2
DIMALTF 25.40000
DIMALTRND 0
DIMALTTD 2
DIMALTTZ 0
DIMALTU 2
DIMALTZ 0
DIMARCSYM 0
DIMASZ 3/32
DIMATFIT 3
DIMAUNIT 0
DIMAZIN 0
DIMBLK .
DIMBLK1 .
DIMBLK2 .
DIMCEN 1/16
DIMCLRD 1
DIMCLRE 1
DIMCLRT 11
DIMDEC 4
DIMDLE 0
DIMDLI 3/8
DIMDSEP .
DIMEXE 3/32
DIMEXO 1/16
DIMFRAC 2
DIMFXL 1
DIMFXLON Off
DIMGAP 1/16
DIMJOGANG 45
DIMJUST 0
DIMLDRBLK .
DIMLFAC 1.00000
DIMLIM Off
DIMLTEX1 BYBLOCK
DIMLTEX2 BYBLOCK
DIMLTYPE BYBLOCK
DIMLUNIT 4
DIMLWD 9
DIMLWE 9
DIMRND 0
DIMSAH Off
DIMSCALE 192.00000
DIMSD1 Off
DIMSD2 Off
DIMSE1 Off
DIMSE2 Off
DIMSOXD Off
DIMTAD 1
DIMTDEC 4
DIMTFAC 1.00000
DIMTFILL 0
DIMTFILLCLR 0
DIMTIH Off
DIMTIX Off
DIMTM 0
DIMTMOVE 0
DIMTOFL On
DIMTOH Off
DIMTOL Off
DIMTOLJ 1
DIMTP 0
DIMTSZ 0
DIMTVP 0.00000
DIMTXSTY Standard
DIMTXT 3/32
DIMTXTDIRECTION Off
DIMTZIN 0
DIMUPT Off
DIMZIN 3
-DIMSTYLE
SAVE
WHL0192
Y
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-DIMSTYLE
RESTORE
WHL0048

ALTERNATE_PURGE

-PURGE
N
N
N
N
N
BLOCKS
DIMSTYLE-IMPORT
NO

DIMSTYLE-IMPORT.dwg

DIMSTYLE_LOAD.scr

ALTERNATE_PURGE.scr

Assuming that Bentley Prostructures redefines the Purge command:

Try prefixing the command name with a '.':

.-PURGE

This instructs AC to use the 'un-redefined' command.

Nope, .-PURGE is still getting me the alternate subcommand sequence. Any other ideas?

just for reference, below is the "alternate" subcommand sequence Bentley Prostructures is making me go thru for a PURGE

Command: .-PU
.-PURGE
Check Drawing Integrity
Checked Database in Time=0 Tenth of Seconds
Number of BlockRecords checked 4
Number of BlockRecord Objects checked 1
Number of Layers checked 20
Number of Linetypes checked 5
Number of Named Object Dictionary checked 21
Number of Named Dictionarys checked 97

Delete redundant Shape References? [Yes/No] <N>:*Cancel*

Do you want to remove unused Positionflag Styles? No,<Yes>n
Delete redundant bolt styles? [Yes/No] <Y>:n
Do you want to remove unused Elevationsign Styles? No,<Yes>n
Do you want to remove unused Weldflag Styles? No,<Yes>n
Enter type of unused objects to purge 
[blocks/Dimstyles/Groups/LAyers/LTypes/MAterials/MUltileaderstyles/Plotstyles/SH
apes/textSTyles/Mlinestyles/Tablestyles/Visualstyles/Regapps/Zero-length 
geometry/Empty text objects/All]: b
Enter name(s) to purge <*>: -dimstyle-import
Verify each name to be purged? [Yes/No] <Y>: n

No unreferenced visual styles found.

Why not use Lee Mac's Steal from Drawing routine? You must already have those Dimension Styles saved in a drawing or template anyway. Macro would look something like:

^C^C^P(or C:Steal (load "StealV1-8.lsp"))(Steal (strcat (vl-filename-directory (getenv "QnewTemplate")) (chr 92) "Templates.dwt") (list (list "Dimension Styles" (list "Arch .1")))) ^P

tombu is on the money we do just that for a project we started multiple dwgs and some blocks where left out. Just saved it to our lisp directory, drag and drop it onto the dwg all done.

I checked it out, it looks like it will be exactly what I need to go the lisp route. I'll dive into it this weekend and figure out what I need to do to load it on a "one click button".

Thanks tombu!

(Steal "<YOUR DWT PATH HERE>.dwt" '(("Dimension Styles"("*"))))

I checked it out, it looks like it will be exactly what I need to go the lisp route. I'll dive into it this weekend and figure out what I need to do to load it on a "one click button".

 

Thanks tombu!

By starting the macro with

^C^C^P(or C:Steal (load "StealV1-8.lsp"))

^C^C cancels the current command, and (or C:Steal (load "StealV1-8.lsp")) checks and loads the lisp if it hasn't already been loaded. Many lisp routines available from my interface, but only a couple loaded on opening a drawing. Starting and ending a macro with ^P limits what's bounced to the command line.

Many thanks indeed for the recommendation tombu - I'm delighted to see that my Steal program is proving so useful within the community.

Haha Lee. Its one off your best programs!

Everything worked out great guys! Thanks again!