求火焰识别模型

哭红眼吓死你

求火焰识别模型

xizhihan

你这个包得是用火焰传感器的啊

你送的花开了

自己训练呗

xizhihan

  

窗口程序集名	保 留	保 留	备 注
火焰检测
变量名	类 型	数组	备 注
火焰色阶下限	整数型	3"  'BGR格	50, 200]
火焰色阶上限	整数型	3"  'BGR格	150, 255]

子程序名	返回值类型	公开	备 注
检测火焰区域
参数名	类 型	参考	可空	数组	备 注
图像数据	字节集

变量名	类 型	静态	数组	备 注
宽度	整数型
高度	整数型
像素数据	字节集
有效点数	整数型
x	整数型
y	整数型

宽度 = 取图像宽度 (图像数据)
高度 = 取图像高度 (图像数据)
有效点数 = 0
像素数据 = 转换到BGR数组 (图像数据)  ' 需调用图像处理支持库
计次循环首 (高度, y)
计次循环首 (宽度, x)
位置 = (y * 宽度 + x) * 3
b = 像素数据[位置]
g = 像素数据[位置 + 1]
r = 像素数据[位置 + 2]

' 颜色阈值判断
如果真 (r > 火焰色阶下限 且 r < 火焰色阶上限 且
g > 火焰色阶下限 且 g < 火焰色阶上限 且
b > 火焰色阶下限 且 b < 火焰色阶上限)
有效点数 = 有效点数 +1

计次循环尾 ()
计次循环尾 ()
返回 有效点数 > (宽度*高度*0.05)  ' 5%区域阈值

.版本 2<br /> .程序集 火焰检测<br /> .程序集变量 火焰色阶下限, 整数型, , "3"  'BGR格式[18, 50, 200]<br /> .程序集变量 火焰色阶上限, 整数型, , "3"  'BGR格式[50, 150, 255]<br /> <br /> .子程序 检测火焰区域<br /> .参数 图像数据, 字节集<br /> .局部变量 宽度, 整数型<br /> .局部变量 高度, 整数型<br /> .局部变量 像素数据, 字节集<br /> .局部变量 有效点数, 整数型<br /> .局部变量 x, 整数型<br /> .局部变量 y, 整数型<br /> <br /> 宽度 = 取图像宽度(图像数据)<br /> 高度 = 取图像高度(图像数据)<br /> 有效点数 = 0<br /> 像素数据 = 转换到BGR数组(图像数据)  '需调用图像处理支持库<br /> <br /> .计次循环首(高度, y)<br />     .计次循环首(宽度, x)<br />         位置 = (y * 宽度 + x) * 3<br />         b = 像素数据[位置]<br />         g = 像素数据[位置 + 1]<br />         r = 像素数据[位置 + 2]<br />         <br />         '颜色阈值判断<br />         .如果真 (r > 火焰色阶下限 且 r < 火焰色阶上限 且<br />             g > 火焰色阶下限 且 g < 火焰色阶上限 且<br />             b > 火焰色阶下限 且 b < 火焰色阶上限)<br />             有效点数 = 有效点数 +1<br />         .如果真结束<br />     .计次循环尾()<br /> .计次循环尾()<br /> <br /> 返回 有效点数 > (宽度*高度*0.05)  '5%区域阈值

  

子程序名	返回值类型	公开	备 注
火焰识别_API版
参数名	类 型	参考	可空	数组	备 注
图片路径	文本型

变量名	类 型	静态	数组	备 注
access_token	文本型
返回数据	文本型

' 获取API令牌
access_token = 网页访问 ("https://aip.baidubce.com/oauth/2.0/token?grant_type=client_credentials&client_id=您的API_KEY&client_secret=您的SECRET_KEY")
' 调用火焰识别接口
返回数据 = 网页访问 (
"https://aip.baidubce.com/rest/2.0/image-classify/v1/security/fire_detect",
"POST",
"access_token=" + access_token,
读入文件 (图片路径)
)
' 解析返回JSON
如果 (寻找文本 (返回数据, "fire", , 假) > 0)
返回 真
返回 假

.版本 2<br /> .子程序 火焰识别_API版<br /> .参数 图片路径, 文本型<br /> .局部变量 access_token, 文本型<br /> .局部变量 返回数据, 文本型<br /> <br /> '获取API令牌<br /> access_token = 网页访问("https://aip.baidubce.com/oauth/2.0/token?grant_type=client_credentials&client_id=您的API_KEY&client_secret=您的SECRET_KEY")<br /> <br /> '调用火焰识别接口<br /> 返回数据 = 网页访问(<br />     "https://aip.baidubce.com/rest/2.0/image-classify/v1/security/fire_detect",<br />     "POST",<br />     "access_token=" + access_token,<br />     读入文件(图片路径)<br /> )<br /> <br /> '解析返回JSON<br /> .如果 (寻找文本(返回数据, "fire", , 假) > 0)<br />     返回 真<br /> .否则<br />     返回 假

  

DLL命令名	返回值类型	公开	备 注
cvInRangeS	整数型
DLL库文件名:
opencv_core249.dll
在DLL库中对应命令名:
cvInRangeS
参数名	类 型	传址	数组	备 注

DLL命令名	返回值类型	公开	备 注
cvCountNonZero	整数型
DLL库文件名:
opencv_core249.dll
在DLL库中对应命令名:
cvCountNonZero
参数名	类 型	传址	数组	备 注

子程序名	返回值类型	公开	备 注
OpenCV火焰检测

变量名	类 型	静态	数组	备 注
火焰像素数	整数型
图像矩阵	整数型
掩膜矩阵	整数型

图像矩阵 = 载入图像 (图片路径)
设置ROI (图像矩阵, 0,0,640,480)  ' 限定检测区域
' 设置HSV颜色范围(火焰)
lower = 创建标量 (0, 100, 200)  ' H:0-20, S>100, V>200
upper = 创建标量 (20, 255, 255)
转换颜色空间 (图像矩阵, CV_BGR2HSV)
掩膜矩阵 = 创建空白矩阵 ()
cvInRangeS (图像矩阵, lower, upper, 掩膜矩阵)
火焰像素数 = cvCountNonZero (掩膜矩阵)
返回 火焰像素数 > (640*480*0.1)  ' 10%区域阈值

.版本 2<br /> .DLL命令 cvInRangeS, 整数型, "opencv_core249.dll", "cvInRangeS"<br /> .DLL命令 cvCountNonZero, 整数型, "opencv_core249.dll", "cvCountNonZero"<br /> <br /> .子程序 OpenCV火焰检测<br /> .局部变量 火焰像素数, 整数型<br /> .局部变量 图像矩阵, 整数型<br /> .局部变量 掩膜矩阵, 整数型<br /> <br /> 图像矩阵 = 载入图像(图片路径)<br /> 设置ROI(图像矩阵, 0,0,640,480)  '限定检测区域<br /> <br /> '设置HSV颜色范围(火焰)<br /> lower = 创建标量(0, 100, 200)  'H:0-20, S>100, V>200<br /> upper = 创建标量(20, 255, 255)<br /> <br /> 转换颜色空间(图像矩阵, CV_BGR2HSV)<br /> 掩膜矩阵 = 创建空白矩阵()<br /> cvInRangeS(图像矩阵, lower, upper, 掩膜矩阵)<br /> 火焰像素数 = cvCountNonZero(掩膜矩阵)<br /> <br /> 返回 火焰像素数 > (640*480*0.1)  '10%区域阈值

补充内容 (2025-4-6 10:06):
第一个无需AI的LJ判断方法，第二个调用百du，第三个openCV