求一个取文本自动计算的LISP

yuping913 · 发表于 2019-4-3 10:48

一个对象的单行或者多行文本，内容如
200x300
200×300
200*300
或者是三个对象的一个200，一个x, 一个300
选择之后计算出结果60000

是英文x或者是乘号或者是*号。

satan421 · 发表于 2019-4-3 10:48

本帖最后由 satan421 于 2019-4-12 11:37 编辑

;;目前只能处理单个运算符的乘法运算;;1.运算符和数值在同一文本内的:形如200*300,200x300,200X300,200×300
;;2.运算符与数值分开的(目前仅支持选择两个数值文本和一个运算符)

;;已修改见19L附件

1291500406 · 发表于 2019-4-3 11:17

本帖最后由 1291500406 于 2019-4-3 11:30 编辑

x X 是字母 %%174
*是运算符

x先要转换为*

ll_j · 发表于 2019-4-3 11:36

我网络U盘里的ce就是计算文本的，不过是很久前编的。只支持单行文字，并且只支持星号和x（xyz的x）的作为乘号。

1291500406 · 发表于 2019-4-3 13:11

本帖最后由 1291500406 于 2019-4-3 13:17 编辑

试试这个吧，

yuping913 · 发表于 2019-4-4 08:16

必强提示:选择文字:
选择文字:12X32参数类型错误: streamp nil
命令:
命令: BB
必强提示:选择文字:
选择文字:12*32参数类型错误: streamp nil

1291500406 · 发表于 2019-4-4 09:52

本帖最后由 1291500406 于 2019-4-4 10:03 编辑

yuping913 发表于 2019-4-4 08:16
必强提示:选择文字:
选择文字:12X32参数类型错误: streamp nil
命令:

我用CAD2017和CAD2007测试，均正常，你查杀一下cad病毒

yuping913 · 发表于 2019-4-4 13:53

先谢谢了，操作有点复杂，不用计算器可以吗？就像这样

xyp1964 · 发表于 2019-4-4 15:03

1291500406 · 发表于 2019-4-4 15:57

本帖最后由 1291500406 于 2019-4-4 16:22 编辑

yuping913 发表于 2019-4-4 13:53
先谢谢了，操作有点复杂，不用计算器可以吗？就像这样

试试这个，一个带对话框，一个不带对话

账号		自动登录	找回密码
密码			注册

[源码] 求一个取文本自动计算的LISP

最佳答案

评分

本帖子中包含更多资源

本帖子中包含更多资源

本帖子中包含更多资源

本帖子中包含更多资源

本帖子中包含更多资源

评分

浏览过的版块