【蠢新学汇编】排列三/3D 出次统计

笨来无一悟

↓把下贴的核心代码用汇编优化了一下↓


没事写了一个排三的组合，用到了历史数据数组组合
https://bbs.125.la/forum.php?mod=viewthread&tid=14852743
(出处: 精易论坛)



字节集减48等于文本0到9 但是数组没有下标0 于是只减47 然后让1对应0 直至10=9

INC DWORD [EABCX+EDI*4-188


上面三行汇编里面的188来自47*4

  

子程序名	返回值类型	公开	备 注
排列三出次统计			格式数数数换行数数数换行
参数名	类 型	参考	可空	数组	备 注
参_开奖源	字节集				未做防呆格式需正确
参_百出次	整数型				成员1=0号~~~10=9号
参_十出次	整数型				成员1=0号~~~10=9号
参_个出次	整数型				成员1=0号~~~10=9号

重定义数组 (参_百出次, 假, 10)
重定义数组 (参_十出次, 假, 10)
重定义数组 (参_个出次, 假, 10)
置入代码 ({ 139, 85, 8, 139, 18, 139, 114, 4, 131, 254, 5, 124, 73, 131, 194, 8 })
' MOV EDX,[EBP+8]
' MOV EDX,[EDX]
' MOV ESI,[EDX+4]
' CMP ESI,5
' JL 退出
' ADD EDX,8
置入代码 ({ 139, 69, 12, 139, 0, 131, 192, 4 })
' MOV EAX,[EBP+12]
' MOV EAX,[EAX]
' ADD EAX,4
置入代码 ({ 139, 93, 16, 139, 27, 131, 195, 4 })
' MOV EBX,[EBP+16]
' MOV EBX,[EBX]
' ADD EBX,4
置入代码 ({ 139, 77, 20, 139, 9, 131, 193, 4 })
' MOV ECX,[EBP+20]
' MOV ECX,[ECX]
' ADD ECX,4
置入代码 ({ 15, 182, 124, 50, 251, 255, 132, 184, 68, 255, 255, 255 })
' 循环:
' MOVZX EDI,BYTE [EDX+ESI-5]
' INC DWORD [EAX+EDI*4-188]
置入代码 ({ 15, 182, 124, 50, 252, 255, 132, 187, 68, 255, 255, 255 })
' MOVZX EDI,BYTE [EDX+ESI-4]
' INC DWORD [EBX+EDI*4-188]
置入代码 ({ 15, 182, 124, 50, 253, 255, 132, 185, 68, 255, 255, 255 })
' MOVZX EDI,BYTE [EDX+ESI-3]
' INC DWORD [ECX+EDI*4-188]
置入代码 ({ 131, 238, 5, 131, 254, 5, 124, 2, 235, 210, 201, 194, 16, 0 })
' SUB ESI,5
' CMP ESI,5
' JL 退出
' JMP 循环
' 退出:
' LEAVE
' RET 16

子程序名	返回值类型	公开	备 注
排列三出次统计_内联汇编版			格式数数数换行数数数换行
参数名	类 型	参考	可空	数组	备 注
参_开奖源	字节集				未做防呆格式需正确
参_百出次	整数型				成员1=0号~~~10=9号
参_十出次	整数型				成员1=0号~~~10=9号
参_个出次	整数型				成员1=0号~~~10=9号

重定义数组 (参_百出次, 假, 10)
重定义数组 (参_十出次, 假, 10)
重定义数组 (参_个出次, 假, 10)
' __asm{
' mov edx,[ebp+8]
' mov edx,[edx]
' mov esi,[edx+4]
' cmp esi,5
' jl 退出
' add edx,8
' mov eax,[ebp+12]
' mov eax,[eax]
' add eax,4
' mov ebx,[ebp+16]
' mov ebx,[ebx]
' add ebx,4
' mov ecx,[ebp+20]
' mov ecx,[ecx]
' add ecx,4
' 循环:
' movzx edi,byte [edx+esi-5]
' inc dword [eax+edi*4-188]
' movzx edi,byte [edx+esi-4]
' inc dword [ebx+edi*4-188]
' movzx edi,byte [edx+esi-3]
' inc dword [ecx+edi*4-188]
' sub esi,5
' cmp esi,5
' jl 退出
' jmp 循环
' 退出:
' leave
' ret 16
' }

.版本 2<br /> <br /> .子程序 排列三出次统计, , , 格式数数数换行数数数换行<br /> .参数 参_开奖源, 字节集, , 未做防呆格式需正确<br /> .参数 参_百出次, 整数型, 参考 数组, 成员1=0号~~~10=9号<br /> .参数 参_十出次, 整数型, 参考 数组, 成员1=0号~~~10=9号<br /> .参数 参_个出次, 整数型, 参考 数组, 成员1=0号~~~10=9号<br /> <br /> 重定义数组 (参_百出次, 假, 10)<br /> 重定义数组 (参_十出次, 假, 10)<br /> 重定义数组 (参_个出次, 假, 10)<br /> 置入代码 ({ 139, 85, 8, 139, 18, 139, 114, 4, 131, 254, 5, 124, 73, 131, 194, 8 })<br /> ' MOV EDX,[EBP+8]<br /> ' MOV EDX,[EDX]<br /> ' MOV ESI,[EDX+4]<br /> ' CMP ESI,5<br /> ' JL 退出<br /> ' ADD EDX,8<br /> 置入代码 ({ 139, 69, 12, 139, 0, 131, 192, 4 })<br /> ' MOV EAX,[EBP+12]<br /> ' MOV EAX,[EAX]<br /> ' ADD EAX,4<br /> 置入代码 ({ 139, 93, 16, 139, 27, 131, 195, 4 })<br /> ' MOV EBX,[EBP+16]<br /> ' MOV EBX,[EBX]<br /> ' ADD EBX,4<br /> 置入代码 ({ 139, 77, 20, 139, 9, 131, 193, 4 })<br /> ' MOV ECX,[EBP+20]<br /> ' MOV ECX,[ECX]<br /> ' ADD ECX,4<br /> 置入代码 ({ 15, 182, 124, 50, 251, 255, 132, 184, 68, 255, 255, 255 })<br /> ' 循环:<br /> ' MOVZX EDI,BYTE [EDX+ESI-5]<br /> ' INC DWORD [EAX+EDI*4-188]<br /> 置入代码 ({ 15, 182, 124, 50, 252, 255, 132, 187, 68, 255, 255, 255 })<br /> ' MOVZX EDI,BYTE [EDX+ESI-4]<br /> ' INC DWORD [EBX+EDI*4-188]<br /> 置入代码 ({ 15, 182, 124, 50, 253, 255, 132, 185, 68, 255, 255, 255 })<br /> ' MOVZX EDI,BYTE [EDX+ESI-3]<br /> ' INC DWORD [ECX+EDI*4-188]<br /> 置入代码 ({ 131, 238, 5, 131, 254, 5, 124, 2, 235, 210, 201, 194, 16, 0 })<br /> ' SUB ESI,5<br /> ' CMP ESI,5<br /> ' JL 退出<br /> ' JMP 循环<br /> ' 退出:<br /> ' LEAVE<br /> ' RET 16<br /> <br /> .子程序 排列三出次统计_内联汇编版, , , 格式数数数换行数数数换行<br /> .参数 参_开奖源, 字节集, , 未做防呆格式需正确<br /> .参数 参_百出次, 整数型, 参考 数组, 成员1=0号~~~10=9号<br /> .参数 参_十出次, 整数型, 参考 数组, 成员1=0号~~~10=9号<br /> .参数 参_个出次, 整数型, 参考 数组, 成员1=0号~~~10=9号<br /> <br /> 重定义数组 (参_百出次, 假, 10)<br /> 重定义数组 (参_十出次, 假, 10)<br /> 重定义数组 (参_个出次, 假, 10)<br /> ' __asm{<br /> ' mov edx,[ebp+8]<br /> ' mov edx,[edx]<br /> ' mov esi,[edx+4]<br /> ' cmp esi,5<br /> ' jl 退出<br /> ' add edx,8<br /> ' mov eax,[ebp+12]<br /> ' mov eax,[eax]<br /> ' add eax,4<br /> ' mov ebx,[ebp+16]<br /> ' mov ebx,[ebx]<br /> ' add ebx,4<br /> ' mov ecx,[ebp+20]<br /> ' mov ecx,[ecx]<br /> ' add ecx,4<br /> ' 循环:<br /> ' movzx edi,byte [edx+esi-5]<br /> ' inc dword [eax+edi*4-188]<br /> ' movzx edi,byte [edx+esi-4]<br /> ' inc dword [ebx+edi*4-188]<br /> ' movzx edi,byte [edx+esi-3]<br /> ' inc dword [ecx+edi*4-188]<br /> ' sub esi,5<br /> ' cmp esi,5<br /> ' jl 退出<br /> ' jmp 循环<br /> ' 退出:<br /> ' leave<br /> ' ret 16<br /> ' }

来自群组: 热心网友

查过

感谢分享，很给力！~

豆豆灰常开心

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

沐白

支持开源~！感谢分享

please

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

查过

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

豆豆灰常开心

感谢楼主分享！

ctry78985

感谢分享

算法艺术家

学习学习

神奇的哆啦A梦

感谢分享，很给力！~