乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 尊重版权,从我做起,拒绝盗版,拒绝倒卖 签到、发布资源、邀请好友注册,可以获得银币 请注意保管好自己的密码,避免账户资金被盗
查看: 85|回复: 19

[编程交流] 简单abc lisp

[复制链接]

11

主题

36

帖子

25

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
55
发表于 2022-7-6 09:01:23 | 显示全部楼层 |阅读模式
嗨,大师。我怎样才能去掉零。0是5.0的和。我需要删除所有尾随的零。
等式总和=5.0->5
总和=5.40->5.4
总和=6.4800->6.48
总和=7.514500-7.5145
 
谢谢
 
  1. (defun c:test ()
  2. (setq a (getreal))
  3. (setq b (getreal))
  4. (princ (strcat (rtos (+ a b) 2 1) "abc"))
  5. (princ)
  6. )
回复

使用道具 举报

62

主题

466

帖子

404

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
310
发表于 2022-7-6 09:06:43 | 显示全部楼层
  1. (setvar 'dimzin
回复

使用道具 举报

11

主题

36

帖子

25

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
55
发表于 2022-7-6 09:10:25 | 显示全部楼层
值不是距离,而是体积。我得到的价值大约是10英尺8英寸。
 
回复

使用道具 举报

44

主题

3166

帖子

2803

银币

中流砥柱

Rank: 25

铜币
557
发表于 2022-7-6 09:11:39 | 显示全部楼层
 
在我看来(10英尺8英寸)的长度(距离)看起来太长了。
 
无论如何,您也可以尝试vl princ来字符串。。。例子:
 
  1. _$ (vl-load-com)
  2. _$ (vl-princ-to-string 7.514500)
  3. "7.5145"
  4. _$

 
编辑:这将允许您保留DIMZIN设置,而无需进行错误检查和恢复。
 
HTH公司
回复

使用道具 举报

62

主题

466

帖子

404

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
310
发表于 2022-7-6 09:16:32 | 显示全部楼层
很好的信息Renderman
回复

使用道具 举报

114

主题

1万

帖子

1万

银币

中流砥柱

Rank: 25

铜币
543
发表于 2022-7-6 09:17:23 | 显示全部楼层
  1. (vl-string-right-trim ".0" )
回复

使用道具 举报

44

主题

3166

帖子

2803

银币

中流砥柱

Rank: 25

铜币
557
发表于 2022-7-6 09:21:26 | 显示全部楼层
 
 
 
^^另一个不错的选择。
 
我首先想到了这个,但由于某种原因(错误-)记得它会在一次攻击中删除角色集的所有实例。。。我记得以前需要使用while+trim组合。我想这就是我没有亲自尝试的结果!英雄联盟
回复

使用道具 举报

11

主题

36

帖子

25

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
55
发表于 2022-7-6 09:26:30 | 显示全部楼层
谢谢大家,这很管用,但两者兼而有之。
 
  1. (vl-string-right-trim ".0" (vl-princ-to-string x))
回复

使用道具 举报

114

主题

1万

帖子

1万

银币

中流砥柱

Rank: 25

铜币
543
发表于 2022-7-6 09:29:47 | 显示全部楼层
为什么不使用实时操作系统?
回复

使用道具 举报

11

主题

36

帖子

25

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
55
发表于 2022-7-6 09:30:22 | 显示全部楼层
为什么不使用实时操作系统?我做到了,看帖子#1。我得到的输出距离约为10'-8“。我需要删除所有尾随零和句点(如果总数中有)。如果输出值是整数,我希望它是整数,如果值是实数,我希望删除所有尾随零。
 
回复

使用道具 举报

发表回复

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

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-3-7 06:12 , Processed in 0.336700 second(s), 72 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表