投稿

自动识别视频文字的软件（自动识别字幕的视频剪辑软件）

用户投稿 • • 网络资讯 • 阅读 705

大家好，我是公众号3分钟学堂的郭立员~

前段时间发过一篇文章是关于中文识别的api接口，接口是别人免费放出来的，可是这段时间看留言，接口已经废了。。。

自动识别视频文字的软件（自动识别字幕的视频剪辑软件）

既然已经废了，那就就用百度飞浆做个本地识别吧；

先到网上找个现成的源码，源码是易语言，并且有现成的封装软件，我们可以直接用，运行效果如下图所示：

自动识别视频文字的软件（自动识别字幕的视频剪辑软件）

我们是在安卓端，所以并不用这个，而是用它开启的接口：

自动识别视频文字的软件（自动识别字幕的视频剪辑软件）

在这四种方式中，我们选择第4种方式：

把图片转成base64数据传到电脑上，还有一点需要注意的是ip问题，在示例中ip是127.0.0.1#电脑本地ip，在按键上要使用ipv4地址；

自动识别视频文字的软件（自动识别字幕的视频剪辑软件）

接口地址：http://192.168.1.5:19811/ocr_data_2

这ip不要直接用，每个人的电脑不一定一样。

关于涉及到的命令，大家直接看文末的代码：

测试效果：

自动识别视频文字的软件（自动识别字幕的视频剪辑软件）

自动识别视频文字的软件（自动识别字幕的视频剪辑软件）

按键精灵安卓版代码如下：使用代码记得更换你自己电脑ip

Import "shanhai.lua"
Dim ret,json
Dim path="/sdcard/pictures/pic.png"
SnapShot path,31,136,499,387
Dim data=shanhai.ReadFileBase(path)
Do
    json = URL.Post("http://192.168.1.5:19811/ocr_data_2", data)
    If Len(json) > 0 Then 
        ret= shanhai.Unicode2Utf8(json)
        Exit Do
    End If
    Delay 1000
Loop
TracePrint ret
Dim tb=encode.JsonToTable(ret)
For Each k In tb["PaddleOCR"]
  TracePrint k["ttxt"]
Next

=正文完=

本文内容由互联网用户自发贡献，该文观点仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容， 请发送邮件至 sumchina520@foxmail.com 举报，一经查实，本站将立刻删除。
如若转载，请注明出处：https://www.sumedu.com/faq/84993.html
赞 (0)
用户投稿
0 0
上一篇 2022年6月1日 09:42
下一篇 2022年6月1日 09:47

相关推荐