| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148 |
- --- 模块功能:配置管理-序列号、IMEI、底层软件版本号、时钟、是否校准、飞行模式、查询电池电量等功能
- -- @module misc
- -- @author 稀饭放姜
- -- @license MIT
- -- @copyright openLuat
- -- @release 2017.10.20
- local req = ril.request
- module(..., package.seeall)
- --sn:序列号
- --imei:IMEI
- -- calib 校准标志
- local sn, imei, calib
- --[[
- 函数名:rsp
- 功能 :本功能模块内“通过虚拟串口发送到底层core软件的AT命令”的应答处理
- 参数 :
- cmd:此应答对应的AT命令
- success:AT命令执行结果,true或者false
- response:AT命令的应答中的执行结果字符串
- intermediate:AT命令的应答中的中间信息
- 返回值:无
- ]]
- local function rsp(cmd, success, response, intermediate)
- local prefix = string.match(cmd, "AT(%+%u+)")
- --查询序列号
- if cmd == "AT+WISN?" then
- sn = intermediate
- --查询IMEI
- elseif cmd == "AT+CGSN" then
- imei = intermediate
- --查询是否校准
- elseif cmd == "AT+ATWMFT=99" then
- log.info('misc.ATWMFT', intermediate)
- if intermediate == "SUCC" then
- calib = true
- else
- calib = false
- end
- end
- end
- --- 设置系统时间
- -- @param t,系统时间,格式参考:{year=2017,month=2,day=14,hour=14,min=2,sec=58}
- -- @return 无
- -- @usage misc.setClock({year=2017,month=2,day=14,hour=14,min=2,sec=58})
- function setClock(t)
- if t == nil or type(t) ~= "table" then return end
- if t.year - 2000 > 38 then return end
- req(string.format("AT+CCLK=\"%02d/%02d/%02d,%02d:%02d:%02d+32\"", string.sub(t.year, 3, 4), t.month, t.day, t.hour, t.min, t.sec), nil, rsp)
- end
- --- 获取系统时间
- -- @return table,{year=2017,month=2,day=14,hour=14,min=19,sec=23}
- -- @usage date = getClock()
- function getClock()
- return os.date("*t")
- end
- --- 获取星期
- -- @number 星期,1-7分别对应周一到周日
- -- @usage week = misc.getWeek()
- function getWeek()
- local clk = os.date("*t")
- return ((clk.wday == 1) and 7 or (clk.wday - 1))
- end
- --- 获取校准标志
- -- @return boole,
- -- @usage calib = misc.getCalib()
- function getCalib()
- return calib
- end
- --- 设置SN
- -- @string s,新sn的字符串
- -- @string r,设置后是否重启,参数为nil时,自动重启
- -- @return 无
- -- @usage misc.setsn("1234567890")
- function setsn(s, r)
- if s ~= sn then
- req("AT+AMFAC=" .. (r and "0" or "1"))
- req("AT+WISN=\"" .. s .. "\"")
- end
- end
- --- 获取模块序列号
- -- @return string,未获取到,返回""
- -- @usage sn = misc.getsn()
- function getsn()
- return sn or ""
- end
- --- 设置IMEI
- -- @string s,新IMEI字符串
- -- @string r,设置后是否重启,参数为nil时,自动重启
- -- @return 无
- -- @usage misc.setimei(”359759002514931”)
- function setimei(s, r)
- if s ~= imei then
- req("AT+AMFAC=" .. (r and "0" or "1"))
- req("AT+WIMEI=\"" .. s .. "\"")
- end
- end
- --- 获取模块IMEI
- -- @return string,IMEI号,如果未获取到返回""--注意:开机lua脚本运行之后,会发送at命令去查询imei,所以需要一定时间才能获取到imei。开机后立即调用此接口,基本上返回""
- -- @usage imei = misc.getimei()
- function getimei()
- return imei or ""
- end
- --- 获取VBAT的电池电压
- -- @return number,电池电压,单位mv
- -- @usage vb = getVbatt()
- function getVbatt()
- local v1, v2, v3, v4, v5 = pmd.param_get()
- return v2
- end
- --- 打开并且配置PWM(支持2路PWM,仅支持输出)说明:当id为0时:period 取值在 80-1625 Hz范围内时,level 占空比取值范围为:1-100;period 取值在 1626-65535 Hz范围时,设x=162500/period, y=x * level / 100, x 和 y越是接近正的整数,则输出波形越准确
- -- @number id,number类型,PWM输出通道,仅支持0和1,0用的是uart2 tx,1用的是uart2 rx
- -- @number period,number类型:当id为0时,period表示频率,单位为Hz,取值范围为80-1625,仅支持整数,当id为1时,取值范围为0-7,仅支持整数,表示时钟周期,单位为毫秒,0-7分别对应125、250、500、1000、1500、2000、2500、3000毫秒
- -- @number level,number类型:当id为0时,level表示占空比,单位为level%,取值范围为1-100,仅支持整数,当id为1时,取值范围为1-15,仅支持整数,表示一个时钟周期内的高电平时间,单位为毫秒 1-15分别对应15.6、31.2、46.9、62.5、78.1、93.7、110、125、141、156、172、187、203、219、234毫秒
- -- @return 无
- function openpwm(id, period, level)
- assert(type(id) == "number" and type(period) == "number" and type(level) == "number", "openpwm type error")
- assert(id == 0 or id == 1, "openpwm id error: " .. id)
- local pmin, pmax, lmin, lmax = 80, 1625, 1, 100
- if id == 1 then pmin, pmax, lmin, lmax = 0, 7, 1, 15 end
- assert(period >= pmin and period <= pmax, "openpwm period error: " .. period)
- assert(level >= lmin and level <= lmax, "openpwm level error: " .. level)
- req("AT+SPWM=" .. id .. "," .. period .. "," .. level)
- end
- --- 关闭PWM
- -- @number id,number类型,PWM输出通道,仅支持0和1,0用的是uart2 tx,1用的是uart2 rx
- -- @return 无
- function closepwm(id)
- assert(id == 0 or id == 1, "closepwm id error: " .. id)
- req("AT+SPWM=" .. id .. ",0,0")
- end
- --注册以下AT命令的应答处理函数
- ril.regrsp("+ATWMFT", rsp)
- ril.regrsp("+WISN", rsp)
- ril.regrsp("+CGSN", rsp)
- ril.regrsp("+WIMEI", rsp)
- ril.regrsp("+AMFAC", rsp)
- ril.regrsp("+CFUN", rsp)
- --查询是否校准
- req("AT+ATWMFT=99")
- --查询序列号
- req("AT+WISN?")
- --查询IMEI
- req("AT+CGSN")
|