博路发

标题: 接2 [打印本页]

作者: 201787h    时间: 2019-12-18 00:44
标题: 接2
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

作者: long0903    时间: 2019-12-18 01:06
给你顶起来,加油
作者: 916607029    时间: 2019-12-18 10:04
回复主题
关闭
RE:
作者: 专业刷水三十年    时间: 2019-12-18 11:26
提示: 作者被禁止或删除 内容自动屏蔽
作者: 528949239    时间: 2019-12-18 14:24
牛逼。。。。。。。
作者: zhang8013991    时间: 2019-12-18 17:17
观摩一下大神
作者: wangzhelanmeng    时间: 2019-12-18 21:06
给你顶起来,加油
作者: haokangtw    时间: 2019-12-19 14:26
好好学习, 天天向上。
作者: a22155    时间: 2019-12-19 22:16
6666666666666666666666
作者: 907795088    时间: 2019-12-20 22:06
感谢分享,支持一
作者: hkhk8hk    时间: 2019-12-26 00:00
dddddddddddddd
作者: fu5201    时间: 2019-12-28 13:16
给你顶起来,加油
作者: 阿帕奇    时间: 2020-1-11 09:47
谢谢分享,快速升分!
作者: huige0725    时间: 2020-1-11 18:41

给你顶起来,加油
作者: juc1024    时间: 2020-2-13 20:14
帖子里面藏了什么?
作者: m5764957    时间: 2020-3-3 09:14
提示: 作者被禁止或删除 内容自动屏蔽
作者: mqqmuvo    时间: 2020-3-4 03:52
看来楼主是高手
作者: hahaha666    时间: 2020-3-4 07:03

作者: 562228223    时间: 2020-6-8 05:27
提示: 作者被禁止或删除 内容自动屏蔽
作者: a545481142    时间: 2020-6-21 15:02
还有同行搞吗·····
作者: ssh354422641    时间: 2021-8-21 02:55
指点一下




欢迎光临 博路发 (http://www.bete68.com/) Powered by Discuz! X3.2