博路发

 找回密码
 立即注册
博路发
123123
查看: 2212|回复: 20
打印 上一主题 下一主题

接2

[复制链接]

28

主题

545

帖子

580

积分

高级会员

Rank: 4

积分
580
跳转到指定楼层
楼主
发表于 2019-12-18 00:44:35 | 显示全部楼层 |只看大图 回帖奖励 |倒序浏览 |阅读模式
return str;
}

//定时器
import win.timer;
var timer = win.timer( winform );
timer.setInterval(3000)
timer.onTimer = function(hwnd,msg,id,tick){

    当天序号 = 当天序号+1;
    开奖期号 = tostring(time(time.now(),"%Y%m%d"))++string.format("%05d",当天序号)//前面补0,变成5位数编号

    var 万位 = string.random(1,"0123456789");
    var 千位 = string.random(1,"9876543210");
    var 百位 = string.random(1,"0123456789");
    var 十位 = string.random(1,"9876543210");
    var 个位 = string.random(1,"0123456789");
    开奖号码 = string.concat(万位,",",千位,",",百位,",",十位,",",个位)
    开奖时间 = timeHead();

        winform.editLog.print("开奖时间:"+开奖时间+" 开奖期号:"+开奖期号+" 开奖号码:"+开奖号码)
}

//异步HTTP服务器
import wsock.tcp.asynHttpServer;
var srvHttp = wsock.tcp.asynHttpServer();

//指定IP,端口,运行HTTP服务端
srvHttp.start("127.0.0.1",80);
srvHttp.run(
    function(response,request,session){
        //winform.editLog.print("HTTP协议访问:",request.url);
        response.contentType = "text/json"
        response.jsonPrettyPrint = true;
        reTable = {};
        reTable.开奖时间 = 开奖时间;
        reTable.开奖期号 = 开奖期号;
        reTable.开奖号码 = 开奖号码;
        response.write(reTable)
    }        
);

winform.editLog.print("http服务端已启动:"+srvHttp.getUrl())

winform.buttonStart.oncommand = function(id,event){
    winform.editLog.print("开始")
        timer.enable();
}

winform.buttonStop.oncommand = function(id,event){
    winform.editLog.print("停止")
        timer.disable();
}

winform.show()
win.loopMessage();


我们可以看到,这个程序是用定时器每隔三秒开出一期,每期的万位、千位、百位、十位、个位,都是从0至9这十个数字中随机选取一个,开奖后直接输出到软件界面的文本框,程序里还开了一个HTTP服务端,外部软件可以通过GET“http://127.0.0.1/”来获取到开奖的信息,在浏览器中直接打开此网址就可以看到它是JSON格式的文本


{
    "开奖号码":"2,1,1,6,1",
    "开奖时间":"2019-08-11 10:24:51",
    "开奖期号":"2019081101071"
}
这样我们就写好了一个测试用的开奖机,后面的提高胜率的思路都建立在这些随机的开奖数据上,请关注下一篇。
游客,如果您要查看本帖隐藏内容请回复

b7201827e03e40d41b0678e437c084f9.jpg (92.46 KB, 下载次数: 33)

接2

文章源自 博路发论坛 原创,转载请注明:
本文标题:接2
本文地址:http://www.bete68.com/thread-8073-1-1.html



上一篇:干货《如何提高彩*&()票胜率》系列2
下一篇:这个我比较感兴趣
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

Archiver|手机版|博路发 ( 菲律宾ICP备73292958号-1

GMT+8, 2024-5-5 09:02 , Processed in 0.164640 second(s), 26 queries .

Powered by 博路发Copyright @ 2010-2015

快速回复 返回顶部 返回列表