字体倾斜问题

我爱你王子呀

各位大神晚上好。我写了一个小程序，程序里面的部分代码如下

(command "layer" "M" "TKC" "C" 1 "" "L" "continuous" "" "")
(command "style" "TKZT" "楷体" "0" "" "0" "N" "N" "N")
……
(command "text" '(10 10) 1 0 "我爱明经社区" "")

问题在于，这个程序运行的时候，在有些图形里面，字体的倾斜是0，但是在有些图形里面，字体的倾斜是90。为什么会这样呢？我明明已经把字体的倾斜设置成0了呀
望各位大神不吝赐教

我爱你王子呀

各位大神，我知道问题所在了，在有个图形里面，用文本命令（"text"命令），即使选择倾斜为0度，输入完了以后，字体也会自动倾斜90，为什么会这样呢？还请大神们不吝赐教

xyp1964

;; 估计是字库问题

2. (defun c:tt ()
   
3.   (command "layer" "M" "TKC" "C" 1 "" "L" "continuous" "" "")
   
4.   (command "style" "TKZT" "txt,hztxt" "0" "" "0" "" "" "")
   
5.   (setq p1 (getpoint "\n基点<退出>: "))
   
6.   (command "text" p1 1 0 "我爱明经社区")
   
7.   (princ)
   
8. )

(defun c:tt ()<br />   (command "layer" "M" "TKC" "C" 1 "" "L" "continuous" "" "")<br />   (command "style" "TKZT" "txt,hztxt" "0" "" "0" "" "" "")<br />   (setq p1 (getpoint "\n基点<退出>: "))<br />   (command "text" p1 1 0 "我爱明经社区")<br />   (princ)<br /> )

我爱你王子呀

xyp1964 发表于 2015-9-16 20:24
;; 估计是字库问题

谢谢你 大神 ，我试了一下你的程序，还是倾斜的

mmmmmm

没准图纸的北向设错了。
或者UCS的问题。