topic Re: Help modifying this Lisp. in AutoCAD Forum

topic Re: Help modifying this Lisp. in AutoCAD Forum https://forums.autodesk.com/t5/autocad-forum/help-modifying-this-lisp/m-p/5689137#M331522 <BLOCKQUOTE><HR />@Anonymous wrote: I have contours ranging from full meter intervals down to 1/8m intervals, but id like the labels to display as this to save space;   68 68.5 68.25 68.125 .... <HR /></BLOCKQUOTE> (vl-string-right-trim ".0" "YourString") will take off all trailing zeros and decimals.  BUT if you use it on something like "60.0000", it will turn that into just "6".  So:   (if (= (rem (atof "YourString") 10.0) 0); it's a whole multiple of 10 [keep any zero(s) before the decimal]   (itoa (atoi "YourString")); then   (vl-string-right-trim ".0" "YourString"); else ); if Tue, 23 Jun 2015 12:12:41 GMT Kent1Cooper 2015-06-23T12:12:41Z