求助循环有问题各位大师给看看

杜流浪人 · 发表于 2018-12-12 21:33:14

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

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

×

本帖最后由杜流浪人于 2018-12-14 21:56 编辑

(defun c:tt ()
  (princ "功能：等高线高程值取整")
   (vl-load-com)
;;    (setq ss (ssget))
      (setq ss (ssget '((0 . "*polyline"))))
   (setq i 0)
   (repeat (sslength ss)
                  (setq EN  (ssname SS I)
                  ENT (entget EN)）
               )
  (setq obj (vlax-ename->vla-object ent))
(setq zgc (rtos (sswr (vla-get-Elevation obj) 1) 2 1))
  (setq ssv (vla-get-activeselectionset (vla-get-activedocument (vlax-get-acad-object))))
  (vlax-for obj ssv (vlax-put obj 'Elevation zgc))
            (setq I (1+ I))
         );end repeat
(princ)
)

(defun sswr (real num / real1)
(setvar "dimzin" 0)
(setq a (* real (expt 10 num)))
(setq real2 (- (quzheng (* real (expt 10 (1+ num)))) (* (quzheng (* real (expt 10 num))) 10)))
(if (> real2 4) (setq addnum 1) (setq addnum 0))
(setq real1 (/ (+ (atof (rtos (quzheng (* real (expt 10 num))))) addnum) (expt 10 num)))
real1
)
(defun quzheng(real1 / temp)
(setq temp (atoi (rtos real1)))
temp
)

不成功

Lisphk · 发表于 2018-12-12 22:29:29

此帖仅作者可见

原地踏步 · 发表于 2018-12-12 22:31:12

此帖仅作者可见

kqqt6236 · 发表于 2018-12-13 00:04:24

此帖仅作者可见

lovezp · 发表于 2018-12-13 09:18:49

此帖仅作者可见

杜流浪人 · 发表于 2018-12-13 20:28:20

此帖仅作者可见

杜流浪人 · 发表于 2018-12-13 20:30:12

此帖仅作者可见

杜流浪人 · 发表于 2018-12-13 20:39:06

此帖仅作者可见

杜流浪人 · 发表于 2018-12-13 20:41:23

此帖仅作者可见

杜流浪人 · 发表于 2018-12-13 20:42:29

此帖仅作者可见

newer · 发表于 2018-12-13 21:10:36

此帖仅作者可见

杜流浪人 · 发表于 2018-12-13 21:17:50

此帖仅作者可见

marting · 发表于 2018-12-13 23:32:05

此帖仅作者可见

杜流浪人 · 发表于 2018-12-14 21:41:40

此帖仅作者可见

杜流浪人 · 发表于 2018-12-14 21:50:59

此帖仅作者可见

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

Lisphk Lisphk 当前离线 UID 604462 积分 3865 精华贡献威望活跃度 D豆在线时间小时注册时间 2008-3-12 最后登录 1970-1-1 窥视卡雷达卡已领礼包: 19个财富等级: 恭喜发财	发表于 2018-12-12 22:29:29 \| 显示全部楼层此帖仅作者可见
	论坛插件加载方法发帖求助前要善用【论坛搜索】功能，那里可能会有你要找的答案；如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；如何回报帮助你解决问题的坛友，一个好办法就是给对方加【D豆】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
	使用道具举报

原地踏步原地踏步当前离线 UID 371666 积分 476 精华贡献威望活跃度 D豆在线时间小时注册时间 2005-12-24 最后登录 1970-1-1 窥视卡雷达卡已领礼包: 5188个财富等级: 富甲天下	发表于 2018-12-12 22:31:12 \| 显示全部楼层【广而告之】积分规则、D豆获取攻略窝窝空间装扮攻略此帖仅作者可见
	论坛插件加载方法发帖求助前要善用【论坛搜索】功能，那里可能会有你要找的答案；如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；如何回报帮助你解决问题的坛友，一个好办法就是给对方加【D豆】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
	使用道具举报

kqqt6236 kqqt6236 当前离线 UID 676006 积分 1230 精华贡献威望活跃度 D豆在线时间小时注册时间 2013-5-14 最后登录 1970-1-1 窥视卡雷达卡已领礼包: 6056个财富等级: 富甲天下	发表于 2018-12-13 00:04:24 \| 显示全部楼层此帖仅作者可见
	论坛插件加载方法发帖求助前要善用【论坛搜索】功能，那里可能会有你要找的答案；如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；如何回报帮助你解决问题的坛友，一个好办法就是给对方加【D豆】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
	使用道具举报

lovezp lovezp 当前离线 UID 724984 积分 199 精华贡献威望活跃度 D豆在线时间小时注册时间 2013-12-18 最后登录 1970-1-1 窥视卡雷达卡已领礼包: 541个财富等级: 财运亨通	发表于 2018-12-13 09:18:49 \| 显示全部楼层【广而告之】积分规则、D豆获取攻略窝窝空间装扮攻略此帖仅作者可见
	论坛插件加载方法发帖求助前要善用【论坛搜索】功能，那里可能会有你要找的答案；如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；如何回报帮助你解决问题的坛友，一个好办法就是给对方加【D豆】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
	使用道具举报

杜流浪人杜流浪人当前离线 UID 726568 积分 309 精华贡献威望活跃度 D豆在线时间小时注册时间 2014-2-15 最后登录 1970-1-1 窥视卡雷达卡已领礼包: 717个财富等级: 财运亨通	楼主\| 发表于 2018-12-13 20:28:20 \| 显示全部楼层此帖仅作者可见
	论坛插件加载方法发帖求助前要善用【论坛搜索】功能，那里可能会有你要找的答案；如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；如何回报帮助你解决问题的坛友，一个好办法就是给对方加【D豆】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
	使用道具举报

杜流浪人杜流浪人当前离线 UID 726568 积分 309 精华贡献威望活跃度 D豆在线时间小时注册时间 2014-2-15 最后登录 1970-1-1 窥视卡雷达卡已领礼包: 717个财富等级: 财运亨通	楼主\| 发表于 2018-12-13 20:30:12 \| 显示全部楼层【广而告之】积分规则、D豆获取攻略窝窝空间装扮攻略此帖仅作者可见
	论坛插件加载方法发帖求助前要善用【论坛搜索】功能，那里可能会有你要找的答案；如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；如何回报帮助你解决问题的坛友，一个好办法就是给对方加【D豆】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
	使用道具举报

杜流浪人杜流浪人当前离线 UID 726568 积分 309 精华贡献威望活跃度 D豆在线时间小时注册时间 2014-2-15 最后登录 1970-1-1 窥视卡雷达卡已领礼包: 717个财富等级: 财运亨通	楼主\| 发表于 2018-12-13 20:39:06 \| 显示全部楼层此帖仅作者可见
	论坛插件加载方法发帖求助前要善用【论坛搜索】功能，那里可能会有你要找的答案；如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；如何回报帮助你解决问题的坛友，一个好办法就是给对方加【D豆】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
	使用道具举报

杜流浪人杜流浪人当前离线 UID 726568 积分 309 精华贡献威望活跃度 D豆在线时间小时注册时间 2014-2-15 最后登录 1970-1-1 窥视卡雷达卡已领礼包: 717个财富等级: 财运亨通	楼主\| 发表于 2018-12-13 20:41:23 \| 显示全部楼层【广而告之】积分规则、D豆获取攻略窝窝空间装扮攻略此帖仅作者可见
	论坛插件加载方法发帖求助前要善用【论坛搜索】功能，那里可能会有你要找的答案；如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；如何回报帮助你解决问题的坛友，一个好办法就是给对方加【D豆】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
	使用道具举报

杜流浪人杜流浪人当前离线 UID 726568 积分 309 精华贡献威望活跃度 D豆在线时间小时注册时间 2014-2-15 最后登录 1970-1-1 窥视卡雷达卡已领礼包: 717个财富等级: 财运亨通	楼主\| 发表于 2018-12-13 20:42:29 \| 显示全部楼层此帖仅作者可见
	论坛插件加载方法发帖求助前要善用【论坛搜索】功能，那里可能会有你要找的答案；如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；如何回报帮助你解决问题的坛友，一个好办法就是给对方加【D豆】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
	使用道具举报

newer newer 当前离线 UID 5280 积分 9466 精华贡献威望活跃度 D豆在线时间小时注册时间 2002-5-18 最后登录 1970-1-1 窥视卡雷达卡已领礼包: 40个财富等级: 招财进宝	发表于 2018-12-13 21:10:36 \| 显示全部楼层【广而告之】积分规则、D豆获取攻略窝窝空间装扮攻略此帖仅作者可见
	论坛插件加载方法发帖求助前要善用【论坛搜索】功能，那里可能会有你要找的答案；如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；如何回报帮助你解决问题的坛友，一个好办法就是给对方加【D豆】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
	使用道具举报

杜流浪人杜流浪人当前离线 UID 726568 积分 309 精华贡献威望活跃度 D豆在线时间小时注册时间 2014-2-15 最后登录 1970-1-1 窥视卡雷达卡已领礼包: 717个财富等级: 财运亨通	楼主\| 发表于 2018-12-13 21:17:50 \| 显示全部楼层此帖仅作者可见
	论坛插件加载方法发帖求助前要善用【论坛搜索】功能，那里可能会有你要找的答案；如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；如何回报帮助你解决问题的坛友，一个好办法就是给对方加【D豆】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
	使用道具举报

marting marting 当前离线 UID 3388 积分 3292 精华贡献威望活跃度 D豆在线时间小时注册时间 2002-3-28 最后登录 1970-1-1 窥视卡雷达卡已领礼包: 20个财富等级: 恭喜发财	发表于 2018-12-13 23:32:05 \| 显示全部楼层【广而告之】积分规则、D豆获取攻略窝窝空间装扮攻略此帖仅作者可见
	论坛插件加载方法发帖求助前要善用【论坛搜索】功能，那里可能会有你要找的答案；如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；如何回报帮助你解决问题的坛友，一个好办法就是给对方加【D豆】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
	使用道具举报

杜流浪人杜流浪人当前离线 UID 726568 积分 309 精华贡献威望活跃度 D豆在线时间小时注册时间 2014-2-15 最后登录 1970-1-1 窥视卡雷达卡已领礼包: 717个财富等级: 财运亨通	楼主\| 发表于 2018-12-14 21:41:40 \| 显示全部楼层此帖仅作者可见
	论坛插件加载方法发帖求助前要善用【论坛搜索】功能，那里可能会有你要找的答案；如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；如何回报帮助你解决问题的坛友，一个好办法就是给对方加【D豆】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
	使用道具举报

杜流浪人杜流浪人当前离线 UID 726568 积分 309 精华贡献威望活跃度 D豆在线时间小时注册时间 2014-2-15 最后登录 1970-1-1 窥视卡雷达卡已领礼包: 717个财富等级: 财运亨通	楼主\| 发表于 2018-12-14 21:50:59 \| 显示全部楼层【广而告之】积分规则、D豆获取攻略窝窝空间装扮攻略此帖仅作者可见
	论坛插件加载方法发帖求助前要善用【论坛搜索】功能，那里可能会有你要找的答案；如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；如何回报帮助你解决问题的坛友，一个好办法就是给对方加【D豆】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
	使用道具举报

[求助] 求助 循环有问题 各位大师给看看

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

[求助] 求助循环有问题各位大师给看看