.版本 2
.支持库 HtmlView
.支持库 internet
.程序集 窗口程序集1
.程序集变量 x, 整数型
.程序集变量 y, 整数型
.子程序 _按钮_读取_被单击
超文本浏览框1.地址 ＝ “v/CodeImg.aspx”
画板00.底图 ＝ HTTP读文件 (“v/CodeImg.aspx”)
.子程序 _按钮_分割_被单击
x ＝ 1
y ＝ 1
.计次循环首 (275, )
.判断开始 (y ≥ 20)
跳出循环 ()
.判断 (x ≥ 13)
y ＝ y ＋ 1
x ＝ 0
.默认
x ＝ x ＋ 1
.判断结束
.判断开始 (画板00.取点 (x, y) ＝ #黑)
画板01.画点 (x, y, #黑)
.判断 (画板00.取点 (x, y) ＝ #红)
画板01.画点 (x, y, #红)
.判断 (画板00.取点 (x, y) ＝ #蓝)
画板01.画点 (x, y, #蓝)
.判断 (画板00.取点 (x, y) ＝ #墨绿)
画板01.画点 (x, y, #墨绿)
.默认
画板01.画点 (x, y, #白)
.判断结束
.计次循环尾 ()
x ＝ 1
y ＝ 1
.计次循环首 (275, )
.判断开始 (y ≥ 20)
跳出循环 ()
.判断 (x ≥ 13)
y ＝ y ＋ 1
x ＝ 1
.默认
x ＝ x ＋ 1
.判断结束
.
判断开始 (画板00.取点 (x ＋ 13, y) ＝ #黑)
画板02.画点 (x, y, #黑)
.判断 (画板00.取点 (x ＋ 13, y) ＝ #红)
画板02.画点 (x, y, #红)
.判断 (画板00.取点 (x ＋ 13, y) ＝ #蓝)
画板02.画点 (x, y, #蓝)
.判断 (画板00.取点 (x ＋ 13, y) ＝ #墨绿)
画板02.画点 (x, y, #墨绿)
.默认
画板02.画点 (x, y, #白)
.判断结束
.
计次循环尾 ()
x ＝ 1
y ＝ 1
.计次循环首 (275, )
.判断开始 (y ≥ 20)
跳出循环 ()
.判断 (x ≥ 13)
y ＝ y ＋ 1
x ＝ 2
.默认
x ＝ x ＋ 1
.
判断结束
.判断开始 (画板00.取点 (x ＋ 27, y) ＝ #黑)
画板03.画点 (x, y, #黑)
.判断 (画板00.取点 (x ＋ 27, y) ＝ #红)
画板03.画点 (x, y, #红)
.判断 (画板00.取点 (x ＋ 27, y) ＝ #蓝)
画板03.画点 (x, y, #蓝)
.判断 (画板00.取点 (x ＋ 27, y) ＝ #墨绿)
画板03.画点 (x, y, #墨绿)
.默认
画板03.画点 (x, y, #白)
.
判断结束
.计次循环尾 ()
x ＝ 1
y ＝ 1
.计次循环首 (275, )
.判断开始 (y ≥ 20)
跳出循环 ()
.判断 (x ≥ 10)
y ＝ y ＋ 1
x ＝ 3
.默认
x ＝ x ＋ 1
.判断结束
.判断开始 (画板00.取点 (x ＋ 40, y) ＝ #黑)
画板04.画点 (x, y, #黑)
.判断 (画板00.取点 (x ＋ 40, y) ＝ #红)
画板04.画点 (x, y, #红)
.判断 (画板00.取点 (x ＋ 40, y) ＝ #蓝)
画板04.画点 (x,
y, #蓝)
.判断 (画板00.取点 (x ＋ 40, y) ＝ #墨绿)
画板04.画点 (x, y, #墨绿)
.
默认
画板04.画点 (x, y, #白)
.判断结束
.计次循环尾 ()
x ＝ 0
y ＝ 0
.子程序 _按钮_写文本_被单击易语言轰炸机源码最新

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。