易语言制作连连看小游戏的代码
图片资源表
.版本2 .图片卡通 .图片横线 .图片竖线 .图片左上 .图片右上 .图片左下 .图片右下 .图片苹果,,背景图
连连看的代码
.版本2 .程序集窗口程序集1 .程序集变量显示图片,字节型,,"0" .程序集变量上次移动,字节型 .程序集变量上次点击,字节型 .程序集变量横数,字节型 .程序集变量竖数,字节型 .程序集变量图片数,字节型 .程序集变量可消除,文本型,,"0" .程序集变量剩下图片数,字节型 .子程序__启动窗口_创建完毕 画板1.底图＝#苹果 画板4.底图＝#卡通 _初级_被选择() .子程序初始化 .局部变量图片1,字节型,,"0" .局部变量容器1,整数型 .局部变量随机,整数型 画板1.禁止＝假 时间进度条.可视＝真 时间进度条.最大位置＝180 时间进度条.位置＝180 时钟1.时钟周期＝1000 重定义数组(图片1,假,横数×竖数) 重定义数组(显示图片,假,横数×竖数) .计次循环首(横数×竖数,容器1) .如果(容器1≤(横数×竖数＼图片数)×图片数) 图片1[容器1]＝(容器1－1)＼4 .否则 图片1[容器1]＝(容器1－(横数×竖数＼图片数)×图片数－1)＼2 .如果结束 .计次循环尾() 置随机数种子() .计次循环首(横数×竖数,容器1) 随机＝取随机数(1,取数组成员数(图片1)) 显示图片[容器1]＝图片1[随机] 删除成员(图片1,随机,1) .计次循环尾() 剩下图片数＝横数×竖数 画图() 计算可消除() .子程序画图 .局部变量容器1,整数型 画板1.清除(,,,) .计次循环首(横数×竖数,容器1) .如果真(显示图片[容器1]≠255) 画板4.复制(显示图片[容器1]×39,0,39,39,画板1,(选择(容器1％横数＝0,横数,容器1％横数)＋(18－横数)÷2－1)×39,(选择(容器1％横数＝0,容器1＼横数,容器1＼横数＋1)＋(13－竖数－1)÷2)×39,) .如果真结束 .计次循环尾() .子程序_画板1_鼠标位置被移动,逻辑型 .参数横向位置,整数型 .参数纵向位置,整数型 .参数功能键状态,整数型 .局部变量横,字节型 .局部变量竖,字节型 .局部变量上次横,字节型 .局部变量上次竖,字节型 横＝横向位置＼39＋1 竖＝纵向位置＼39＋1 .如果真(上次移动≠横－(18－横数)÷2＋(竖－(14－竖数)÷2－1)×横数) .如果(横＞(18－横数)÷2且横≤(18－横数)÷2＋横数且竖＞(14－竖数)÷2且竖≤(14－竖数)÷2＋竖数) .如果真(上次移动≠0且上次移动≠上次点击) 上次横＝取横坐标(上次移动)＋(18－横数)÷2 上次竖＝取纵坐标(上次移动)＋(14－竖数)÷2 画板4.复制(显示图片[上次移动]×39,0,39,39,画板1,上次横×39－39,上次竖×39－39,) 上次移动＝0 .如果真结束 .如果(显示图片[横－(18－横数)÷2＋(竖－(14－竖数)÷2－1)×横数]≠255) 画板5.复制(0,0,39,39,画板1,横×39－39,竖×39－39,#位与) 上次移动＝横－(18－横数)÷2＋(竖－(14－竖数)÷2－1)×横数 .否则 上次移动＝0 .如果结束 .否则 .如果真(上次移动≠0且上次移动≠上次点击) 上次横＝取横坐标(上次移动)＋(18－横数)÷2 上次竖＝取纵坐标(上次移动)＋(14－竖数)÷2 画板4.复制(显示图片[上次移动]×39,0,39,39,画板1,上次横×39－39,上次竖×39－39,) 上次移动＝0 .如果真结束 .如果结束 .如果真结束 .子程序_画板1_鼠标左键被按下,逻辑型 .参数横向位置,整数型 .参数纵向位置,整数型 .参数功能键状态,整数型 .局部变量横,字节型 .局部变量竖,字节型 .局部变量上次横,字节型 .局部变量上次竖,字节型 .局部变量容器1 .局部变量配对文本,文本型 .局部变量可以消除,逻辑型 横＝横向位置＼39＋1 竖＝纵向位置＼39＋1 .如果(横＞(18－横数)÷2且横≤(18－横数)÷2＋横数且竖＞(14－竖数)÷2且竖≤(14－竖数)÷2＋竖数) .如果(上次点击＝0) 上次点击＝横－(18－横数)÷2＋(竖－(14－竖数)÷2－1)×横数 .如果(显示图片[上次点击]≠255) .如果真(音效.选中) 播放音乐(#选中,) .如果真结束 画板6.复制(0,0,39,39,画板1,横×39－39,竖×39－39,#位与) .否则 .如果真(音效.选中) 播放音乐(#空击,) .如果真结束 .如果结束 .否则 .如果(上次点击≠横－(18－横数)÷2＋(竖－(14－竖数)÷2－1)×横数) .如果(显示图片[上次点击]≠显示图片[横－(18－横数)÷2＋(竖－(14－竖数)÷2－1)×横数]) .如果真(音效.选中) 播放音乐(#连错,) .如果真结束 上次横＝取横坐标(上次点击)＋(18－横数)÷2 上次竖＝取纵坐标(上次点击)＋(14－竖数)÷2 画板4.复制(显示图片[上次点击]×39,0,39,39,画板1,上次横×39－39,上次竖×39－39,) 上次点击＝0 上次移动＝0 .否则 .如果(上次点击＞横－(18－横数)÷2＋(竖－(14－竖数)÷2－1)×横数) 配对文本＝到文本(横－(18－横数)÷2＋(竖－(14－竖数)÷2－1)×横数)＋“,”＋到文本(上次点击) .否则 配对文本＝到文本(上次点击)＋“,”＋到文本(横－(18－横数)÷2＋(竖－(14－竖数)÷2－1)×横数) .如果结束 .计次循环首(取数组成员数(可消除),容器1) .如果真(可消除[容器1]＝配对文本) 可以消除＝真 跳出循环() .如果真结束 .计次循环尾() .如果(可以消除＝真) .如果(上次点击＞横－(18－横数)÷2＋(竖－(14－竖数)÷2－1)×横数) 连线(横－(18－横数)÷2＋(竖－(14－竖数)÷2－1)×横数,上次点击) .否则 连线(上次点击,横－(18－横数)÷2＋(竖－(14－竖数)÷2－1)×横数) .如果结束 可以消除＝假 .否则 .如果真(音效.选中) 播放音乐(#连错,) .如果真结束 上次横＝取横坐标(上次点击)＋(18－横数)÷2 上次竖＝取纵坐标(上次点击)＋(14－竖数)÷2 画板4.复制(显示图片[上次点击]×39,0,39,39,画板1,上次横×39－39,上次竖×39－39,) 上次点击＝0 上次移动＝0 .如果结束 .如果结束 .否则 .如果真(音效.选中) 播放音乐(#连错,) .如果真结束 画板4.复制(显示图片[上次点击]×39,0,39,39,画板1,横×39－39,竖×39－39,) 上次点击＝0 上次移动＝0 .如果结束 .如果结束 .否则 .如果真(音效.选中) 播放音乐(#空击,) .如果真结束 .如果结束 .子程序_画板1_鼠标右键被按下,逻辑型 .参数横向位置,整数型 .参数纵向位置,整数型 .参数功能键状态,整数型 .局部变量上次横,字节型 .局部变量上次竖,字节型 .如果真(音效.选中) 播放音乐(#取消,) .如果真结束 .如果真(上次点击≠0) 上次横＝取横坐标(上次点击)＋(18－横数)÷2 上次竖＝取纵坐标(上次点击)＋(14－竖数)÷2 画板4.复制(显示图片[上次点击]×39,0,39,39,画板1,上次横×39－39,上次竖×39－39,) 上次点击＝0 .如果真结束 .子程序_初级_被选择 横数＝12 竖数＝6 图片数＝18 初级.选中＝真 中级.选中＝假 高级.选中＝假 .子程序_中级_被选择 横数＝14 竖数＝8 图片数＝28 初级.选中＝假 中级.选中＝真 高级.选中＝假 .子程序_高级_被选择 横数＝16 竖数＝10 图片数＝36 初级.选中＝假 中级.选中＝假 高级.选中＝真 .子程序_卡通_被选择 .局部变量容器1,整数型 卡通.选中＝真 生活.选中＝假 画板4.底图＝#卡通 .如果真(开始.禁止＝真) 画图() .如果真结束 .子程序_时钟1_周期事件 时间进度条.位置＝时间进度条.位置－1 .如果真(时间进度条.位置＝0) 时钟1.时钟周期＝0 信息框(“游戏时间到，你失败了！”,0,) .如果真结束 .子程序_开始_被选择 初始化() 连续赋值(真,开始.禁止,初级.禁止,中级.禁止,高级.禁止) 连续赋值(假,放弃.禁止,提示.禁止,暂停.禁止,重新洗牌.禁止) .子程序_放弃_被选择 时间进度条.可视＝假 时钟1.时钟周期＝0 连续赋值(假,开始.禁止,初级.禁止,中级.禁止,高级.禁止) 连续赋值(真,放弃.禁止,提示.禁止,暂停.禁止,重新洗牌.禁止) .子程序取横坐标,整数型 .参数数值,字节型 .局部变量返回值,字节型 返回值＝数值％横数 .如果真(返回值＝0) 返回值＝横数 .如果真结束 返回(返回值) .子程序取纵坐标,整数型 .参数数值,字节型 .局部变量返回值,字节型 返回值＝(数值－1)＼横数＋1 返回(返回值) .子程序计算可消除 .局部变量容器1,整数型 .局部变量容器2,整数型 .局部变量横1,字节型 .局部变量横2,字节型 .局部变量竖1,字节型 .局部变量竖2,字节型 .局部变量容器3,整数型 .局部变量可连,逻辑型 .局部变量容器4,整数型 重定义数组(可消除,假,0) .计次循环首(横数×竖数,容器1) .如果真(显示图片[容器1]＝255) 到循环尾() .如果真结束 横1＝取横坐标(容器1) 竖1＝取纵坐标(容器1) 可连＝假 .变量循环首(容器1＋1,横数×竖数,1,容器2) .如果真(显示图片[容器1]＝显示图片[容器2]) 横2＝取横坐标(容器2) 竖2＝取纵坐标(容器2) .判断开始(横1＝横2) .如果(竖2－竖1＝1) 可连＝真 .否则 .变量循环首(竖1＋1,竖2－1,1,容器3) .如果(显示图片[横1＋(容器3－1)×横数]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果真(可连＝假) .如果(横1＝1) 可连＝真 .否则 .变量循环首(横1－1,1,-1,容器4) .如果(显示图片[容器4＋(竖1－1)×横数]≠255或显示图片[容器4＋(竖2－1)×横数]≠255) 可连＝假 跳出循环() .否则 .变量循环首(竖1＋1,竖2－1,1,容器3) .如果(显示图片[容器4＋(容器3－1)×横数]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果真(可连＝假) .如果真(容器4＝1) 可连＝真 .如果真结束 .如果真结束 .如果真(可连＝真) 跳出循环() .如果真结束 .如果结束 .变量循环尾() .如果结束 .如果真(可连＝假) .如果(横1＝横数) 可连＝真 .否则 .变量循环首(横1＋1,横数,1,容器4) .如果(显示图片[容器4＋(竖1－1)×横数]≠255或显示图片[容器4＋(竖2－1)×横数]≠255) 可连＝假 跳出循环() .否则 .变量循环首(竖1＋1,竖2－1,1,容器3) .如果(显示图片[容器4＋(容器3－1)×横数]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果真(可连＝假) .如果真(容器4＝横数) 可连＝真 .如果真结束 .如果真结束 .如果真(可连＝真) 跳出循环() .如果真结束 .如果结束 .变量循环尾() .如果结束 .如果真结束 .如果真结束 .如果结束 .判断(竖1＝竖2) .如果(横2－横1＝1) 可连＝真 .否则 .变量循环首(横1＋1,横2－1,1,容器3) .如果(显示图片[(竖1－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果真(可连＝假) .如果(竖1＝1) 可连＝真 .否则 .变量循环首(竖1－1,1,-1,容器4) .如果(显示图片[(容器4－1)×横数＋横1]≠255或显示图片[(容器4－1)×横数＋横2]≠255) 可连＝假 跳出循环() .否则 .变量循环首(横1＋1,横2－1,1,容器3) .如果(显示图片[(容器4－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果真(可连＝假) .如果真(容器4＝1) 可连＝真 .如果真结束 .如果真结束 .如果真(可连＝真) 跳出循环() .如果真结束 .如果结束 .变量循环尾() .如果结束 .如果真(可连＝假) .如果(竖1＝竖数) 可连＝真 .否则 .变量循环首(竖1＋1,竖数,1,容器4) .如果(显示图片[(容器4－1)×横数＋横1]≠255或显示图片[(容器4－1)×横数＋横2]≠255) 可连＝假 跳出循环() .否则 .变量循环首(横1＋1,横2－1,1,容器3) .如果(显示图片[(容器4－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果真(可连＝假) .如果真(容器4＝竖数) 可连＝真 .如果真结束 .如果真结束 .如果真(可连＝真) 跳出循环() .如果真结束 .如果结束 .变量循环尾() .如果结束 .如果真结束 .如果真结束 .如果结束 .判断(横1＞横2) .变量循环首(横1－1,1,-1,容器4) .如果(显示图片[容器4＋(竖1－1)×横数]≠255) 可连＝假 跳出循环() .否则 .如果(竖2－竖1＝1) 可连＝真 .否则 .变量循环首(竖1＋1,竖2－1,1,容器3) .如果(显示图片[(容器3－1)×横数＋容器4]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果结束 .如果(可连＝真) .判断开始(容器4＝横2) 可连＝真 .判断(容器4＜横2) .变量循环首(容器4,横2－1,1,容器3) .如果(显示图片[(竖2－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .判断(容器4＞横2) .变量循环首(容器4,横2＋1,-1,容器3) .如果(显示图片[(竖2－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .默认 .判断结束 .否则 .如果真(容器4＝1) 可连＝真 .变量循环首(容器4,横2－1,1,容器3) .如果(显示图片[(竖2－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果真结束 .如果结束 .如果结束 .如果真(可连＝真) 跳出循环() .如果真结束 .变量循环尾() .如果真(可连＝假) .变量循环首(横2＋1,横数,1,容器4) .如果(显示图片[容器4＋(竖2－1)×横数]≠255) 可连＝假 跳出循环() .否则 .如果(竖2－竖1＝1) 可连＝真 .否则 .变量循环首(竖1＋1,竖2－1,1,容器3) .如果(显示图片[(容器3－1)×横数＋容器4]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果结束 .如果(可连＝真) .判断开始(容器4＝横1) 可连＝真 .判断(容器4＞横1) .变量循环首(横1＋1,容器4,1,容器3) .如果(显示图片[(竖1－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .判断(容器4＜横1) .变量循环首(容器4,横1－1,1,容器3) .如果(显示图片[(竖1－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .默认 .判断结束 .否则 .如果真(容器4＝横数) 可连＝真 .变量循环首(横1＋1,容器4,1,容器3) .如果(显示图片[(竖1－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果真结束 .如果结束 .如果结束 .如果真(可连＝真) 跳出循环() .如果真结束 .变量循环尾() .如果真结束 .如果真(可连＝假) .变量循环首(竖2－1,1,-1,容器4) .如果(显示图片[横2＋(容器4－1)×横数]≠255) 可连＝假 跳出循环() .否则 .如果(横1－横2＝1) 可连＝真 .否则 .变量循环首(横2＋1,横1－1,1,容器3) .如果(显示图片[(容器4－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果结束 .如果(可连＝真) .判断开始(容器4＝竖1) 可连＝真 .判断(容器4＜竖1) .变量循环首(容器4,竖1－1,1,容器3) .如果(显示图片[(容器3－1)×横数＋横1]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .判断(容器4＞竖1) .变量循环首(容器4,竖1＋1,-1,容器3) .如果(显示图片[(容器3－1)×横数＋横1]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .默认 .判断结束 .否则 .如果真(容器4＝1) 可连＝真 .变量循环首(容器4,竖1－1,1,容器3) .如果(显示图片[(容器3－1)×横数＋横1]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果真结束 .如果结束 .如果结束 .如果真(可连＝真) 跳出循环() .如果真结束 .变量循环尾() .如果真结束 .如果真(可连＝假) .变量循环首(竖1＋1,竖数,1,容器4) .如果(显示图片[横1＋(容器4－1)×横数]≠255) 可连＝假 跳出循环() .否则 .如果(横1－横2＝1) 可连＝真 .否则 .变量循环首(横2＋1,横1－1,1,容器3) .如果(显示图片[(容器4－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果结束 .如果(可连＝真) .判断开始(容器4＝竖2) 可连＝真 .判断(容器4＜竖2) .变量循环首(容器4,竖2－1,1,容器3) .如果(显示图片[(容器3－1)×横数＋横2]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .判断(容器4＞竖2) .变量循环首(容器4,竖2＋1,-1,容器3) .如果(显示图片[(容器3－1)×横数＋横2]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .默认 .判断结束 .否则 .如果真(容器4＝竖数) 可连＝真 .变量循环首(容器4,竖2＋1,-1,容器3) .如果(显示图片[(容器3－1)×横数＋横2]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果真结束 .如果结束 .如果结束 .如果真(可连＝真) 跳出循环() .如果真结束 .变量循环尾() .如果真结束 .判断(横1＜横2) .变量循环首(横2－1,1,-1,容器4) .如果(显示图片[容器4＋(竖2－1)×横数]≠255) 可连＝假 跳出循环() .否则 .如果(竖2－竖1＝1) 可连＝真 .否则 .变量循环首(竖1＋1,竖2－1,1,容器3) .如果(显示图片[(容器3－1)×横数＋容器4]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果结束 .如果(可连＝真) .判断开始(容器4＝横1) 可连＝真 .判断(容器4＜横1) .变量循环首(容器4,横1－1,1,容器3) .如果(显示图片[(竖1－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .判断(容器4＞横1) .变量循环首(容器4,横1＋1,-1,容器3) .如果(显示图片[(竖1－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .默认 .判断结束 .否则 .如果真(容器4＝1) 可连＝真 .变量循环首(容器4,横1－1,1,容器3) .如果(显示图片[(竖1－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果真结束 .如果结束 .如果结束 .如果真(可连＝真) 跳出循环() .如果真结束 .变量循环尾() .如果真(可连＝假) .变量循环首(横1＋1,横数,1,容器4) .如果(显示图片[容器4＋(竖1－1)×横数]≠255) 可连＝假 跳出循环() .否则 .如果(竖2－竖1＝1) 可连＝真 .否则 .变量循环首(竖1＋1,竖2－1,1,容器3) .如果(显示图片[(容器3－1)×横数＋容器4]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果结束 .如果(可连＝真) .判断开始(容器4＝横2) 可连＝真 .判断(容器4＞横2) .变量循环首(横2＋1,容器4,1,容器3) .如果(显示图片[(竖2－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .判断(容器4＜横2) .变量循环首(容器4,横2－1,1,容器3) .如果(显示图片[(竖2－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .默认 .判断结束 .否则 .如果真(容器4＝横数) 可连＝真 .变量循环首(横2＋1,容器4,1,容器3) .如果(显示图片[(竖2－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果真结束 .如果结束 .如果结束 .如果真(可连＝真) 跳出循环() .如果真结束 .变量循环尾() .如果真结束 .如果真(可连＝假) .变量循环首(竖2－1,1,-1,容器4) .如果(显示图片[横2＋(容器4－1)×横数]≠255) 可连＝假 跳出循环() .否则 .如果(横2－横1＝1) 可连＝真 .否则 .变量循环首(横1＋1,横2－1,1,容器3) .如果(显示图片[(容器4－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果结束 .如果(可连＝真) .判断开始(容器4＝竖1) 可连＝真 .判断(容器4＜竖1) .变量循环首(容器4,竖1－1,1,容器3) .如果(显示图片[(容器3－1)×横数＋横1]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .判断(容器4＞竖1) .变量循环首(容器4,竖1＋1,-1,容器3) .如果(显示图片[(容器3－1)×横数＋横1]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .默认 .判断结束 .否则 .如果真(容器4＝1) 可连＝真 .变量循环首(容器4,竖1－1,1,容器3) .如果(显示图片[(容器3－1)×横数＋横1]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果真结束 .如果结束 .如果结束 .如果真(可连＝真) 跳出循环() .如果真结束 .变量循环尾() .如果真结束 .如果真(可连＝假) .变量循环首(竖1＋1,竖数,1,容器4) .如果(显示图片[横1＋(容器4－1)×横数]≠255) 可连＝假 跳出循环() .否则 .如果(横2－横1＝1) 可连＝真 .否则 .变量循环首(横1＋1,横2－1,1,容器3) .如果(显示图片[(容器4－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果结束 .如果(可连＝真) .判断开始(容器4＝竖2) 可连＝真 .判断(容器4＜竖2) .变量循环首(容器4,竖2－1,1,容器3) .如果(显示图片[(容器3－1)×横数＋横2]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .判断(容器4＞竖2) .变量循环首(容器4,竖2＋1,-1,容器3) .如果(显示图片[(容器3－1)×横数＋横2]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .默认 .判断结束 .否则 .如果真(容器4＝竖数) 可连＝真 .变量循环首(容器4,竖2＋1,-1,容器3) .如果(显示图片[(容器3－1)×横数＋横2]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果真结束 .如果结束 .如果结束 .如果真(可连＝真) 跳出循环() .如果真结束 .变量循环尾() .如果真结束 .默认 .判断结束 .如果真结束 .如果真(可连＝真) 加入成员(可消除,到文本(容器1)＋“,”＋到文本(容器2)) 可连＝假 .如果真结束 .变量循环尾() .计次循环尾() .子程序连线 .参数位置1,字节型 .参数位置2,字节型 .局部变量容器1,整数型 .局部变量容器2,整数型 .局部变量横1,字节型 .局部变量横2,字节型 .局部变量竖1,字节型 .局部变量竖2,字节型 .局部变量容器3,整数型 .局部变量可连,逻辑型 .局部变量容器4,整数型 .局部变量临时连线,文本型,,"0" .局部变量最短连线,字节型 .局部变量连线数组,文本型,,"0" .局部变量当前方向,文本型 .局部变量图片号,整数型 .局部变量连线标记,文本型 .局部变量连线画板,画板,,"0" 横1＝取横坐标(位置1) 竖1＝取纵坐标(位置1) 可连＝假 重定义数组(临时连线,假,0) 横2＝取横坐标(位置2) 竖2＝取纵坐标(位置2) .判断开始(横1＝横2) .如果(竖2－竖1＝1) 可连＝真 加入成员(临时连线,“0”) .否则 .变量循环首(竖1＋1,竖2－1,1,容器3) .如果(显示图片[横1＋(容器3－1)×横数]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果(可连＝真) 加入成员(临时连线,“下”＋取重复文本(竖2－竖1－1,“┃”)) .否则 .如果(横1＝1) 可连＝真 加入成员(临时连线,“左┏”＋取重复文本(竖2－竖1－1,“┃”)＋“┗”) .否则 .变量循环首(横1－1,1,-1,容器4) .如果(显示图片[容器4＋(竖1－1)×横数]≠255或显示图片[容器4＋(竖2－1)×横数]≠255) 可连＝假 跳出循环() .否则 .变量循环首(竖1＋1,竖2－1,1,容器3) .如果(显示图片[容器4＋(容器3－1)×横数]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果(可连＝真) 加入成员(临时连线,“左”＋取重复文本(横1－容器4－1,“━”)＋“┏”＋取重复文本(竖2－竖1－1,“┃”)＋“┗”＋取重复文本(横1－容器4－1,“━”)) .否则 .如果真(容器4＝1) 可连＝真 加入成员(临时连线,“左”＋取重复文本(横1－容器4,“━”)＋“┏”＋取重复文本(竖2－竖1－1,“┃”)＋“┗”＋取重复文本(横1－容器4,“━”)) .如果真结束 .如果结束 .如果真(可连＝真) 跳出循环() .如果真结束 .如果结束 .变量循环尾() .如果结束 可连＝假 .如果(横1＝横数) 可连＝真 加入成员(临时连线,“右┓”＋取重复文本(竖2－竖1－1,“┃”)＋“┛”) .否则 .变量循环首(横1＋1,横数,1,容器4) .如果(显示图片[容器4＋(竖1－1)×横数]≠255或显示图片[容器4＋(竖2－1)×横数]≠255) 可连＝假 跳出循环() .否则 .变量循环首(竖1＋1,竖2－1,1,容器3) .如果(显示图片[容器4＋(容器3－1)×横数]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果(可连＝真) 加入成员(临时连线,“右”＋取重复文本(容器4－横1－1,“━”)＋“┓”＋取重复文本(竖2－竖1－1,“┃”)＋“┛”＋取重复文本(容器4－横1－1,“━”)) .否则 .如果真(容器4＝横数) 可连＝真 加入成员(临时连线,“右”＋取重复文本(容器4－横1,“━”)＋“┓”＋取重复文本(竖2－竖1－1,“┃”)＋“┛”＋取重复文本(容器4－横1,“━”)) .如果真结束 .如果结束 .如果真(可连＝真) 跳出循环() .如果真结束 .如果结束 .变量循环尾() .如果结束 .如果结束 .如果结束 .判断(竖1＝竖2) .如果(横2－横1＝1) 可连＝真 加入成员(临时连线,“0”) .否则 .变量循环首(横1＋1,横2－1,1,容器3) .如果(显示图片[(竖1－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果(可连＝真) 加入成员(临时连线,“右”＋取重复文本(横2－横1－1,“━”)) .否则 .如果(竖1＝1) 可连＝真 加入成员(临时连线,“上┏”＋取重复文本(横2－横1－1,“━”)＋“┓”) .否则 .变量循环首(竖1－1,1,-1,容器4) .如果(显示图片[(容器4－1)×横数＋横1]≠255或显示图片[(容器4－1)×横数＋横2]≠255) 可连＝假 跳出循环() .否则 .变量循环首(横1＋1,横2－1,1,容器3) .如果(显示图片[(容器4－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果(可连＝真) 加入成员(临时连线,“上”＋取重复文本(竖1－容器4－1,“┃”)＋“┏”＋取重复文本(横2－横1－1,“━”)＋“┓”＋取重复文本(竖1－容器4－1,“┃”)) .否则 .如果真(容器4＝1) 可连＝真 加入成员(临时连线,“上”＋取重复文本(竖1－容器4,“┃”)＋“┏”＋取重复文本(横2－横1－1,“━”)＋“┓”＋取重复文本(竖1－容器4,“┃”)) .如果真结束 .如果结束 .如果真(可连＝真) 跳出循环() .如果真结束 .如果结束 .变量循环尾() .如果结束 可连＝假 .如果(竖1＝竖数) 可连＝真 加入成员(临时连线,“下┗”＋取重复文本(横2－横1－1,“━”)＋“┛”) .否则 .变量循环首(竖1＋1,竖数,1,容器4) .如果(显示图片[(容器4－1)×横数＋横1]≠255或显示图片[(容器4－1)×横数＋横2]≠255) 可连＝假 跳出循环() .否则 .变量循环首(横1＋1,横2－1,1,容器3) .如果(显示图片[(容器4－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果(可连＝真) 加入成员(临时连线,“下”＋取重复文本(容器4－竖1－1,“┃”)＋“┗”＋取重复文本(横2－横1－1,“━”)＋“┛”＋取重复文本(容器4－竖1－1,“┃”)) .否则 .如果真(容器4＝竖数) 可连＝真 加入成员(临时连线,“下”＋取重复文本(容器4－竖1,“┃”)＋“┗”＋取重复文本(横2－横1－1,“━”)＋“┛”＋取重复文本(容器4－竖1,“┃”)) .如果真结束 .如果结束 .如果真(可连＝真) 跳出循环() .如果真结束 .如果结束 .变量循环尾() .如果结束 .如果结束 .如果结束 .判断(横1＞横2) .变量循环首(横1－1,1,-1,容器4) .如果(显示图片[容器4＋(竖1－1)×横数]≠255) 可连＝假 跳出循环() .否则 .如果(竖2－竖1＝1) 可连＝真 .否则 .变量循环首(竖1＋1,竖2－1,1,容器3) .如果(显示图片[(容器3－1)×横数＋容器4]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果结束 .如果(可连＝真) .判断开始(容器4＝横2) 可连＝真 加入成员(临时连线,“左”＋取重复文本(横1－横2－1,“━”)＋“┏”＋取重复文本(竖2－竖1－1,“┃”)) .判断(容器4＜横2) .变量循环首(容器4,横2－1,1,容器3) .如果(显示图片[(竖2－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果真(可连＝真) 加入成员(临时连线,“左”＋取重复文本(横1－容器4－1,“━”)＋“┏”＋取重复文本(竖2－竖1－1,“┃”)＋“┗”＋取重复文本(横2－容器4－1,“━”)) .如果真结束 .判断(容器4＞横2) .变量循环首(容器4,横2＋1,-1,容器3) .如果(显示图片[(竖2－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果真(可连＝真) 加入成员(临时连线,“左”＋取重复文本(横1－容器4－1,“━”)＋“┏”＋取重复文本(竖2－竖1－1,“┃”)＋“┛”＋取重复文本(容器4－横2－1,“━”)) .如果真结束 .默认 .判断结束 .否则 .如果真(容器4＝1) 可连＝真 .变量循环首(容器4,横2－1,1,容器3) .如果(显示图片[(竖2－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果真(可连＝真) 加入成员(临时连线,“左”＋取重复文本(横1－容器4,“━”)＋“┏”＋取重复文本(竖2－竖1－1,“┃”)＋“┗”＋取重复文本(横2－容器4,“━”)) .如果真结束 .如果真结束 .如果结束 .如果结束 .如果真(可连＝真) 跳出循环() .如果真结束 .变量循环尾() 可连＝假 .变量循环首(横2＋1,横数,1,容器4) .如果(显示图片[容器4＋(竖2－1)×横数]≠255) 可连＝假 跳出循环() .否则 .如果(竖2－竖1＝1) 可连＝真 .否则 .变量循环首(竖1＋1,竖2－1,1,容器3) .如果(显示图片[(容器3－1)×横数＋容器4]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果结束 .如果(可连＝真) .判断开始(容器4＝横1) 可连＝真 加入成员(临时连线,“下”＋取重复文本(竖2－竖1－1,“┃”)＋“┛”＋取重复文本(横1－横2－1,“━”)) .判断(容器4＞横1) .变量循环首(横1＋1,容器4,1,容器3) .如果(显示图片[(竖1－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果真(可连＝真) 加入成员(临时连线,“右”＋取重复文本(容器4－横1－1,“━”)＋“┓”＋取重复文本(竖2－竖1－1,“┃”)＋“┛”＋取重复文本(容器4－横2－1,“━”)) .如果真结束 .判断(容器4＜横1) .变量循环首(容器4,横1－1,1,容器3) .如果(显示图片[(竖1－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果真(可连＝真) 加入成员(临时连线,“左”＋取重复文本(横1－容器4－1,“━”)＋“┏”＋取重复文本(竖2－竖1－1,“┃”)＋“┛”＋取重复文本(容器4－横2－1,“━”)) .如果真结束 .默认 .判断结束 .否则 .如果真(容器4＝横数) 可连＝真 .变量循环首(横1＋1,容器4,1,容器3) .如果(显示图片[(竖1－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果真(可连＝真) 加入成员(临时连线,“右”＋取重复文本(容器4－横1,“━”)＋“┓”＋取重复文本(竖2－竖1－1,“┃”)＋“┛”＋取重复文本(容器4－横2,“━”)) .如果真结束 .如果真结束 .如果结束 .如果结束 .如果真(可连＝真) 跳出循环() .如果真结束 .变量循环尾() 可连＝假 .变量循环首(竖2－1,1,-1,容器4) .如果(显示图片[横2＋(容器4－1)×横数]≠255) 可连＝假 跳出循环() .否则 .如果(横1－横2＝1) 可连＝真 .否则 .变量循环首(横2＋1,横1－1,1,容器3) .如果(显示图片[(容器4－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果结束 .如果(可连＝真) .判断开始(容器4＝竖1) 可连＝真 加入成员(临时连线,“左”＋取重复文本(横1－横2－1,“━”)＋“┏”＋取重复文本(竖2－竖1－1,“┃”)) .判断(容器4＜竖1) .变量循环首(容器4,竖1－1,1,容器3) .如果(显示图片[(容器3－1)×横数＋横1]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果真(可连＝真) 加入成员(临时连线,“上”＋取重复文本(竖1－容器4－1,“┃”)＋“┓”＋取重复文本(横1－横2－1,“━”)＋“┏”＋取重复文本(竖2－容器4－1,“┃”)) .如果真结束 .判断(容器4＞竖1) .变量循环首(容器4,竖1＋1,-1,容器3) .如果(显示图片[(容器3－1)×横数＋横1]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果真(可连＝真) 加入成员(临时连线,“下”＋取重复文本(容器4－竖1－1,“┃”)＋“┛”＋取重复文本(横1－横2－1,“━”)＋“┏”＋取重复文本(竖2－容器4－1,“┃”)) .如果真结束 .默认 .判断结束 .否则 .如果真(容器4＝1) 可连＝真 .变量循环首(容器4,竖1－1,1,容器3) .如果(显示图片[(容器3－1)×横数＋横1]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果真(可连＝真) 加入成员(临时连线,“上”＋取重复文本(竖1－容器4,“┃”)＋“┓”＋取重复文本(横1－横2－1,“━”)＋“┏”＋取重复文本(竖2－容器4,“┃”)) .如果真结束 .如果真结束 .如果结束 .如果结束 .如果真(可连＝真) 跳出循环() .如果真结束 .变量循环尾() 可连＝假 .变量循环首(竖1＋1,竖数,1,容器4) .如果(显示图片[横1＋(容器4－1)×横数]≠255) 可连＝假 跳出循环() .否则 .如果(横1－横2＝1) 可连＝真 .否则 .变量循环首(横2＋1,横1－1,1,容器3) .如果(显示图片[(容器4－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果结束 .如果(可连＝真) .判断开始(容器4＝竖2) 可连＝真 加入成员(临时连线,“下”＋取重复文本(竖2－竖1－1,“┃”)＋“┛”＋取重复文本(横1－横2－1,“━”)) .判断(容器4＜竖2) .变量循环首(容器4,竖2－1,1,容器3) .如果(显示图片[(容器3－1)×横数＋横2]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果真(可连＝真) 加入成员(临时连线,“下”＋取重复文本(容器4－竖1－1,“┃”)＋“┛”＋取重复文本(横1－横2－1,“━”)＋“┏”＋取重复文本(竖2－容器4－1,“┃”)) .如果真结束 .判断(容器4＞竖2) .变量循环首(容器4,竖2＋1,-1,容器3) .如果(显示图片[(容器3－1)×横数＋横2]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果真(可连＝真) 加入成员(临时连线,“下”＋取重复文本(容器4－竖1－1,“┃”)＋“┛”＋取重复文本(横1－横2－1,“━”)＋“┗”＋取重复文本(容器4－竖2－1,“┃”)) .如果真结束 .默认 .判断结束 .否则 .如果真(容器4＝竖数) 可连＝真 .变量循环首(容器4,竖2＋1,-1,容器3) .如果(显示图片[(容器3－1)×横数＋横2]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果真(可连＝真) 加入成员(临时连线,“下”＋取重复文本(容器4－竖1,“┃”)＋“┛”＋取重复文本(横1－横2－1,“━”)＋“┗”＋取重复文本(容器4－竖2,“┃”)) .如果真结束 .如果真结束 .如果结束 .如果结束 .如果真(可连＝真) 跳出循环() .如果真结束 .变量循环尾() .判断(横1＜横2) .变量循环首(横2－1,1,-1,容器4) .如果(显示图片[容器4＋(竖2－1)×横数]≠255) 可连＝假 跳出循环() .否则 .如果(竖2－竖1＝1) 可连＝真 .否则 .变量循环首(竖1＋1,竖2－1,1,容器3) .如果(显示图片[(容器3－1)×横数＋容器4]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果结束 .如果(可连＝真) .判断开始(容器4＝横1) 可连＝真 加入成员(临时连线,“下”＋取重复文本(竖2－竖1－1,“┃”)＋“┗”＋取重复文本(横2－横1－1,“━”)) .判断(容器4＜横1) .变量循环首(容器4,横1－1,1,容器3) .如果(显示图片[(竖1－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果真(可连＝真) 加入成员(临时连线,“左”＋取重复文本(横1－容器4－1,“━”)＋“┏”＋取重复文本(竖2－竖1－1,“┃”)＋“┗”＋取重复文本(横2－容器4－1,“━”)) .如果真结束 .判断(容器4＞横1) .变量循环首(容器4,横1＋1,-1,容器3) .如果(显示图片[(竖1－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果真(可连＝真) 加入成员(临时连线,“右”＋取重复文本(容器4－横1－1,“━”)＋“┓”＋取重复文本(竖2－竖1－1,“┃”)＋“┗”＋取重复文本(横2－容器4－1,“━”)) .如果真结束 .默认 .判断结束 .否则 .如果真(容器4＝1) 可连＝真 .变量循环首(容器4,横1－1,1,容器3) .如果(显示图片[(竖1－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果真(可连＝真) 加入成员(临时连线,“左”＋取重复文本(横1－容器4,“━”)＋“┏”＋取重复文本(竖2－竖1－1,“┃”)＋“┗”＋取重复文本(横2－容器4,“━”)) .如果真结束 .如果真结束 .如果结束 .如果结束 .如果真(可连＝真) 跳出循环() .如果真结束 .变量循环尾() 可连＝假 .变量循环首(横1＋1,横数,1,容器4) .如果(显示图片[容器4＋(竖1－1)×横数]≠255) 可连＝假 跳出循环() .否则 .如果(竖2－竖1＝1) 可连＝真 .否则 .变量循环首(竖1＋1,竖2－1,1,容器3) .如果(显示图片[(容器3－1)×横数＋容器4]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果结束 .如果(可连＝真) .判断开始(容器4＝横2) 可连＝真 加入成员(临时连线,“右”＋取重复文本(横2－横1－1,“━”)＋“┓”＋取重复文本(竖2－竖1－1,“┃”)) .判断(容器4＞横2) .变量循环首(横2＋1,容器4,1,容器3) .如果(显示图片[(竖2－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果真(可连＝真) 加入成员(临时连线,“右”＋取重复文本(容器4－横1－1,“━”)＋“┓”＋取重复文本(竖2－竖1－1,“┃”)＋“┛”＋取重复文本(容器4－横2－1,“━”)) .如果真结束 .判断(容器4＜横2) .变量循环首(容器4,横2－1,1,容器3) .如果(显示图片[(竖2－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果真(可连＝真) 加入成员(临时连线,“右”＋取重复文本(容器4－横1－1,“━”)＋“┓”＋取重复文本(竖2－竖1－1,“┃”)＋“┗”＋取重复文本(横2－容器4－1,“━”)) .如果真结束 .默认 .判断结束 .否则 .如果真(容器4＝横数) 可连＝真 .变量循环首(横2＋1,容器4,1,容器3) .如果(显示图片[(竖2－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果真(可连＝真) 加入成员(临时连线,“右”＋取重复文本(容器4－横1,“━”)＋“┓”＋取重复文本(竖2－竖1－1,“┃”)＋“┛”＋取重复文本(容器4－横2,“━”)) .如果真结束 .如果真结束 .如果结束 .如果结束 .如果真(可连＝真) 跳出循环() .如果真结束 .变量循环尾() 可连＝假 .变量循环首(竖2－1,1,-1,容器4) .如果(显示图片[横2＋(容器4－1)×横数]≠255) 可连＝假 跳出循环() .否则 .如果(横2－横1＝1) 可连＝真 .否则 .变量循环首(横1＋1,横2－1,1,容器3) .如果(显示图片[(容器4－1)×横数＋容器3]≠255) 可连＝假 跳出循环() .否则 可连＝真 .如果结束 .变量循环尾() .如果结束 .如果(可连＝真) .判断开始(容器4＝竖1) 可连＝真 加入成员(临时连线,“右”＋取重复文本(横2－横1－1,“━”)＋“┓”＋取重复文本(竖2－竖1－1,“┃”)) .判断(容器4＜竖1) .变量循环首(容器4,竖1－1,1,容器3