issues understanding text definitions in LISP routine

[raichu692003791074]

I'm using the following as part of an automated suite of LISPS to label, place and orient text annotations:

(defun DTextEntMake ( TxIN Ang2 Tx cst / )	
 (setq lay (strcat lay "_txt"))
  (entmake
   (list
   '(0 . "Text")
   (cons 7 "OPA_DEPTH_TEXT")
   (cons 40 0.35)
   (cons 8 lay)
   (cons 1 Tx)
   (cons 10 TxIN)
   (cons 50 ang2)
   )
  )
(command "chprop" "l" "" "a" "y" "")
)

So I flip text around inside the other routines without having to have two separate insertion point references, for ends of line etc, and to help passing text objects from CAD into e.g.QGIS, I wanted to use a middle-centre definition for the text, so I assumed the following would change it:

(defun DTextEntMake ( TxIN Ang2 Tx cst / )	
 (setq lay (strcat lay "_txt"))
  (entmake
   (list
   '(0 . "Text")
   (cons 7 "OPA_DEPTH_TEXT")
   (cons 40 0.35)
   (cons 8 lay)
   (cons 1 Tx)
   (cons 10 TxIN)
   (cons 50 ang2)
   (cons 72 1)
   (cons 73 2)
   )
  )
(command "chprop" "l" "" "a" "y" "")
)

The rest of the cons values are being generated elsewhere. but when I use this version, defining 72 and 73, the text is now drawing at 0,0,0 at 0 degrees instead of using the insertion point and orientation it should. It seemed like a no brainer to alter the cons list values to achieve what I wanted, obviously not.

[raichu692003791074]

add: just ran it again with a different data set and it is using the angle for orientation but it's drawing the text at 0,0,0.

[dlanor]

Unless your text is justified left, fit +1 other, the position is controlled by dxf code 11, so stick (cons 11 TxIN) between (cons 72..) and (cons 73..). Leave (cons 10 TxIN) there and Autocad will recalculated it.

[raichu692003791074]

TY

I didn't realise the list would be syntax dependant, with the order of the constructed list dxf attributes changing the behaviour of the expression. Do you know any references that I could read that would explain this type of syntax rule/effect? Awesome that you've given me the answer, the fact that I don't understand why that is the answer is getting in the way of me growing my abilities.

[dlanor]

I just follow the syntax in the AutoCAD2012 DXF Reference HERE. It's a pdf and downloadable. I not sure if the order is relevant, but I tend to stick to it in case it is. If something has a default option (linetype = continuous, textstyle = standard etc) you can omit them and the default will be assumed.

[Tom Beauford]

Viewable online AutoCAD 2021 DXF Reference: http://help.autodesk.com/view/ACD/20...3-38A2306D73F3
Viewable online AutoCAD 2000 DXF Reference: https://www.autodesk.com/techpubs/au.../dxf/index.htm

[petermessi]

Hi,

thanks for sharing it.it solves all my doubt.it is very useful one.

[raichu692003791074]

Thanks guys. Yeah I was confused initially as I thought the order of the list construction wouldn't matter, originally I just stuck the 70's at the end of the list so I could edit it a little easier later but that's where my issue was. Thanks as well for the pointers.