易语言猜数游戏源码

.程序集程序集1

.子程序_启动子程序, 整数型, , 本子程序在程序启动后最先执行

.局部变量a, 整数型

.局部变量b, 整数型

.局部变量c, 整数型

.局部变量d, 文本型

标准输出(, “猜数游戏，Let's go!”)

.循环判断首()

a ＝取启动时间()

a ＝a ％100

c ＝1

标准输出(, #换行符＋#换行符＋#换行符＋“数已经藏好了，请您猜猜吧！（偷偷告诉您，我藏的是0---99的数哦）”＋#换行符＋#换行符)

标准输出(, #换行符)

.判断循环首(真)

标准输出(, “您猜这个数是：”)

b ＝到数值(标准输入())

.如果(a ＝b)

标准输出(, #换行符＋“恭喜您，猜对了！”)

标准输入()

跳出循环()

.否则

.如果(b ＞a)

标准输出(, “您猜大了，请再试试”＋#换行符)

.否则

标准输出(, “您猜小了，请再试试”＋#换行符)

.如果结束

c ＝c ＋1

.判断循环尾()

标准输出(, #换行符＋“您猜出这个数共猜了”＋到文本(c) ＋“次”)

标准输出(, #换行符＋“退出游戏请按q键”)

d ＝标准输入()

.循环判断尾(d ≠“q”且d ≠“Q”)

标准输出(, #换行符＋#换行符＋#换行符＋#换行符＋“谢谢您对本游戏的喜爱，欢迎下次继续使用！”＋#换行符＋#换行符＋#换行符)

延时(2500)

返回(0) ' 可以根据您的需要返回任意数值