|
发表于 2020-3-10 19:24:32
|
显示全部楼层
湖北省恩施土家族苗族自治州
变量名 | 类 型 | 静态 | 数组 | 备 注 | wj | 文本型 | | | k | 整数型 | | | g | 整数型 | | | i | 整数型 | | | ii | 整数型 | | | 不是黑色 | 整数型 | | | 下 | 双精度小数型 | | | 上 | 整数型 | | | ys | 字节集 | | |
wj = 取运行目录 () + “/2.jpg”k = 取图片宽度 (wj )g = 取图片高度 (wj )画板1.高度 = g 画板1.宽度 = k 调试输出 (g )画板1.底图 = 读入文件 (wj )延迟 (1000 ) 计次循环首 (g, i ) 不是黑色 = 0  计次循环首 (20, ii )   ys = 到字节集 (画板1. 取点 (3 + ii, i ))   如果真 (ys [1 ] > 20 且 ys [2 ] > 20 且 ys [3 ] > 20 )    不是黑色 = 不是黑色 + 1     计次循环尾 () 如果真 (不是黑色 > 10 )  调试输出 (不是黑色 )  上 = i  跳出循环 ()  计次循环尾 () 计次循环首 (g, i ) 不是黑色 = 0  计次循环首 (20, ii )   ys = 到字节集 (画板1. 取点 (3 + ii, g - i ))   如果真 (ys [1 ] > 20 且 ys [2 ] > 20 且 ys [3 ] > 20 )    不是黑色 = 不是黑色 + 1     计次循环尾 () 如果真 (不是黑色 > 10 )  调试输出 (不是黑色 )  下 = g - i  跳出循环 ()  计次循环尾 ()画板2.高度 = g - 上 (g - 下 )画板2.宽度 = k 延迟 (1000 )画板1. 复制 (0, 上, k, g - 上 (g - 下 ), 画板2, 0, 0, )画板1.画笔颜色 = #红色 画板1. 画直线 (0, 上, k, 上 )画板1. 画直线 (0, 下, k, 下 )
这样咯
|
|