Jump to content
mousho

COORDINATE

Recommended Posts

BIGAL

It is a bit more complex but a field can get X Y & Z of a point just go into mtext and use the field option and look at the expression created need to do 3 times. Can then use this method in a lisp. Need Lee-mac object id lisp. Just google answer should be out there all done.

Share this post


Link to post
Share on other sites
mousho

hi bigal 

i search all the web with no sucess

 

Share this post


Link to post
Share on other sites
tombu

I use a block insertion

;| Label for Point.
   PtLabel.lsp BY: TOM BEAUFORD
   ^P(or C:Label (load "PtLabel.lsp"));PtLabel
   BeaufordT@LeonCountyFL.gov
   Leon County Public Works/Engineering
==================================================================|;

(defun C:PtLabel (/ ATTDIA)
      (setq ATTDIA (getvar "ATTDIA"))
      (setvar "ATTDIA" 0)
      (command "._INSERT"
               "Pt_Coordinates"
               (getpoint "Pick Point: ")						;Insert pt
               (/ 0.1 (getvar "cannoscalevalue"))				;X Scale
;               (* (getvar "DIMTXT") (getvar "DIMSCALE"))	;X Scale (Alternate)
               ""							;Y Scale
;               ""				                	;Rotation
               (*(/(getvar "viewtwist")pi)-180)	;Rotation
               ""					        	;Easting
               ""					        	;Northing
      )
      (setvar "ATTDIA" ATTDIA)
      (entupd (entlast))
;      (command "._DDATTE" (entlast))
      (princ)
)

I use the same concept when labeling elevations.

 

Google "label coordinates AutoCAD Lisp", doesn't appear you searched the web very hard.

Pt_Coordinates.dwg

Share this post


Link to post
Share on other sites
BIGAL

Have a look at this

image.png.efeb9cdd896f900964349a68c9c845c0.png

Share this post


Link to post
Share on other sites
mousho

thx tombu it was very helpful and im sure that im going to add it to my lisp routine,

but im looking for lisp that not using block

i find this lisp in the web and it more closer to what im looking,

the lisp here add automatically coord at each vertex

i want the option to add coord at free choose

any idea??

 

ptdef-xyz_field.lsp

Share this post


Link to post
Share on other sites
mousho
8 hours ago, BIGAL said:

Have a look at this

image.png.efeb9cdd896f900964349a68c9c845c0.png

 

BIGAL THX BUT I HAVE NO IDEA HOW TO USE IT AT LISP

 

Share this post


Link to post
Share on other sites
mousho

THX TO ALL 

FIND SOLUTION

Share this post


Link to post
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.   Paste as plain text instead

  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...