【蠢新学汇编】Atan2 量角器

笨来无一悟

提速相对系统自带的写法快了一倍多点点 下次再更新一个参数是整数的 估计还能更快一点点

  

子程序名	返回值类型	公开	备 注
量角器	双精度小数型		SSE2 + X87
参数名	类 型	参考	可空	数组	备 注
起点横	双精度小数型				EBP+08
起点纵	双精度小数型				EBP+16
角心横	双精度小数型				EBP+24
角心纵	双精度小数型				EBP+32
落点横	双精度小数型				EBP+40
落点纵	双精度小数型				EBP+48

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

置入代码 ({ 54, 199, 69, 252, 220, 165, 76, 64, 54, 199, 69, 248, 248, 193, 99, 26, 242, 15, 16, 69, 8, 242, 15, 92, 69, 24, 242, 15, 17, 69, 8, 242, 15, 16, 77, 16, 242, 15, 92, 77, 32, 242, 15, 17, 77, 16, 242, 15, 16, 85, 40, 242, 15, 92, 85, 24, 242, 15, 17, 85, 40, 242, 15, 16, 93, 48, 242, 15, 92, 93, 32, 242, 15, 17, 93, 48, 54, 221, 69, 8, 54, 221, 69, 16, 217, 243, 54, 220, 77, 248, 54, 221, 93, 24, 54, 221, 69, 40, 54, 221, 69, 48, 217, 243, 54, 220, 77, 248, 54, 221, 93, 32, 54, 221, 69, 32, 54, 221, 69, 24, 222, 233, 217, 225, 221, 93, 248 })
' mov dword ptr ss:[ebp-0x04], 0x404CA5DC
' mov dword ptr ss:[ebp-0x08], 0x1A63C1F8
' movsd xmm0, qword ptr ss:[ebp+0x08]
' subsd xmm0, qword ptr ss:[ebp+0x18]
' movsd qword ptr ss:[ebp+0x08], xmm0
' movsd xmm1, qword ptr ss:[ebp+0x10]
' subsd xmm1, qword ptr ss:[ebp+0x20]
' movsd qword ptr ss:[ebp+0x10], xmm1
' movsd xmm2, qword ptr ss:[ebp+0x28]
' subsd xmm2, qword ptr ss:[ebp+0x18]
' movsd qword ptr ss:[ebp+0x28], xmm2
' movsd xmm3, qword ptr ss:[ebp+0x30]
' subsd xmm3, qword ptr ss:[ebp+0x20]
' movsd qword ptr ss:[ebp+0x30], xmm3
' fld qword ptr ss:[ebp+0x08]
' fld qword ptr ss:[ebp+0x10]
' fpatan
' fmul qword ptr ss:[ebp-0x08]
' fstp qword ptr ss:[ebp+0x18]
' fld qword ptr ss:[ebp+0x28]
' fld qword ptr ss:[ebp+0x30]
' fpatan
' fmul qword ptr ss:[ebp-0x08]
' fstp qword ptr ss:[ebp+0x20]
' fld qword ptr ss:[ebp+0x20]
' fld qword ptr ss:[ebp+0x18]
' fsubp st1, st0
' fabs
' fstp qword ptr ss:[ebp-0x08]
如果真 (角度 ＞ 180)
角度 ＝ 360 － 角度
返回 (角度)

.版本 2<br /> <br /> .子程序 量角器, 双精度小数型, , SSE2 + X87<br /> .参数 起点横, 双精度小数型, , EBP+08<br /> .参数 起点纵, 双精度小数型, , EBP+16<br /> .参数 角心横, 双精度小数型, , EBP+24<br /> .参数 角心纵, 双精度小数型, , EBP+32<br /> .参数 落点横, 双精度小数型, , EBP+40<br /> .参数 落点纵, 双精度小数型, , EBP+48<br /> .局部变量 角度, 双精度小数型<br /> <br /> 置入代码 ({ 54, 199, 69, 252, 220, 165, 76, 64, 54, 199, 69, 248, 248, 193, 99, 26, 242, 15, 16, 69, 8, 242, 15, 92, 69, 24, 242, 15, 17, 69, 8, 242, 15, 16, 77, 16, 242, 15, 92, 77, 32, 242, 15, 17, 77, 16, 242, 15, 16, 85, 40, 242, 15, 92, 85, 24, 242, 15, 17, 85, 40, 242, 15, 16, 93, 48, 242, 15, 92, 93, 32, 242, 15, 17, 93, 48, 54, 221, 69, 8, 54, 221, 69, 16, 217, 243, 54, 220, 77, 248, 54, 221, 93, 24, 54, 221, 69, 40, 54, 221, 69, 48, 217, 243, 54, 220, 77, 248, 54, 221, 93, 32, 54, 221, 69, 32, 54, 221, 69, 24, 222, 233, 217, 225, 221, 93, 248 })<br /> ' mov dword ptr ss:[ebp-0x04], 0x404CA5DC<br /> ' mov dword ptr ss:[ebp-0x08], 0x1A63C1F8<br /> ' movsd xmm0, qword ptr ss:[ebp+0x08]<br /> ' subsd xmm0, qword ptr ss:[ebp+0x18]<br /> ' movsd qword ptr ss:[ebp+0x08], xmm0<br /> ' movsd xmm1, qword ptr ss:[ebp+0x10]<br /> ' subsd xmm1, qword ptr ss:[ebp+0x20]<br /> ' movsd qword ptr ss:[ebp+0x10], xmm1<br /> ' movsd xmm2, qword ptr ss:[ebp+0x28]<br /> ' subsd xmm2, qword ptr ss:[ebp+0x18]<br /> ' movsd qword ptr ss:[ebp+0x28], xmm2<br /> ' movsd xmm3, qword ptr ss:[ebp+0x30]<br /> ' subsd xmm3, qword ptr ss:[ebp+0x20]<br /> ' movsd qword ptr ss:[ebp+0x30], xmm3<br /> ' fld qword ptr ss:[ebp+0x08]<br /> ' fld qword ptr ss:[ebp+0x10]<br /> ' fpatan<br /> ' fmul qword ptr ss:[ebp-0x08]<br /> ' fstp qword ptr ss:[ebp+0x18]<br /> ' fld qword ptr ss:[ebp+0x28]<br /> ' fld qword ptr ss:[ebp+0x30]<br /> ' fpatan<br /> ' fmul qword ptr ss:[ebp-0x08]<br /> ' fstp qword ptr ss:[ebp+0x20]<br /> ' fld qword ptr ss:[ebp+0x20]<br /> ' fld qword ptr ss:[ebp+0x18]<br /> ' fsubp st1, st0<br /> ' fabs<br /> ' fstp qword ptr ss:[ebp-0x08]<br /> .如果真 (角度 ＞ 180)<br />     角度 ＝ 360 － 角度<br /> .如果真结束<br /> 返回 (角度)

  

子程序名	返回值类型	公开	备 注
量角	双精度小数型		终点坐标建议时钟周期获取鼠标位置
参数名	类 型	参考	可空	数组	备 注
起X	整数型				起点横坐标 - 建议变量暂存
起Y	整数型				起点纵坐标 - 建议变量暂存
中X	整数型				中心横坐标 - 建议变量暂存
中Y	整数型				中心纵坐标 - 建议变量暂存
终X	整数型				终点横坐标 - 建议实时更新
终Y	整数型				终点纵坐标 - 建议实时更新

变量名	类 型	静态	数组	备 注
横差	整数型
纵差	整数型
角一	双精度小数型			静
角二	双精度小数型			动
夹角	双精度小数型			总和

横差 ＝ 起X － 中X
纵差 ＝ 起Y － 中Y
角一 ＝ 求反正切 (纵差 ÷ 横差) × 180 ÷ #pi
判断 (横差 ≥ 0)
角一 ＝ 角一 ＋ 180
如果真 (纵差 ≥ 0)
角一 ＝ 角一 ＋ 360

横差 ＝ 终X － 中X
纵差 ＝ 终Y － 中Y
角二 ＝ 求反正切 (纵差 ÷ 横差) × 180 ÷ #pi
判断 (横差 ≥ 0)
角二 ＝ 角二 ＋ 180
如果真 (纵差 ≥ 0)
角二 ＝ 角二 ＋ 360

夹角 ＝ 取绝对值 (角一 － 角二)
如果真 (夹角 ＞ 180)
夹角 ＝ 360 － 夹角
返回 (夹角)  ' 2022年4月8号 启用新版算法 效率并没有什么提升 只是代码量更少而已

.版本 2<br /> <br /> .子程序 量角, 双精度小数型, 公开, 终点坐标建议时钟周期获取鼠标位置<br /> .参数 起X, 整数型, , 起点横坐标 - 建议变量暂存<br /> .参数 起Y, 整数型, , 起点纵坐标 - 建议变量暂存<br /> .参数 中X, 整数型, , 中心横坐标 - 建议变量暂存<br /> .参数 中Y, 整数型, , 中心纵坐标 - 建议变量暂存<br /> .参数 终X, 整数型, , 终点横坐标 - 建议实时更新<br /> .参数 终Y, 整数型, , 终点纵坐标 - 建议实时更新<br /> .局部变量 横差, 整数型<br /> .局部变量 纵差, 整数型<br /> .局部变量 角一, 双精度小数型, , , 静<br /> .局部变量 角二, 双精度小数型, , , 动<br /> .局部变量 夹角, 双精度小数型, , , 总和<br /> <br /> 横差 ＝ 起X － 中X<br /> 纵差 ＝ 起Y － 中Y<br /> 角一 ＝ 求反正切 (纵差 ÷ 横差) × 180 ÷ #pi<br /> .判断开始 (横差 ≥ 0)<br />     角一 ＝ 角一 ＋ 180<br /> .默认<br />     .如果真 (纵差 ≥ 0)<br />         角一 ＝ 角一 ＋ 360<br />     .如果真结束<br /> <br /> .判断结束<br /> 横差 ＝ 终X － 中X<br /> 纵差 ＝ 终Y － 中Y<br /> 角二 ＝ 求反正切 (纵差 ÷ 横差) × 180 ÷ #pi<br /> .判断开始 (横差 ≥ 0)<br />     角二 ＝ 角二 ＋ 180<br /> .默认<br />     .如果真 (纵差 ≥ 0)<br />         角二 ＝ 角二 ＋ 360<br />     .如果真结束<br /> <br /> .判断结束<br /> 夹角 ＝ 取绝对值 (角一 － 角二)<br /> .如果真 (夹角 ＞ 180)<br />     夹角 ＝ 360 － 夹角<br /> .如果真结束<br /> 返回 (夹角)  ' 2022年4月8号 启用新版算法 效率并没有什么提升 只是代码量更少而已

qq977352880

这个对我来说意义非凡，感谢！

qq977352880

感觉自己赚到了，这样的必须收藏！

396384183

感谢楼主分享！

ZHuanR

新技能已get√

396384183

感谢分享，支持开源！！！

憨憨问号

牛啊，学到新东西了

inat

厉害了,这个真挺有用的,不过 角度 ＞ 180 的判断和后面的不能用汇编解决吗,不太完美啊

艾玛克138

感谢老大的无私奉献！！！

一指温柔

感谢分享

jtucar

感谢分享，很给力！~