网站首页 > 易语言相关 > 图形图像源码 正文
.版本 2 .支持库 iext2 .支持库 spec .支持库 BmpOperate .程序集 窗口程序集_滑块识别窗口 .子程序 _按钮1_被单击 .如果 (编辑框1.内容 = “hycdn_1_1586110857691143680_01.jpg”) 无原图识别_程序 (#阴影图, #滑块) .否则 无原图识别_程序 (读入文件 (编辑框1.内容), #滑块) .如果结束 .子程序 无原图识别_程序 .参数 阴影图, 字节集 .参数 滑块, 字节集 .局部变量 物体标识, 整数型 .局部变量 X坐标, 整数型 动画框1.销毁所有物体 () 动画框1.背景图片 = 阴影图 物体标识 = 动画框1.创建物体 (, 0, 0, 真, ) 动画框1.置图片 (物体标识, 滑块, 0) 动画框1.置透明度 (物体标识, 5) X坐标 = 无原图识别 (阴影图) 动画框1.置物体位置 (物体标识, X坐标, 86, ) 调试输出 (X坐标) .子程序 无原图识别, 整数型 .参数 阴影图, 字节集 .局部变量 位图B, 位图 .局部变量 高度a, 整数型 .局部变量 宽度a, 整数型 .局部变量 宽度B, 整数型 .局部变量 i, 整数型 .局部变量 X1, 整数型 .局部变量 Y1, 整数型 .局部变量 c, 整数型 .局部变量 b, 整数型 .局部变量 X2, 整数型 .局部变量 x, 整数型 .局部变量 y, 整数型 .局部变量 XS, 文本型, , "0" 位图B.载入数据 (到位图 (阴影图)) 高度a = 位图B.取高度 () 宽度a = 位图B.取宽度 () 宽度B = 宽度a i = 61 .判断循环首 (X2 = 0) .计次循环首 (宽度B - 300, b) .计次循环首 (高度a, c) .如果 (位与 (位图B.取某点颜色 (宽度B - b - 1, c - 1), 255) ≥ i - 1 + 50 或 位与 (位图B.取某点颜色 (宽度B - b - 1, c - 1), 65280) ÷ 256 ≥ i - 1 + 50 或 位与 (位图B.取某点颜色 (宽度B - b - 1, c - 1), 16711680) ÷ 65536 ≥ i - 1 + 10) 位图B.置某点颜色 (宽度B - b - 1, c - 1, #黑色) .否则 位图B.置某点颜色 (宽度B - b - 1, c - 1, #白色) .如果结束 .计次循环尾 () .计次循环尾 () i = i + 1 连续赋值 (0, X1, Y1, c, b, X2) .计次循环首 (高度a, y) .计次循环首 (宽度B, x) .如果 (X1 = 0) .如果 (位图B.取某点颜色 (宽度B - x - 1, y - 1) = #白色) X1 = 宽度B - x - 1 Y1 = y - 1 .否则 .如果结束 .否则 .如果 (位图B.取某点颜色 (宽度B - x - 1, y - 1) = #黑色) .如果 (X1 - (宽度B - x) > 75 且 X1 - (宽度B - x) < 95) X2 = x .计次循环首 (90, i) 位图B.置某点颜色 (680 - x - 1 + i, y, #红色) 位图B.置某点颜色 (680 - x, y, #红色) .计次循环尾 () X2 = 宽度B - x - 24 .否则 .如果结束 连续赋值 (0, X1, Y1) .否则 .如果结束 .如果结束 .如果真 (X2 ≠ 0) 跳出循环 () .如果真结束 .计次循环尾 () .如果真 (X2 ≠ 0) 跳出循环 () .如果真结束 .计次循环尾 () .如果真 (X2 ≠ 0) 跳出循环 () .如果真结束 .判断循环尾 () 返回 (X2) .子程序 到位图, 字节集, 公开 .参数 图片数据, 字节集, 参考 .局部变量 图片, 对象 .局部变量 图, 字节集 图 = 图片数据 .如果真 (取字节集左边 (图, 2) ≠ { 66, 77 } 或 取字节集数据 (图, #短整数型, 29) > 8) 图片.创建图片对象 (图) 图 = 图片.取回图片 () 图片.清除 () .如果真结束 返回 (图) .子程序 _滑块识别窗口_创建完毕 编辑框1.内容 = 取运行目录 () + “hycdn_1_1586110857691143680_0.jpg”
@qunsen
猜你喜欢
- 2023-02-13 讯飞文本识别鉴权与文字识别源码
- 2017-02-11 orc文字识别源码
你 发表评论:
欢迎- 百度站内搜索
- 关注微信公众号
- 网站分类
-
- 网站公告
- 电子书书籍
- 程序员工具箱
- 编程工具
- 易语言相关
- 网络相关源码
- 图形图像源码
- 系统工具源码
- 易语言模块源码
- 易语言支持库
- 数据库类源码
- 易语言例程
- 易语言游戏开发
- 易语言模块
- 多媒体类源码
- 易语言资源网
- 易语言视频教程
- JS分析教程
- 易语言图文教程
- 易语言常见问题及笔记
- 工具源码
- 易语言版本
- 网络编程
- javascript
- PHP编程
- html
- 正则表达式
- 面试题
- nodejs
- 其它综合
- 脚本专栏
- python
- 按键精灵相关
- 按键精灵图文教程
- 按键精灵视频教程
- 按键精灵Q语言
- 按键精灵安卓版
- golang
- 游戏安全
- 火山相关
- 火山安卓软件
- 火山常见问题及笔记
- 火山安卓源码
- 火山视频教程
- 火山PC版本下载
- 火山PC视窗例程
- 互联网那些事
- 引流推广
- 项目揭秘
- 网络营销
- 营销软件
- QQ营销软件
- 娱乐软件
- 机器人插件
- 培训教程
- 技术教程
- 活动线报
- 数据库
- Redis
- Access
- MongoDB
- Mysql
- 问答
- 其它
- 易语言
- 需求
- 在线教程
- 多线程培训班
- 觅风易语言教程
- 模拟系列教程
- 集中营易语言教程
- 历史数据
- 随机tag
本文暂时没有评论,来添加一个吧(●'◡'●)