@PKENEWELL
Thanks again.
If i'm am correct that the N1, N2, N3... values are the ones that are updating.
Yes that is correct
I was testing your suggestion just before you posted, it does work, but........
when de-selecting the scale toggle the dimensions are again multiplied by the scale factor of 0.03937 ?(mm to inch) rather than being reset to their original values.
I've just tried adding this:
(if (= SCA "0")(SET_DIM)) ;_ end of if
into SCA_TO_IMP (see below)
(defun SCA_TO_IMP ()
(cond ((= SCA "1")(setq scal "0.039370"))
(T (setq scal "1.000000"))
) ;end of cond
;
;from Ron Leigh
; (setq num1 12.34)(setq num2 (* 10 num1))
;
(if (= SCA "0")(SET_DIM)) ;_ end of if
;
(setq
N1 (* N1 0.03937)
N2 (* N2 0.03937)
N3 (* N3 0.03937)
N4 (* N4 0.03937)
N5 (* N5 0.03937)
N6 (* N6 0.03937)
N7 (* N7 0.03937)
N8 (* N8 0.03937)
N9 (* N9 0.03937)
N10 (* N10 0.03937)
);end of setq
;
(set_tile "n1" (rtos N1 2 2))
(set_tile "n2" (rtos N2 2 2))
(set_tile "n3" (rtos N3 2 2))
(set_tile "n4" (rtos N4 2 2))
(set_tile "n5" (rtos N5 2 2))
(set_tile "n6" (rtos N6 2 2))
(set_tile "n7" (rtos N7 2 2))
(set_tile "n8" (rtos N8 2 1))
(set_tile "n9" (rtos N9 2 2))
(set_tile "n10" (rtos N10 2 2))
;
) ;End SCA_TO_IMP
This works in part. I have attached a pdf of images as it's long to explain without.
following this sequence:
Load dialogue
select fitting type including size (dimensions displayed)
select mm to inch results in dimensions being reduced by 0.03937
de-select mm to inch results in NO change to displayed dimensions!!
re-select mm to inch results in dimensions being reduced by 0.03937 again!!
de-select mm to inch results in dimensions being reset to the values after first application of 0.03937