Jump to content

Find the lisp and please help me to get the e & n as prefix in the coordinate text


samsudeenmanoos

Recommended Posts

Easy fix

 

(setvar "osmode" 0) ; osmode is the settings for your osnap. Just set a few osnaps and then type Osmode you will see number change.
; the fix
(setq oldsnap (getvar 'osmode))
(setvar "osmode" 0)
.........
(setvar 'osmode oldsnap) ; reset your osnaps to before lisp
)   ;; end of program

Link to comment
Share on other sites

Dear bigal

 

thanks for your reply but can you do me a favour that, can edit in the same lisp and send me?

Link to comment
Share on other sites

Changes to code

(defun c:g1( [color="red"]/ m1 m2 y x x1 y1 oldpdmode oldsnap oldpdsize[/color])
[color="red"](setq oldsnap (getvar "osmode")
(setq oldpdmode (getvar "pdmode"))
(setq oldpdsize (getvar "pdsize"))[/color]
(setvar "osmode" 0)
(setvar "blipmode" 0)
..........
.........
(princ "\nMacaotocad  GRIDMARK.LSP ")
[color="red"](setvar "osmode" oldsnap)
(setvar "pdmode" oldpdmode)
(setvar "pdsize" oldpdsize)[/color]
 (princ)
)   ;; end of program

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
Unfortunately, your content contains terms that we do not allow. Please edit your content to remove the highlighted words below.
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.

×
×
  • Create New...