Leaderboard

@leonucadomi See this routine on Lee Mac's website: http://www.lee-mac.com/consistentrtos.html

Just been working on one drawing this morning, the threat level to the PC has reduced... till I need to save and open another.... I rarely use anything other than CAD, but might fire up excel later today to see if that has issues for me. I'll suggest the graphics driver to IT and see what they think. Ta.

I seldom have any AutoCAD issues at home on a non IT controlled computer, so I know to first check into things IT has been doing for issues at work. I still have small but consistent issues with MS Office at work, all of the issues come up in a web search as "improperly configured server and/or firewall". Mostly AutoCAD has ran smoothly since getting the proper Autodesk approved graphics driver a couple of years ago.

Thanks, Yes, it is networked. I think even the 'C:' drive is actually a virtual onedrive c. Fails both on desktop and network sites. I suspect that it is network issues, but wanted to check if I had missed anything on the CAD side of things. Trying to think today what updates they did recently, there was a BIM360 / desktop connector one I think - but these are not on the AutoDesk drives, and I think there was a Windows one so might have been that. Anyway - IT is looking at it 'Urgently' (for the last 7 hours.... (Overseas IT department))

"two blue green vertex lines as shown". Yes / No ? This is road alignment stuff IP required. Just thinking get vertices before add radius. Pline = 4 points. Add radius's Pline vertices now 6 points. Should be able to do some form of join correct points, only problem I see is where two straights do not have a radius between. ; https://www.cadtutor.net/forum/topic/78649-get-42-x-at-param-in-list-data-lwpolyline/ (defun c:step1 ( / plent) (setq plent (entsel "\nPick pline step 1")) (if plent (setq co-ord1 (mapcar 'cdr (vl-remove-if-not '(lambda (x) (= (car x) 10)) (entget (car plent)))))) (princ co-ord1) (prompt "\nAdd your radius then run step2 ") (princ) ) (defun c:step2 ( / plent) (setq plent (entsel "\nPick pline after radius step 2 ")) (if plent (setq co-ord2 (mapcar 'cdr (vl-remove-if-not '(lambda (x) (= (car x) 10)) (entget (car plent)))))) (princ co-ord2) ; (setvar 'clayer "yourlayer") (setq x 1 y 1) (repeat (- (length co-ord1) 2) (command "line" (nth x co-ord2) (nth y co-ord1)(nth (1+ x) co-ord2) "") (setq x (+ x 2) y (1+ y)) )

Well idk what 1d means but maybe https://www.cutlistoptimizer.com/ ?