Leaderboard

Thanks for the link Rod

Yeah, it's pretty crazy that Blender is a free program. In my opinion, it definitely holds its own against the big expensive industry standard programs. This may be of interest. I found this guy a couple weeks ago and I watched his Blender tutorials. He has a beginners tutorial where he covers a lot of the basics and then he has a full project based tutorial where he creates a flashbang grenade entirely in Blender, which is pretty impressive. ChamferZone: https://www.youtube.com/channel/UCx6FRkGCUg3NXut5qGOdgYg

Point of order: It's hard for me to jump from SketchUp to something else when I can do this in about 30 minutes. This is a design of my dining room that I want to add some wainscoting to. It's not finished but was enough for the wife to see.

I'll be interested to see how this comes together, and what your thoughts are after using the program for a complete project. I've been looking at Blender quite a bit lately and not only is it a solid program but the plug-ins from the community are pretty great. Are you going to take this into Twinmotion after you're done with the modeling?

@Cadbuddy when creating an isometric drawing you cannot use the "real" angles to draw lines at an angle. Consider the following. A cube that has side lengths of 1 would look like the image below. The red and green lines are diagonals on one face of the cube. We know that for the real object these lines would be at an angle of 45° relative to the cube's edge. Look at the real measure angles. For the red "45°" line we measure 1 unit up to the right and then 1 unit straight up. For the green "45°" line we measure 1 unit down and then 1 unit up to the right. We know that a 30-60 triangle has sides of 1 and 1.732 (square root of 3) and a diagonal of 2. To draw the 60° line in your isometric measure 1 unit at an angle of 30° then up 1.732 as follow. Trim the resulting line as necessary.

(defun c:t1 ( / ss el c r a l ip noc) (if (and (setq ss (ssget))(setq el (ss->lst ss))(setq c (getint "\nNo. groups horizontally (i.e. 4) : ")) (setq r (getint "\nNo. groups vertically (i.e. 2) : "))) (progn (foreach e el (if (not (setq a (assoc (car (setq ip (getIP e))) l))) (setq l (cons (cons (car ip) (list (cons (cadr ip) e))) l)) (setq l (subst (cons (car a) (cons (cons (cadr ip) e) (cdr a))) a l)))) (setq l (vl-sort l (function (lambda (a b) (< (car a) (car b))))) noc (fix (/ (length l) c))) (setq l (mapcar (function (lambda (c) (mapcar 'cdr (vl-sort (cdr c) (function (lambda (a b)(> (car a)(car b)))))))) l)) (setq l (split_list l noc)) (foreach sub l (foreach g (split_list (setq sub (apply 'mapcar (cons 'list sub))) (fix (/ (length sub) r))) (vlax-invoke (vla-add (vla-get-groups (vla-get-activedocument (vlax-get-acad-object))) "*") 'appenditems (mapcar 'vlax-ename->vla-object (apply 'append g))))) ) ) (princ) ) (defun split_list (l n / _sub) (defun _sub (a b c / r) (if (not (<= 1 c (- (length a) b)))(setq c (- (length a) (1- b)))) (repeat c (setq r (cons (nth (1- b) a) r) b (1+ b)))(reverse r))(if l (cons (_sub l 1 n) (split_list (_sub l (1+ n) nil) n)))) (defun ss->lst (ss / i l)(setq i 0)(repeat (sslength ss)(setq l (cons (ssname ss i) l) i (1+ i))) l) (defun getIP (e / d)(if (and (= 'ename (type e))(setq d (entget e))(setq d (assoc 10 d))) (cdr d)))