超简单实现易语言连单片机摄像头 ESP32-CAM OPENMV 监控 人脸

callme大大

什么是ESP32-CAM ？
大概长这样，很小，只有两个拇指大，大概只有20克的重量，可以做很多事。弥补了很多电脑不适合参加的场景。支持的硬件设备模块极多。可以实现各种工业化自动化控制

可以实现什么？
二维码，识图，人脸，图片采集。图片传过来你可以自由发挥。
优势是什么？
可用太阳能板子，配合电池，低功耗，低价格，代码简单。扩展性强。
随便画板显示，运行效果（图片大小可以调，我买的是200万像素的，拍照大小可以在ESP32代码里调）：




连接方法，与固件：
下载ESP32cam的OPENMV的固件：
地址：https://github.com/androidalekra/ESP32CAM_OPENMV


下载官方烧录工具 flash_download_tools:
https://www.espressif.com/zh-hans/support/download/other-tools



ESP32刷机模式链接（usb转串口的设备（CH340))  这里刷完机之后把这根小的线，IO0连GND的线要拔下来，就是普通的运行模式：

ESP32连电脑：


开始刷固件：


1.注意端口是否链接对
2.长时间没响应，需要按一下ESP32上的RET重启按钮，
3.如果一直等待连接，可能是接错线或者线连的不稳定。


代码部分：
ESP32摄像头客户端代码：

  

import network,time,machine
import gc,random,socket
from machine import Pin
import camera
#连接WiFi
def connectWifi (ssid,passwd):
global wlan,ip
wlan = network.WLAN (network.STA_IF)
wlan.active (True)   #激活网络
wlan.disconnect ()   #断开WiFi连接
wlan.scan ();time.sleep (2)
print (ssid, passwd)
wlan.connect (ssid, passwd)   #连接WiFi
a=0
while (wlan.ifconfig ()[0] == ' 0.0.0.0'):   #等待连接
time.sleep (1);a=a+1
ip=wlan.ifconfig ()[0]
print ( str (a)+"次ip:"+ip)
if a>10:     
machine.reset ()
return True
# 初始化工作
def makerobo_setup ():
global SSID,PASSWORD,wlan,Relay
wlan = None  #wlan
r=random.randint (1,2)
if (r==1):
SSID = "hr"  #修改为你的WiFi名称
else:
SSID = "hr"    #备选的WIFI
PASSWORD = "hr582716403"  #修改为你WiFi密码
connectWifi (SSID,PASSWORD)
makerobo_setup ()
camera.init (0,format=3) #3 =jpg
camera.framesize (3) #这里3 是定义了图片大小，我这个摄像头最高可以设置8，再高就拍出来黑屏了，你可以具体试试。
s=socket.socket ()
addr= ("192.168.123.236",9988) #填你易语言的IP和端口
s.connect (addr)
while True:
try:
img=camera.capture ()
s.send (img)
# f=open ("123.jpg","w")
#   f.write (img)
#  f.close ()
print ("camera ok")
except:
print ("camera error")

import network,time,machine<br /> import gc,random,socket<br /> from machine import Pin<br /> import camera<br /> <br /> #连接WiFi<br /> def connectWifi(ssid,passwd):<br />     global wlan,ip<br />     wlan = network.WLAN(network.STA_IF) <br />     wlan.active(True)   #激活网络<br />     wlan.disconnect()   #断开WiFi连接<br />     wlan.scan();time.sleep(2)<br />     print(ssid, passwd)<br />     wlan.connect(ssid, passwd)   #连接WiFi<br />     a=0<br />     while(wlan.ifconfig()[0] == '0.0.0.0'):   #等待连接<br />         time.sleep(1);a=a+1<br />         ip=wlan.ifconfig()[0]<br />         print( str(a)+"次ip:"+ip)<br />         if a>10:     <br />             machine.reset()<br />     return True<br /> <br /> <br /> # 初始化工作<br /> def makerobo_setup():<br />     global SSID,PASSWORD,wlan,Relay<br />     wlan = None  #wlan<br /> <br />     r=random.randint(1,2)<br />     if (r==1):<br />         SSID = "hr"  #修改为你的WiFi名称<br />     else:<br />         SSID = "hr"    #备选的WIFI<br />     PASSWORD = "hr582716403"  #修改为你WiFi密码<br />     connectWifi(SSID,PASSWORD)<br /> makerobo_setup()<br /> camera.init(0,format=3) #3=jpg<br /> camera.framesize(3)#这里3 是定义了图片大小，我这个摄像头最高可以设置8，再高就拍出来黑屏了，你可以具体试试。<br /> s=socket.socket()<br /> addr=("192.168.123.236",9988)#填你易语言的IP和端口<br /> s.connect(addr)<br /> <br /> while True:<br />     try:<br />         img=camera.capture()<br />         s.send(img)<br />         # f=open("123.jpg","w")<br />         #   f.write(img)<br />         #  f.close()<br />         print("camera ok")<br />     except:<br />         print("camera error")<br />         <br />    

易语言代码：
鱼刺这些不用都可以，这个是我调试时为了排查问题用的鱼刺。用了精易模块，

  

子程序名	返回值类型	公开	备 注
_服务器1_数据到达

变量名	类 型	静态	数组	备 注
DATA	字节集

DATA ＝ 服务器1.取回数据 ()
许可证.进入 ()
队列.压入字节集 (DATA)
鱼刺.投递任务 (&CAM_显示)
许可证.退出 ()
鱼刺.等待任务动态 (500, 真)

子程序名	返回值类型	公开	备 注
CAM_显示

变量名	类 型	静态	数组	备 注
data	字节集

如果真 (队列.弹出字节集 (data) ＝ 假)
鱼刺.触发任务动态 ()
返回 ()

如果 (图片_取宽度 (data) ＞ 10 且 图片_取高度 (data) ＞ 10)
画板1.底图 ＝ data
调试输出 (“ok”, 取字节集长度 (data), 取字节集左边 (data, 10), 取字节集右边 (data, 10))
调试输出 (“no”, 取字节集长度 (data), 取字节集左边 (data, 10), 取字节集右边 (data, 10))

鱼刺.触发任务动态 ()

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _服务器1_数据到达<br /> .局部变量 DATA, 字节集<br /> <br /> DATA ＝ 服务器1.取回数据 ()<br /> 许可证.进入 ()<br /> 队列.压入字节集 (DATA)<br /> 鱼刺.投递任务 (&CAM_显示)<br /> 许可证.退出 ()<br /> 鱼刺.等待任务动态 (500, 真)<br /> <br /> <br /> <br /> .子程序 CAM_显示<br /> .局部变量 data, 字节集<br /> <br /> .如果真 (队列.弹出字节集 (data) ＝ 假)<br />     鱼刺.触发任务动态 ()<br />     返回 ()<br /> .如果真结束<br /> <br /> .如果 (图片_取宽度 (data) ＞ 10 且 图片_取高度 (data) ＞ 10)<br />     画板1.底图 ＝ data<br />     调试输出 (“ok”, 取字节集长度 (data), 取字节集左边 (data, 10), 取字节集右边 (data, 10))<br /> .否则<br />     调试输出 (“no”, 取字节集长度 (data), 取字节集左边 (data, 10), 取字节集右边 (data, 10))<br /> .如果结束<br /> <br /> 鱼刺.触发任务动态 ()

cilj

顶一个，..

凌伤

支持楼主  感谢分享

王者路太艰难

这个东西不错

yqgzs

感谢分享，刚好需要

aidicil

学习了，最近刚开始准备学习单片机，打算自己做一个刚需的小设备

网哩鱼

支持开源~！感谢分享

神话传说001

感谢分享

亿万

支持                                 

mxsf梦醒时分

支持楼主  感谢分享