【蠢新学汇编】像素两点测距

笨来无一悟

两点之间直线最短 和尚里面老衲最帅

  

子程序名	返回值类型	公开	备 注
像素测距	双精度小数型
参数名	类 型	参考	可空	数组	备 注
点一横	整数型
点二横	整数型
点一纵	整数型
点二纵	整数型

变量名	类 型	静态	数组	备 注
直线距离	双精度小数型

置入代码 ({ 139, 69, 8, 43, 69, 12, 15, 175, 192, 139, 93, 16, 43, 93, 20, 15, 175, 219, 1, 216, 242, 15, 42, 192, 242, 15, 81, 192, 54, 242, 15, 17, 69, 248 })
返回 (直线距离)
' mov eax, dword ptr ss:[ebp+0x08]
' sub eax, dword ptr ss:[ebp+0x0C]
' imul eax, eax
' mov ebx, dword ptr ss:[ebp+0x10]
' sub ebx, dword ptr ss:[ebp+0x14]
' imul ebx, ebx
' add eax, ebx
' cvtsi2sd xmm0, eax
' sqrtsd xmm0, xmm0
' movsd qword ptr ss:[ebp-0x08], xmm0

.版本 2<br /> <br /> .子程序 像素测距, 双精度小数型<br /> .参数 点一横, 整数型<br /> .参数 点二横, 整数型<br /> .参数 点一纵, 整数型<br /> .参数 点二纵, 整数型<br /> .局部变量 直线距离, 双精度小数型<br /> <br /> 置入代码 ({ 139, 69, 8, 43, 69, 12, 15, 175, 192, 139, 93, 16, 43, 93, 20, 15, 175, 219, 1, 216, 242, 15, 42, 192, 242, 15, 81, 192, 54, 242, 15, 17, 69, 248 })<br /> 返回 (直线距离)<br /> ' mov eax, dword ptr ss:[ebp+0x08]<br /> ' sub eax, dword ptr ss:[ebp+0x0C]<br /> ' imul eax, eax<br /> ' mov ebx, dword ptr ss:[ebp+0x10]<br /> ' sub ebx, dword ptr ss:[ebp+0x14]<br /> ' imul ebx, ebx<br /> ' add eax, ebx<br /> ' cvtsi2sd xmm0, eax<br /> ' sqrtsd xmm0, xmm0<br /> ' movsd qword ptr ss:[ebp-0x08], xmm0

笨来无一悟

测试下来结果不一样 一排查 是自己把参数的顺序填反了 重新改了一个版本 旧版本也不影响使用 只是参数的顺序不一样 速度比常规写法快一倍多点点

  

子程序名	返回值类型	公开	备 注
像素测距	双精度小数型
参数名	类 型	参考	可空	数组	备 注
点一横	整数型
点一纵	整数型
点二横	整数型
点二纵	整数型

变量名	类 型	静态	数组	备 注
直线距离	双精度小数型

置入代码 ({ 54, 139, 69, 8, 54, 43, 69, 16, 15, 175, 192, 54, 139, 93, 12, 54, 43, 93, 20, 15, 175, 219, 1, 216, 242, 15, 42, 192, 242, 15, 81, 192, 54, 242, 15, 17, 69, 248 })
返回 (直线距离)
' mov eax, dword ptr ss:[ebp+0x08]
' sub eax, dword ptr ss:[ebp+0x10]
' imul eax, eax
' mov ebx, dword ptr ss:[ebp+0x0C]
' sub ebx, dword ptr ss:[ebp+0x14]
' imul ebx, ebx
' add eax, ebx
' cvtsi2sd xmm0, eax
' sqrtsd xmm0, xmm0
' movsd qword ptr ss:[ebp-0x08], xmm0

子程序名	返回值类型	公开	备 注
直距	双精度小数型		勾股定理求距离斜边长
参数名	类 型	参考	可空	数组	备 注
AX	整数型
AY	整数型
BX	整数型
BY	整数型

返回 (求平方根 ( (AX － BX) �� (AX － BX) ��� (AY － BY) �� (AY － BY)))

.版本 2<br /> <br /> .子程序 像素测距, 双精度小数型<br /> .参数 点一横, 整数型<br /> .参数 点一纵, 整数型<br /> .参数 点二横, 整数型<br /> .参数 点二纵, 整数型<br /> .局部变量 直线距离, 双精度小数型<br /> <br /> 置入代码 ({ 54, 139, 69, 8, 54, 43, 69, 16, 15, 175, 192, 54, 139, 93, 12, 54, 43, 93, 20, 15, 175, 219, 1, 216, 242, 15, 42, 192, 242, 15, 81, 192, 54, 242, 15, 17, 69, 248 })<br /> 返回 (直线距离)<br /> ' mov eax, dword ptr ss:[ebp+0x08]<br /> ' sub eax, dword ptr ss:[ebp+0x10]<br /> ' imul eax, eax<br /> ' mov ebx, dword ptr ss:[ebp+0x0C]<br /> ' sub ebx, dword ptr ss:[ebp+0x14]<br /> ' imul ebx, ebx<br /> ' add eax, ebx<br /> ' cvtsi2sd xmm0, eax<br /> ' sqrtsd xmm0, xmm0<br /> ' movsd qword ptr ss:[ebp-0x08], xmm0<br /> <br /> .子程序 直距, 双精度小数型, , 勾股定理求距离斜边长<br /> .参数 AX, 整数型<br /> .参数 AY, 整数型<br /> .参数 BX, 整数型<br /> .参数 BY, 整数型<br /> <br /> 返回 (求平方根 ((AX － BX) × (AX － BX) ＋ (AY － BY) × (AY － BY)))

515667395

多谢分享

tszc50

笨来无一悟 发表于 2024-6-6 00:28
他的写法是错的 距离像素的类型写成整数型了
[e=4].版本 2
.支持库 spec

感谢大佬解答

笨来无一悟

tszc50 发表于 2024-6-5 22:41
结果还是和 运算_求直线距离 返回的不一样

他的写法是错的 距离像素的类型写成整数型了

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
角度	双精度小数型

角度 ＝ 运算_求直线距离 (123, 456, 789, 888, 1)
调试输出 (角度)
角度 ＝ 像素测距 (123, 456, 789, 888)
调试输出 (角度)

子程序名	返回值类型	公开	备 注
运算_求直线距离	双精度小数型		返回两个点之间的直线距离,可以返回象素,也可以返回厘米
参数名	类 型	参考	可空	数组	备 注
水平象素1	整数型
垂直象素1	整数型
水平象素2	整数型
垂直象素2	整数型
类型	整数型				1为返回象素,2为返回厘米

变量名	类 型	静态	数组	备 注
距离象素	整数型
距离厘米	小数型

距离象素 ＝ 求平方根 (求次方 (水平象素2 － 水平象素1, 2) ＋ 求次方 (垂直象素2 － 垂直象素1, 2))
如果 (是否为空 (类型) ＝ 真 或 类型 ＝ 1)
返回 (距离象素)
距离厘米 ＝ 距离象素 ÷ 28
返回 (距离厘米)
返回 (-1)

子程序名	返回值类型	公开	备 注
像素测距	双精度小数型
参数名	类 型	参考	可空	数组	备 注
点一横	整数型
点一纵	整数型
点二横	整数型
点二纵	整数型

变量名	类 型	静态	数组	备 注
直线距离	双精度小数型

置入代码 ({ 54, 139, 69, 8, 54, 43, 69, 16, 15, 175, 192, 54, 139, 93, 12, 54, 43, 93, 20, 15, 175, 219, 1, 216, 242, 15, 42, 192, 242, 15, 81, 192, 54, 242, 15, 17, 69, 248 })
返回 (直线距离)
' mov eax, dword ptr ss:[ebp+0x08]
' sub eax, dword ptr ss:[ebp+0x10]
' imul eax, eax
' mov ebx, dword ptr ss:[ebp+0x0C]
' sub ebx, dword ptr ss:[ebp+0x14]
' imul ebx, ebx
' add eax, ebx
' cvtsi2sd xmm0, eax
' sqrtsd xmm0, xmm0
' movsd qword ptr ss:[ebp-0x08], xmm0

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 角度, 双精度小数型<br /> <br /> 角度 ＝ 运算_求直线距离 (123, 456, 789, 888, 1)<br /> 调试输出 (角度)<br /> 角度 ＝ 像素测距 (123, 456, 789, 888)<br /> 调试输出 (角度)<br /> <br /> .子程序 运算_求直线距离, 双精度小数型, 公开, 返回两个点之间的直线距离,可以返回象素,也可以返回厘米<br /> .参数 水平象素1, 整数型<br /> .参数 垂直象素1, 整数型<br /> .参数 水平象素2, 整数型<br /> .参数 垂直象素2, 整数型<br /> .参数 类型, 整数型, 可空, 1为返回象素,2为返回厘米<br /> .局部变量 距离象素, 整数型<br /> .局部变量 距离厘米, 小数型<br /> <br /> 距离象素 ＝ 求平方根 (求次方 (水平象素2 － 水平象素1, 2) ＋ 求次方 (垂直象素2 － 垂直象素1, 2))<br /> .如果 (是否为空 (类型) ＝ 真 或 类型 ＝ 1)<br />     返回 (距离象素)<br /> .否则<br />     距离厘米 ＝ 距离象素 ÷ 28<br />     返回 (距离厘米)<br /> .如果结束<br /> 返回 (-1)<br /> <br /> .子程序 像素测距, 双精度小数型<br /> .参数 点一横, 整数型<br /> .参数 点一纵, 整数型<br /> .参数 点二横, 整数型<br /> .参数 点二纵, 整数型<br /> .局部变量 直线距离, 双精度小数型<br /> <br /> 置入代码 ({ 54, 139, 69, 8, 54, 43, 69, 16, 15, 175, 192, 54, 139, 93, 12, 54, 43, 93, 20, 15, 175, 219, 1, 216, 242, 15, 42, 192, 242, 15, 81, 192, 54, 242, 15, 17, 69, 248 })<br /> 返回 (直线距离)<br /> ' mov eax, dword ptr ss:[ebp+0x08]<br /> ' sub eax, dword ptr ss:[ebp+0x10]<br /> ' imul eax, eax<br /> ' mov ebx, dword ptr ss:[ebp+0x0C]<br /> ' sub ebx, dword ptr ss:[ebp+0x14]<br /> ' imul ebx, ebx<br /> ' add eax, ebx<br /> ' cvtsi2sd xmm0, eax<br /> ' sqrtsd xmm0, xmm0<br /> ' movsd qword ptr ss:[ebp-0x08], xmm0

tszc50

结果还是和 运算_求直线距离 返回的不一样

hanwenlou

一堆和尚里面就你最帅 一群尼姑里面就师太动了春心

光影魔术

感谢分享源码

东海龙王

作者用心了，感谢你的付出。

龙崎流江

支持开源~！感谢分享

396384183

谢谢分享！