资源介绍:
例程源码调用了正态分布图像处理模块1.123和易语言图像格式转换支持库,易语言互联网支持库,实现了验证码识别。
资源作者:
资源界面:
.版本 2
.程序集 山寨核心库
.子程序 山寨_整数减, 整数型, 公开, 山寨_整数减法
.参数 被减数, 整数型
.参数 减数, 整数型
' 置入代码 ({ 139, 69, 8 }) ' ' mov eax,[ebp+8]
' 置入代码 ({ 43, 69, 12 }) ' ' sub eax,dword ptr[ebp+12]
' 置入代码 ({ 201 }) ' '''''''' leave
' 置入代码 ({ 194, 8, 0 }) ' '' retn 8
.如果真 (#山寨加速_X86汇编)
置入代码 ({ 139, 69, 8, 43, 69, 12, 201, 194, 8, 0 })
' mov eax,[ebp+8]
' sub eax,dword ptr[ebp+12]
' leave
' retn 8
.如果真结束
返回 (被减数 - 减数)
' 本源码来自三叶资源网(www.sanye.cx)
.子程序 山寨_整数加, 整数型, 公开, 山寨_整数加法
.参数 加数1, 整数型
.参数 加数2, 整数型
.如果真 (#山寨加速_X86汇编)
置入代码 ({ 139, 69, 8 }) ' ' mov eax,[ebp+8]
置入代码 ({ 3, 69, 12 }) ' '' add eax,dword ptr[ebp+12]
置入代码 ({ 201 }) ' '''''''' leave
置入代码 ({ 194, 8, 0 }) ' '' retn 8
.如果真结束
返回 (加数1 + 加数2)
' 本源码来自三叶资源网(www.sanye.cx)
.子程序 山寨_整数乘, 整数型, 公开, 山寨_整数加法
.参数 乘数1, 整数型
.参数 乘数2, 整数型
.如果真 (#山寨加速_X86汇编)
置入代码 ({ 139, 69, 8 }) ' '''''' mov eax,[ebp+8]
置入代码 ({ 15, 175, 69, 12 }) ' ' imul eax,dword ptr[ebp+12]
置入代码 ({ 201 }) ' ''''''''''''' leave
置入代码 ({ 194, 8, 0 }) ' ''''''' retn 8
.如果真结束
' ' 本源码来自三叶资源网(www.sanye.cx)
返回 (乘数1 × 乘数2)
.子程序 山寨_取绝对值, 整数型, 公开
.参数 欲取绝对值的数, 整数型
.如果真 (#山寨加速_X86汇编)
置入代码 ({ 139, 69, 8, 133, 192, 121, 2, 247, 216, 201, 194, 4, 0 })
' mov eax,[ebp+8]
' test eax,eax;
' jns not_negtive;
' neg eax;
' not_negtive:
' leave
' retn 4
.如果真结束
.如果 (欲取绝对值的数 > 0)
返回 (欲取绝对值的数)
.否则
返回 (-欲取绝对值的数)
.如果结束
.子程序 山寨_加到参数一上, , 公开
.参数 被加数, 整数型, 参考
.参数 加数, 整数型
.如果真 (#山寨加速_X86汇编)
置入代码 ({ 139, 69, 8, 139, 93, 12, 1, 24, 201, 194, 8, 0 })
' mov eax,[ebp+8]
' mov ebx,dword ptr[ebp+12]
' add dword ptr[eax],ebx
' leave
' retn 8
.如果真结束
' 置入代码 ({ 204 })
' 被加数 = 9
' 置入代码 ({ 204 })
被加数 = 被加数 + 加数
' 置入代码 ({ 204 })
.子程序 山寨_取整, 整数型, 公开
.参数 待取整小数, 双精度小数型
.如果真 (#山寨加速_X86汇编)
置入代码 ({ 221, 69, 8, 219, 93, 8, 139, 69, 8, 201, 194, 8, 0 })
' fld qword ptr[ebp+8]
' fistp dword ptr[ebp+8]
' mov eax,dword ptr[ebp+8]
' leave
' retn 8
.如果真结束
返回 (待取整小数)
.子程序 山寨_右移, 整数型, 公开
.参数 待操作数, 整数型
.参数 位移位数, 整数型
.如果真 (#山寨加速_X86汇编)
置入代码 ({ 139, 69, 8, 139, 77, 12, 211, 232, 201, 194, 8, 0 })
' mov eax,[ebp+8]
' mov ecx,dword ptr[ebp+12]
' shr eax,cl
' leave
' retn 8
.如果真结束
返回 (右移 (待操作数, 位移位数))
.子程序 山寨_位与, 整数型, 公开
.参数 待操作数, 整数型
.参数 位与数, 整数型
.如果真 (#山寨加速_X86汇编)
置入代码 ({ 139, 69, 8, 35, 69, 12, 201, 194, 8, 0 })
' mov eax,[ebp+8]
' and eax,dword ptr[ebp+12]
' leave
' retn 8
.如果真结束
返回 (位与 (待操作数, 位与数))
.子程序 l21, 整数型, , 逻辑型到整数
.参数 a, 逻辑型
.如果 (a)
返回 (1)
.否则
返回 (0) ' 本源码来自三叶资源网(www.sanye.cx)
.如果结束
.子程序 统计最值
.参数 最小值, 整数型, 参考 可空
.参数 当前值, 整数型
.参数 最大值, 整数型, 参考 可空
.参数 最小下标, , 参考 可空
.参数 当前下标, , 可空
.参数 最大下标, , 参考 可空
.如果真 (最小值 > 当前值)
最小值 = 当前值
.如果真 (假 = 是否为空 (当前下标) 且 假 = 是否为空 (最小下标))
最小下标 = 当前下标
.如果真结束
' ' 本源码来自三叶资源网(www.sanye.cx)
.如果真结束
.如果真 (最大值 < 当前值)
最大值 = 当前值
.如果真 (假 = 是否为空 (当前下标) 且 假 = 是否为空 (最大下标))
最大下标 = 当前下标
.如果真结束
.如果真结束
.子程序 限制, 整数型
.参数 a
.参数 最小, , 可空
.参数 最大, , 可空
.如果真 (是否为空 (最小))
最小 = 0
.如果真结束
.如果真 (是否为空 (最大))
最大 = 255
.如果真结束
.如果真 (a < 最小)
a = 最小
.如果真结束
.如果真 (a > 最大)
a = 最大
.如果真结束
返回 (a)
' 本源码来自三叶资源网(www.sanye.cx)
资源下载: