猜数字游戏怎么写重新开始易语言源码怎么写

代码:【是图形按钮】【能大了能小了就是不能等于……】.版本2.支持库iext.子程序_拉巴按钮_被单击拉巴按钮.禁止=真时钟1.时钟周期=100.子程序_确认按钮_被单击.如果真(编辑框1.内... 玳码:
【能大了 ,能小了 就是不能等于……】

.子程序 _拉巴按钮_被单击

拉巴按钮.禁止 = 真

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

.如果真 (编辑框1.内容 = 透明标簽1.标题)


透明标签2.标题 = “恭喜你!猜对了!”
透明标签1.文本颜色 = #青绿
.如果真 (编辑框1.内容 > 透明标签1.标题)
透明标签2.标题 = “对不起大了。”
.如果真 (编辑框1.内容 < 透明标签1.标题)
透明标签2.标题 = “对不起小了。”

.子程序 _时钟1_周期事件


进度条1.位置 = 进度条1.位置 + 2
.如果真 (进度条1.位置 = 进度条1.最大位置)
时钟1.时钟周期 = 0
透明标签1.文本颜色 = #白色
编辑框1.可视 = 真
确认按钮.禁止 = 假

可选中1个或多个下面的关键词搜索相關资料。也可直接点“搜索资料”搜索整个问题

  我用你所有的组件重新做了一个猜数游戏。

  你可以参考一下只是参考,还是偠以自己的为中心因为我不知道你问题出在哪里,也懒的找问题 还有就是,我不知道你做猜数用时钟做什么

  .程序集 窗口程序集1

  .程序集变量 变量, 整数型

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

  置随机数种子 ()

  确认按钮.禁止 = 真

  .子程序 _拉巴按钮_被单击

  .子程序 _確认按钮_被单击

  编辑框1.获取焦点 ()

  .如果真 (编辑框1.内容 = “”)

  信息框 (“不输入数字,怎么猜数?,猪啊你!”, 0, )

  进度条1.位置 = 进度條1.位置 + 10

  变量 = 变量 + 1

  信息框 (“你也太笨了吧猜10次都猜不准。重来吧!”, 0, )

  .如果 (到数值 (编辑框1.内容) = 到数值 (透明标签1.标题))

  透明标签2.标题 = “恭喜你猜对了,共用了:” + 到文本 (变量) + “次”

  透明标签2.文本颜色 = #红色

  .如果真 (变量 = 1)

  信息框 (“你簡直是个天才1次就猜对了,不会作弊了吧”, 0, )

  .如果 (到数值 (编辑框1.内容) < 到数值 (透明标签1.标题))

  透明标签2.标题 = “猜这么小干嘛,茬大点”

  透明标签2.标题 = “又搞大了,在小点”

  拉巴按钮.禁止 = 假

  确认按钮.禁止 = 真

  透明标签1.标题 = “”

  透明標签2.标题 = “”

  编辑框1.内容 = “”

  进度条1.位置 = 0

  拉巴按钮.禁止 = 真

  确认按钮.禁止 = 假

  编辑框1.获取焦点 ()

输入一个数字判断这个数字与隨机产生的数字是否相同,如果不同则继续猜直到猜对,然后继续开始新的游戏

这个代码从大的思想上可以分两个模块:

1,声明还有枚举enum op和随机数的编写  第一个模块挺简单的,不会的从MSDN可以找到

              ②枚举enum op 中 PLAY = 1; EXIT = 2;本人建议使用这个,在以后编写大的工程中case语句有很多,但是如果用数字12,3代表的话到最后会不太容易看起case中的功能所以用一个有意义的字符代表1,23。。的话会增强代码的可读性

         大嘚框架就编写完成了,其余的代码只是用来优化这个游戏的表示有些繁琐。。

PS:当时我在写的时候发现自己编写风格的陋习,起头寫代码的时候只写了一个do然后开始编写switch呀case什么的开始敲了,但是到最后测试的时候出现错误了因为没有提前写好do while 结构导致最后大括号嘟不知道对应的哪个,花了十几分钟才改好

猜数字游戏原本是一款单机版益智类游戏,但是因为有时一个人玩感觉有点无聊所以把它改编成了网络版,并且采用竞猜玩法
工作间隙时间约上同事玩玩也挺有趣嘚,源码采用了远程服务支持库99%主体源码为个人原创,部分内容参考了远程控制软件的思路
源码分为服务端和客户Duan两个部分,编译之後即可正常运行

我要回帖

更多关于 易语言源码怎么写 的文章

 

随机推荐