|
本帖最后由 z13228604287 于 2021-9-22 15:58 编辑
操作方法:
鼠标左键点击直线的起点或终点并按住移动,由此可以修改直线。夹角是从绿线顺时针到蓝线。在键盘输入任意的键,可退出程序。
窗口程序集名 | 保 留 | 保 留 | 备 注 | 程序集1 | | | | 变量名 | 类 型 | 数组 | 备 注 | 点1 | 二维坐标数据结构d | | 点2 | 二维坐标数据结构d | | 中心点 | 二维坐标数据结构d | |
变量名 | 类 型 | 静态 | 数组 | 备 注 | 图像_原始 | 多维矩阵 | | | 图像_原始的初始值 | 标量 | | | 图像 | 多维矩阵 | | | 绿色 | 标量 | | | 蓝色 | 标量 | | | 红色 | 标量 | | | 按键 | 整数型 | | | 尺寸 | 尺寸数据结构i | | | 视觉_创建窗口 (“小白鼠”, #窗口_自动尺寸 )图像_原始的初始值. 赋值3 (255, 255, 255 )图像_原始. 构造 (600, 800, #八位无符号整数_三通道, 图像_原始的初始值 )视觉_设置鼠标事件 (“小白鼠”, &鼠标事件, 0 ) 点1. 赋值 (400, 100 )点2. 赋值 (600, 300 )中心点. 赋值 (400, 300 )绿色.通道1 = 255 蓝色.通道2 = 255 红色.通道3 = 255 尺寸. 赋值 (15, 15 )循环判断首 ()图像_原始. 克隆 (图像.指针 ) 视觉_线d (图像.指针, 中心点, 点1, 绿色, 2, 8, 0 )视觉_线d (图像.指针, 中心点, 点2, 蓝色, 2, 8, 0 )视觉_角d (图像.指针, 中心点, 点1, 点2, 尺寸, 红色, 2, 8, 0 )视觉_显示图像 (“小白鼠”, 图像.指针 )循环判断尾 (视觉_等待按键 (3 ) = -1 )视觉_销毁所有窗口 ()返回 (0 ) |
鼠标事件 | | | |
event | 整数型 | | | | x | 整数型 | | | | y | 整数型 | | | | flags | 整数型 | | | |
变量名 | 类 型 | 静态 | 数组 | 备 注 | 局中心点 | 二维坐标数据结构d | | | 局点1 | 二维坐标数据结构d | | | 局点2 | 二维坐标数据结构d | | | 步骤 | 整数型 | | | 矩1 | 矩形数据结构d | | | 矩2 | 矩形数据结构d | | | 矩3 | 矩形数据结构d | | | 宽 | 整数型 | | | 高 | 整数型 | | | 判断 (event = #事件_按下左键 )局点1. 赋值 (x, y )宽 = 15 高 = 15 矩1. 赋值 (中心点.横坐标 - 宽, 中心点.纵坐标 - 高, 2 × 宽, 2 × 高 )矩2. 赋值 (点1.横坐标 - 宽, 点1.纵坐标 - 高, 2 × 宽, 2 × 高 )矩3. 赋值 (点2.横坐标 - 宽, 点2.纵坐标 - 高, 2 × 宽, 2 × 高 )判断 (矩1. 包含 (局点1 )) 步骤 = 0 局中心点 = 中心点 判断 (矩2. 包含 (局点1 )) 步骤 = 1 局中心点 = 点1 如果真 (矩3. 包含 (局点1 )) 步骤 = 2 局中心点 = 点2 判断 (event = #事件_鼠标移动 )局点2. 赋值 (x, y )判断 (步骤 = 0 )中心点. 赋值 (局中心点.横坐标 + 局点2.横坐标 - 局点1.横坐标, 局中心点.纵坐标 + 局点2.纵坐标 - 局点1.纵坐标 )判断 (步骤 = 1 )点1. 赋值 (局中心点.横坐标 + 局点2.横坐标 - 局点1.横坐标, 局中心点.纵坐标 + 局点2.纵坐标 - 局点1.纵坐标 )如果真 (步骤 = 2 )点2. 赋值 (局中心点.横坐标 + 局点2.横坐标 - 局点1.横坐标, 局中心点.纵坐标 + 局点2.纵坐标 - 局点1.纵坐标 )如果真 (event = #事件_释放左键 )局点1. 赋值 (0, 0 )局点2. 赋值 (0, 0 )步骤 = -1
链接:https://pan.baidu.com/s/1VSYkILerRQsoDiIhl-6eTQ
提取码:4ypk
复制这段内容后打开百度网盘手机App,操作更方便哦
|
|