找回密码
 立即注册

QQ登录

只需一步,快速开始

扫一扫,访问微社区

楼主: shiri

[求助]:怎样输入带有上标(或下标)的文字

[复制链接]

已领礼包: 593个

财富等级: 财运亨通

发表于 2002-9-9 15:11:47 | 显示全部楼层
晓东团队欢迎你,以后用API的心得能提供论坛和大家共享吗?
提个建议,看贴图complex字体不是很好看,能不能换用用GBENOR.SHX字体,该字体已经解决了中英文等高问题而且好看些(自以为)。
该字体将加入工具箱,为避免字体重名将字体名称前加 “X”了。
同时欢迎加入工具箱的制作团队,多贴些关于文字处理方面的程序或建议。
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2002-9-10 11:16:05 | 显示全部楼层
最初由 eachy 发布
[B]晓东团队欢迎你,以后用API的心得能提供论坛和大家共享吗?
提个建议,看贴图complex字体不是很好看,能不能换用用GBENOR.SHX字体,该字体已经解决了中英文等高问题而且好看些(自以为)。
该字体将加入工具箱,为... [/B]


:4

GBENOR.SHX字体我使用了一下,并查了一下里面的编码,发现其中并没有做扩充,特殊字符的输入不太方便
下面是新的xt.lsp
关于字体角度的系统变量名称是什么?能否告知。谢谢!

;|
  命令:xT
  作者:逍遥客
  版本:0.0.2
  日期:2002/9/9
  功能:配合字体"扩展TXT.shx"输入及编辑修改,现在仅初步完成输入部分
  系统:瘟酒吧、中文ACAD2002
  
  配合:XDRX_API B11208以上版本
  
  该程序有待改进的地方:
  1.通过识别用户点取目标的不同,自动切换输入与编辑,该工作由主程序完成,输入与编辑两种状态改写为两个过程函数(Lisp中调
    用方式不明,暂缓)。
  2.读取系统字体变量,使默认字体属性相应变化,以符合用户的一般习惯;
  3.自动识别当前字体是否为所需字体,如果不是,则建议用户变更,同意则方式一:退出程序由用户调用STYLE命令修改,方式二:将
    所有符合要求的样式列表供用户选择(使用(textpage)和(graphscr)切换文本与图形界面);
  4.设置一个内部变量用于关联样式,其默认值为用户所设定关联的样式名称,如果当前字体有效则该变量不起作用,否则建议用户调
  用默认样式;
  5.字高参数当对正方式为“对齐A”时,并不需要输入,本程序通过默认方式略过;
  6.很多情况并不希望左下角对齐,因此应加入默认对正方式,上次变量值存储于xt.ini中;
  7.前后缀以及ascii码区间可设置为变量,便于扩大程序的应用范围。
  
  附注:
  1.该程序是否成功的关键是单双字节字符的识别,但由于这是ACAD固有问题,因此只能通过增设错误陷阱和特殊字符的判断来加区分。
    本程序解决方案是设置中英文判定变量english,配合字符拾取变量tmp,首先判断是否为特殊字符"和/,如果是则切换为英文,否则
    继续通过ascii判定其编码区间是否为英文。
  2.由于样式这个参量往日变更并不多,主要是变更不如st方便,因此该参量日后将用于保存用户设定的关联样式名称,为避免冲突名称
  保存于xt.ini中。
  
  
  版本说明:
  0.0.2   修正输入字符串中出现"和\时出错的BUG,并优化了输入部分程序代码
  0.0.1   初步完成输入部分
|;


</font><blockquote><font face="宋体,verdana,arial,helvetica" >code:</font>
<TABLE cellSpacing=0 cellPadding=0 bgColor='#ffffff' width=90% align=center><TR><TD><TABLE cellSpacing=1 cellPadding=2 border=0  width=100%><tr><td bgcolor='#F3F3F3'><pre><font face="courier new">
(defun c:xT (/ num p1 p2 height_text ang_text justify_text style_text words length_text
             n0 n1 sub1 sub2 sub3 sub4 english tmp)
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ;(prompt "请选择要编辑的文字或指定文字的起点")                                                         ;
  ;方式一:(……判断所选对象是否为文字,是则切换为编辑状态,否则切换为输入状态……)xdrx_entsel           ;
  ;方式二:默认为编辑修改,光标显示选择框,鼠标左键点取文字则确定,否则过滤重来;鼠标右键切换到输入状态。;
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  (initget "0 1")
  (setq num (getkword "请选择输入状态或编辑修改状态(0/1):<0>"))
  (if (= num nil) (setq num "0"))
  (if (= num "0")
   
    (progn;输入状态
      ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
      ;集中获取当前系统text变量,包括高度、角度、字体样式和名称;
      ;TEXTSIZE、?、TEXTSTYLE、FONTALT                        ;
      ;(getvar varname)                                        ;
      ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
      (setq p1 (getpoint "指定文字的起点:"))
      (setq height_text (getdist p1 "指定高度:<2.5>"))
      (if (= height_text nil) (setq height_text 2.5))
      (setq ang_text (getangle p1 "指定文字的旋转角度:<0>"))
      (if (= ang_text nil) (setq ang_text 0))
      (setq ang_text (angtos ang_text))
      (prompt "选择样式:")
      ;(setq YorN (xdrx_YesorNo (strcat "当前样式为" style_0 ",是否修改当前样式?(Y/N)") N))
      ;(if (= YorN 1)
      ;        (progn
      ;          (Prompt "请使用Style命令更改当前样式")
      ;          (princ)
      ;          )
      ;        )
      (setq style_text (getstring))
      (setq words (getstring "输入文字:"))
      ;处理words,在英文前后分别加上%%166和%%165
      (setq length_text (strlen words))
      (setq sub1 "" sub2 "" sub3 words sub4 "")
      (setq n0 1 n1 1 english 0)
  
      (while (/= sub3 "")
        (setq tmp (substr sub3 1 1))
        ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
        ;从sub3中分离出来第一段中文,存储于sub1;
        ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
        (if (/= tmp "\"" "\\");第一个字符非"和\
          (progn
            (while (= english 0);非英文时循环
              (setq tmp (substr sub3 n1 1))
              (if (or (= tmp "\"") (= tmp "\\"))
                (progn
                  (setq english 1)
                  )
                (progn
                  (if (and (or (> (ascii tmp) 126) (< (ascii tmp) 32))
                           (/= (ascii tmp) 0))
                    (progn;非英文和数字
                      (setq english 0)
                      (setq n1 (+ 1 n1))
                      )
                    (setq english 1)
                    )
                  )
                )
              )
            (setq sub1 (substr sub3 1 (- n1 1)))
            ;(setq n0 n1 english 0)
            (setq n0 n1)
            )
          (progn
            (setq english 1)
            )
          )
        ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
        ;从sub3中分离出来第一段英文和数字,存储于sub2;
        ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
        (while (= english 1)
          (if (or (= tmp "\"") (= tmp "\\"))
            (progn
              (setq n1 (+ 1 n1));continue
              (setq english 1)
              )
            (progn
              (if (and (<= (ascii tmp) 126) (>= (ascii tmp) 32))
                (progn
                  (setq n1 (+ 1 n1))
                  (setq english 1)
                  )
                (setq english 0)
                )
              )
            )
          (setq tmp (substr sub3 n1 1))
          )
        ;(setq tmp (substr sub3 n1 1))
       
        (if (/= n1 n0);判断sub3是否结束
          (setq sub2 (strcat "%%166" (substr sub3 n0 (- n1 n0)) "%%165"))
          (setq sub2 "")
          )
        (setq sub3 (substr sub3 n1))
        (setq sub4 (strcat sub4 sub1 sub2))
        (setq n0 1 n1 1 english 0)
        )
      (setq words sub4)

      (prompt "选择对正方式:")
      (prompt "[对齐(A)/调整(F)/中心(C)/中间(M)/右(R)/左上(TL)/中上(TC)/右上(TR)/左中(ML)/正中(MC)/右中(MR)/左下(BL)/中下(BC)/右下(BR)]")
      (initget "A F C M R TL TC TR ML MC MR BL BC BR")
      (setq justify_text (getkword))
      
      (cond
        ((= justify_text nil)(command "text" p1 height_text ang_text words))
        ((= justify_text "A")
         (progn
           (setq p2 (getpoint p1 "请输入第二个端点"))
           (command "text" "j" "a" p1 p2 words)
           )
         )
        ((= justify_text "F")
         (progn
           (setq p2 (getpoint p1 "请输入第二个端点"))
           (command "text" "j" "f" p1 p2 height_text words)
           )
         )
        (t
         (progn
           (command "text" "j" justify_text p1 height_text ang_text words)
           )
         )
        )
      )
    (progn;编辑修改态
      ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
      ;1.读取当前文字编码,并识别当前字体是否为所需字体,如果是则过滤%%166和%%165,否则不变;
      ;2.编辑修改后根据当前字体决定是否自动添加%%166和%%165                                                    ;
      ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
      (print "Sorry,尚未完成!")
      (princ)
      )
    )
  )
</font></pre></TD></tr></TABLE></TD></TR></TABLE><font face="宋体,verdana, arial, helvetica" ></blockquote></font></p>
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2002-9-11 20:25:50 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?立即注册

×
在cad中我推荐输入法用拼音加加,因为用它输入许多特殊的字符非常方便,大家不妨试试
<body topmargin="0">
<table border="1" width="640" align="center" cellpadding="0" cellspacing="0" style="font-size: 10pt;line-height:130%"  bgcolor="#f0f0f0">   
<tr>   
<td align="center" colspan="11">
<table width="100%" cellspacing="0" cellpadding="0">
<tr>   
<td align="center" height="10" bgcolor="#000066"></td>  
</tr>  
<tr>   
<td align="center" bgcolor="#FFFFCC" height="40" valign="middle">
<p style="margin-top: 3; margin-bottom: 3"><font face="幼圆" size="4" color="#0000FF">拼音加加特殊符号编码列表</font></p>
</td>  
</tr>  
</table>
<tr>   
<td align="center" bgcolor="#C0C0C0"><font face="黑体" size="2" color="#0000FF">符号</font></td>  
<td align="center" bgcolor="#C0C0C0"><font face="黑体" size="2" color="#0000FF">名 称</font></td>  
<td align="center" bgcolor="#C0C0C0"><font face="黑体" size="2" color="#0000FF">全拼</font></td>  
<td align="center" bgcolor="#C0C0C0"><font face="黑体" size="2" color="#0000FF">双拼1</font></td>  
<td align="center" bgcolor="#C0C0C0"><font face="黑体" size="2" color="#0000FF">双拼2</font></td>  
<td bgcolor="#C0C0C0" bordercolor="#C0C0C0" width="3" align="center"><font face="黑体" size="2" color="#0000FF"> </font></td>  
<td align="center" bgcolor="#C0C0C0"><font face="黑体" size="2" color="#0000FF">符号</font></td>  
<td align="center" bgcolor="#C0C0C0"><font face="黑体" size="2" color="#0000FF">名 称</font></td>  
<td align="center" bgcolor="#C0C0C0"><font face="黑体" size="2" color="#0000FF">全拼</font></td>  
<td align="center" bgcolor="#C0C0C0"><font face="黑体" size="2" color="#0000FF">双拼1</font></td>  
<td align="center" bgcolor="#C0C0C0"><font face="黑体" size="2" color="#0000FF">双拼2</font></td>  
</tr>  
<tr>  
<td align="center"> </td>  
<td align="center">   
空 格</td>  
<td align="center"><font face="Arial"><b>kg</b></font></td>  
<td align="center"><font face="Arial"><b>kg</b></font></td>  
<td align="center"><font face="Arial"><b>kg</b></font></td>  
<td bgcolor="#C0C0C0" bordercolor="#C0C0C0" width="3" align="center"> </td>  
<td align="center">‖</td>  
<td align="center">双竖线</td>  
<td align="center">   
<font face="Arial"><b>   
ssx</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
iix</b></font></td>  
<td align="center"><font face="Arial"><b>uux</b></font></td>  
</tr>  
<tr>  
<td align="center"> </td>  
<td align="center">
双空格</td>  
<td align="center"> <font face="Arial"><b> skg</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
ikg</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
ukg</b></font></td>  
<td bgcolor="#C0C0C0" bordercolor="#C0C0C0" width="3" align="center"> </td>  
<td align="center">〖〗</td>  
<td align="center">空心括号</td>  
<td align="center">   
<font face="Arial"><b>   
kxkh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
kxkh</b></font></td>  
<td align="center"><font face="Arial"><b>kxkh</b></font></td>  
</tr>  
<tr>  
<td align="center">,</td>  
<td align="center">
逗 号</td>  
<td align="center"><font face="Arial"><b>dh</b></font></td>  
<td align="center"><font face="Arial"><b>dh</b></font></td>  
<td align="center"><font face="Arial"><b>dh</b></font></td>  
<td bgcolor="#C0C0C0" bordercolor="#C0C0C0" width="3" align="center"> </td>  
<td align="center">【】</td>  
<td align="center">实心括号</td>  
<td align="center">   
<font face="Arial"><b>   
sxkh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
ixkh</b></font></td>  
<td align="center"><font face="Arial"><b>uxkh</b></font></td>  
</tr>  
<tr>  
<td align="center">、</td>  
<td align="center">   
顿 号</td>  
<td align="center"><font face="Arial"><b>dh</b></font></td>  
<td align="center"><font face="Arial"><b>dh</b></font></td>  
<td align="center"><font face="Arial"><b>dh</b></font></td>  
<td bgcolor="#C0C0C0" bordercolor="#C0C0C0" width="3" align="center"> </td>  
<td align="center">√</td>  
<td align="center">对 勾</td>  
<td align="center"><font face="Arial"><b>dg</b></font></td>  
<td align="center"><font face="Arial"><b>dg</b></font></td>  
<td align="center"><font face="Arial"><b>dg</b></font></td>  
</tr>  
<tr>  
<td align="center">。</td>  
<td align="center">   
句 号</td>  
<td align="center"> <font face="Arial"><b> jh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
jh</b></font></td>  
<td align="center"><font face="Arial"><b>jh</b></font></td>  
<td bgcolor="#C0C0C0" bordercolor="#C0C0C0" width="3" align="center"> </td>  
<td align="center">≈</td>  
<td align="center">约等于</td>  
<td align="center">   
<font face="Arial"><b>   
ydy</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
ydy</b></font></td>  
<td align="center"><font face="Arial"><b>ydy</b></font></td>  
</tr>  
<tr>  
<td align="center">·</td>  
<td align="center">   
圆 点</td>  
<td align="center"><font face="Arial"><b>yd</b></font></td>  
<td align="center"><font face="Arial"><b>yd</b></font></td>  
<td align="center"><font face="Arial"><b>yd</b></font></td>  
<td bgcolor="#C0C0C0" bordercolor="#C0C0C0" width="3" align="center"> </td>  
<td align="center">≤</td>  
<td align="center">小于等于</td>  
<td align="center">   
<font face="Arial"><b>   
xydy</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
xydy</b></font></td>  
<td align="center"><font face="Arial"><b>xydy</b></font></td>  
</tr>  
<tr>  
<td align="center">·</td>  
<td align="center">   
间隔号</td>  
<td align="center"> <font face="Arial"><b> jgh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
jgh</b></font></td>  
<td align="center"><font face="Arial"><b>jgh</b></font></td>  
<td bgcolor="#C0C0C0" bordercolor="#C0C0C0" width="3" align="center"> </td>  
<td align="center">≥</td>  
<td align="center">大于等于</td>  
<td align="center">   
<font face="Arial"><b>   
dydy</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
dydy</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
dydy</b></font></td>  
</tr>  
<tr>  
<td align="center">——</td>  
<td align="center">   
破折号</td>  
<td align="center"> <font face="Arial"><b> pzh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
pvh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
pvh</b></font></td>  
<td bgcolor="#C0C0C0" bordercolor="#C0C0C0" width="3" align="center"> </td>  
<td align="center"><</td>  
<td align="center">小 于</td>  
<td align="center">   
<font face="Arial"><b>   
xy</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
xyh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
xyh</b></font></td>  
</tr>  
<tr>  
<td align="center">~</td>  
<td align="center">   
波浪号</td>  
<td align="center"> <font face="Arial"><b> blh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
blh</b></font></td>  
<td align="center"><font face="Arial"><b>blh</b></font></td>  
<td bgcolor="#C0C0C0" bordercolor="#C0C0C0" width="3" align="center"> </td>  
<td align="center">></td>  
<td align="center">大 于</td>  
<td align="center">   
<font face="Arial"><b>   
dy</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
dyh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
dyh</b></font></td>  
</tr>  
<tr>  
<td align="center">……</td>  
<td align="center">   
省略号</td>  
<td align="center"> <font face="Arial"><b> slh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
ilh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
ulh</b></font></td>  
<td bgcolor="#C0C0C0" bordercolor="#C0C0C0" width="3" align="center"> </td>  
<td align="center">=</td>  
<td align="center">等 于</td>  
<td align="center">   
<font face="Arial"><b>   
dy</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
dyh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
dyh</b></font></td>  
</tr>  
<tr>  
<td align="center">‘’</td>  
<td align="center">   
单引号</td>  
<td align="center"> <font face="Arial"><b> dyh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
dyh</b></font></td>  
<td align="center"><font face="Arial"><b>dyh</b></font></td>  
<td bgcolor="#C0C0C0" bordercolor="#C0C0C0" width="3" align="center"> </td>  
<td align="center">′</td>  
<td align="center">单撇号</td>  
<td align="center">   
<font face="Arial"><b>   
dph</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
dph</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
dph</b></font></td>  
</tr>  
<tr>  
<td align="center">“”</td>  
<td align="center">   
双引号</td>  
<td align="center"> <font face="Arial"><b> syh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
iyh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
uyh</b></font></td>  
<td bgcolor="#C0C0C0" bordercolor="#C0C0C0" width="3" align="center"> </td>  
<td align="center">″</td>  
<td align="center">双撇号</td>  
<td align="center">   
<font face="Arial"><b>   
sph</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
iph</b></font></td>  
<td align="center"><font face="Arial"><b>uph</b></font></td>  
</tr>  
<tr>  
<td align="center">〔〕</td>  
<td align="center">   
方括号</td>  
<td align="center"> <font face="Arial"><b> fkh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
fkh</b></font></td>  
<td align="center"><font face="Arial"><b>fkh</b></font></td>  
<td bgcolor="#C0C0C0" bordercolor="#C0C0C0" width="3" align="center"> </td>  
<td align="center">′</td>  
<td align="center">分</td>  
<td align="center"><font face="Arial"><b>fen</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
fr</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
ff</b></font></td>  
</tr>  
<tr>  
<td align="center">〈〉</td>  
<td align="center">单书名号</td>  
<td align="center">   
<font face="Arial"><b>   
dsmh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
dimh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
dumh</b></font></td>  
<td bgcolor="#C0C0C0" bordercolor="#C0C0C0" width="3" align="center"> </td>  
<td align="center">″</td>  
<td align="center">秒</td>  
<td align="center">   
<font face="Arial"><b>   
miao</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
mk</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
mk</b></font></td>  
</tr>  
<tr>  
<td align="center">《》</td>  
<td align="center">书名号</td>  
<td align="center">   
<font face="Arial"><b>   
smh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
imh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
umh</b></font></td>  
<td bgcolor="#C0C0C0" bordercolor="#C0C0C0" width="3" align="center"> </td>  
<td align="center">♂</td>  
<td align="center">雄性符号</td>  
<td align="center">   
<font face="Arial"><b>   
xxfh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
xxfh</b></font></td>  
<td align="center"><font face="Arial"><b>xxfh</b></font></td>  
</tr>  
<tr>  
<td align="center">『』</td>  
<td align="center">竖书名号</td>  
<td align="center">   
<font face="Arial"><b>   
ssmh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
iimh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
uumh</b></font></td>  
<td bgcolor="#C0C0C0" bordercolor="#C0C0C0" width="3" align="center"> </td>  
<td align="center">♀</td>  
<td align="center">雌性符号</td>  
<td align="center">   
<font face="Arial"><b>   
cxfh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
cxfh</b></font></td>  
<td align="center"><font face="Arial"><b>cxfh</b></font></td>  
</tr>  
<tr>  
<td align="center">±</td>  
<td align="center">正负号</td>  
<td align="center">   
<font face="Arial"><b>   
zfh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
vfh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
vfh</b></font></td>  
<td bgcolor="#C0C0C0" bordercolor="#C0C0C0" width="3" align="center"> </td>  
<td align="center">♂♀</td>  
<td align="center">性 别</td>  
<td align="center"><font face="Arial"><b>xb</b></font></td>  
<td align="center"><b> </b></td>  
<td align="center"> </td>  
</tr>  
<tr>  
<td align="center">×</td>  
<td align="center">乘 号</td>  
<td align="center">   
<font face="Arial"><b>   
ch</b></font></td>  
<td align="center"><font face="Arial"><b>uh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
ih</b></font></td>  
<td bgcolor="#C0C0C0" bordercolor="#C0C0C0" width="3" align="center"> </td>  
<td align="center">°</td>  
<td align="center">度</td>  
<td align="center">   
<font face="Arial"><b>   
du</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
du</b></font></td>  
<td align="center"><font face="Arial"><b>du</b></font></td>  
</tr>  
<tr>  
<td align="center">÷</td>  
<td align="center">除 号</td>  
<td align="center">   
<font face="Arial"><b>   
ch</b></font></td>  
<td align="center"><font face="Arial"><b>uh</b></font></td>  
<td align="center"><font face="Arial"><b>ih</b></font></td>  
<td bgcolor="#C0C0C0" bordercolor="#C0C0C0" width="3" align="center"> </td>  
<td align="center">℃</td>  
<td align="center">摄氏度</td>  
<td align="center">   
<font face="Arial"><b>   
ssd</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
iid</b></font></td>  
<td align="center"><font face="Arial"><b>uud</b></font></td>  
</tr>  
<tr>  
<td align="center">∶</td>  
<td align="center">对比号</td>  
<td align="center">   
<font face="Arial"><b>   
dbh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
dbh</b></font></td>  
<td align="center"><font face="Arial"><b>dbh</b></font></td>  
<td bgcolor="#C0C0C0" bordercolor="#C0C0C0" width="3" align="center"> </td>  
<td align="center">℃</td>  
<td align="center">温 标</td>  
<td align="center"><font face="Arial"><b>wb</b></font></td>  
<td align="center"><b> </b></td>  
<td align="center"> </td>  
</tr>  
<tr>  
<td align="center">‰</td>  
<td align="center">千分号</td>  
<td align="center">   
<font face="Arial"><b>   
qfh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
qfh</b></font></td>  
<td align="center"><font face="Arial"><b>qfh</b></font></td>  
<td bgcolor="#C0C0C0" bordercolor="#C0C0C0" width="3" align="center"> </td>  
<td align="center">§</td>  
<td align="center">章节号</td>  
<td align="center">   
<font face="Arial"><b>   
zjh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
vjh</b></font></td>  
<td align="center"><font face="Arial"><b>vjh</b></font></td>  
</tr>  
<tr>  
<td align="center">%</td>  
<td align="center">百分号</td>  
<td align="center">   
<font face="Arial"><b>   
bfh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
bfh</b></font></td>  
<td align="center"><font face="Arial"><b>bfh</b></font></td>  
<td bgcolor="#C0C0C0" bordercolor="#C0C0C0" width="3" align="center"> </td>  
<td align="center">※</td>  
<td align="center">花叉号</td>  
<td align="center">   
<font face="Arial"><b>   
hch</b></font></td>  
<td align="center"><font face="Arial"><b>huh</b></font></td>  
<td align="center"><font face="Arial"><b>hih</b></font></td>  
</tr>  
<tr>  
<td align="center">()</td>  
<td align="center">圆括号</td>  
<td align="center">   
<font face="Arial"><b>   
ykh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
ykh</b></font></td>  
<td align="center"><font face="Arial"><b>ykh</b></font></td>  
<td bgcolor="#C0C0C0" bordercolor="#C0C0C0" width="3" align="center"> </td>  
<td align="center">@</td>  
<td align="center">花a</td>  
<td align="center"><font face="Arial"><b>ha</b></font></td>  
<td align="center"><b> </b></td>  
<td align="center"> </td>  
</tr>  
<tr>  
<td align="center">{}</td>  
<td align="center">大括号</td>  
<td align="center">   
<font face="Arial"><b>   
dkh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
dkh</b></font></td>  
<td align="center"><font face="Arial"><b>dkh</b></font></td>  
<td bgcolor="#C0C0C0" bordercolor="#C0C0C0" width="3" align="center"> </td>  
<td align="center">π</td>  
<td align="center">PAI</td>  
<td align="center">   
<font face="Arial"><b>   
pai</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
pai</b></font></td>  
<td align="center"><font face="Arial"><b>pai</b></font></td>  
</tr>  
<tr>  
<td align="center">?</td>  
<td align="center">问 号</td>  
<td align="center">   
<font face="Arial"><b>   
wh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
wh</b></font></td>  
<td align="center"><font face="Arial"><b>wh</b></font></td>  
<td bgcolor="#C0C0C0" bordercolor="#C0C0C0" width="3" align="center"> </td>  
<td align="center">№</td>  
<td align="center">No</td>  
<td align="center"><font face="Arial"><b>no</b></font></td>  
<td align="center"><font face="Arial"><b>no</b></font></td>  
<td align="center"><font face="Arial"><b>no</b></font></td>  
</tr>  
<tr>  
<td align="center">;</td>  
<td align="center">分 号</td>  
<td align="center">   
<font face="Arial"><b>   
fh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
fh</b></font></td>  
<td align="center"><font face="Arial"><b>fh</b></font></td>  
<td bgcolor="#C0C0C0" bordercolor="#C0C0C0" width="3" align="center"> </td>  
<td align="center">№</td>  
<td align="center">Num</td>  
<td align="center"><font face="Arial"><b>num</b></font></td>  
<td align="center"><b> </b></td>  
<td align="center"> </td>  
</tr>  
<tr>  
<td align="center">:</td>  
<td align="center">冒 号</td>  
<td align="center">   
<font face="Arial"><b>   
mh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
mh</b></font></td>  
<td align="center"><font face="Arial"><b>mh</b></font></td>  
<td bgcolor="#C0C0C0" bordercolor="#C0C0C0" width="3" align="center"> </td>  
<td align="center">№</td>  
<td align="center">序 号</td>  
<td align="center">   
<font face="Arial"><b>   
xh</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
xh</b></font></td>  
<td align="center"><font face="Arial"><b>xh</b></font></td>  
</tr>  
<tr>  
<td align="center">!</td>  
<td align="center">叹 号</td>  
<td align="center">   
<font face="Arial"><b>   
th</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
th</b></font></td>  
<td align="center"><font face="Arial"><b>th</b></font></td>  
<td bgcolor="#C0C0C0" bordercolor="#C0C0C0" width="3" align="center"> </td>  
<td align="center">☆★</td>  
<td align="center">五角星</td>  
<td align="center">   
<font face="Arial"><b>   
wjx</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
wjx</b></font></td>  
<td align="center"><font face="Arial"><b>wjx</b></font></td>  
</tr>  
<tr>  
<td align="center">#</td>  
<td align="center">井 号</td>  
<td align="center">   
<font face="Arial"><b>   
jing</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
jh</b></font></td>  
<td align="center"><font face="Arial"><b>jh</b></font></td>  
<td bgcolor="#C0C0C0" bordercolor="#C0C0C0" width="3" align="center"> </td>  
<td align="center">○●</td>  
<td align="center">圆 圈</td>  
<td align="center">   
<font face="Arial"><b>   
yq</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
yq</b></font></td>  
<td align="center"><font face="Arial"><b>yq</b></font></td>  
</tr>  
<tr>  
<td align="center">$</td>  
<td align="center">美 元</td>  
<td align="center"><font face="Arial"><b>my</b></font></td>  
<td align="center"><font face="Arial"><b>my</b></font></td>  
<td align="center"><font face="Arial"><b>my</b></font></td>  
<td bgcolor="#C0C0C0" bordercolor="#C0C0C0" width="3" align="center"> </td>  
<td align="center">◇◆</td>  
<td align="center">菱 形</td>  
<td align="center"><font face="Arial"><b>lx</b></font></td>  
<td align="center"><font face="Arial"><b>lx</b></font></td>  
<td align="center"><font face="Arial"><b>lx</b></font></td>  
</tr>  
<tr>  
<td align="center">£</td>  
<td align="center">英 镑</td>  
<td align="center">   
<font face="Arial"><b>   
yb</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
yb</b></font></td>  
<td align="center"><font face="Arial"><b>yb</b></font></td>  
<td bgcolor="#C0C0C0" bordercolor="#C0C0C0" width="3" align="center"> </td>  
<td align="center">□■</td>  
<td align="center">方 框</td>  
<td align="center">   
<font face="Arial"><b>   
fk</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
fk</b></font></td>  
<td align="center"><font face="Arial"><b>fk</b></font></td>  
</tr>  
<tr>  
<td align="center">¥</td>  
<td align="center">人民币</td>  
<td align="center">   
<font face="Arial"><b>   
rmb</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
rmb</b></font></td>  
<td align="center"><font face="Arial"><b>rmb</b></font></td>  
<td bgcolor="#C0C0C0" bordercolor="#C0C0C0" width="3" align="center"> </td>  
<td align="center">△▲</td>  
<td align="center">三角形</td>  
<td align="center">   
<font face="Arial"><b>   
sjx</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
sjx</b></font></td>  
<td align="center"><font face="Arial"><b>sjx</b></font></td>  
</tr>  
<tr>  
<td align="center">&</td>  
<td align="center">and</td>  
<td align="center"><font face="Arial"><b>and</b></font></td>  
<td align="center"><font face="Arial"><b>and</b></font></td>  
<td align="center"><font face="Arial"><b>and</b></font></td>  
<td bgcolor="#C0C0C0" bordercolor="#C0C0C0" width="3" align="center"> </td>  
<td align="center">/</td>  
<td align="center">斜 杠</td>  
<td align="center">   
<font face="Arial"><b>   
xg</b></font></td>  
<td align="center">   
<font face="Arial"><b>   
xg</b></font></td>  
<td align="center"><font face="Arial"><b>xg</b></font></td>  
</tr>  
<tr>  
<td align="center">&</td>  
<td align="center">和</td>  
<td align="center"><font face="Arial"><b>he</b></font></td>  
<td align="center"><font face="Arial"><b>he</b></font></td>  
<td align="center"><font face="Arial"><b>he</b></font></td>  
<td bgcolor="#C0C0C0" bordercolor="#C0C0C0" width="3" align="center"> </td>  
<td align="center"> </td>  
<td align="center"> </td>  
<td align="center"> </td>  
<td align="center"> </td>  
<td align="center"> </td>  
</tr>  
</table>
&nbsp;<br><br>
<br>
<br>
<br>
<table border="1" width="640" align="center" cellpadding="0" cellspacing="0" style="font-size: 10pt; line-height: 150%"  bgcolor="#f0f0f0">
<tr>
<td align="center" colspan="5">
<table width="100%" cellspacing="0" cellpadding="0">
<tr>   
<td align="center" height="10" bgcolor="#000066"></td>  
</tr>  
<tr>   
<td align="center" bgcolor="#FFFFCC" height="40" valign="middle">
<p style="margin-top: 3; margin-bottom: 3"><font face="幼圆" size="4" color="#0000FF">拼音加加系列符号编码列表</font></p>
</td>  
</tr>  
</table>
</tr>
<tr>
<td align="center" bgcolor="#C0C0C0"><font face="黑体">名  称</font></td>      
<td align="center" bgcolor="#C0C0C0"><font face="黑体">全拼</font></td>   
<td align="center" bgcolor="#C0C0C0"><font face="黑体">双拼1</font></td>   
<td align="center" bgcolor="#C0C0C0"><font face="黑体">双拼2</font></td>   
<td width="350" align="center" bgcolor="#C0C0C0">
<p style="margin-left: 4; margin-right: 4"><font face="黑体">系 列 符  
号</font></p>
</td>   
</tr>   
<tr>   
<td align="center">大写罗马</td>   
<td align="center"><font face="Arial"><b>dxlm</b></font></td>   
<td align="center"><font face="Arial"><b>dxlm</b></font></td>   
<td align="center"><font face="Arial"><b>dxlm</b></font></td>   
<td width="350">
<p style="margin-left: 4; margin-right: 4">ⅠⅡⅢⅣⅤⅥⅦⅧⅨⅩⅪⅫ</p>
</td>   
</tr>   
<tr>   
<td align="center">大写罗马</td>   
<td align="center"><font face="Arial"><b>xxlm</b></font></td>   
<td align="center"><font face="Arial"><b>xxlm</b></font></td>   
<td align="center"><font face="Arial"><b>xxlm</b></font></td>   
<td width="350">
<p style="margin-left: 4; margin-right: 4">ⅰⅱⅲⅳⅴⅵⅶⅷⅸⅹ</p>
</td>   
</tr>   
<tr>   
<td align="center">大写希腊</td>   
<td align="center"><font face="Arial"><b>dxxl</b></font></td>   
<td align="center"><font face="Arial"><b>dxxl</b></font></td>   
<td align="center"><font face="Arial"><b>dxxl</b></font></td>   
<td width="350">
<p style="margin-left: 4; margin-right: 4">ΑΒΓΔΕΖΗΘΙΚΛΜΝΞΟΠΡΣΤΥΦΧΨΩ</p>
</td>   
</tr>   
<tr>   
<td align="center">小写希腊</td>   
<td align="center"><font face="Arial"><b>xxxl</b></font></td>   
<td align="center"><font face="Arial"><b>xxxl</b></font></td>   
<td align="center"><font face="Arial"><b>xxxl</b></font></td>   
<td width="350">
<p style="margin-left: 4; margin-right: 4">αβγδεζηθικλμνξοπρστυφχψω</p>
</td>   
</tr>   
<tr>   
<td align="center">大写俄文</td>   
<td align="center"><font face="Arial"><b>dxew</b></font></td>   
<td align="center"><font face="Arial"><b>dxew</b></font></td>   
<td align="center"><font face="Arial"><b>dxew</b></font></td>   
<td width="350">
<p style="margin-left: 4; margin-right: 4">АБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯЁ</p>
</td>   
</tr>   
<tr>   
<td align="center">小写俄文</td>   
<td align="center"><font face="Arial"><b>xxew</b></font></td>   
<td align="center"><font face="Arial"><b>xxew</b></font></td>   
<td align="center"><font face="Arial"><b>xxew</b></font></td>   
<td width="350">
<p style="margin-left: 4; margin-right: 4">абвгдежзийклмнопрстуфхцчшщъыьэюяё</p>
</td>   
</tr>   
<tr>   
<td align="center">小写日文</td>   
<td align="center"><font face="Arial"><b>xxrw</b></font></td>   
<td align="center"><font face="Arial"><b>xxrw</b></font></td>   
<td align="center"><font face="Arial"><b>xxrw</b></font></td>   
<td width="350">
<p style="margin-left: 4; margin-right: 4">ぁあぃいぅうぇえぉおかがきぎくぐけげこごさざしじすずせぜそぞただちぢっつづてでとどなにぬねのはばひびぴふぶぷへべぺほぼぽまみむめもゃやゅゆょよらりるれろゎわゐゑをん゛゜ゝゞ</p>
</td>   
</tr>   
<tr>   
<td align="center">大写日文</td>   
<td align="center"><font face="Arial"><b>dxrw</b></font></td>   
<td align="center"><font face="Arial"><b>dxrw</b></font></td>   
<td align="center"><font face="Arial"><b>dxrw</b></font></td>   
<td width="350">
<p style="margin-left: 4; margin-right: 4">ァアィイゥウェエォオカガキギクグケゲコゴサザシジスズセゼソゾタダチヂッツヅテデトドナニヌネノハバパヒビピフブプヘベペホボポマミムメモャヤュユョヨラリルレロヮワヰヱヲンヴヵヶーヽヾ</p>
</td>   
</tr>   
<tr>   
<td align="center">注音符号</td>   
<td align="center"><font face="Arial"><b>zyfh</b></font></td>   
<td align="center"><font face="Arial"><b>vyfh</b></font></td>   
<td align="center"><font face="Arial"><b>vyfh</b></font></td>   
<td width="350">
<p style="margin-left: 4; margin-right: 4">ㄅㄆㄇㄈㄉㄊㄋㄌㄍㄎㄏㄐㄑㄒㄓㄔㄕㄖㄗㄘㄙㄧㄨㄩ<br>
ㄚㄛㄜㄝㄞㄟㄠㄡㄢㄣㄤㄥㄦ</p>
</td>   
</tr>   
<tr>   
<td align="center">数学符号</td>   
<td align="center"><font face="Arial"><b>sxfh</b></font></td>   
<td align="center"><font face="Arial"><b>ixfh</b></font></td>   
<td align="center"><font face="Arial"><b>uxfh</b></font></td>   
<td width="350">
<p style="margin-left: 4; margin-right: 4">+-<=>±×÷∈∏∑∕√∝∞∟∠∣∥∧∨∩∪∫<br>
∮∴∵∶∷∽≈≌≒≠≡≤≥≦≧≮≯⊕⊙⊥⊿</p>
</td>   
</tr>   
<tr>   
<td align="center">单位符号</td>   
<td align="center"><font face="Arial"><b>dwfh</b></font></td>   
<td align="center"><font face="Arial"><b>dwfh</b></font></td>   
<td align="center"><font face="Arial"><b>dwfh</b></font></td>   
<td width="350">
<p style="margin-left: 4; margin-right: 4">㎎㎏㎜㎝㎞㎡㏄㏎㏑㏒㏕</p>
</td>   
</tr>   
<tr>   
<td align="center">方向箭头</td>   
<td align="center"><font face="Arial"><b>fxjt</b></font></td>   
<td align="center"><font face="Arial"><b>fxjt</b></font></td>   
<td align="center"><font face="Arial"><b>fxjt</b></font></td>   
<td width="350">
<p style="margin-left: 4; margin-right: 4">←↑→↓↖↗↘↙</p>
</td>   
</tr>   
<tr>   
<td align="center">圆圈数字</td>   
<td align="center"><font face="Arial"><b>yqsz</b></font></td>   
<td align="center"><font face="Arial"><b>yqiz</b></font></td>   
<td align="center"><font face="Arial"><b>yquz</b></font></td>   
<td width="350">
<p style="margin-left: 4; margin-right: 4">①②③④⑤⑥⑦⑧⑨⑩</p>
</td>   
</tr>   
<tr>   
<td align="center">括号数字</td>   
<td align="center"><font face="Arial"><b>khsz</b></font></td>   
<td align="center"><font face="Arial"><b>khiz</b></font></td>   
<td align="center"><font face="Arial"><b>khuz</b></font></td>   
<td width="350">
<p style="margin-left: 4; margin-right: 4">⑴⑵⑶⑷⑸⑹⑺⑻⑼⑽⑾⑿⒀⒁⒂⒃⒄⒅⒆⒇</p>
</td>   
</tr>   
<tr>   
<td align="center">数 字 点</td>        
<td align="center"><font face="Arial"><b>szd</b></font></td>      
<td align="center"><font face="Arial"><b>izd</b></font></td>      
<td align="center"><font face="Arial"><b>uzd</b></font></td>      
<td width="350">   
<p style="margin-left: 4; margin-right: 4">⒈⒉⒊⒋⒌⒍⒎⒏⒐⒑⒒⒓⒔⒕⒖⒗⒘⒙⒚⒛</p>  
</td>     
</tr>     
<tr>     
<td align="center">中文数字</td>     
<td align="center"><font face="Arial"><b>zwsz</b></font></td>     
<td align="center"><font face="Arial"><b>vwiz</b></font></td>     
<td align="center"><font face="Arial"><b>vwuz</b></font></td>     
<td width="350">  
<p style="margin-left: 4; margin-right: 4">㈠㈡㈢㈣㈤㈥㈦㈧㈨㈩</p>  
</td>     
</tr>     
<tr>     
<td align="center">货币符号</td>   
<td align="center"><b><font face="Arial">hb</font>fh</b></td>   
<td align="center"><b><font face="Arial">hb</font>fh</b></td>   
<td align="center"><b><font face="Arial">hb</font>fh</b></td>   
<td width="350">
<p style="margin-left: 4; margin-right: 4">$ ¢ £ ¥ ¤      
</p>   
</td>      
</tr>      
</table>     
<p></p><br>      
<table align="center" width="640"  bgcolor="#CCFFFF">
<tr><td>   
<p align="center" style="font-size:9pt;line-height:130%""><font color="#0000FF"><br>
版权所有 &copy; 北京六合源软件技术有限公司<br>      
电 话: (010)64963988<br>      
E-Mail:<a href="mailto:pyjj@rovasoft.com"> pyjj@rovasoft.com</a><br>      
Copyright &copy; Beijing ROVASOFT Co. Ltd., 1999 All Rights Reserved<br>   
<br>   
</font></p>      
</td></tr>   
</table>  

<p>      
<br>      
<br>      
<br>      
<br>      
</p>      

</body>
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
发表于 2002-9-18 13:55:10 | 显示全部楼层
;|
  命令:xT
  作者:逍遥客
  版本:0.0.3
  日期:2002/9/18
  功能:配合字体"扩展TXT.shx"输入及编辑修改,现在仅初步完成输入部分
  系统:瘟酒吧、中文ACAD2002
  
  配合:XDRX_API B11208以上版本
  
  该程序有待改进的地方:
  1.通过识别用户点取目标的不同,自动切换输入与编辑,该工作由主程序完成,输入与编辑两种状态改写为两个过程函数。
  2.读取系统字体变量,使默认字体属性相应变化,以符合用户的一般习惯;
  3.自动识别当前字体是否为所需字体,如果不是,则建议用户变更,同意则方式一:退出程序由用户调用STYLE命令修改,方式二:将
    所有符合要求的样式列表供用户选择(使用(textpage)和(graphscr)切换文本与图形界面);
  4.设置一个内部变量用于关联样式,其默认值为用户所设定关联的样式名称,如果当前字体有效则该变量不起作用,否则建议用户调
  用默认样式;
  5.字高参数当对正方式为“对齐A”时,并不需要输入,本程序通过默认方式略过;
  6.很多情况并不希望左下角对齐,因此应加入默认对正方式,上次变量值存储于xt.ini中;
  7.前后缀以及ascii码区间可设置为变量,便于扩大程序的应用范围。
  8.通过框选过滤并排序要编辑修改的文字对象,顺次对其进行编辑修改,如果该系列文字组名相同,则将其组合成一段,根据用户设定
    每行字数和行距换行(如果没有设定,根据该系列文字最大字符数确定每行字数,平均行距确定换行距离),
  9.配合8,可将输入文字部分扩展,增加每行字数和行距两个参数,实现多行输出(默认为单行),每次输入的文字设定为一组,组名
    及对应表元名称保存于xt.ini中。输入文字部分必须分割为两部分,一部分为文字分割及定位部分,另一部分为文字输出部分,前者
    控制交互式输入和循环主体,后者专职输出。
  10.定制字体列表及对应处理方案,根据不同的字体,自动调用不同的处理方案。
   
  附注:
  1.该程序是否成功的关键是单双字节字符的识别,此版本通过调用晓东函数库中的字处理部分解决。
  2.由于样式这个参量往日变更并不多,主要是变更不如st方便,因此该参量日后将用于保存用户设定的关联样式名称,为避免冲突名称
    将保存于xt.ini中。
  
  
  版本说明:
  0.0.3   将输入与修改两部分分离为两个函数,并调用晓东的函数库字处理部分优化了输入部分,使程序结构更清晰,更便于调试。
  0.0.2   修正输入字符串中出现"和\时出错的BUG,并优化了输入部分程序代码。
  0.0.1   初步完成输入部分
|;

  1. (defun c:xT (/ num )
  2.   ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  3.   ;(prompt "请选择要编辑的文字或指定文字的起点")                                                         ;
  4.   ;方式一:(……判断所选对象是否为文字,是则切换为编辑状态,否则切换为输入状态……)xdrx_entsel           ;
  5.   ;方式二:默认为编辑修改,光标显示选择框,鼠标左键点取文字则确定,否则过滤重来;鼠标右键切换到输入状态。;
  6.   ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  7.   (initget "0 1")
  8.   (setq num (getkword "请选择要编辑修改的文字或输入新文字(1/0):<0>"))
  9.   (if (= num nil) (setq num "0"))
  10.   (if (= num "0")
  11.     (xt0)
  12.     (xt1)
  13.     )
  14.   )

  15. (defun xt0(/ p1 p2 height_text ang_text justify_text style_text str length_text
  16.              n el el1 head behind tmp)
  17.       ;输入状态
  18.       ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  19.       ;集中获取当前系统text变量,包括高度、角度、字体样式和名称;
  20.       ;TEXTSIZE、?、TEXTSTYLE、FONTALT                        ;
  21.       ;(getvar varname)                                        ;
  22.       ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  23.       (setq p1 (getpoint "指定文字的起点:"))
  24.       (setq height_text (getdist p1 "指定高度:<2.5>"))
  25.       (if (= height_text nil) (setq height_text 2.5))
  26.       (setq ang_text (getangle p1 "指定文字的旋转角度:<0>"))
  27.       (if (= ang_text nil) (setq ang_text 0))
  28.       (setq ang_text (angtos ang_text))
  29.       (prompt "选择样式:")
  30.       ;(setq YorN (xdrx_YesorNo (strcat "当前样式为" style_0 ",是否修改当前样式?(Y/N)") N))
  31.       ;(if (= YorN 1)
  32.       ;        (progn
  33.       ;          (Prompt "请使用Style命令更改当前样式")
  34.       ;          (princ)
  35.       ;          )
  36.       ;        )
  37.       (setq style_text (getstring))
  38.       (setq str (getstring "输入文字:"))
  39.       ;处理str,在英文前后分别加上%%166和%%165
  40.       ;前后缀添加部分可以分离为一个通用函数,以便于程序功能扩展
  41.       ($XDLSP_Text_ToDb str)
  42.       (while (setq cha ($XDLSP_Text_GetWord))
  43.         (setq el (cons cha el))
  44.         )
  45.       (setq el (reverse el))
  46.       (setq n (length el)
  47.             str "" tmp "" )
  48.       (setq head "%%166"
  49.             behind "%%165")
  50.       (repeat n
  51.         (setq el1 (car el))
  52.         (setq el (cdr el))
  53.         (if (= ($xdlsp_text_hashz el1) nil)
  54.           (setq tmp (strcat head el1 behind))
  55.           (setq tmp el1)
  56.           )
  57.         (setq str (strcat str tmp))
  58.         )

  59.       (prompt "选择对正方式:")
  60.       (prompt "[对齐(A)/调整(F)/中心(C)/中间(M)/右(R)/左上(TL)/中上(TC)/右上(TR)/左中(ML)/正中(MC)/右中(MR)/左下(BL)/中下(BC)/右下(BR)]")
  61.       (initget "A F C M R TL TC TR ML MC MR BL BC BR")
  62.       (setq justify_text (getkword))
  63.       
  64.       (cond
  65.         ((= justify_text nil)(command "text" p1 height_text ang_text str))
  66.         ((= justify_text "A")
  67.          (progn
  68.            (setq p2 (getpoint p1 "请输入第二个端点"))
  69.            (command "text" "j" "a" p1 p2 str)
  70.            )
  71.          )
  72.         ((= justify_text "F")
  73.          (progn
  74.            (setq p2 (getpoint p1 "请输入第二个端点"))
  75.            (command "text" "j" "f" p1 p2 height_text str)
  76.            )
  77.          )
  78.         (t
  79.          (progn
  80.            (command "text" "j" justify_text p1 height_text ang_text str)
  81.            )
  82.          )
  83.         )
  84.   )

  85. (defun xt1()
  86.       ;编辑修改态
  87.       ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  88.       ;1.读取当前文字编码,并识别当前字体是否为所需字体,如果是则过滤%%166和%%165,否则不变;
  89.       ;2.编辑修改后根据当前字体决定是否自动添加%%166和%%165                                ;
  90.       ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  91.       (print "Sorry,尚未完成!")
  92.       (princ)
  93.       )
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2002-9-19 13:30:34 | 显示全部楼层
的问老师提供的字体我都下载了,具体使用的方法,望不吝赐教!
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2002-9-19 13:31:31 | 显示全部楼层
各位老师提供的字体我都下载了,具体使用的方法,望不吝赐教!
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2002-9-19 15:12:02 | 显示全部楼层
我发的字体都配图了,扩展txt还配了个xt,你照图上的编码在text命令中输入一下就知道了。xt是通过ap加载后在命令行输入xt就可以了,界面基本和text相同
别人的字体你要使用关键是要查编码,别人可能也介绍过里面的编码,如果没有,你试试我这个查编码的小东东(不能查出上下标开关等开关变量)
对了所有字体都要加入acad的font文件夹中才行
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2002-9-19 23:26:20 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?立即注册

×
我按您提供的方法将“字体.RAR、扩展字体.RAR”解压缩到CAD2000\FONT文件加后,各种符号的输入顺利解决(谢谢!)。但是中文字体输入后,打印出来的是双线空心字,怎样才能变为实体字?
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
发表于 2002-9-20 10:36:31 | 显示全部楼层
中文字体是否双线这与你所选择的使用st命令选择的bigfont有关,你试试将其改变为其他字体就好了
下面这个是cad517提供的字体,据说内容很全,你试试
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2002-9-20 10:37:21 | 显示全部楼层
第二个包
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2002-9-20 10:38:05 | 显示全部楼层
第三个包
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2002-10-14 16:39:38 | 显示全部楼层
我一般使用WORD写说明,然后通过MTEXT调入,速度比较快,效果挺好!
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2002-10-15 09:12:40 | 显示全部楼层
thanku,每次都是下载,很不好意思的,谁让自己这么菜,希望学习一段时间后可以帮到别人!
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2002-10-31 19:46:23 | 显示全部楼层
有没有更好的方法?
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2002-10-31 20:39:55 | 显示全部楼层
是啊是啊,,楼上的说出了我的心声``
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|申请友链|Archiver|手机版|小黑屋|辽公网安备|晓东CAD家园 ( 辽ICP备15016793号 )

GMT+8, 2024-5-4 06:08 , Processed in 0.481167 second(s), 61 queries , Gzip On.

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表