易语言 猜数字游戏

来源:互联网 发布:水星路由器破解软件 编辑:程序博客网 时间:2024/06/11 01:07
.版本 2


.程序集 窗口程序集_启动窗口
.程序集变量 程序集随机数, 整数型


.子程序 __启动窗口_创建完毕


置随机数种子 ()
程序集随机数 = 取随机数 (0, 99)
输出调试文本 (程序集随机数)




.子程序 _按钮_确定_被单击


.' 如果 (到整数 (编辑框_输入内容.内容) > 程序集随机数)
    ' 信息框 (“输入的数字太大了”, 0, , )


.否则
    .' 如果 (到整数 (编辑框_输入内容.内容) < 程序集随机数)
        ' 信息框 (“输入的数字太小了”, 0, , )


    .否则
        ' 信息框 (“输入正确”, 0, , )
    .如果结束


.如果结束


.判断开始 (到整数 (编辑框_输入内容.内容) > 程序集随机数)
    信息框 (“输入的数字太大了”, 0, , )
.判断 (到整数 (编辑框_输入内容.内容) < 程序集随机数)
    信息框 (“输入的数字太小了”, 0, , )
.默认
    信息框 (“输入正确”, 0, , )
.判断结束






.子程序 _按钮_重新生成_被单击


程序集随机数 = 取随机数 (0, 99)
输出调试文本 (程序集随机数)
编辑框_输入内容.内容 = “”
原创粉丝点击