以名字预测性别 易语言版

shituo

试用了MMKV模块和精易模块  
常量 #识别性别  请到之前的源代码里面下载 就是哪个 打包的文件

  

子程序名	返回值类型	公开	备 注
识别性别初始化

变量名	类 型	静态	数组	备 注
性别数据库	文本型
性别数据	文本型		0
i	整数型
单行性别数据	文本型		0
男	整数型
女	整数型

' char,male,female
识别性别.创建 (“Gender”, #进程模式_单进程模式, , 文件_取目录 (编辑框_数据库路径.内容))
性别数据库 ＝ U2A ( #识别性别 )
性别数据 ＝ 分割文本 (性别数据库, 字符 (10), )
' 调试输出 (性别数据)
变量循环首 (2, 取数组成员数 (性别数据) － 1, 1, i)  ' 删除第一行
单行性别数据 ＝ 分割文本 (性别数据 [i], “,”, )
如果真 (取数组成员数 (单行性别数据) ＝ 3)
女 ＝ 到整数 (单行性别数据 [3])  ' female
识别性别.置整数型 (单行性别数据 [1] ＋ “.女”, 女)
femaleTotal ＝ 女 ＋ femaleTotal
男 ＝ 到整数 (单行性别数据 [2])  ' male
识别性别.置整数型 (单行性别数据 [1] ＋ “.男”, 男)  ' 1.0 * femaleNum / femaleTotal
maleTotal ＝ 男 ＋ maleTotal

变量循环尾 ()
genderTotal ＝ maleTotal ＋ femaleTotal

子程序名	返回值类型	公开	备 注
接口_识别性别	文本型
参数名	类 型	参考	可空	数组	备 注
名字	文本型
是否跳过姓	逻辑型

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

女 ＝ 识别性别 (名字, 0, 是否跳过姓) ÷ genderTotal
' 调试输出 (maleTotal ÷ 女)
男 ＝ 识别性别 (名字, 1, 是否跳过姓) ÷ genderTotal
' 调试输出 (femaleTotal ÷ 男)
调试输出 (男, 女)
判断 (女 ＞ 男)
返回 (“女”)
返回 (“男”)

子程序名	返回值类型	公开	备 注
识别性别	双精度小数型
参数名	类 型	参考	可空	数组	备 注
姓名	文本型
性别	整数型
是否跳过姓	逻辑型				默认假 不跳过

变量名	类 型	静态	数组	备 注
名字数组	文本型		0
i	整数型
baseProb	整数型

如果真 (文本_逐字分割_汇编 (姓名, 名字数组) ＞ 0)
' 调试输出 (名字数组)
判断 (是否跳过姓)
如果真 (取数组成员数 (名字数组) ＞ 2)
变量循环首 (2, 取数组成员数 (名字数组), 1, i)
baseProb ＝ baseProb ＋ 识别性别.取整数型 (名字数组 [i] ＋ 选择 (性别 ＝ 0, “.女”, “.男”))
变量循环尾 ()

计次循环首 (取数组成员数 (名字数组), i)
baseProb ＝ baseProb ＋ 识别性别.取整数型 (名字数组 [i] ＋ 选择 (性别 ＝ 0, “.女”, “.男”))
' 调试输出 (名字数组 [i], 识别性别.取整数型 (名字数组 [i] ＋ 选择 (性别 ＝ 0, “.女”, “.男”)), baseProb, baseProb × 识别性别.取整数型 (名字数组 [i] ＋ 选择 (性别 ＝ 0, “.女”, “.男”)))
计次循环尾 ()

返回 (baseProb)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 识别性别初始化<br /> .局部变量 性别数据库, 文本型<br /> .局部变量 性别数据, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 单行性别数据, 文本型, , "0"<br /> .局部变量 男, 整数型<br /> .局部变量 女, 整数型<br /> <br /> ' char,male,female<br /> 识别性别.创建 (“Gender”, #进程模式_单进程模式, , 文件_取目录 (编辑框_数据库路径.内容))<br /> 性别数据库 ＝ U2A (#识别性别)<br /> 性别数据 ＝ 分割文本 (性别数据库, 字符 (10), )<br /> ' 调试输出 (性别数据)<br /> <br /> <br /> .变量循环首 (2, 取数组成员数 (性别数据) － 1, 1, i)  ' 删除第一行<br />     单行性别数据 ＝ 分割文本 (性别数据 <i>, “,”, )<br />     .如果真 (取数组成员数 (单行性别数据) ＝ 3)<br />         女 ＝ 到整数 (单行性别数据 [3])  ' female<br />         识别性别.置整数型 (单行性别数据 [1] ＋ “.女”, 女)<br />         femaleTotal ＝ 女 ＋ femaleTotal<br />         男 ＝ 到整数 (单行性别数据 [2])  ' male<br />         识别性别.置整数型 (单行性别数据 [1] ＋ “.男”, 男)  ' 1.0 * femaleNum / femaleTotal<br />         maleTotal ＝ 男 ＋ maleTotal<br /> <br />     .如果真结束<br /> <br /> .变量循环尾 ()<br /> <br /> genderTotal ＝ maleTotal ＋ femaleTotal<br /> <br /> <br /> <br /> .子程序 接口_识别性别, 文本型<br /> .参数 名字, 文本型<br /> .参数 是否跳过姓, 逻辑型, 可空<br /> .局部变量 女, 双精度小数型<br /> .局部变量 男, 双精度小数型<br /> <br /> 女 ＝ 识别性别 (名字, 0, 是否跳过姓) ÷ genderTotal<br /> ' 调试输出 (maleTotal ÷ 女)<br /> 男 ＝ 识别性别 (名字, 1, 是否跳过姓) ÷ genderTotal<br /> ' 调试输出 (femaleTotal ÷ 男)<br /> <br /> 调试输出 (男, 女)<br /> <br /> .判断开始 (女 ＞ 男)<br />     返回 (“女”)<br /> .默认<br />     返回 (“男”)<br /> .判断结束<br /> <br /> <br /> .子程序 识别性别, 双精度小数型<br /> .参数 姓名, 文本型<br /> .参数 性别, 整数型<br /> .参数 是否跳过姓, 逻辑型, 可空, 默认假 不跳过<br /> .局部变量 名字数组, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 baseProb, 整数型<br /> <br /> .如果真 (文本_逐字分割_汇编 (姓名, 名字数组) ＞ 0)<br />     ' 调试输出 (名字数组)<br /> <br />     .判断开始 (是否跳过姓)<br />         .如果真 (取数组成员数 (名字数组) ＞ 2)<br />             .变量循环首 (2, 取数组成员数 (名字数组), 1, i)<br />                 baseProb ＝ baseProb ＋ 识别性别.取整数型 (名字数组 <i> ＋ 选择 (性别 ＝ 0, “.女”, “.男”))<br />             .变量循环尾 ()<br />         .如果真结束<br /> <br />     .默认<br />         .计次循环首 (取数组成员数 (名字数组), i)<br />             baseProb ＝ baseProb ＋ 识别性别.取整数型 (名字数组 <i> ＋ 选择 (性别 ＝ 0, “.女”, “.男”))<br />             ' 调试输出 (名字数组 <i>, 识别性别.取整数型 (名字数组 <i> ＋ 选择 (性别 ＝ 0, “.女”, “.男”)), baseProb, baseProb × 识别性别.取整数型 (名字数组 <i> ＋ 选择 (性别 ＝ 0, “.女”, “.男”)))<br />         .计次循环尾 ()<br />     .判断结束<br /> <br /> .如果真结束<br /> 返回 (baseProb)

zaz1qaz

感谢分享，很给力！~

熊不熊

感谢分享，很给力！~

小七喜

牛逼克拉斯
[quote][/quote]

qmcy888

感谢楼主分享

Resources

sn123zyc

感谢分享，很给力！~

胖子葛格

感谢大神分享~！

何浩文

支持开源~！感谢分享

胖子葛格

感谢大神分享~！

byboge

        感谢分享，很给力！