【蠢新学汇编】三维坐标测距

查过

感谢发布原创作品，精易因你更精彩！6666666666666

2446789312

花间一壶酒

笨来无一悟 发表于 2024-6-23 23:14
.版本 2

.子程序 求距离, 小数型, , 求二维两点距离

应该是易语言的bug  我测试了  50次循环是没啥区别的  当测试500次  速度差距直接翻几倍  

而且得连续循环次数超过一定数量  才会出现这种情况   

花间一壶酒

赤璃琴殇 发表于 2024-6-23 23:04
基本上可以忽略不计吧

应该是易语言的bug  我测试了  50次循环是没啥区别的  当测试500次  速度差距直接翻几倍  

笨来无一悟

赤璃琴殇 发表于 2024-6-23 22:54
测试了下  并没什么速度提升     纯属脱裤子放屁了

.版本 2

.子程序 求距离, 小数型, , 求二维两点距离
.参数 X1, 小数型, , 第1个点X坐标
.参数 Y1, 小数型, , 第1个点Y坐标
.参数 X2, 小数型, , 第2个点X坐标
.参数 Y2, 小数型, , 第2个点Y坐标

返回 (求平方根 ((X1 － X2) × (X1 － X2) ＋ (Y1 － Y2) × (Y1 － Y2)))

笨来无一悟

赤璃琴殇 发表于 2024-6-23 22:58

  

子程序名	返回值类型	公开	备 注
求距离	小数型		求二维两点距离

[/quote]
就这样写 都比你原来的那个快好几倍了{:7_441:}汇编一定更快 放心用就是了
[e=4].版本 2

子程序名	返回值类型	公开	备 注
求距离	小数型		求二维两点距离
参数名	类 型	参考	可空	数组	备 注
X1	小数型				第1个点X坐标
Y1	小数型				第1个点Y坐标
X2	小数型				第2个点X坐标
Y2	小数型				第2个点Y坐标

返回 (求平方根 ( (X1 － X2) �� (X1 － X2) ��� (Y1 － Y2) �� (Y1 － Y2)))

.版本 2<br /> <br /> .子程序 求距离, 小数型, , 求二维两点距离</blockquote></div><br /> 就这样写 都比你原来的那个快好几倍了<img src="static/image/smiley/tieba/22.png" smilieid="441" border="0" alt="" />汇编一定更快 放心用就是了<br /> <br /> [e=4].版本 2<br /> <br /> .子程序 求距离, 小数型, , 求二维两点距离<br /> .参数 X1, 小数型, , 第1个点X坐标<br /> .参数 Y1, 小数型, , 第1个点Y坐标<br /> .参数 X2, 小数型, , 第2个点X坐标<br /> .参数 Y2, 小数型, , 第2个点Y坐标<br /> <br /> 返回 (求平方根 ((X1 － X2) × (X1 － X2) ＋ (Y1 － Y2) × (Y1 － Y2)))

花间一壶酒

笨来无一悟 发表于 2024-6-23 22:56
你把你的写法发来 我对比一下有没有提升测速一般都是跑他/她个几万十几万几十几百万次循环做对 ...

基本上可以忽略不计吧  

笨来无一悟

赤璃琴殇 发表于 2024-6-23 22:54
测试了下  并没什么速度提升     纯属脱裤子放屁了

你把你的写法发来 我跑循环测测要是没有速度提升我捣鼓汇编作甚

花间一壶酒

笨来无一悟 发表于 2024-6-23 22:56
你把你的写法发来 我对比一下有没有提升测速一般都是跑他/她个几万十几万几十几百万次循环做对 ...

  

子程序名	返回值类型	公开	备 注
求距离	小数型		求二维两点距离
参数名	类 型	参考	可空	数组	备 注
X1	小数型				第1个点X坐标
Y1	小数型				第1个点Y坐标
X2	小数型				第2个点X坐标
Y2	小数型				第2个点Y坐标

变量名	类 型	静态	数组	备 注
距离	小数型			点1与点3（点2投影）之间的距离

距离 ＝ 求平方根 (求次方 (X2 － X1, 2) ＋ 求次方 (Y2 － Y1, 2))  ' 两点在XY平面上投影的距离
返回 (距离)

.版本 2<br /> <br /> .子程序 求距离, 小数型, , 求二维两点距离<br /> .参数 X1, 小数型, , 第1个点X坐标<br /> .参数 Y1, 小数型, , 第1个点Y坐标<br /> .参数 X2, 小数型, , 第2个点X坐标<br /> .参数 Y2, 小数型, , 第2个点Y坐标<br /> .局部变量 距离, 小数型, , , 点1与点3（点2投影）之间的距离<br /> <br /> 距离 ＝ 求平方根 (求次方 (X2 － X1, 2) ＋ 求次方 (Y2 － Y1, 2))  ' 两点在XY平面上投影的距离<br /> 返回 (距离)

笨来无一悟

赤璃琴殇 发表于 2024-6-23 22:54
测试了下  并没什么速度提升     纯属脱裤子放屁了

你把你的写法发来 我对比一下有没有提升测速一般都是跑他/她个几万十几万几十几百万次循环做对比吧