Leaderboard

hI hosneyalaa, if you uploaded your sample dwg . , and show the list as String , and not numbers , all would be easy to give help . with no doubt .

I had to give credit where credit is due. peterg has 2018 and I'm not real sure how it is so, I looked it up on the interweb and I run across your name on the AutoCad website forums. Pics the same so I assumed (?) I started to add I was having problems with my middle click option "It wouldn't pan". I like to pan when I hold my middle button down it helps me to be faster and it's just how I learned. Couldn't get it to work for anything. I use a separate mouse on my laptop because I hate the mouse pad. It would work fine one minute and just stop. Even set it in my registry still the same. After a little while it crossed my mind to change the mouse out....Been working great ever since. It's not always the programs fault.

Attached is updated lisp to handle cases up to 2 decimal places. Bearing_and_DistancePolyH.lsp

you're welcome Shadi. To be honest, I'm anything but quick. I just happen to have written something not so long ago that also was usefull for your problem but I also sometimes have writersblock and for weeks I struggle to get anything working. So I guess this was your lucky day you lucky ...

Try it , I do not understand why you need to add 2 dec. It is as far as I can reach. (defun value+2dec (lst ) (setq ll+2-list ()) (foreach l lst (if (= (type l) 'int) (progn (setq l$(strcat(itoa l)".00")) (setq ll+2 (read l$)) (setq ll+2-list (cons ll+2 ll+2-list)) ) (setq ll+2-list (cons (read(rtos l 2 2)) ll+2-list)) ) ) (reverse ll+2-list) ) (SETQ LL '( 20 21.3665 22.3265 22 24.5)) (setq ll(value+2dec ll)) It return (20.0 21.37 22.33 22.0 24.5) Hope it help, or give us further explication, about the WHY you need it so . Acad show REALS without unneeded .0 , 20 is an INTEGER or INT , and 20.0 is a REAL .

Agreed if you start the model right from the very beginning I don’t see why can’t be done 100%, starting half arse and then trying to make it 100% sure that’s where it would cost more.