Jump to content

Move objects in Model space and re-align multiple viewports?


ILoveMadoka
 Share

Recommended Posts

Didn't want to cross post but was wondering if anyone knows of a lisp solution to a question I posted here:

 

My Question

 

I didn't want to approach this issue from a programming standpoint if Autocad has a solution.

I ask here in case the regulars in this forum don't look in the other forums..

 

If this is still considered cross posting, my apologies...

Edited by ILoveMadoka
Link to comment
Share on other sites

If you activate the view ports it will zoom the the same location. I don't know if it will work if your in TOP and use it on SIDE or ISO view.

 

;;----------------------------------------------------------------------------;;
;; Zoom Area Across Multiple Drawings
(defun C:ZAD (/ a)  ;Zoom Across Drawings
  (initget "Yes No")
  (setq a
    (cond
      ((getkword "\nRedefine Zoom Area? [Yes/No]: ")) ( "No")
    )
  )
  (if (= "Yes" a)
    (progn
      (vl-cmdf "_.Zoom" "W" Pause Pause)
      (setq vc (getvar 'viewctr))
      (setq SZ (getvar 'viewsize))
      (vl-propagate 'vc)
      (vl-propagate 'sz)
    )
    (if vc sz
      (vl-cmdf "_.Zoom" "C" VC SZ)
      (prompt "\nPlease Define Zoom Area")
    )
  )
  (princ)
)

 

Edited by mhupp
Link to comment
Share on other sites

Believe it or not but I am Kenny Ramage.

I cannot believe that AfraLisp is still having an influence.

 

  • Like 5
  • Thanks 1
Link to comment
Share on other sites

1 hour ago, Kenny Ramage said:

Believe it or not but I am Kenny Ramage.

I cannot believe that AfraLisp is still having an influence.

 

Thanks for helping so many of us get started!

  • Like 2
Link to comment
Share on other sites

10 hours ago, Kenny Ramage said:

Believe it or not but I am Kenny Ramage.

I cannot believe that AfraLisp is still having an influence.

 

Why? Clear easy to follow steps by step instructions. who wouldn't find that helpful.

Link to comment
Share on other sites

If the objects in the model space are being moved without changing the scale or rotation, then I use this to change (pan) viewports view in all layouts or current layout only: VPML

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Reply to this topic...

×   Pasted as rich text.   Restore formatting

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

 Share

×
×
  • Create New...