Variables

Variables

Anonymous
Not applicable
622 Views
10 Replies
Message 1 of 11

Variables

Anonymous
Not applicable
Hi all,

Is there a way in lisp to set dimvars for precision and dimanno? (trying to
automate old dims to annotative dims in lisp).

Is there a variable to set drawing precision?

--
Thanks

Melvin Donaldson
Tech Support
Kephart
Community-Planning-Architecture
0 Likes
623 Views
10 Replies
Replies (10)
Message 2 of 11

Anonymous
Not applicable
Drawing precision variables:

AUPREC - angular units precision

LUPREC - linerar units precision

Dimension precision variables (you may need to set these by dimension style??? - I have not played with dimension variables directly in years):

DIMADEC - angular dimension units precision, set to -1 to use DIMDEC setting

DIMALTD - alternate measurement precision

DIMALTTD - alternate units tolerance values precision

DIMDEC - primary units precision

DIMTDEC - primary units tolerance precision

I can not help with the annotative dimension question.

--

David Koch
Autodesk Discussion Group Facilitator
Using ADT 2004 at work; access to 2005, 2006 & 2007 at home
0 Likes
Message 3 of 11

Anonymous
Not applicable
Thanks David.


wrote in message news:5633108@discussion.autodesk.com...
Drawing precision variables:

AUPREC - angular units precision

LUPREC - linerar units precision

Dimension precision variables (you may need to set these by dimension
style??? - I have not played with dimension variables directly in years):

DIMADEC - angular dimension units precision, set to -1 to use DIMDEC setting

DIMALTD - alternate measurement precision

DIMALTTD - alternate units tolerance values precision

DIMDEC - primary units precision

DIMTDEC - primary units tolerance precision

I can not help with the annotative dimension question.

--

David Koch
Autodesk Discussion Group Facilitator
Using ADT 2004 at work; access to 2005, 2006 & 2007 at home
0 Likes
Message 4 of 11

Anonymous
Not applicable
You can make a dim style annotative either in the Dimstyle dialog (Fit tab),
or with the -Dimstyle command.

To make existing dims annotative, the Chprop command will do it.

Ken Krupa
Autodesk Authorized Developer
Krupa CADD Solutions
www.krupacadd.com
KCS Productivity Pack for AEC
KCS Productivity Pack for AutoCAD


"Melvin Donaldson" wrote in message
news:5632977@discussion.autodesk.com...
Hi all,

Is there a way in lisp to set dimvars for precision and dimanno? (trying to
automate old dims to annotative dims in lisp).

Is there a variable to set drawing precision?

--
Thanks

Melvin Donaldson
Tech Support
Kephart
Community-Planning-Architecture
0 Likes
Message 5 of 11

Anonymous
Not applicable
Ken,

Thanks for your help.

How do I change cannoscale in lisp. I saw you post the answer before.
Something about adding a slash after the inch sign but I couldn't get that
to work for me.

Will you re-post that answer and I'll try it again.

Thanks
Melvin

"Ken Krupa" wrote in message
news:5633625@discussion.autodesk.com...
You can make a dim style annotative either in the Dimstyle dialog (Fit tab),
or with the -Dimstyle command.

To make existing dims annotative, the Chprop command will do it.

Ken Krupa
Autodesk Authorized Developer
Krupa CADD Solutions
www.krupacadd.com
KCS Productivity Pack for AEC
KCS Productivity Pack for AutoCAD


"Melvin Donaldson" wrote in message
news:5632977@discussion.autodesk.com...
Hi all,

Is there a way in lisp to set dimvars for precision and dimanno? (trying to
automate old dims to annotative dims in lisp).

Is there a variable to set drawing precision?

--
Thanks

Melvin Donaldson
Tech Support
Kephart
Community-Planning-Architecture
0 Likes
Message 6 of 11

Anonymous
Not applicable
"Escape" the quote with a backslash:
(setvar cannoscale "1/4\" = 1'-0")

~~~~~~~~~~~~~~~~~~~~~~
Or do this:

Here is a function for converting a
scale (real) to a string:
(defun kcs_scaletos (scale)
(if (> (getvar "lunits") 3)
(if (= (fix (/ scale 10.0))(/ scale 10.0))
(if (= (fix (/ scale 12.0))(/ scale 12.0))
; Engineering [ex: 480 => 1" = 30']
(strcat "1\" = " (rtos (/ scale 12.0) 2 0) "'")
; Bogus (display as ratio)
(strcat "1 = " (rtos scale 2 0))
)
; Architectural [ex: 1/16" = 1'-0"]
(strcat (rtos (/ 12.0 scale)) " = " (rtos 12.0))
)
; Decimal [ex: 1=50]
(if (= (getvar "measurement") 1) ; metric
(strcat "1:" (rtos scale 2 0))
(strcat "1 = " (rtos scale 2 0))
)
)
)

Then you can do something like
(setvar "cannoscale" (kcs_scaletos 48))

Ken Krupa
Autodesk Authorized Developer
Krupa CADD Solutions
www.krupacadd.com
KCS Productivity Pack for AEC
KCS Productivity Pack for AutoCAD



"Melvin Donaldson" wrote in message
news:5633690@discussion.autodesk.com...
Ken,

Thanks for your help.

How do I change cannoscale in lisp. I saw you post the answer before.
Something about adding a slash after the inch sign but I couldn't get that
to work for me.

Will you re-post that answer and I'll try it again.

Thanks
Melvin
0 Likes
Message 7 of 11

Anonymous
Not applicable
Oops - that should have been
(setvar "cannoscale" "1/4\" = 1'-0")
of course.

"Ken Krupa" wrote in message
news:5633718@discussion.autodesk.com...
"Escape" the quote with a backslash:
(setvar cannoscale "1/4\" = 1'-0")
0 Likes
Message 8 of 11

Anonymous
Not applicable
Thanks Ken.
"Ken Krupa" wrote in message
news:5633732@discussion.autodesk.com...
Oops - that should have been
(setvar "cannoscale" "1/4\" = 1'-0")
of course.

"Ken Krupa" wrote in message
news:5633718@discussion.autodesk.com...
"Escape" the quote with a backslash:
(setvar cannoscale "1/4\" = 1'-0")
0 Likes
Message 9 of 11

Anonymous
Not applicable
Ken,

When I do this at the command line, Command: (setvar "cannoscale" "1/4\" =
1'-0"), I get this message.

error: AutoCAD variable setting rejected: "cannoscale" "1/4\" = 1'-0"

Am I missing something?




"Ken Krupa" wrote in message
news:5633732@discussion.autodesk.com...
Oops - that should have been
(setvar "cannoscale" "1/4\" = 1'-0")
of course.

"Ken Krupa" wrote in message
news:5633718@discussion.autodesk.com...
"Escape" the quote with a backslash:
(setvar cannoscale "1/4\" = 1'-0")
0 Likes
Message 10 of 11

Anonymous
Not applicable
Ah, yes. I was missing something - the inch mark after the 1'-0" needs to be
escaped also. This works:
(setvar "cannoscale" "1/4\" = 1'-0\"")

"Melvin Donaldson" wrote in message
news:5634046@discussion.autodesk.com...
Ken,

When I do this at the command line, Command: (setvar "cannoscale" "1/4\" =
1'-0"), I get this message.

error: AutoCAD variable setting rejected: "cannoscale" "1/4\" = 1'-0"

Am I missing something?




"Ken Krupa" wrote in message
news:5633732@discussion.autodesk.com...
Oops - that should have been
(setvar "cannoscale" "1/4\" = 1'-0")
of course.

"Ken Krupa" wrote in message
news:5633718@discussion.autodesk.com...
"Escape" the quote with a backslash:
(setvar cannoscale "1/4\" = 1'-0")
0 Likes
Message 11 of 11

Anonymous
Not applicable
Thanks


"Ken Krupa" wrote in message
news:5634464@discussion.autodesk.com...
Ah, yes. I was missing something - the inch mark after the 1'-0" needs to be
escaped also. This works:
(setvar "cannoscale" "1/4\" = 1'-0\"")

"Melvin Donaldson" wrote in message
news:5634046@discussion.autodesk.com...
Ken,

When I do this at the command line, Command: (setvar "cannoscale" "1/4\" =
1'-0"), I get this message.

error: AutoCAD variable setting rejected: "cannoscale" "1/4\" = 1'-0"

Am I missing something?




"Ken Krupa" wrote in message
news:5633732@discussion.autodesk.com...
Oops - that should have been
(setvar "cannoscale" "1/4\" = 1'-0")
of course.

"Ken Krupa" wrote in message
news:5633718@discussion.autodesk.com...
"Escape" the quote with a backslash:
(setvar cannoscale "1/4\" = 1'-0")
0 Likes