[LISP]对图中的单行文本进行四则运算(支持保留原数字的小数位数或自定义)
;;;对图中的单行文本进行四则运算(支持保留原数字的小数位数或自定义) by yshf;;;1.将下载的文件“wbszys0.fas”
;;;存到“H”盘中，如存入其它地方，
;;;请更改程序中第二行中的相应路径名。
;;;2.在命令行中键入wbszys，即可以对图中所选择
;;;范围内的单行文本进行四则运算。
;;;3.支持小数位数按原数字的小数位数保留或自定义
(defun c:wbszys()
(if (null wbszys0)(load "H:wbszys0.fas"));请注意文件wbszys0.fas”存盘路径名
(wbszys0)
)
(prompt "\n在命令行中键入wbszys，对图中的单行文本进行四则运算。") <p>谢谢 <span style="FILTER: glow(color='#A6BA98',strength='2'); WIDTH: 105px"><font color="#61b713" face="Verdana"><b>yshf</b></font></span></p>
<p>那么久的了</p>
<p>我顶一下</p>
<p>让她浮出水面</p>
页:
[1]