双色球摇号器 求点出问题所在

qq394484635

刚开始学习，看到教程做福彩3D，就试着做双色球和大乐透，但总是像死循环一样，求高手指点一二啊



空间 摇号器

功能 福彩3D摇号器(注数)
    变量 显示=""
    遍历(i=0;i<注数;i++)
        百位=辅助.随机数(0,9)
        十位=辅助.随机数(0,9)
        个位=辅助.随机数(0,9)
        显示=显示&百位&十位&个位&"\r\n"
    遍历结束
    返回 (显示)
功能结束

功能 双色球摇号()
   
    变量 显示=""
    变量 数据1,数据2,数据3,数据4,数据5,数据6
    变量 字符串1,字符串2,字符串3,字符串4,字符串5,字符串6
    数据1=辅助.随机数(0,33)
   
    循环(真)
        数据2=辅助.随机数(0,33)
        如果(!数据2==数据1)
            跳出
        如果结束
    循环结束
   
    循环(真)
        数据3=辅助.随机数(0,33)
        如果(!数据3==数据1||数据3==数据2)
            跳出
        如果结束
    循环结束
   
    循环(真)
        数据4=辅助.随机数(0,33)
        如果(!数据4==数据1||数据4==数据2||数据4==数据3)
            跳出
        如果结束
    循环结束
   
    循环(真)
        数据5=辅助.随机数(0,33)
        如果(!数据5==数据1||数据5==数据2||数据5==数据3||数据5==数据4)
            跳出
        如果结束
    循环结束
   
    循环(真)
        数据6=辅助.随机数(0,33)
        如果(!数据6==数据1||数据6==数据2||数据6==数据3||数据6==数据4||数据6==数据5)
            跳出
        如果结束
    循环结束
    字符串1=类型.转字符型(数据1)
    字符串2=类型.转字符型(数据2)
    字符串3=类型.转字符型(数据3)
    字符串4=类型.转字符型(数据4)
    字符串5=类型.转字符型(数据5)
    字符串6=类型.转字符型(数据6)
   
    显示=字符串1&"\\"&字符串2&"\\"&字符串3&"\\"&字符串4&"\\"&字符串5&"\\"&字符串6
    返回 (显示)
功能结束
功能 按钮0_点击()
    //这里添加你要执行的代码
    //注数 = 编辑框.获得文本("编辑框3")
    //遍历 (i=0;i<注数;i++)
   
    //三D号 = 摇号器.福彩3D摇号器()
    //编辑框.设置文本("编辑框0",三D号&"\r\n")
    //调试输出(三D号)
   
    //遍历结束
    注数 = 编辑框.获得文本("编辑框3")
    摇号结果 = 摇号器.福彩3D摇号器(注数)
    编辑框.设置文本("编辑框0",摇号结果)
   
   
功能结束
功能 开始_点击()
    //i=摇号器.求和(5,10)
    //辅助.消息框(i)
功能结束
//退出按钮_点击操作
功能 退出_点击()
   
    辅助.退出()
功能结束

功能 按钮2_点击()
    //这里添加你要执行的代码
    变量 摇号结果
    摇号结果=摇号器.双色球摇号()
    调试输出(摇号结果)
功能结束
空间结束
//空间结束语句

小西

1. 
   
2. 功能 福彩3D摇号器(注数)   
   
3.     变量 显示=""
   
4.     遍历(i=0;i<注数;i++)
   
5.         单注=null
   
6.         遍历(3)
   
7.             单注&=辅助.随机数(0,9)
   
8.         遍历结束
   
9.         显示&=单注&"\r\n"
   
10.     遍历结束   
    
11.     返回 显示   
    
12. 功能结束
    
13. 
    
14. 
    
15. 功能 福彩3D摇号器1(注数)
    
16.    
    
17.     显示=null
    
18.     遍历(i=0;i<注数;i++)
    
19.         显示&=字符串.右侧(辅助.随机数(1000,1999),3)&"\r\n"
    
20.     遍历结束
    
21.     返回 显示
    
22.    
    
23. 功能结束
    
24. 
    
25. 
    
26. 功能 双色球摇号()   
    
27.     显示=null,号码组=array[7],i=0
    
28.     遍历(i=0;i<6;i++)
    
29.         下一步=true
    
30.         循环(下一步)
    
31.             号码组[i]=辅助.随机数(1,33)
    
32.             如果(i>0)
    
33.                 遍历(j=0;j<i;j++)
    
34.                     如果(号码组[i]==号码组[j])
    
35.                         下一步=true
    
36.                         break
    
37.                     否则
    
38.                         下一步=false
    
39.                     如果结束
    
40.                 遍历结束
    
41.             否则
    
42.                 下一步=false
    
43.             如果结束
    
44.         循环结束
    
45.         显示&=号码组[i]&" "
    
46.     遍历结束
    
47.     号码组[i]=辅助.随机数(1,16)
    
48.     显示&="+ "&号码组[i]
    
49.    
    
50.         
    
51.     返回 显示
    
52.    
    
53. 功能结束
    

复制代码

合理使用循环与遍历将使代码更简洁.

qq394484635

没人看么，我自己找到问题了，||变成&&就OK了，哈啊，用遍历
遍历(10)
        数据2=辅助.随机数(0,33)
        如果(!数据2==数据1)
            跳出
        如果结束
    遍历结束
   
    遍历(10)
        数据3=辅助.随机数(0,33)
        如果(!数据3==数据2&&!数据3==数据1)
            跳出
        如果结束
    遍历结束
   
    遍历(10)
        数据4=辅助.随机数(0,33)
        如果(!数据4==数据3&&!数据4==数据2&&数据4==数据1)
            跳出
        如果结束
    遍历结束
   
    遍历(10)
        数据5=辅助.随机数(0,33)
        如果(!数据5==数据4&&!数据5==数据3&&数据5==数据2&&数据5==数据1)
            跳出
        如果结束
    遍历结束
   
     遍历(10)
        数据6=辅助.随机数(0,33)
        如果(!数据6==数据5&&!数据6==数据4&&数据6==数据3&&数据6==数据2&&数据6==数据1)
            跳出
        如果结束
    遍历结束
   


要是十次都处相同的，我就可以去买彩票了

fang198118