在线air780eg定位地图查询工具
操作控制
imeiid
获取地图查看链接
刷新
luat 代码
这点代码可以放到main.py调用
-- LuaTools需要PROJECT和VERSION这两个信息 PROJECT = "irtu_gnss" VERSION = "1.0.1" --[[ 本demo需要Air780EG及V1003固件, 2023-1-11之后编译的版本 所需要的库文件,在 script/libs里面, 全部加入就可以了 ]] -- sys库是标配 local sys = require("sys") local sysplus = require("sysplus") local libnet = require("libnet") local gps_uart_id = 2 -- libgnss库初始化 libgnss.clear() -- 清空数据,兼初始化 -- GNSS串口初始化 uart.setup(gps_uart_id, 115200) function exec_agnss() local url = "http://download.openluat.com/9501-xingli/HXXT_GPS_BDS_AGNSS_DATA.dat" if http then -- AGNSS 已调通 while 1 do local code, headers, body = http.request("GET", url).wait() log.info("GNSS串口初始化-----gnss", "AGNSS", code, body and #body or 0) if code == 200 and body and #body > 1024 then for offset = 1, #body, 512 do log.info("GNSS串口初始化-----gnss", "AGNSS", "write >>>", #body:sub(offset, offset + 511)) uart.write(gps_uart_id, body:sub(offset, offset + 511)) sys.wait(100) -- 等100ms反而更成功 end -- sys.waitUntil("UART2_SEND", 1000) io.writeFile("/6228.bin", body) break end sys.wait(60 * 1000) end end sys.wait(20) -- "$AIDTIME,year,month,day,hour,minute,second,millisecond" local date = os.date("!*t") if date.year > 2022 then local str = string.format("$AIDTIME,%d,%d,%d,%d,%d,%d,000", date["year"], date["month"], date["day"], date["hour"], date["min"], date["sec"]) log.info("gnss", str) uart.write(gps_uart_id, str .. "\r\n") sys.wait(20) end -- 读取之前的位置信息 local gnssloc = io.readFile("/gnssloc") if gnssloc then str = "$AIDPOS," .. gnssloc log.info("读取之前的位置信息----POS", str) uart.write(gps_uart_id, str .. "\r\n") str = nil gnssloc = nil else uart.write(gps_uart_id, "$AIDPOS,3432.70,N,10885.25,E,1.0\r\n") end end sys.taskInit(function() -- Air780EG默认波特率是115200 log.info("GPS", "start") pm.power(pm.GPS, true) -- 调试日志,可选 libgnss.debug(true) sys.wait(200) -- GPNSS芯片启动需要时间,大概150ms -- 增加显示的语句,可选 uart.write(gps_uart_id, "$CFGMSG,0,1,1\r\n") -- GLL sys.wait(20) uart.write(gps_uart_id, "$CFGMSG,0,5,1\r\n") -- VTG sys.wait(20) uart.write(gps_uart_id, "$CFGMSG,0,6,1\r\n") -- ZDA sys.wait(20) -- 定位成功后,使用GNSS时间设置RTC libgnss.rtcAuto(true) -- 绑定uart,底层自动处理GNSS数据 libgnss.bind(gps_uart_id) exec_agnss() end) -- 单纯定时打印一下定位信息 sys.taskInit(function() while 1 do sys.wait(15000) log.info("单纯定时打印一下定位信息----RMC", json.encode(libgnss.getRmc(4) or {})) local req_headers = {} req_headers["Content-Type"] = "application/json" local body = json.encode(libgnss.getRmc(4) or {}) local code, headers, body = http.request("POST","http://www.esp56.com/tool/gpsmap_air780eg/getjson.php?imeiid="..tostring(mobile.imei()), req_headers, body -- POST请求所需要的body, string, zbuff, file均可 ).wait() log.info("http.post", code, headers, body) end end) -- 订阅GNSS状态编码 sys.subscribe("GNSS_STATE", function(event, ticks) -- event取值有 -- FIXED 定位成功 -- LOSE 定位丢失 -- ticks是事件发生的时间,一般可以忽略 log.info("订阅GNSS状态编码----gnss", "state", event, ticks) if event == "FIXED" then local locStr = libgnss.locStr() log.info("订阅GNSS状态编码----gnss", "locStr", locStr) if locStr then -- 存入文件,方便下次AGNSS快速定位 io.writeFile("/gnssloc", locStr) end end end) sys.taskInit(function() while 1 do sys.wait(3600 * 1000) -- 一小时检查一次 local fixed, time_fixed = libgnss.isFix() if not fixed then exec_agnss() end end end) --[[ -- LED和ADC初始化 LED_GNSS = 24 LED_VBAT = 26 SWITCH_1 = 1 SWITCH_2 = 22 gpio.setup(LED_GNSS, 0) -- GNSS定位成功灯 gpio.setup(LED_VBAT, 0) -- 低电压警告灯 adc.open(adc.CH_VBAT) -- 低电压报警 sys.taskInit(function() while 1 do local vbat = adc.get(adc.CH_VBAT) log.info("上报低电压事件===vbat", vbat) if vbat < 3400 then gpio.set(LED_VBAT, 1) sys.wait(100) gpio.set(LED_VBAT, 0) sys.wait(900) -- TODO 上报低电压事件 else sys.wait(5000) end end end) ]] -- 用户代码已结束--------------------------------------------- -- 结尾总是这一句 sys.run() -- sys.run()之后后面不要加任何语句!!!!!
Copyright © 2018-