1.易语言双色球

易语言双色球

       事先声明，易语言双源码我只是色球双色一个新手，看了几个视频教程以后不知道该写什么，球编然后想尝试你说这个，程预测安卓源码群可是易语言双源码有很多问题，

       出现了很多问题，色球双色内部通讯app源码以我现在的球编本事无法解释。

       1:在超级列表框2里，程预测序号1里和出现了4次是易语言双源码对的，可是色球双色序号里，和只有8次，球编为什么是程预测9.我也不知道

       2：删除重复，删不掉第一项，易语言双源码源码文档提交 app我想加在找号下，色球双色可是球编，删不干净，彩种开奖源码无论我计次循环多少

       3：看见源码，你就知道我是什么样的新手了

       4发现错误的兄弟麻烦告诉我下是那里错了

       5刚才发现LZ有开奖日期，我没加，winpcap的ndis源码（实在是没耐性了）

        

        

        

       .版本 2

       .支持库 iext

       .子程序 _按钮1_被单击

       .局部变量 第几个, 整数型

       .局部变量 临时数字变量, 整数型

       .局部变量 临时次数变量, 双精度小数型

       .局部变量 找次数, 整数型

       .局部变量 第几排, 整数型

       .局部变量 概率, 双精度小数型

       .局部变量 表项索引, 整数型

       .局部变量 查找, 文本型

       .局部变量 下一个次数变量, 整数型

       .局部变量 下一个数找次数, 整数型

       .局部变量 莫名其妙的变量, 文本型

       .局部变量 莫名其妙的变量1, 文本型

       .局部变量 a, 整数型

       .局部变量 概率2, 整数型

       超级列表框2.全部删除 ()

       查找 ＝ 编辑框1.内容

       .计次循环首 (7, 第几排)

           .计次循环首 (超级列表框1.取表项数 (), 第几个)

               临时次数变量 ＝ 0

               .计次循环首 (超级列表框1.取表项数 (), 找次数)

                   .如果真 (查找 ＝ 超级列表框1.取标题 (找次数 － 1, 第几排))

                       临时次数变量 ＝ 临时次数变量 ＋ 1

                   .如果真结束

               .计次循环尾 ()

               .如果真 (查找 ＝ 超级列表框1.取标题 (第几个 － 1, 第几排))

                   表项索引 ＝ 超级列表框2.插入表项 (, , , , , )

                   超级列表框2.置标题 (表项索引, 0, 到文本 (超级列表框2.取表项数 ()))

                   .如果 (第几排 ＝ 7)

                       超级列表框2.置标题 (表项索引, 2, “蓝色球”)

                   .否则

                       .判断开始 (第几排 ＝ 1)

                           超级列表框2.置标题 (表项索引, 2, “红色球一”)

                       .判断 (第几排 ＝ 2)

                           超级列表框2.置标题 (表项索引, 2, “红色球二”)

                       .判断 (第几排 ＝ 3)

                           超级列表框2.置标题 (表项索引, 2, “红色球三”)

                       .判断 (第几排 ＝ 4)

                           超级列表框2.置标题 (表项索引, 2, “红色球四”)

                       .判断 (第几排 ＝ 5)

                           超级列表框2.置标题 (表项索引, 2, “红色球五”)

                       .判断 (第几排 ＝ 6)

                           超级列表框2.置标题 (表项索引, 2, “红色球六”)

                       .默认

                       .判断结束

                   .如果结束

                   超级列表框2.置标题 (表项索引, 1, 查找)

                   超级列表框2.置标题 (表项索引, 3, 到文本 (临时次数变量))

                   概率 ＝ 临时次数变量 ÷ 超级列表框1.取表项数 () ×

                   超级列表框2.置标题 (表项索引, 4, 到文本 (四舍五入 (概率, 1)) ＋ “%”)

                   .如果 (超级列表框1.取标题 (第几个 － 1, 第几排 ＋ 1) ＝ “”)

                       超级列表框2.置标题 (表项索引, 5, “没有了”)

                   .否则

                       超级列表框2.置标题 (表项索引, 5, 到文本 (超级列表框1.取标题 (第几个 － 1, 第几排 ＋ 1)))

                   .如果结束

                   .如果 (第几排 ＝ 7)

                       超级列表框2.置标题 (表项索引, 6, “没有了”)

                   .否则

                       .判断开始 (第几排 ＝ 1)

                           超级列表框2.置标题 (表项索引, 6, “红色球二”)

                       .判断 (第几排 ＝ 2)

                           超级列表框2.置标题 (表项索引, 6, “红色球三”)

                       .判断 (第几排 ＝ 3)

                           超级列表框2.置标题 (表项索引, 6, “红色球四”)

                       .判断 (第几排 ＝ 4)

                           超级列表框2.置标题 (表项索引, 6, “红色球五”)

                       .判断 (第几排 ＝ 5)

                           超级列表框2.置标题 (表项索引, 6, “红色球六”)

                       .判断 (第几排 ＝ 6)

                           超级列表框2.置标题 (表项索引, 6, “蓝色球”)

                       .默认

                       .判断结束

                   .如果结束

               .如果真结束

           .计次循环尾 ()

       .计次循环尾 ()

       .计次循环首 (超级列表框2.取表项数 (), )

           .计次循环首 (超级列表框2.取表项数 (), 下一个数找次数)

               .如果 (超级列表框2.取标题 (下一个数找次数 － 1, 5) ＝ “没有了”)

                   超级列表框2.置标题 (下一个数找次数 － 1, 7, “没有了”)

               .否则

                   下一个次数变量 ＝ 1

                   .计次循环首 (超级列表框2.取表项数 (), a)

                       .如果 (超级列表框2.取标题 (下一个数找次数 － 1, 5) ＝ 超级列表框2.取标题 (a, 5))

                           下一个次数变量 ＝ 下一个次数变量 ＋ 1

                       .否则

                       .如果结束

                   .计次循环尾 ()

                   超级列表框2.置标题 (下一个数找次数 － 1, 7, 到文本 (下一个次数变量))

                   概率2 ＝ 下一个次数变量 ÷ 超级列表框1.取表项数 () ×

                   超级列表框2.置标题 (下一个数找次数 － 1, 8, 到文本 (概率2) ＋ “%”)

               .如果结束

           .计次循环尾 ()

       .计次循环尾 ()

       .子程序 _按钮2_被单击

       .局部变量 纵向, 整数型

       .局部变量 删除纵向变量, 整数型

       .计次循环首 (超级列表框2.取表项数 (), 纵向)

           .计次循环首 (超级列表框2.取表项数 (), 删除纵向变量)

               .如果真 (超级列表框2.取标题 (纵向, 1) ＝ 超级列表框2.取标题 (纵向 ＋ 删除纵向变量, 1))

                   .如果真 (超级列表框2.取标题 (纵向, 2) ＝ 超级列表框2.取标题 (纵向 ＋ 删除纵向变量, 2))

                       .如果真 (超级列表框2.取标题 (纵向, 5) ＝ 超级列表框2.取标题 (纵向 ＋ 删除纵向变量, 5))

                           .如果真 (超级列表框2.取标题 (纵向, 6) ＝ 超级列表框2.取标题 (纵向 ＋ 删除纵向变量, 6))

                               超级列表框2.删除表项 (纵向)

                           .如果真结束

                       .如果真结束

                   .如果真结束

               .如果真结束

           .计次循环尾 ()

       .计次循环尾 ()

       .子程序 _按钮3_被单击

       .局部变量 a, 整数型

       .局部变量 找最大, 整数型

       .局部变量 表项索引, 整数型

       .局部变量 次数, 整数型

       .局部变量 号码, 文本型

       .局部变量 颜色球, 文本型

       .局部变量 概率, 整数型

       .局部变量 号码2, 文本型

       .局部变量 颜色球2, 文本型

       .局部变量 次数2, 整数型

       .局部变量 概率2, 整数型

       编辑框2.内容 ＝ “”

       .计次循环首 (超级列表框1.取表项数 (), a)

           找最大 ＝ 到数值 (超级列表框2.取标题 (a, 7))

           .如果 (找最大 ≤ 到数值 (超级列表框2.取标题 (a ＋ 1, 7)))

               找最大 ＝ 到数值 (超级列表框2.取标题 (a ＋ 1, 7))

           .否则

               号码 ＝ 超级列表框2.取标题 (a, 1)

               颜色球 ＝ 超级列表框2.取标题 (a, 2)

               次数 ＝ 到数值 (超级列表框2.取标题 (a, 3))

               概率 ＝ 到数值 (超级列表框2.取标题 (a, 4))

               号码2 ＝ 超级列表框2.取标题 (a, 5)

               颜色球2 ＝ 超级列表框2.取标题 (a, 6)

               次数2 ＝ 到数值 (超级列表框2.取标题 (a, 7))

               概率2 ＝ 到数值 (超级列表框2.取标题 (a, 8))

               编辑框2.加入文本 (号码 ＋ “号，” ＋ 颜色球 ＋ “，” ＋ “出现过” ＋ 到文本 (次数) ＋ “次，概率是” ＋ 到文本 (概率) ＋ “%” ＋ “下一个号码” ＋ 号码2 ＋ “号，” ＋ 颜色球2 ＋ “，” ＋ “这2个号码同时出现过” ＋ 到文本 (次数2) ＋ “次，概率是” ＋ 到文本 (概率2) ＋ “%”)

           .如果结束

       .计次循环尾 ()