【Gu_xl】【源码分享】自定义带捕捉的grread函数

pw_design

支持了支持了支持了支持了

foolishzy

看起来很复杂 收藏了 慢慢看

帆航

我的lisp学习就是在参考G版的源代码中逐渐成长起来的！

hi-kit

挺不错的，程序！收下了！

tm010111

向gu版学习

yichuan

谢谢分享！！！！！！！！！！！！

lisperado

有朋友苹果版ACAD由于没有DCL对话框, 输入密码时就容易暴露！
搜索后，刚巧有网友示范如何覆盖密码。。李麦大神也有发布思维应该不难。
但如果显示在图元我的问题是如何完美在任何立体视界居中就好象UCS icon 标志 (X,Y,Z)永远都对着荧幕正常显示！

如动画：


如果不要命令之类如(command "text" ...) (command "LAN" "v")
我尝试entmake但有些视角却不行
有没有大神已经有发布过类似居中函数？

基本上如果在正常WCS以下方法应该是可行的...

1.    (entmakex (list '(0 . "TEXT")
   
2.                             (cons 40 (vs 30))
   
3.                             '(72 . 1)'(50 0)
   
4.                             (cons 10 (getvar 'viewctr) )
   
5.                             (cons 1 str)
   
6.                             (cons 11  (getvar 'viewctr) )
   
7.                             (cons 210  (getvar 'viewdir) )
   
8.                       )
   
9.             )
   

   (entmakex (list '(0 . "TEXT")<br />                             (cons 40 (vs 30))<br />                             '(72 . 1)'(50 0)<br />                             (cons 10 (getvar 'viewctr) )<br />                             (cons 1 str)<br />                             (cons 11  (getvar 'viewctr) )<br />                             (cons 210  (getvar 'viewdir) )<br />                       )<br />             )<br />

但如果图元已转换UCS空间，（先别说viewtwist等变量已一改变就更有难度了！）
好像缺少什么？
(getvar 'viewdir)
(trans (getvar 'viewctr) 2 0)
ucsxdir, ucsydir, ucsbase?

biya

我看下，是什么来的

biya

不错，前辈啊

xxwc521

我想学习下看看