网站首页 > 易语言相关 > 图形图像源码 正文
.版本 2 .程序集 窗口程序集_启动窗口 .子程序 __启动窗口_创建完毕 ' 6695833 ' 10059929 画板1.底图 ＝ 网页_访问 (“http://www.cnzz.cn/Home/GetValidateCode?_=1441895244796”) .子程序 _按钮1_被单击 .局部变量 x, 整数型 .局部变量 y, 整数型 .局部变量 a, 整数型 .计次循环首 (画板1.宽度, x) .计次循环首 (画板1.高度, y) a ＝ 画板1.取点 (x － 1, y － 1) .如果 (a ＞ 10059929) 画板1.画点 (x － 1, y － 1, #白色) .否则 画板1.画点 (x － 1, y － 1, #黑色) .如果结束 .计次循环尾 () .计次循环尾 () 画板1.复制 (0, 0, 131, 41, 画板2, , , ) .子程序 _画板1_鼠标左键被放开, 逻辑型 .参数 横向位置, 整数型 .参数 纵向位置, 整数型 .参数 功能键状态, 整数型 画板1.底图 ＝ 网页_访问 (“http://www.cnzz.cn/Home/GetValidateCode?_=1441895244796”) .子程序 _按钮2_被单击 .局部变量 x, 整数型 .局部变量 y, 整数型 .局部变量 a, 整数型 .计次循环首 (画板2.宽度, x) .计次循环首 (画板2.高度, y) a ＝ 画板2.取点 (x － 1, y － 1) .如果真 (a ≠ #白色) .如果真 (画板2.取点 (x － 1, y － 2) ＝ #白色 且 画板2.取点 (x － 1, y) ＝ #白色 且 画板2.取点 (x － 2, y － 1) ＝ #白色 且 画板2.取点 (x, y － 1) ＝ #白色) 画板2.画点 (x － 1, y － 1, #白色) .如果真结束 .如果真结束 .计次循环尾 () .计次循环尾 () 写到文件 (取运行目录 () ＋ “1.bmp”, 画板2.取图片 (131, 41)) .子程序 _按钮3_被单击 .局部变量 x, 整数型 .局部变量 y, 整数型 .局部变量 xx, 整数型 .局部变量 yy, 整数型 .局部变量 a, 整数型 .局部变量 b, 整数型 .局部变量 跳吗, 逻辑型 .计次循环首 (画板2.高度, x) .计次循环首 (画板2.高度, y) .如果真 (跳吗 ＝ 真) 跳出循环 () .如果真结束 .如果真 (画板2.取点 (x － 1, y － 1) ＝ #黑色) .计次循环首 (5, xx) .如果真 (跳吗 ＝ 真) 跳出循环 () .如果真结束 .计次循环首 (5, yy) .如果真 (画板2.取点 (x － 1 ＋ xx, y － 1 ＋ yy) ＝ #黑色) a ＝ a ＋ 1 .如果真结束 .如果 (a ＞ 35) 跳吗 ＝ 真 画板2.复制 (x － 3, 0, 18, 41, 画板3, , , ) b ＝ x － 1 画板2.复制 (x ＋ 16, 0, 画板2.宽度 － x － 16, 41, 画板7, , , ) 跳出循环 () .否则 .如果结束 .计次循环尾 () .计次循环尾 () .如果真结束 .计次循环尾 () .计次循环尾 () 下一次 () .子程序 下一次 .局部变量 x, 整数型 .局部变量 y, 整数型 .局部变量 xx, 整数型 .局部变量 yy, 整数型 .局部变量 a, 整数型 .局部变量 b, 整数型 .局部变量 跳吗, 逻辑型 .计次循环首 (画板7.高度, x) .计次循环首 (画板7.高度, y) .如果真 (跳吗 ＝ 真) 跳出循环 () .如果真结束 .如果真 (画板7.取点 (x － 1, y － 1) ＝ #黑色) .计次循环首 (5, xx) .如果真 (跳吗 ＝ 真) 跳出循环 () .如果真结束 .计次循环首 (5, yy) .如果真 (画板7.取点 (x － 1 ＋ xx, y － 1 ＋ yy) ＝ #黑色) a ＝ a ＋ 1 .如果真结束 .如果 (a ＞ 35) 跳吗 ＝ 真 画板7.复制 (x － 3, 0, 18, 41, 画板4, , , ) b ＝ x － 1 画板7.复制 (x ＋ 16, 0, 画板7.宽度 － x － 16, 41, 画板8, , , ) 跳出循环 () .否则 .如果结束 .计次循环尾 () .计次循环尾 () .如果真结束 .计次循环尾 () .计次循环尾 () 下一次2 () .子程序 下一次2 .局部变量 x, 整数型 .局部变量 y, 整数型 .局部变量 xx, 整数型 .局部变量 yy, 整数型 .局部变量 a, 整数型 .局部变量 b, 整数型 .局部变量 跳吗, 逻辑型 .计次循环首 (画板8.高度, x) .计次循环首 (画板7.高度, y) .如果真 (跳吗 ＝ 真) 跳出循环 () .如果真结束 .如果真 (画板8.取点 (x － 1, y － 1) ＝ #黑色) .计次循环首 (5, xx) .如果真 (跳吗 ＝ 真) 跳出循环 () .如果真结束 .计次循环首 (5, yy) .如果真 (画板8.取点 (x － 1 ＋ xx, y － 1 ＋ yy) ＝ #黑色) a ＝ a ＋ 1 .如果真结束 .如果 (a ＞ 35) 跳吗 ＝ 真 画板8.复制 (x － 3, 0, 18, 41, 画板5, , , ) b ＝ x － 1 画板8.复制 (x ＋ 16, 0, 画板8.宽度 － x － 16, 41, 画板9, , , ) 跳出循环 () .否则 .如果结束 .计次循环尾 () .计次循环尾 () .如果真结束 .计次循环尾 () .计次循环尾 () 下一步2 () .子程序 下一步2 .局部变量 x, 整数型 .局部变量 y, 整数型 .局部变量 xx, 整数型 .局部变量 yy, 整数型 .局部变量 a, 整数型 .局部变量 b, 整数型 .局部变量 跳吗, 逻辑型 .计次循环首 (画板9.高度, x) .计次循环首 (画板9.高度, y) .如果真 (跳吗 ＝ 真) 跳出循环 () .如果真结束 .如果真 (画板9.取点 (x － 1, y － 1) ＝ #黑色) .计次循环首 (5, xx) .如果真 (跳吗 ＝ 真) 跳出循环 () .如果真结束 .计次循环首 (5, yy) .如果真 (画板9.取点 (x － 1 ＋ xx, y － 1 ＋ yy) ＝ #黑色) a ＝ a ＋ 1 .如果真结束 .如果 (a ＞ 35) 跳吗 ＝ 真 画板9.复制 (x － 3, 0, 18, 41, 画板6, , , ) b ＝ x － 1 ' 画板9.复制 (x ＋ 16, 0, 画板8.宽度 － x － 16, 41, 画板9, , , ) 跳出循环 () .否则 .如果结束 .计次循环尾 () .计次循环尾 () .如果真结束 .计次循环尾 () .计次循环尾 ()
@Ohyes
- 上一篇： 极速统计数组重复并分类源码
- 下一篇： 易语言sql例程 mysql注册登录等源码
猜你喜欢
- 2022-06-14 图片二值化处理（获取图像轮廓及最小外接矩形）
- 2022-03-22 验证码二值化易语言源码
- 2018-09-07 简易二值化演示易语言源码
欢迎 你 发表评论:
- 百度站内搜索
- 关注微信公众号
-
三叶资源网⑤群：
- 网站分类
-
- 网站公告
- 电子书书籍
- 程序员工具箱
- 编程工具
- 易语言相关
- 网络相关源码
- 图形图像源码
- 系统工具源码
- 易语言模块源码
- 易语言支持库
- 数据库类源码
- 易语言例程
- 易语言游戏开发
- 易语言模块
- 多媒体类源码
- 易语言资源网
- 易语言视频教程
- JS分析教程
- 易语言图文教程
- 易语言常见问题及笔记
- 工具源码
- 易语言版本
- 网络编程
- javascript
- PHP编程
- html
- 正则表达式
- 面试题
- nodejs
- 其它综合
- 脚本专栏
- python
- 按键精灵相关
- 按键精灵图文教程
- 按键精灵视频教程
- 按键精灵Q语言
- 按键精灵安卓版
- golang
- 游戏安全
- 火山相关
- 火山安卓软件
- 火山常见问题及笔记
- 火山安卓源码
- 火山视频教程
- 火山PC版本下载
- 火山PC视窗例程
- 互联网那些事
- 引流推广
- 项目揭秘
- 网络营销
- 营销软件
- QQ营销软件
- 娱乐软件
- 机器人插件
- 培训教程
- 技术教程
- 活动线报
- 数据库
- Redis
- Access
- MongoDB
- Mysql
- 问答
- 其它
- 易语言
- 需求
- 在线教程
- 多线程培训班
- 觅风易语言教程
- 模拟系列教程
- 集中营易语言教程
- 历史数据
- 随机tag
- 最新评论
-
访客 评论于：05-03- 访客 评论于：05-03
章伟 评论于：10-31
何红涛 评论于：10-31
何红涛 评论于：10-29
访客 评论于：10-18- 访客 评论于：10-05
访客 评论于：10-05- 访客 评论于：09-30
访客 评论于：09-28
已有1位网友发表了看法：
易语言爬虫 评论于 [2022-01-12 21:52:45] 回复
验证码分割