Z标签

David Bethel · 发表于 2022-7-5 16:11:47

至少你试过了。

更改：

(cons 11 (polar v (* pi 0.5) (* txt 2)))

收件人：

copy

(cons 11 (polar (list (car v) (cadr v) 0) (* pi 0.5) (* txt 2)))

对（cons 10（polar v….）也要这样做声明也是如此

-大卫

Rooster · 发表于 2022-7-5 16:16:01

非常感谢你。。。是的，我试过了！我还意识到，我需要做一些类似的事情，将块强制到0的Z。继续你上面所改变的，我希望我所需要做的就是改变路线：

copy

(cons 10 v)

到

copy

(cons 10 (polar (list (car v) (cadr v) 0)))

但这并没有做到。我接近了吗？

Lee Mac · 发表于 2022-7-5 16:16:45

在这种情况下，不需要polar，只需：

copy

(list 10 (car v) (cadr v) 0.0)

Rooster · 发表于 2022-7-5 16:21:59

谢谢李。很高兴你们能帮上忙。最后一个问题：如果我想处理文本的定位，你上面的一行可以控制它吗？

Zac Davis · 发表于 2022-7-5 16:23:24

试试这个，告诉我是否有用

David Bethel · 发表于 2022-7-5 16:27:57

文本显示可能是一个相当复杂的主题

DXF组10、11、50、72、73和210控制实体点、旋转和对齐

样式表控制字体及其属性

我使用（cons 72 4）强制文本中间对齐。然后，第11组指定中点。

-大卫

Rooster · 发表于 2022-7-5 16:30:37

谢谢大卫。我确实找到了第72组和第73组的设置，并对其进行了调整，这可能会满足我的需要。我想我希望我可以发挥文字位置/偏移距离块，但这只是一件小事。

扎克——谢谢你的指点。当我第一次寻求帮助时，我确实遇到了Lisp程序的问题。虽然这并不完全是我想要的，但它肯定是一个有用的替代方案（那里也有一些其他有用的Lisp）。