精易论坛

标题: 新手刚学官方第二课:猜数字,稍微改了下 [打印本页]

作者: say88dst    时间: 2019-10-22 17:45
标题: 新手刚学官方第二课:猜数字,稍微改了下
新手刚学官方第二课:猜数字,稍微改了下,分享一下自己的喜悦。

.版本 2
.程序集 窗口程序集_启动窗口
.程序集变量 剩余次数, 整数型
.程序集变量 随机数, 整数型
.子程序 __启动窗口_创建完毕
置随机数种子 ()
随机数 = 取随机数 (0, 10)
.子程序 _按钮_确定_被单击
剩余次数 = 剩余次数 + 1
.判断开始 (剩余次数 ≥ 3)
    信息框 (“你的次数用完了!” + #换行符 + “正确数字是” + 到文本 (随机数), 0, , )
    剩余次数 = 0
    随机数 = 取随机数 (0, 10)
    按钮_确定.禁止 = 假
    编辑框1.内容 = “”
    编辑框1.获取焦点 ()
.判断 (到整数 (编辑框1.内容) > 随机数)
    信息框 (“你猜的数值大了”, 0, , )
.判断 (到整数 (编辑框1.内容) < 随机数)
    信息框 (“你猜的数值小了”, 0, , )
.默认
    信息框 (“你猜对了”, 0, , )
    剩余次数 = 0
    随机数 = 取随机数 (0, 10)
    按钮_确定.禁止 = 假
    编辑框1.内容 = “”
    编辑框1.获取焦点 ()
.判断结束
.判断开始 (到整数 (3 - 剩余次数) < 0)
    _启动窗口.标题 = “”
.默认
    _启动窗口.标题 = 到文本 (“你还可以猜” + 到文本 (3 - 剩余次数) + “次”)
.判断结束

.子程序 _按钮_重新生成_被单击
剩余次数 = 0
随机数 = 取随机数 (0, 10)
按钮_确定.禁止 = 假
编辑框1.内容 = “”
编辑框1.获取焦点 ()


360截图20191022174156420.jpg (7.97 KB, 下载次数: 3)

360截图20191022174156420.jpg

猜数字源码.e

4.7 KB, 下载次数: 8, 下载积分: 精币 -2 枚


作者: 菜就多多练    时间: 2019-10-22 17:51
加油加油加油加油加油加油加油
作者: bing1227    时间: 2019-10-22 18:08
加油加油加油加油加油加油加油加油加油加油
作者: fyeekuang    时间: 2019-10-23 10:55
加油加油加油加油加油加油加油
作者: 垦荒公社    时间: 2019-10-23 16:45
同时萌新  一起交流呀 兄台
作者: 骑士学长    时间: 2019-10-29 09:11
谢谢分享支持
作者: 罗志祥    时间: 2020-3-19 12:42
正在学!!哈哈哈
作者: 吴彦希    时间: 2023-7-9 16:50
加油加油加油加油加油加油加油




欢迎光临 精易论坛 (https://125.confly.eu.org/) Powered by Discuz! X3.4