Dim paramPath,binPath,lablePath,ranTime,ret,modelPath = GetTempDir() & "yolov8/"
Dir.Create modelPath
//将配置文件通过附件释放或url下载放置到模型目录皆可
PutAttachment modelPath, "*"
paramPath = modelPath & "yezhu_pnnx.py.ncnn.param"
binPath = modelPath & "yezhu_pnnx.py.ncnn.bin"
lablePath = modelPath & "classes.txt"
TracePrint dir.Exist(paramPath),dir.Exist(binPath),dir.Exist(lablePath)
//设置模型1,ncnn简化版模型
ret = yolo.setModel(2, 640, paramPath, binPath, lablePath,1,1,{"modelType":2})
//设置模型2,ncnn标准版模型
//ret = yolo.setModel(2, 640, paramPath, binPath, lablePath,1,1,{"modelType":2})
If ret["code"] = 0 Then
TracePrint "set model successed"
Else
TracePrint "set model failed,error msg:"&ret["msg"]
ExitScript
End If
Do
ranTime = TickCount()
//通过已设置模型1识别返回目标
ret = Yolo.runModel(2,0.75)
TracePrint TickCount()-ranTime
If ret["code"] = 0 Then
For i = 1 to len(ret["data"])
TracePrint "识别到目标:" & ret["data"]["text"] &_
",左上角x坐标:" & ret["data"]["x"] &_
",左上角y坐标:" & ret["data"]["y"] &_
",区域宽:" & ret["data"]["w"] &_
",区域高:" & ret["data"]["h"] &_
",可信度:" & ret["data"]["score"]
Next
Else
TracePrint "error code:"& ret["code"] &",error msg:"&ret["msg"]
End If
Delay 2000
Loop 我又把yolo模型转为标准模型,结果脚本异常终止了