正态分布图像处理模块1.123源码和调用例程

资源介绍：

例程源码调用了正态分布图像处理模块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)

资源下载：