Dim Styles - 2 questions..

[ILoveMadoka]

1) Can the creation of new dim styles be automated?

Script? Lisp?

 

2) Can Dim Styles be locked such that they cannot be modified,

bypassed or ignored?

 

Ok.. so that's 4 questions...

 

Please advise!!

 

Thanks so much for all previous help!!

[Lee Mac]

1) I personally have never tried to create a dimstyle via LISP methods, but I suppose the way I would go about it is to set all the dim variables to how I would like the dim-style to be:, i.e.

 

DIMADEC     0                    Angular decimal places
DIMALT      Off                  Alternate units selected
DIMALTD     4                    Alternate unit decimal places
DIMALTF     0.0394               Alternate unit scale factor
DIMALTRND   0.0000               Alternate units rounding value
DIMALTTD    4                    Alternate tolerance decimal places
DIMALTTZ    0                    Alternate tolerance zero suppression
DIMALTU     8                    Alternate units
DIMALTZ     0                    Alternate unit zero suppression
DIMAPOST                         Prefix and suffix for alternate text
DIMASZ      3.0000               Arrow size
DIMATFIT    3                    Arrow and text fit
DIMAUNIT    0                    Angular unit format
DIMAZIN     0                    Angular zero supression
DIMBLK      ClosedFilled         Arrow block name
DIMBLK1     ClosedFilled         First arrow block name
DIMBLK2     ClosedFilled         Second arrow block name
DIMCEN      0.0000               Center mark size
DIMCLRD     5 (blue)             Dimension line and leader color
DIMCLRE     5 (blue)             Extension line color
DIMCLRT     2 (yellow)           Dimension text color
DIMDEC      2                    Decimal places
DIMDLE      0.0000               Dimension line extension
DIMDLI      2.0000               Dimension line spacing
DIMDSEP     .                    Decimal separator
DIMEXE      2.0000               Extension above dimension line
DIMEXO      2.0000               Extension line origin offset
DIMFRAC     0                    Fraction format
DIMGAP      2.0000               Gap from dimension line to text
DIMJUST     0                    Justification of text on dimension line
DIMLDRBLK   ClosedFilled         Leader block name
DIMLFAC     1.0000               Linear unit scale factor
DIMLIM      Off                  Generate dimension limits
DIMLUNIT    2                    Linear unit format
DIMLWD      -2                   Dimension line and leader lineweight
DIMLWE      -2                   Extension line lineweight
DIMPOST                          Prefix and suffix for dimension text
DIMRND      0.0000               Rounding value
DIMSAH      Off                  Separate arrow blocks
DIMSCALE    0.0000               Overall scale factor
DIMSD1      Off                  Suppress the first dimension line
DIMSD2      Off                  Suppress the second dimension line
DIMSE1      Off                  Suppress the first extension line
DIMSE2      Off                  Suppress the second extension line
DIMSOXD     Off                  Suppress outside dimension lines
DIMTAD      3                    Place text above the dimension line
DIMTDEC     2                    Tolerance decimal places
DIMTFAC     1.0000               Tolerance text height scaling factor
DIMTIH      Off                  Text inside extensions is horizontal
DIMTIX      Off                  Place text inside extensions
DIMTM       0.0000               Minus tolerance
DIMTMOVE    2                    Text movement
DIMTOFL     Off                  Force line inside extension lines
DIMTOH      Off                  Text outside horizontal
DIMTOL      Off                  Tolerance dimensioning
DIMTOLJ     1                    Tolerance vertical justification
DIMTP       0.0000               Plus tolerance
DIMTSZ      0.0000               Tick size
DIMTVP      0.0000               Text vertical position
DIMTXSTY    STANDARD             Text style
DIMTXT      2.5000               Text height
DIMTZIN     0                    Tolerance zero suppression
DIMUPT      Off                  User positioned text
DIMZIN      8                    Zero suppression

 

And then include in my code:

 

(vl-cmdf "-dimstyle" "Save" "My_Dimstyle")

 

But as I say, I have never tried myself, and so I would not know if this would work or not...

 

2) I personally do not think it is possible to lock a dimstyle, but others may prove me wrong.