2013-05-05 QQ群：LISP/VLISP交流(143438137) 聊天记录：放到共享吧

CCarch

牵ぶ伱の佑手(379002274)于2013-05-05 17-20-28：
真不明白写这的用意

CCarch

清风明月(897902105)于2013-05-05 17-21-10：
TEXT是表示写单行文本啊

炫翔

炫翔(2363673534)于2013-05-05 17-22-54：
你自己测试下 你那个表成立吗？

CCarch

清风明月(897902105)于2013-05-05 17-24-00：
好象就是说它不存立，但是这样写的啊，难道大小写也有关系

CCarch

清风明月(897902105)于2013-05-05 17-25-24：
怎么写啊？表达好象没有错啊

炫翔

炫翔(2363673534)于2013-05-05 17-27-45：
你看看我以前的:

;功能:单行文本写入
;(XX-Mk-Text INSERTPOINT TEXTHIGH STR ROTATEANGLE SCALEFACTOR TEXTNAME)
;INSERTPOINT为对齐点， TEXTHIGH文字高度  STR为文本内容
;ROTATEANGLE为旋转角度  SCALEFACTOR为宽度比例  TEXTNAME为字形名称
(DEFUN XX-Mk-Text (INSERTPOINT TEXTHIGH ROTATEANGLE STR SCALEFACTOR TEXTNAME)
    (entmake (list '(0 . "TEXT")
                '(10 0 0 0)
                (cons 11 InsertPoint)
                (cons 40 TextHigh)
                (cons 1 str)
                (cons 50 RotateAngle)
                (cons 41 ScaleFactor)
                (cons 7 TEXTNAME)
                '(72 . 1)
                '(100 . "AcDbText")
          )
    )   
)

CCarch

牵ぶ伱の佑手(379002274)于2013-05-05 17-30-14：
我猜下：(10 . "单点坐标")

炫翔

炫翔(2363673534)于2013-05-05 17-31-09：
10对应的是坐标

炫翔

炫翔(2363673534)于2013-05-05 17-31-19：
你不是猫的徒弟吗？

CCarch

清风明月(897902105)于2013-05-05 17-31-24：
单点坐标是变量，肯定不能括起来

炫翔

炫翔(2363673534)于2013-05-05 17-31-29：
这个好像是基础班的

CCarch

牵ぶ伱の佑手(379002274)于2013-05-05 17-31-47：
呵，所以我说10号那里有问题呀

炫翔

炫翔(2363673534)于2013-05-05 17-33-08：
(SETQ 单点坐标 (LIST 0 0 0))

炫翔

炫翔(2363673534)于2013-05-05 17-33-18：
这样也可以没问题

CCarch

清风明月(897902105)于2013-05-05 17-34-03：
单点坐标 这个变量是没有问题的，都先用它画了一个点了，就是创建单行文本有问题