易语言小格子按钮图片

A ＝ 取事件组件 ()
.判断开始 (A.标题 ＝ “置标题”)
初始值 ＝ 初始值 ＋ 100
.计次循环首 (100, B)
A ＝ 取标记组件 (B ＋ 2)
A.图片 ＝ { }
A.标题 ＝ “按钮” ＋ 到文本 (初始值 ＋ B)
.计次循环尾 ()
.判断 (A.标题 ＝ “置图片”)
.如果 (图片索引 ＝ 0)
图片索引 ＝ 1
位图一.载入数据 (#图片2)
.否则
图片索引 ＝ 0
位图一.载入数据 (#图片1)
.如果结束
.计次循环首 (100, B)
A ＝ 取标记组件 (B ＋ 2)
位图数组 [B].创建 (按钮1.宽度, 按钮1.高度, 24, )
位图一.复制到 (((B － 1) ％ 10) × 按钮1.宽度, ((B － 1) ＼ 10) × 按钮1.高度, 按钮1.宽度, 按钮1.高度, 位图数组 [B], 0, 0, )
A.图片 ＝ 位图数组 [B].取位图数据 ()
处理事件 ()
.计次循环尾 ()