如何用R语言控制智能壁挂Pro语音音箱

2022-06-18 发布浏览：672 次

本文介绍了如何用 R 对接智能语音壁挂音箱|款式1 的方法：可以通过接口实现远程指令语音播报控制、自定义语音内容播报、定时语音通知触发、场景联动语音提示、设备状态语音反馈、远程音量调节控制、远程播放列表管理、设备运行状态监控、多设备语音同步播报、自定义语音模板设置。

智能语音壁挂音箱|款式1

远程语音播报、语音提醒、语音通知、语音警报；

广泛应用于各种线下服务的订单提醒、线下流程的语音提醒等；

无需上传录音、无需后台设置；

直接通过HTTP接口推送文本，即可实时远程语音播报；

真人发声、语调自然柔和，支持男、女音色；

支持远程音量、音色、语调、语速设置；

支持多音字、支持数字（数值、金额、手机号等）读法；

内置铃声、提示音、警示音各5种；

可无缝接入各种OA、ERP、SaaS软件和低代码平台中；

一体化设计，安装简单；

更多...

适用场景

智能办公语音提醒场景、智能办公语音提示场景、共享自习室语音通知场景、共享棋牌室语音播报场景、共享台球室语音提示场景、共享茶室语音广播场景、无人售货机语音提示场景、自助洗车设备语音播报场景、设备机房语音告警场景、产线设备语音通知场景、酒店客房语音提示场景、写字楼办公区语音广播场景、智慧教室语音播报场景、养老社区语音通知场景、实验室语音提示场景、自动化设备语音告警场景中

支持命令

语音音量	volume
语音音色	voice
语音语速	speed
语音语调	tone
音频音量	audio_volume
语音播报	play:gbk:16
停止话音播报	stop
音频播放	audio
停止音频播放	audio_stop
铃声	ring
提示音	message
警示音	alert

产品手册

版本	对应产品手册
白色	《智能语音壁挂音箱产品手册》

HTTP接口控制以设备控制（向设备下发命令）为例

# First you need to prepare the following values
# 1. AppID (in your console development settings)
# 2. AppSecret (in your console development settings)
# 3. ts (timestamp of the current time, seconds)
# 4. YourSign = md5(md5(AppSecret)ts);(md5 is an encryption method, AppSecret is the AppSecret prepared above, ts is the timestamp prepared above, concatenate the string after the AppSecret after md5 encryption)
# In simple terms, the signature is md5(md5(your developer password)concatenate the above ts timestamp value); ts is the timestamp of the current timestamp; that is, to perform one MD5 on the developer password (AppSecret), then concatenate the timestamp, and then perform one MD5 on the entire concatenated string
# Core request address: api.thingboot.com/AppID/device/control/?sign=YourSign&&ts=ts;
# Request needs to pass two parameters device and order:
# device[string]: unique device ID, can pass multiple [separated by ,], can be viewed in the console, or pulled through the interface
# order[json string]: the command to be issued, for example:
# {"power":1}, usually to connect the circuit of the switch
# {"power3":0}, usually to close the third line of the switch or controller
# {"play:gbk:16":"hello, welcome to visit"}, let the voice speaker report the specified content
# The same type of product, the command is the same, different product types of commands, please view the product manual page of each product
# Note: you must replace the formal AppID and AppSecret with real-time timestamp calculation of the signature, the request must have device device ID and order command

#确保安装了必要的包：
#install.packages("httr")
#install.packages("digest")

library(httr)
library(digest)

# 配置参数
app_id <- "qtyVWcgeMq"  # 替换为实际的 AppID
app_secret <- "开发者密码"  # 替换为实际的 AppSecret
device <- "1878"  # 替换为实际的设备 ID
order <- '{"power1":1}'  # 替换为实际的命令

# 计算时间戳
ts <- as.numeric(Sys.time()) * 1000  # 转换为毫秒

# 计算 MD5 哈希值
md5_hash <- digest(app_secret, algo = "md5", serialize = FALSE)

# 计算 sign
sign_input <- paste0(md5_hash, ts)
sign <- digest(sign_input, algo = "md5", serialize = FALSE)

# 构造请求 URL
url <- sprintf("https://api.thingboot.com/%s/device/control/?sign=%s&ts=%d", app_id, sign, ts)

# 创建请求体
body <- list(
  device = device,
  order = order
)

# 发送请求
response <- POST(
  url,
  body = body,
  encode = "multipart",
  add_headers(
    `Accept` = "*/*",
    `Host` = "api.thingboot.com",
    `Connection` = "keep-alive"
  )
)

# 输出响应
if (http_status(response)$category == "Success") {
  print(content(response, "text"))
} else {
  print(http_status(response)$message)
}

说明：{AppID}为您的应用ID（由平台生成），免费注册登录后，可在控制台查看；sign和ts的取值，请参考文档。