|
软件展示
[e=4].版本 2
.支持库 iext
.程序集 窗口程序集1
.程序集变量 n, 整数型
.程序集变量 a, 整数型
.程序集变量 b, 整数型
.程序集变量 c, 整数型
.子程序 _图形按钮1_被单击, , , 石头
时钟1.时钟周期 = 0
n = 取随机数 (1, 3)
.判断开始 (n = 1)
图片框1.图片 = #石头
_启动窗口.标题 = “都一样 平局”
.判断 (n = 2)
图片框1.图片 = #剪刀
_启动窗口.标题 = “加一分”
a = a + 1
透明标签2.标题 = “玩家” + 到文本 (a) + “分”
.判断 (n = 3)
图片框1.图片 = #布
_启动窗口.标题 = “运气真差”
b = b + 1
透明标签3.标题 = “电脑” + 到文本 (b) + “分”
.默认
.判断结束
.判断开始 (a = 10 且 a ≥ b)
信息框 (“你好棒!赢得漂亮”, 0, )
载入 (窗口1, , 真)
.判断 (b = 10 且 b ≥ a)
信息框 (“诶呀!你输了”, 0, )
.默认
.判断结束
.子程序 _图形按钮2_被单击, , , 剪刀
时钟1.时钟周期 = 0
n = 取随机数 (1, 3)
.判断开始 (n = 1)
图片框1.图片 = #石头
_启动窗口.标题 = “运气真差”
b = b + 1
透明标签3.标题 = “电脑” + 到文本 (b) + “分”
.判断 (n = 2)
图片框1.图片 = #剪刀
_启动窗口.标题 = “都一样 平局”
.判断 (n = 3)
图片框1.图片 = #布
_启动窗口.标题 = “加一分”
a = a + 1
透明标签2.标题 = “玩家” + 到文本 (a) + “分”
.默认
.判断结束
.判断开始 (a = 10 且 a ≥ b)
信息框 (“你好棒!赢得漂亮”, 0, )
载入 (窗口1, , 真)
.判断 (b = 10 且 b ≥ a)
信息框 (“诶呀!你输了”, 0, )
.默认
.判断结束
.子程序 _图形按钮3_被单击, , , 布
时钟1.时钟周期 = 0
n = 取随机数 (1, 3)
.判断开始 (n = 1)
图片框1.图片 = #石头
_启动窗口.标题 = “加一分”
a = a + 1
透明标签2.标题 = “玩家” + 到文本 (a) + “分”
.判断 (n = 2)
图片框1.图片 = #剪刀
_启动窗口.标题 = “运气真差”
b = b + 1
透明标签3.标题 = “电脑” + 到文本 (b) + “分”
.判断 (n = 3)
图片框1.图片 = #布
_启动窗口.标题 = “都一样 平局”
.默认
.判断结束
.判断开始 (a = 10 且 a ≥ b)
信息框 (“你好棒!赢得漂亮”, 0, )
载入 (窗口1, , 真)
.判断 (b = 10 且 b ≥ a)
信息框 (“诶呀!你输了”, 0, )
.默认
.判断结束
.子程序 _时钟1_周期事件
n = 取随机数 (1, 3)
.如果真 (n = 1)
图片框1.图片 = #石头
.如果真结束
.如果真 (n = 2)
图片框1.图片 = #剪刀
.如果真结束
.如果真 (n = 3)
图片框1.图片 = #布
.如果真结束
.子程序 _时钟2_周期事件
透明标签1.文本颜色 = 取颜色值 (取随机数 (0, 225), 取随机数 (0, 225), 取随机数 (0, 225))
.子程序 _按钮1_被单击
写到文件 (“D:\音乐.mp3”, #音乐)
播放MP3 (-1, “D:\音乐.mp3”)
.子程序 _按钮2_被单击
透明标签2.标题 = “玩家0分”
透明标签3.标题 = “电脑0分”
连续赋值 (0, a, b)
透明标签2.取消重画 ()
透明标签2.取消重画 ()
.子程序 _时钟4_周期事件
透明标签4.标题 = 到文本 (取现行时间 ())
http://pan.baidu.com/s/1qWoaq7q
|
|