Need help with coordinates

[techjunkie09]

not sure if this will work or not, but u could give it a try while waiting on lee mac lol

 

replace in2ft in the code he gave you with this and let me know how that outputs

(defun in2ft (num / ft in)
(setq ft (fix (/ num 12.0))
in (rem num 12.0))
(strcat 
(if (= (substr (rtos ft 2 2) ((strlen (rtos ft 2 2))-3)) ".00")
(rtos ft 2 0)
(rtos ft 2 2)
)
(chr 39) (chr 45)
(if (= (substr (rtos in 2 2) ((strlen (rtos in 2 2))-3)) ".00")
(rtos in 2 0)
(rtos in 2 2)
)
(chr 34)))

 

edit: nevermind lol, lee is on the job:wink:

[Lee Mac]

Thanks for the input, but there is a much simpler alternative junkie

 

I created that sub-function before I figured out that the rtos function, if provided with an argument of 3, will return the result I needed.

 

The trailing zeros are controlled by the DIMZIN sys var I believe

 

Lee

[cabltv1]

Lee,

 

I got it to work by changing the DIMZIN Variable to 8 or 12. Anything lower and there was no change.

The "Z" coords are missing 1 zero but I can live with that.

 

Thanks for the suggestion and the original code!

 

 

Techjunkie09,

 

Thanks for your suggestion but made no difference without changing the DIMZIN Variable.

[Lee Mac]

Glad you got it sorted to how you wanted

 

Lee