Visual LISP, AutoLISP and General Customization
cancel
Showing results for 
Show  only  | Search instead for 
Did you mean: 

DXF code for the rotation of an AECC Point object?

1 REPLY 1
Reply
Message 1 of 2
Anonymous
486 Views, 1 Reply

DXF code for the rotation of an AECC Point object?

Hi Everybody,

 

I am trying to come up with the easiest way to draw a wipeout around the ELEV field on an AECC point.

 

I've got it down to 4 picks, but I could reduce one of them if I could access the rotation angle of the point entity in DXF.

 

I  searched and found an old post where a guy had attempted to define some of the codes, part of his list was:

 

((-1 . ) ;Entity name
 (0 . "AECC_POINT") ;Type
(15 1.0 0.0 0.0) ;Cosine and sine of rotation
(16 0.0 1.0 0.0) ;something with rotation

 

if that jogs anyone's imagination.

 

Any suggestions are appreciated. My current code is below:

 

Thanks,

 

Steve (C3D 2009 LDC)

 

--------------------------------------------

(DEFUN C:RR3 ()
(setq sett(entsel "\Pick Attribute to WipeOut: "))
  (setq lay(cdr(assoc 8(cdr(entget (car sett))))))
  (setq a(getpoint "\nPick lower left cor of rectangle: "))
  (setq b(angtos(getangle a))) ;would like to use a dxf code instead of this
(COMMAND "RECTANGLE" a "R" b PAUSE)
(SETQ A(ENTLAST))
(COMMAND "WIPEOUT" "P" A "Y")
  (SETQ A2(ENTLAST))
  (command "chprop" a2 "" "la" lay "")
  (COMMAND "DRAWORDER" sett "" "F")
  )

1 REPLY 1
Message 2 of 2
diagodose2009
in reply to: Anonymous

Try old method from autocad version R14.

Before set angle / or rotation AEC_POINTS with command ROTATE or other object,

 
                Scan DXF code and search your value with mmy program:

with command Q2 enter && Notepad.exe pp_dumobject.txt Thanks..

Can't find what you're looking for? Ask the community or share your knowledge.

Post to forums  

Autodesk Design & Make Report

”Boost