Sure @karfung, but I will leave you to do that (I'm writing from the phone).
This is the hint, find it everywhere in the code:
(entmake (list (cons 0 "MTEXT") (cons 100 "AcDbEntity") (cons 100 "AcDbMText") (cons 10 pt) (cons 11 pt) (cons 40 height) (cons 50 ang)
(cons 71 5) (cons 1 (strcat def_text (rtos lenSegment 2 2) " m"))))
Find this part inside:
Replace this part:
(cons 1 (strcat def_text (rtos lenSegment 2 2) " m"))
With this:
(cons 1 (strcat def_text (itoa lenSegment) " m"))
and you will get the whole integer without the decimal part.
I've heard the Durian, but never taste it. If I ever come to Malaysia, I will taste it .
Best regards.