基于blob分析法的视频烟雾识别检测matlab仿真【包含程序操作录像,代码部分注释】

clc; clear; close all; warning off; addpath(genpath(pwd)); rng('default') % 创建一个视频文件读取对象，用于读取'Video.avi'这个文件 vidReader=vision.VideoFileReader('test2.mp4'); % 设置视频读取对象的输出数据类型为double型 vidReader.VideoOutputDataType='double'; % 创建一个可部署的视频播放器对象 vidPlayer = vision.DeployableVideoPlayer; % 创建一个形状为圆盘的结构元素，半径为8，用于形态学操作 diskElem=strel('disk',8); % 定义blob分析对象的参数，最小blob面积为100，最大blob面积为1500000 hBlob=vision.BlobAnalysis('MinimumBlobArea',100,... 'MaximumBlobArea',1500000); % 循环直到视频播放完毕 while ~isDone(vidReader) vidFrame=step(vidReader);% 读取视频的下一帧 I = rgb2hsv(vidFrame);% 将当前帧从RGB颜色空间转化为HSV颜色空间 % 根据直方图设置，定义通道1的阈值 channel1Min = 0.200; channel1Max = 0.7; % 根据直方图设置，定义通道2的阈值 channel2Min = 0.000; channel2Max = 0.350; % 根据所选的直方图阈值创建一个掩膜 channel3Min = 0.250; channel3Max = 0.700; % 使用形态学开操作对掩膜进行处理，去除小的噪声点 sliderBW = (I(:,:,1) >= channel1Min ) & (I(:,:,1) <= channel1Max) & ... (I(:,:,2) >= channel2Min ) & (I(:,:,2) <= channel2Max) & ... (I(:,:,3) >= channel3Min ) & (I(:,:,3) <= channel3Max); Ibwopen=imopen(sliderBW,diskElem); % 显示处理后的掩膜图像（这行代码被注释掉了，如需显示取消注释） imshow(Ibwopen); % 对处理后的掩膜图像进行blob分析，获取blob的面积、质心和边界框 [objArea,objCentroid,bboxOut]=step(hBlob,Ibwopen); % 在原始视频帧上绘制blob的边界框，并返回新的带有绘制结果的视频帧 Ishape=insertShape(vidFrame,'Rectangle',bboxOut,'Linewidth',4); % 显示带有绘制结果的视频帧（这两行代码被注释掉了，如需显示取消注释） step(vidPlayer,Ishape); end