玩转双色球(易语言2007年大赛三等奖)
系统结构:模块_程序是否已运行,模块_关闭事件同步对象,显示,统计红球出现次数子程序,统计蓝球出现次数子程序,红球显示子程序,蓝球显示子程序,以一带谁统计子程序,以一带谁红显示子程序,以一带谁蓝显示子程序,连号统计子程序,断区统计子程序,蓝球分布窗口画板子程序,奇偶显示子程序,零一二显示子程序,蓝球统计子程序,统计奇数子程序,奇偶走势子程序,赢亏计算子程序,投注保存子程序,冷区热区子程序,第一区子程序,第二区子程序,第三区子程序,第四区子程序,小奇区子程序,大奇区子程序,小偶区子程序,大偶区子程序,三分分区统计子程序,首尾号码走势子程序,首尾号码统计子程序,注数计算子程序,号码检查子程序,写表格数据子程序,
======_启动窗口程序集
| |
| |------ __启动窗口_创建完毕
| |
| |------ 模块_程序是否已运行
| |
| |------ 模块_关闭事件同步对象
| |
| |------ 显示
| |
| |------ _添加数据_被选择
| |
| |------ _冷热号码_被选择
| |
| |------ _查看数据_被选择
| |
| |------ _出奇制胜_被选择
| |
| |------ _以一带谁_被选择
| |
| |------ _作伴同行_被选择
| |
| |------ _四分分区_被选择
| |
| |------ _蓝球分布_被选择
| |
| |------ _红球_被选择
| |
| |------ _蓝球_被选择
| |
| |------ _奇偶分区_被选择
| |
| |------ _数九擒蓝_被选择
| |
| |------ _零一二路_被选择
| |
| |------ _无独有偶_被选择
| |
| |------ _相见恨难_被选择
| |
| |------ _退出_被选择
| |
| |------ _关于_被选择
| |
| |------ _注册_被选择
| |
| |------ _说明_被选择
| |
| |------ _投注管理_被选择
| |
| |------ _随机取号_被选择
| |
| |------ _注数计算_被选择
| |
| |------ __启动窗口_将被销毁
| |
| |------ _冷区热区_被选择
| |
| |------ _和值分布_被选择
| |
| |------ _计算器_被选择
| |
| |------ _备份数据_被选择
| |
| |------ _三分分区_被选择
| |
| |------ _和差商余_被选择
| |
| |------ _五期均值_被选择
| |
| |------ _恢复数据_被选择
| |
| |------ _首尾走势_被选择
| |
| |------ _选号验证_被选择
| |
| |------ _承上启谁_被选择
| |
| |------ _定位统计_被选择
| |
| |------ _个位分区_被选择
| |
| |------ __启动窗口_可否被关闭
| |
| |------ _十位分区_被选择
| |
| |
======冷热号码窗口程序集
| |
| |------ _冷热号码窗口_创建完毕
| |
| |------ 统计红球出现次数子程序
| |
| |------ 统计蓝球出现次数子程序
| |
| |------ 红球显示子程序
| |
| |------ 蓝球显示子程序
| |
| |------ _单选框4_被单击
| |
| |------ _单选框3_被单击
| |
| |------ _单选框2_被单击
| |
| |------ _编辑框1_按下某键
| |
| |------ _单选框1_被单击
| |
| |------ _编辑框1_内容被改变
| |
| |
======查看数据窗口程序集
| |
| |------ _查看数据窗口_创建完毕
| |
| |------ _按钮1_被单击
| |
| |------ _按钮2_被单击
| |
| |
======红球连续出击窗口程序集
| |
| |------ _红球连续出击窗口_创建完毕
| |
| |------ _单选框1_被单击
| |
| |------ _编辑框1_内容被改变
| |
| |------ _单选框2_被单击
| |
| |------ _编辑框1_按下某键
| |
| |
======以一带谁窗口程序集
| |
| |------ _以一带谁窗口_创建完毕
| |
| |------ 以一带谁统计子程序
| |
| |------ 以一带谁红显示子程序
| |
| |------ 以一带谁蓝显示子程序
| |
| |------ _编辑框1_按下某键
| |
| |------ _单选框1_被单击
| |
| |------ _单选框2_被单击
| |
| |------ _编辑框2_按下某键
| |
| |------ _编辑框1_内容被改变
| |
| |------ _单选框3_被单击
| |
| |------ _单选框4_被单击
| |
| |
======作伴同行窗口程序集
| |
| |------ _作伴同行窗口_创建完毕
| |
| |------ 连号统计子程序
| |
| |------ _单选框1_被单击
| |
| |------ _编辑框1_内容被改变
| |
| |------ _单选框2_被单击
| |
| |------ _编辑框1_按下某键
| |
| |
======四分分区窗口程序集
| |
| |------ _四分分区窗口_创建完毕
| |
| |------ 断区统计子程序
| |
| |------ _编辑框1_按下某键
| |
| |------ _单选框1_被单击
| |
| |------ _单选框2_被单击
| |
| |------ _编辑框1_内容被改变
| |
| |------ _按钮1_被单击
| |
| |
======蓝球分布窗口程序集
| |
| |------ _蓝球分布窗口_创建完毕
| |
| |------ 蓝球分布窗口画板子程序
| |
| |------ _向后按钮_被单击
| |
| |------ _向前按钮_被单击
| |
| |------ _蓝球分布窗口_将被销毁
| |
| |
======蓝球连续出击窗口程序集
| |
| |------ _蓝球连续出击窗口_创建完毕
| |
| |------ _编辑框1_按下某键
| |
| |------ _单选框1_被单击
| |
| |------ _单选框2_被单击
| |
| |------ _编辑框1_内容被改变
| |
| |
======奇偶大小窗口程序集
| |
| |------ _奇偶大小窗口_创建完毕
| |
| |------ 奇偶显示子程序
| |
| |------ _编辑框1_按下某键
| |
| |------ _单选框1_被单击
| |
| |------ _单选框2_被单击
| |
| |------ _编辑框1_内容被改变
| |
| |------ _按钮1_被单击
| |
| |
======数九擒蓝窗口程序集
| |
| |------ _编辑框1_内容被改变
| |
| |------ _数九擒蓝窗口_创建完毕
| |
| |------ _单选框1_被单击
| |
| |------ _单选框2_被单击
| |
| |
======零一二窗口程序集
| |
| |------ _零一二窗口_创建完毕
| |
| |------ 零一二显示子程序
| |
| |------ 蓝球统计子程序
| |
| |------ _编辑框1_按下某键
| |
| |------ _单选框1_被单击
| |
| |------ _单选框2_被单击
| |
| |------ _编辑框1_内容被改变
| |
| |
======出奇制胜窗口程序集
| |
| |------ _出奇制胜窗口_创建完毕
| |
| |------ 统计奇数子程序
| |
| |------ 奇偶走势子程序
| |
| |------ _编辑框1_按下某键
| |
| |------ _单选框1_被单击
| |
| |------ _单选框2_被单击
| |
| |------ _编辑框1_内容被改变
| |
| |------ _出奇制胜窗口_将被销毁
| |
| |------ _按钮1_被单击
| |
| |------ _按钮2_被单击
| |
| |
======相见恨难窗口程序集
| |
| |------ _相见恨难窗口_创建完毕
| |
| |------ _单选框1_被单击
| |
| |------ _单选框2_被单击
| |
| |
======关于窗口程序集
| |
| |------ _关于窗口_创建完毕
| |
| |------ _关于窗口_鼠标左键被按下
| |
| |
======注册窗口程序集
| |
| |------ _注册窗口_创建完毕
| |
| |------ _按钮1_被单击
| |
| |
======随机取号窗口程序集
| |
| |------ _按钮1_被单击
| |
| |
======投注管理窗口程序集
| |
| |------ _投注管理窗口_创建完毕
| |
| |------ _按钮1_被单击
| |
| |------ _高级表格1_结束编辑
| |
| |------ _高级表格1_被单击
| |
| |------ _高级表格1_光标位置改变
| |
| |------ 赢亏计算子程序
| |
| |------ 投注保存子程序
| |
| |------ _高级表格1_放开某键
| |
| |------ _按钮2_被单击
| |
| |------ _按钮3_被单击
| |
| |------ _按钮4_被单击
| |
| |------ _按钮5_被单击
| |
| |------ _按钮6_被单击
| |
| |
======注数计算窗口程序集
| |
| |------ _注数计算窗口_创建完毕
| |
| |------ _编辑框1_按下某键
| |
| |------ _编辑框2_按下某键
| |
| |------ _编辑框1_获得焦点
| |
| |------ _编辑框2_获得焦点
| |
| |
======四分分区统计数据窗口程序集
| |
| |------ _四分分区统计数据窗口_创建完毕
| |
| |
======冷区热区窗口窗口程序集
| |
| |------ _冷区热区窗口_创建完毕
| |
| |------ 冷区热区子程序
| |
| |------ _单选框1_被单击
| |
| |------ _编辑框1_内容被改变
| |
| |------ _单选框2_被单击
| |
| |------ _编辑框1_按下某键
| |
| |------ _第一区_被单击
| |
| |------ _第二区_被单击
| |
| |------ _第三区_被单击
| |
| |------ _第四区_被单击
| |
| |------ _小奇区_被单击
| |
| |------ _大奇区_被单击
| |
| |------ _小偶区_被单击
| |
| |------ _大偶区_被单击
| |
| |------ 第一区子程序
| |
| |------ 第二区子程序
| |
| |------ 第三区子程序
| |
| |------ 第四区子程序
| |
| |------ 小奇区子程序
| |
| |------ 大奇区子程序
| |
| |------ 小偶区子程序
| |
| |------ 大偶区子程序
| |
| |------ _按钮2_被单击
| |
| |------ _按钮1_被单击
| |
| |------ _冷区热区窗口_将被销毁
| |
| |
======三分分区窗口程序集
| |
| |------ _三分分区窗口_创建完毕
| |
| |------ 三分分区统计子程序
| |
| |------ _编辑框1_按下某键
| |
| |------ _单选框1_被单击
| |
| |------ _单选框2_被单击
| |
| |------ _编辑框1_内容被改变
| |
| |------ _按钮1_被单击
| |
| |
======备份选项窗口窗口程序集
| |
| |------ _备份选项窗口_创建完毕
| |
| |------ _按钮1_被单击
| |
| |
======和差商余窗口程序集
| |
| |------ _和差商余窗口_创建完毕
| |
| |
======期均值窗口程序集
| |
| |------ _五期均值窗口_创建完毕
| |
| |
======恢复选项窗口程序集
| |
| |------ _恢复选项窗口_创建完毕
| |
| |------ _按钮1_被单击
| |
| |
======首尾走势窗口程序集
| |
| |------ _首尾走势窗口_创建完毕
| |
| |------ 首尾号码走势子程序
| |
| |------ 首尾号码统计子程序
| |
| |------ _首尾走势窗口_将被销毁
| |
| |------ _单选框2_被单击
| |
| |------ _单选框1_被单击
| |
| |------ _选择框1_被单击
| |
| |------ _按钮2_被单击
| |
| |------ _按钮1_被单击
| |
| |
======进度窗口程序集
| |
| |------ _进度窗口_创建完毕
| |
| |------ _进度窗口_将被销毁
| |
| |
======合理验证窗口程序集
| |
| |------ _合理验证窗口_创建完毕
| |
| |------ _编辑框1_按下某键
| |
| |------ _合理验证窗口_将被销毁
| |
| |------ _按钮1_被单击
| |
| |
======添加记录窗口程序集
| |
| |------ _添加记录窗口_创建完毕
| |
| |------ _编辑框3_按下某键
| |
| |------ _编辑框2_按下某键
| |
| |------ _编辑框4_按下某键
| |
| |------ 注数计算子程序
| |
| |------ 号码检查子程序
| |
| |------ 写表格数据子程序
调用的DLL命令:
.程序集 添加记录窗口程序集
.程序集变量 TJJL_M, 整数型, , , 循环变量
.程序集变量 TJJL_TEMP, 整数型, , , 临时变量
.程序集变量 TJJL_HQGS, 整数型, , , 红球个数
.程序集变量 TJJL_PLZ, 整数型, , , 排列值
.程序集变量 TJJL_JCZ, 整数型, , , 阶乘值
.程序集变量 TJJL_LQGS, 整数型, , , 蓝球个数
.程序集变量 TJJL_BL, 整数型, , , 倍率
.程序集变量 TJJL_ZS, 整数型, , , 投注总注数
.子程序 _添加记录窗口_创建完毕
编辑框1.内容 = 到文本 (到数值 (QJ_WQH) + 1)
编辑框2.获取焦点 ()
.子程序 _编辑框3_按下某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型
.如果真 (键代码 = 13)
.如果真 (号码检查子程序 ())
注数计算子程序 ()
写表格数据子程序 ()
投注管理窗口.赢亏计算子程序 ()
投注保存子程序 ()
编辑框3.内容 = “”
编辑框2.内容 = “”
编辑框4.内容 = “1”
编辑框2.获取焦点 ()
.如果真结束
.如果真结束
.子程序 _编辑框2_按下某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型
.如果真 (键代码 = 13)
编辑框3.获取焦点 ()
编辑框3.被选择字符数 = -1
.如果真结束
.子程序 _编辑框4_按下某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型
.如果真 (键代码 = 13)
.如果真 (号码检查子程序 ())
注数计算子程序 ()
写表格数据子程序 ()
投注管理窗口.赢亏计算子程序 ()
投注保存子程序 ()
编辑框3.内容 = “”
编辑框2.内容 = “”
编辑框4.内容 = “1”
编辑框2.获取焦点 ()
'本源码来自易语言源码网 www.e5a5x.com 欢迎使用
.如果真结束
'本源码来自易语言源码网 www.e5a5x.com 欢迎使用
.如果真结束
.子程序 注数计算子程序
TJJL_PLZ = 取文本长度 (编辑框2.内容) ÷ 2
TJJL_HQGS = 取文本长度 (编辑框2.内容) ÷ 2
TJJL_LQGS = 取文本长度 (编辑框3.内容) ÷ 2
TJJL_BL = 到数值 (编辑框4.内容)
TJJL_JCZ = 6
.计次循环首 (5, TJJL_M)
TJJL_PLZ = TJJL_PLZ × (TJJL_HQGS - TJJL_M)
TJJL_JCZ = TJJL_JCZ × (6 - TJJL_M)
.计次循环尾 ()
TJJL_ZS = TJJL_PLZ ÷ TJJL_JCZ × TJJL_BL × TJJL_LQGS
.子程序 号码检查子程序, 逻辑型
'本源码来自易语言源码网 www.e5a5x.com 欢迎使用
.如果真 (取文本长度 (编辑框2.内容) < 12)
信息框 (“根据<双色球>游戏规则,每注只少要选择六个红球号码,小于10的红球号码前加” + #左引号 + “0” + #右引号 + “,您输入的位数太少。”, 64, “提示!”)
编辑框2.获取焦点 ()
编辑框2.起始选择位置 = -1
返回 (假)
.如果真结束
.如果真 (取文本长度 (编辑框2.内容) ÷ 2 ≠ 绝对取整 (取文本长度 (编辑框2.内容) ÷ 2))
信息框 (“每个红球号码输入两位,您输入的位数不正确。”, 64, “提示!”)
编辑框2.获取焦点 ()
编辑框2.起始选择位置 = 取文本长度 (编辑框2.内容) - 1
编辑框2.被选择字符数 = 1
返回 (假)
.如果真结束
.如果真 (取文本长度 (编辑框3.内容) < 2)
信息框 (“根据<双色球>游戏规则,每注只少要选择一个蓝球号码,小于10的蓝球号码前加” + #左引号 + “0” + #右引号 + “,您输入的位数太少。”, 64, “提示!”)
编辑框3.获取焦点 ()
编辑框3.起始选择位置 = -1
返回 (假)
.如果真结束
.如果真 (取文本长度 (编辑框3.内容) ÷ 2 ≠ 绝对取整 (取文本长度 (编辑框3.内容) ÷ 2))
信息框 (“每个蓝球号码输入两位,您输入的位数不正确。”, 64, “提示!”)
编辑框3.获取焦点 ()
编辑框3.起始选择位置 = 取文本长度 (编辑框3.内容) - 1
编辑框3.被选择字符数 = 1
返回 (假)
.如果真结束
'本源码来自易语言源码网 www.e5a5x.com 欢迎使用
.如果真 (到数值 (编辑框4.内容) < 1)
信息框 (“倍率不能小于1。”, 64, “提示!”)
编辑框4.获取焦点 ()
编辑框4.被选择字符数 = -1
返回 (假)
.如果真结束
.计次循环首 (取文本长度 (编辑框2.内容) ÷ 2, TJJL_M)
TJJL_TEMP = 到数值 (取文本中间 (编辑框2.内容, TJJL_M × 2 - 1, 2))
.如果真 (TJJL_TEMP > 33 或 TJJL_TEMP < 1)
信息框 (“根据<双色球>游戏规则,红球的取值范围为1-33,您输入的号码不符合取值范围。”, 64, “提示!”)
编辑框2.获取焦点 ()
编辑框2.起始选择位置 = (TJJL_M - 1) × 2
编辑框2.被选择字符数 = 2
返回 (假)
.如果真结束
.如果真 (TJJL_TEMP ≤ 到数值 (取文本中间 (编辑框2.内容, TJJL_M × 2 - 3, 2)))
信息框 (“红球编号不能重复,并且要从小到大排列。”, 64, “提示!”)
编辑框2.获取焦点 ()
编辑框2.起始选择位置 = (TJJL_M - 1) × 2
编辑框2.被选择字符数 = 2
返回 (假)
.如果真结束
.计次循环尾 ()
.计次循环首 (取文本长度 (编辑框3.内容) ÷ 2, TJJL_M)
TJJL_TEMP = 到数值 (取文本中间 (编辑框3.内容, TJJL_M × 2 - 1, 2))
.如果真 (TJJL_TEMP > 16 或 TJJL_TEMP < 1)
信息框 (“根据<双色球>游戏规则,蓝球的取值范围为1-16,您输入的号码不符合取值范围。”, 64, “提示!”)
编辑框3.获取焦点 ()
编辑框3.起始选择位置 = (TJJL_M - 1) × 2
编辑框3.被选择字符数 = 2
返回 (假)
.如果真结束
.计次循环尾 ()
返回 (真)
.子程序 写表格数据子程序
.如果真 (置当前库 (“mylottery”))
加空记录 ()
投注管理窗口.高级表格1.插入行 (, )
投注管理窗口.高级表格1.置数据 (投注管理窗口.高级表格1.行数 - 1, 0, 1, 到文本 (取年份 (日期框1.今天)) + “-” + 取文本右边 (“0” + 到文本 (取月份 (日期框1.今天)), 2) + “-” + 取文本右边 (“0” + 到文本 (取日 (日期框1.今天)), 2))
投注管理窗口.高级表格1.置数据 (投注管理窗口.高级表格1.行数 - 1, 1, 1, 编辑框1.内容)
投注管理窗口.高级表格1.置单元格文字颜色 (0, 2, 投注管理窗口.高级表格1.行数, 2, #红色)
投注管理窗口.高级表格1.置数据 (投注管理窗口.高级表格1.行数 - 1, 2, 1, 编辑框2.内容)
投注管理窗口.高级表格1.置单元格文字颜色 (0, 3, 投注管理窗口.高级表格1.行数, 3, #蓝色)
投注管理窗口.高级表格1.置数据 (投注管理窗口.高级表格1.行数 - 1, 3, 1, 编辑框3.内容)
投注管理窗口.高级表格1.置数据 (投注管理窗口.高级表格1.行数 - 1, 4, 1, 编辑框4.内容)
投注管理窗口.高级表格1.置数据 (投注管理窗口.高级表格1.行数 - 1, 5, 1, 到文本 (TJJL_ZS))
投注管理窗口.高级表格1.置数据 (投注管理窗口.高级表格1.行数 - 1, 6, 1, 数值到格式文本 (TJJL_ZS × 2, 2, 假))
.如果真结束
炸鼠游戏源码...
易语言企鹅好友文件分析源码,企鹅好友文件分析,转换为号码,十六进制到十进制,取登录号码,分析好友名单,转换为昵称,取数字目录...
易语言企鹅的USER.db源码,企鹅的USER.db,转换为号码,十六进制到十进制,取登录号码,分析好友名单,转换为昵称,取数字目录...
易语言企鹅聊天记录免密码察看器源码,企鹅聊天记录免密码察看器...
易语言企鹅聊天轰炸器源码,企鹅聊天轰炸器,找群窗口,找发送窗口,找发送按钮,读取信息,找浏览窗口,窗口名,DLL_加载皮肤,DLL_退出皮肤,DLL_移除皮肤,DLL_窗口移出皮肤,DLL_ClientToScreen,取窗口标题长度,查找子窗口,取窗体标题,发送消息1,发送消息...
易语言三维迷宫源码,三维迷宫,建立OPenGL组件,撤消OPenGL组件,框架初始化,绘图,尺寸被改变,变量初始化,键盘操作,鼠标操作,可否继续移动,计算视点,创建地板列表,创建墙壁列表,画墙壁柱子,画地板,画一面墙壁,定义光源,定义雾,画准星,画箭头,多边形拉伸,画地图,...
易语言象棋人机对弈(2005年大赛二等奖)源码,象棋人机对弈(2005年大赛二等奖),合法走法,判断棋子颜色,判断两个棋子是否同色,棋盘赋值,初始化棋盘,对应位图1,移动棋子,插入走法,产生可能的走法,棋局是否结束,产生将的走法,产生红士的走法,产生黑士的走...
易语言井字游戏源码,井字游戏,编辑框转换,胜负判断,是否胜利,复原,低级电脑,中级电脑,高级电脑,引索判断...
易语言仓库大师源码,仓库大师,读取设置,设置变量,载入地图,初始化环境,绘制地图,画位图,运动,是否可移动,找路径,搜索结点,调整窗口,读关卡信息,增加撤消点,增加撤消数据头,保存答案,play,提示,载入Etp库,转换为Etp格式,填,验证地图,打开库,打开Etp关卡,添加到...