# 公司81名员工随机抽奖,每个号码只能中奖一次
gui = GUI()
gui.HideConsoleWindow()
m = MATH()
zhongjiang = []
# 设计交互界面
title = "员工随机抽奖"
size = [60,15,50,13]
button = ["开始","button",20,2,12,1]
text = ["中奖号码:","text",20,5,13,1]
list = [title,size,button,text] # 打包界面设计元素
num = gui.Fine(list) # 创建界面,返回资源ID
while gui.FineClosed(num) != -1 # 检测窗口关闭消息
{
PowerDown(3) # 节能设置
if gui.FineReady(num) == -1 {continue} # 没有按键按下,跳转到20行
gui.SendText(num,[""]) # 清空显示内容
count = 0 # 计数器
box = gui.MessageBox("","停止") # 创建消息框
while gui.MessageBoxClosed(box) != -1 # 检测关闭消息框消息
{
count = count + 1 # 计数器 +1
temp = itoc(count) # 将计数器的值转化为字符串
gui.SendMessageBox(box,temp) # 显示计数器的值
PowerDown(3)
}
while True
{
x = m.rand(1,81) # 取[1,81]之间的随机数(包含1和81)
if not zhongjiang.contains(x)
{
zhongjiang.append(x) # 列表zhongjiang中,不包含x时,退出循环,同一个号码不会中奖两次
break
}
}
x = itoc(x) # 将随机数转化为字符串
gui.SendText(num,[x]) # 在中将框内显示中奖号码
}
temp = sprint(zhongjiang) # 把所有中奖号码的列表转化为字符串
box = gui.MessageBox(temp,"确定") # 创建消息框
while gui.MessageBoxClosed(box) != -1 {PowerDown(3)} # 检测关闭消息框消息