下面是执行这两项操作的add命令。希望这应该是从代码的正确部分复制代码的问题。
；***********************************************************；添加lsp 6/17/96；v1.01 96年7月2日固定使用局部变量；v1.02 1997年1月15日清理了注释掉的代码。添加了更多说明。；v1.03 2006年10月3日修订了该程序，使其能够处理包含逗号的数字。；v1.04 2006年11月20日修订了程序，停止在末尾添加零。********************************************************************************；添加字符串lisp例程将选取文本并添加；数字在一起。；使用：；选择一些东西。忽略所有非文本项。中的任何数字；所选文本将一起添加。选择要删除的文本项；已更新。所选文本项将替换为的结果；加法。；；注意，units命令将影响结果的格式。；如果你得到一个数字，会有一堆尾随的0，然后改变单位；来解决问题。；********************************************************；下面是从数字中删除逗号并更改小数点的子程序；由我添加（defun逗号（/nc nt m tmp ntext）（setq nc 0）；将计数器设置为0（setq m T）；将m设置为true（setq ntext“”）；清空ntext（setq nt（strlen text1））；初始化计数器（调用程序的文本1）；而对0到9之间的ascii小数点或数字进行循环测试，并消除无小数或数字字符。（而m（setq nc（+nc 1））（setq tmp（ascii（substr text1 nc 1）））（如果（或（=tmp 46）（和（>=tmp 48）（ http://i.imgur.com/PIfR7qL.png
页:
1
[2]