Leaderboard

DIMGAP (System Variable) Sets the distance around the dimension text when the dimension line breaks to accommodate dimension text. Type: Real Saved in: Drawing Initial value: 0.0900 (imperial) or 0.6250 (metric) Also sets the gap between annotation and a hook line created with the LEADER command. If you enter a negative value, DIMGAP places a box around the dimension text. The value of DIMGAP is also used as the minimum length of each segment of the dimension line. To locate the components of a linear dimension within the extension lines, enough space must be available for both arrowheads (2 x DIMASZ), both dimension line segments (2 x DIMGAP), a gap on either side of the dimension text (another 2 x DIMGAP), and the length of the dimension text, which depends on its size and number of decimal places displayed.

All the text's are in a variable 'result-list' , in the program I just gave you 2 options what you can do with with them, change layer or export. What you want to do next with them is entirely up to you.

The error message is that you need multi getvals.lsp its in the Cadtutor down load area. Rlx was that with lego.lsp Multi GETVALS.lspMulti radio buttons.lsp Google lego 42078 as side loader. It steers, unloads container turning little wheel knobs on rear Doing Titanic at moment

I suppose I have it setup where any key will work, not just enter. This version will pause on each tab so you can check whatever is in the view prior to jumping to the next. (defun c:zlayout (/ sSize vSize vCtr LLC URC) (vl-load-com) (setvar "tilemode" 0) (vl-cmdf "pspace") (graphscr) (princ "\nZoom to the area you would like viewed on all tabs. Press any key when ready... " ) (getstring) (setq sSize (getvar "screensize") vSize (getvar "viewsize") vCtr (getvar "viewctr") ) (setq LLC (mapcar '- vCtr (list (* (* 0.5 vSize) (/ (car sSize) (cadr sSize))) (* 0.5 vSize) 0.0 ) ) ) (setq URC (mapcar '+ vCtr (list (* (* 0.5 vSize) (/ (car sSize) (cadr sSize))) (* 0.5 vSize) 0.0 ) ) ) (setvar "nomutt" 1) (foreach l (layoutlist) (setvar 'CTAB l) (vlax-invoke (vlax-get-acad-object) 'ZoomWindow LLC URC) (princ "\nPress any key to continue... " ) (getstring) ) (setvar "nomutt" 0) (princ) )

May I offer an alternate solution for the user, using the code that Tharwat and lrm already started? (defun c:zlayout (/ sSize vSize vCtr LLC URC) (vl-load-com) (setvar "tilemode" 0) (vl-cmdf "pspace") (graphscr) (princ "\nZoom to the area you would like viewed on all tabs. Press <ENTER> when ready... " ) (getstring) (setq sSize (getvar "screensize") vSize (getvar "viewsize") vCtr (getvar "viewctr") ) (setq LLC (mapcar '- vCtr (list (* (* 0.5 vSize) (/ (car sSize) (cadr sSize))) (* 0.5 vSize) 0.0 ) ) ) (setq URC (mapcar '+ vCtr (list (* (* 0.5 vSize) (/ (car sSize) (cadr sSize))) (* 0.5 vSize) 0.0 ) ) ) (foreach l (layoutlist) (setvar 'CTAB l) (vlax-invoke (vlax-get-acad-object) 'ZoomWindow LLC URC) ) ) Run this code, get your zoom area on one sheet, then it will use the same zoom for all sheets.

Perhaps this will help. 1. Give the command appload and load zlayout.lsp 2. Give the command zlayout. Note, you will be view the same area of a layout for any one you choose. If you want to zoom to a different window than the one defined 0,0,0 to 1,1,0, then change the values for p1 and p2 to the lower left and upper right corners of the desired window. (defun c:zlayout (/) (setq p1 '(0. 0. 0.)) (setq p2 '(1.0 1.0 0.0)) (foreach l (layoutlist) (setvar 'CTAB l) (vlax-invoke (vlax-get-acad-object) 'ZoomWindow p1 p2) ) (vl-load-com) ) BTW, you can use the PrtScn keyboard button on your keyboard to copy the screen image to the clipboard. Alt-PrtScn will copy the image of the currently active application. Better yet, use the Windows 10 Snipping Tool. zlayout.lsp

I get the error "Unknown command "APPLOAD". Press F1 for help." But then I am using LT We miss out on all the fun stuff, my Son is heavily into Lego. He got the Tower Bridge for his birthday 2 weeks ago 4300 pieces for kids 16+ (finished in 4 days, he's eight) Gimme some images to see what we are missing.