整数偏移

皇上快溜 · 发表于 2016-9-14 15:47:54

想求一个整数偏移的程序

在输入偏移距离时，在屏幕上点取两点，两点间距离求一个整数，作为偏移距离。精度到小数点后面一位数。

点取两点时，有两种形式。如图：点1到点2 或点1到点3

也就是说，不管是正交时的两点，或是非正交时的两点，都按正交距离求整数，作为偏移距离。

谢谢大家。

皇上快溜 · 发表于 2016-9-14 15:50:53

本帖最后由皇上快溜于 2016-9-15 19:51 编辑

网页有点问题，一时传不上图，抱歉

vectra · 发表于 2016-9-14 19:12:28

直线还好其它形状的正交方向如何判定？

llsheng_73 · 发表于 2016-9-15 15:54:38

本帖最后由 llsheng_73 于 2016-9-15 15:55 编辑

意思是两点坐标分量差值的最大值？
(apply'max(mapcar'abs(mapcar'-(setq p(getpoint"\n第一点:"))(getpoint p"第二点:"))))

皇上快溜 · 发表于 2016-9-15 20:02:38

llsheng_73 发表于 2016-9-15 15:54
意思是两点坐标分量差值的最大值？
(apply'max(mapcar'abs(mapcar'-(setq p(getpoint"\n第一点:"))(getpoi ...

谢谢你。

就是先点选目标，然后从目标上点取第一点，再任意一点，两点间距离求一个整数，例如12.325621，取整数12.3，作为偏移距离，点选目标，偏移方向。

你这段代码，我看不太懂，不知道怎么接，可不可以请你整个完整程序，谢谢你

皇上快溜 · 发表于 2016-9-19 20:35:56

顶一下，，谢谢各位

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

[提问] 整数偏移