精易论坛

标题: 可选难度的简单猜数字游戏 [打印本页]

作者: xujiansong2008 时间: 2019-2-7 10:33
标题: 可选难度的简单猜数字游戏
.版本 2
.程序集窗口程序集_启动窗口
.程序集变量系统随机数, 整数型
.子程序 __启动窗口_创建完毕

.子程序 _编辑框1_按下某键, 逻辑型
.参数键代码, 整数型
.参数功能键状态, 整数型
.如果真 (键代码＝ #回车键)
_按钮1_被单击 ()
.如果真结束

.子程序 _单选框1_被单击
置随机数种子 ()
系统随机数＝取随机数 (1, 10)
标签1.标题＝ “请猜1-10的数字”
.子程序 _按钮1_被单击
.判断开始 (单选框1.选中＝假且单选框2.选中＝假且单选框3.选中＝假)
信息框 (“请选择难度”, 0, , )
返回 ()
.默认
.判断结束
.判断开始 (编辑框1.内容＝ “”)
信息框 (“你还没有输入数字”, 0, , )
返回 ()
.默认
.判断结束
.判断开始 (到数值 (编辑框1.内容) ＞系统随机数)
信息框 (“大了”, 0, , )
编辑框1.内容＝ “”
.判断 (到数值 (编辑框1.内容) ＜系统随机数)
信息框 (“小了”, 0, , )
编辑框1.内容＝ “”
.默认
信息框 (“恭喜你，答对了！” ＋ #换行符＋ “请你再玩一次”, 0, , )
编辑框1.内容＝ “”
.判断开始 (单选框1.选中＝真)
      置随机数种子 ()
      系统随机数＝取随机数 (1, 10)
.判断 (单选框2.选中＝真)
      置随机数种子 ()
      系统随机数＝取随机数 (1, 20)
.判断 (单选框3.选中＝真)
      置随机数种子 ()
      系统随机数＝取随机数 (1, 100)
.默认
.判断结束
.判断结束

.子程序 _单选框2_被单击
置随机数种子 ()
系统随机数＝取随机数 (1, 20)
标签1.标题＝ “请猜1-20的数字”
.子程序 _单选框3_被单击
置随机数种子 ()
系统随机数＝取随机数 (1, 100)
标签1.标题＝ “请猜1-100的数字”

猜数字源码.e

6.04 KB, 下载次数: 23, 下载积分: 精币 -2 枚

简单猜数字游戏源码

作者: Foreign000 时间: 2019-2-7 15:01
谢谢楼主的分享

作者: 浩蛋 时间: 2019-2-7 15:14
先学习再说了，哈

作者: 外星星人 时间: 2019-2-11 14:21
先学习再说了，哈

作者: kyo9766 时间: 2019-2-12 16:10
学习学习原理，感谢分享

作者: uxdxdg 时间: 2019-4-23 21:28
kkkkkkkkkkkkkkkkkkkk

作者: 吴彦希 时间: 2023-7-9 16:51
加油加油加油加油加油加油加油

欢迎光临精易论坛 (https://125.confly.eu.org/)