【蠢新学汇编】量角器再次优化 - 精易论坛

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

置入代码 ({ 131, 236, 24, 54, 199, 69, 252, 220, 165, 76, 64, 54, 199, 69, 248, 248, 193, 99, 26, 139, 69, 8, 43, 69, 16, 137, 69, 8, 139, 93, 12, 43, 93, 20, 137, 93, 12, 139, 77, 24, 43, 77, 16, 137, 77, 24, 139, 85, 28, 43, 85, 20, 137, 85, 28, 54, 219, 69, 8, 54, 219, 69, 12, 217, 243, 54, 220, 77, 248, 54, 221, 93, 240, 54, 219, 69, 24, 54, 219, 69, 28, 217, 243, 54, 220, 77, 248, 54, 221, 93, 232, 54, 221, 69, 240, 54, 221, 69, 232, 222, 233, 217, 225, 54, 221, 93, 248, 54, 242, 15, 16, 69, 248, 184, 180, 0, 0, 0, 242, 15, 42, 200, 102, 15, 46, 200, 114, 2, 235, 17, 184, 104, 1, 0, 0, 242, 15, 42, 208, 242, 15, 92, 208, 242, 15, 16, 194, 54, 242, 15, 17, 69, 248, 139, 85, 252, 139, 69, 248, 131, 196, 24, 201, 194, 24, 0 })
返回 (0)
' ;开辟三个双精度局部变量加载 180÷π到第一个局部变量
' sub esp, 24
' mov dword ptr ss:[ebp-0x04], 0x404CA5DC
' mov dword ptr ss:[ebp-0x08], 0x1A63C1F8
' ;起点横 = 起点横 - 角心横
' mov eax, dword ptr ss:[ebp+0x08]
' sub eax, dword ptr ss:[ebp+0x10]
' mov dword ptr ss:[ebp+0x08], eax
' ;起点纵 = 起点纵 - 角心纵
' mov ebx, dword ptr ss:[ebp+0x0C]
' sub ebx, dword ptr ss:[ebp+0x14]
' mov dword ptr ss:[ebp+0x0C], ebx
' ;落点横 = 落点横 - 角心横
' mov ecx, dword ptr ss:[ebp+0x18]
' sub ecx, dword ptr ss:[ebp+0x10]
' mov dword ptr ss:[ebp+0x18], ecx
' ;落点纵 = 落点纵 - 角心纵
' mov edx, dword ptr ss:[ebp+0x1C]
' sub edx, dword ptr ss:[ebp+0x14]
' mov dword ptr ss:[ebp+0x1C], edx
' ;起点横纵反正切方向角 -180 到 180
' fild dword ptr ss:[ebp+0x08]
' fild dword ptr ss:[ebp+0x0C]
' fpatan
' fmul qword ptr ss:[ebp-0x08]
' fstp qword ptr ss:[ebp-0x10]
' ;落点横纵反正切方向角 -180 到 180
' fild dword ptr ss:[ebp+0x18]
' fild dword ptr ss:[ebp+0x1C]
' fpatan
' fmul qword ptr ss:[ebp-0x08]
' fstp qword ptr ss:[ebp-0x18]
' ;起落方向角做差取绝对值
' fld qword ptr ss:[ebp-0x10]
' fld qword ptr ss:[ebp-0x18]
' fsubp st1, st0
' fabs
' fstp qword ptr ss:[ebp-0x08]
' ;角度＞ 180 则角度 = 360 - 角度 JB/JC→DY
' movsd xmm0, qword ptr ss:[ebp-0x08]
' mov eax, 180
' cvtsi2sd xmm1, eax
' ucomisd xmm1, xmm0
' jb DY
' jmp end
' DY:
' mov eax, 360
' cvtsi2sd xmm2, eax
' subsd xmm2, xmm0
' movsd xmm0, xmm2
' end:
' movsd qword ptr ss:[ebp-0x08], xmm0
' ;[ebp-8]位置的双精度结果拆分到edx与eax用作返回
' mov edx, dword ptr ss:[ebp-0x04]
' mov eax, dword ptr ss:[ebp-0x08]
' add esp, 24
' leave
' ret 24

子程序名	返回值类型	公开	备注
量角器_小数	双精度小数型		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, 54, 242, 15, 16, 69, 8, 54, 242, 15, 92, 69, 24, 54, 242, 15, 17, 69, 8, 54, 242, 15, 16, 77, 16, 54, 242, 15, 92, 77, 32, 54, 242, 15, 17, 77, 16, 54, 242, 15, 16, 85, 40, 54, 242, 15, 92, 85, 24, 54, 242, 15, 17, 85, 40, 54, 242, 15, 16, 93, 48, 54, 242, 15, 92, 93, 32, 54, 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, 54, 221, 93, 248, 242, 15, 16, 69, 248, 184, 180, 0, 0, 0, 242, 15, 42, 200, 102, 15, 46, 200, 114, 2, 235, 17, 184, 104, 1, 0, 0, 242, 15, 42, 208, 242, 15, 92, 208, 242, 15, 16, 194, 242, 15, 17, 69, 248 })
返回 (角度)
' ;加载 180÷π到局部变量角度
' 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
' ;起点横纵反正切方向角 -180 到 180
' 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]
' ;落点横纵反正切方向角 -180 到 180
' 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 - 角度 JB/JC→DY
' movsd xmm0, qword ptr ss:[ebp-0x08]
' mov eax, 180
' cvtsi2sd xmm1, eax
' ucomisd xmm1, xmm0
' jb DY
' jmp end
' DY:
' mov eax, 360
' cvtsi2sd xmm2, eax
' subsd xmm2, xmm0
' movsd xmm0, xmm2
' end:
' movsd qword ptr ss:[ebp-0x08], xmm0

.版本 2<br />
<br />
.子程序 量角器, 双精度小数型, , SSE2 + X87<br />
.参数 起点横, 整数型, , ebp+08<br />
.参数 起点纵, 整数型, , ebp+12<br />
.参数 角心横, 整数型, , ebp+16<br />
.参数 角心纵, 整数型, , ebp+20<br />
.参数 落点横, 整数型, , ebp+24<br />
.参数 落点纵, 整数型, , ebp+28<br />
<br />
置入代码 ({ 131, 236, 24, 54, 199, 69, 252, 220, 165, 76, 64, 54, 199, 69, 248, 248, 193, 99, 26, 139, 69, 8, 43, 69, 16, 137, 69, 8, 139, 93, 12, 43, 93, 20, 137, 93, 12, 139, 77, 24, 43, 77, 16, 137, 77, 24, 139, 85, 28, 43, 85, 20, 137, 85, 28, 54, 219, 69, 8, 54, 219, 69, 12, 217, 243, 54, 220, 77, 248, 54, 221, 93, 240, 54, 219, 69, 24, 54, 219, 69, 28, 217, 243, 54, 220, 77, 248, 54, 221, 93, 232, 54, 221, 69, 240, 54, 221, 69, 232, 222, 233, 217, 225, 54, 221, 93, 248, 54, 242, 15, 16, 69, 248, 184, 180, 0, 0, 0, 242, 15, 42, 200, 102, 15, 46, 200, 114, 2, 235, 17, 184, 104, 1, 0, 0, 242, 15, 42, 208, 242, 15, 92, 208, 242, 15, 16, 194, 54, 242, 15, 17, 69, 248, 139, 85, 252, 139, 69, 248, 131, 196, 24, 201, 194, 24, 0 })<br />
返回 (0)<br />
' ;开辟三个双精度局部变量 加载 180÷π到 第一个局部变量<br />
' sub esp, 24<br />
' mov dword ptr ss:[ebp-0x04], 0x404CA5DC<br />
' mov dword ptr ss:[ebp-0x08], 0x1A63C1F8<br />
' ;起点横 = 起点横 - 角心横<br />
' mov eax, dword ptr ss:[ebp+0x08]<br />
' sub eax, dword ptr ss:[ebp+0x10]<br />
' mov dword ptr ss:[ebp+0x08], eax<br />
' ;起点纵 = 起点纵 - 角心纵<br />
' mov ebx, dword ptr ss:[ebp+0x0C]<br />
' sub ebx, dword ptr ss:[ebp+0x14]<br />
' mov dword ptr ss:[ebp+0x0C], ebx<br />
' ;落点横 = 落点横 - 角心横<br />
' mov ecx, dword ptr ss:[ebp+0x18]<br />
' sub ecx, dword ptr ss:[ebp+0x10]<br />
' mov dword ptr ss:[ebp+0x18], ecx<br />
' ;落点纵 = 落点纵 - 角心纵<br />
' mov edx, dword ptr ss:[ebp+0x1C]<br />
' sub edx, dword ptr ss:[ebp+0x14]<br />
' mov dword ptr ss:[ebp+0x1C], edx<br />
' ;起点横纵反正切 方向角 -180 到 180<br />
' fild dword ptr ss:[ebp+0x08]<br />
' fild dword ptr ss:[ebp+0x0C]<br />
' fpatan<br />
' fmul qword ptr ss:[ebp-0x08]<br />
' fstp qword ptr ss:[ebp-0x10]<br />
' ;落点横纵反正切 方向角 -180 到 180<br />
' fild dword ptr ss:[ebp+0x18]<br />
' fild dword ptr ss:[ebp+0x1C]<br />
' fpatan<br />
' fmul qword ptr ss:[ebp-0x08]<br />
' fstp qword ptr ss:[ebp-0x18]<br />
' ;起落方向角 做差 取绝对值<br />
' fld qword ptr ss:[ebp-0x10]<br />
' fld qword ptr ss:[ebp-0x18]<br />
' fsubp st1, st0<br />
' fabs<br />
' fstp qword ptr ss:[ebp-0x08]<br />
' ;角度 ＞ 180 则 角度 = 360 - 角度 JB/JC→DY<br />
' movsd xmm0, qword ptr ss:[ebp-0x08]<br />
' mov eax, 180<br />
' cvtsi2sd xmm1, eax<br />
' ucomisd xmm1, xmm0<br />
' jb DY<br />
' jmp end<br />
' DY:<br />
' mov eax, 360<br />
' cvtsi2sd xmm2, eax<br />
' subsd xmm2, xmm0<br />
' movsd xmm0, xmm2<br />
' end:<br />
' movsd qword ptr ss:[ebp-0x08], xmm0<br />
' ;[ebp-8]位置的双精度结果拆分到edx与eax用作返回<br />
' mov edx, dword ptr ss:[ebp-0x04]<br />
' mov eax, dword ptr ss:[ebp-0x08]<br />
' add esp, 24<br />
' leave<br />
' ret 24<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, 54, 242, 15, 16, 69, 8, 54, 242, 15, 92, 69, 24, 54, 242, 15, 17, 69, 8, 54, 242, 15, 16, 77, 16, 54, 242, 15, 92, 77, 32, 54, 242, 15, 17, 77, 16, 54, 242, 15, 16, 85, 40, 54, 242, 15, 92, 85, 24, 54, 242, 15, 17, 85, 40, 54, 242, 15, 16, 93, 48, 54, 242, 15, 92, 93, 32, 54, 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, 54, 221, 93, 248, 242, 15, 16, 69, 248, 184, 180, 0, 0, 0, 242, 15, 42, 200, 102, 15, 46, 200, 114, 2, 235, 17, 184, 104, 1, 0, 0, 242, 15, 42, 208, 242, 15, 92, 208, 242, 15, 16, 194, 242, 15, 17, 69, 248 })<br />
返回 (角度)<br />
' ;加载 180÷π到 局部变量 角度<br />
' mov dword ptr ss:[ebp-0x04], 0x404CA5DC<br />
' mov dword ptr ss:[ebp-0x08], 0x1A63C1F8<br />
' ;起点横 = 起点横 - 角心横<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 />
' ;起点纵 = 起点纵 - 角心纵<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 />
' ;落点横 = 落点横 - 角心横<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 />
' ;落点纵 = 落点纵 - 角心纵<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 />
' ;起点横纵反正切 方向角 -180 到 180<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 />
' ;落点横纵反正切 方向角 -180 到 180<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 />
' ;起落方向角 做差 取绝对值<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 则 角度 = 360 - 角度 JB/JC→DY<br />
' movsd xmm0, qword ptr ss:[ebp-0x08]<br />
' mov eax, 180<br />
' cvtsi2sd xmm1, eax<br />
' ucomisd xmm1, xmm0<br />
' jb DY<br />
' jmp end<br />
' DY:<br />
' mov eax, 360<br />
' cvtsi2sd xmm2, eax<br />
' subsd xmm2, xmm0<br />
' movsd xmm0, xmm2<br />
' end:<br />
' movsd qword ptr ss:[ebp-0x08], xmm0