精易论坛

标题: 谁能帮我把易语言的这段代码转换为按键精灵安卓谢谢了 [打印本页]

作者: 379843797 时间: 2024-6-9 17:56
标题: 谁能帮我把易语言的这段代码转换为按键精灵安卓谢谢了
.版本 2
.支持库 spec

      图片_字节集＝读入文件 (目录_取当前目录 () ＋ “/img/” ＋ “点选验证码英文” ＋ “.jpg”)
      返回内容_文本＝图片识别_ocr (“125.confly.eu.org”, 图片_字节集, 是否单行文字识别)
      返回状态消息＝文本_取出中间文本 (返回内容_文本, #状态消息左边, #状态消息右边)
      .如果真 (返回状态消息 ≠ “success”)
         信息框 (“识别错误：” ＋返回状态消息, 0, , )
         返回 ()
      .如果真结束
      识别的文字_1 ＝文本_取出中间文本 (返回内容_文本, #识别文本左边, #识别文本右边)

      识别的文字_2 ＝分割文本 (识别的文字_1, #识别文本分割标志, )

      .计次循环首 (取数组成员数 (识别的文字_2), i)
         调试输出 (i)
         调试输出 (识别的文字_2 [i])

         .如果真 (i ＝ 1)
            识别的文字＝识别的文字_2 [i]
         .如果真结束
         .如果真 (i ＝ 2)
            识别的文字＝识别的文字＋ “ ” ＋识别的文字_2 [i]
         .如果真结束
         .如果真 (i ＝ 3 且识别的文字_2 [i] ≠ “>”)
            识别的文字＝识别的文字＋ “ ” ＋识别的文字_2 [i]
         .如果真结束
         .' 如果 (识别的文字＝ “”)
            ' 识别的文字＝识别的文字_2 [i]
         .否则
            ' 识别的文字＝识别的文字＋ “ ” ＋识别的文字_2 [i]
         .如果结束

      .计次循环尾 ()

.版本 2
.支持库 spec

.子程序图片识别_ocr, 文本型
.参数 token, 文本型
.参数图片_字节集, 字节集
.参数单行识别, 逻辑型
.局部变量待上传数据, 文本型
.局部变量 post_url, 文本型
.局部变量 t1, 文本型
.局部变量返回内容_文本, 文本型

.如果 (取文本左边 (token, 3) ＝ “vip”)
post_url ＝ “https://fast.tulingyun.com/api/ocr”
.否则
post_url ＝ “https://www.tulingyun.com/api/ocr”
.如果结束
待上传数据＝子文本替换 (#上传json格式, “&&token&&”, token, , , 真)
待上传数据＝子文本替换 (待上传数据, “&&rec&&”, “0”, , , 真)
' 调试输出 (待上传数据)
待上传数据＝子文本替换 (待上传数据, “&&upfile_b64&&”, 编码_BASE64编码 (图片_字节集), , , 真)
调试输出 (待上传数据)
返回内容_文本＝网页_访问S (post_url, 1, 待上传数据, , , “Content-Type: application/json;charset=utf-8”, t1, , , , , , , )
返回内容_文本＝编码_utf8到gb2312 (返回内容_文本)
返回内容_文本＝子文本替换 (返回内容_文本, “\” ＋ #引号, #引号, , , 真)
返回内容_文本＝子文本替换 (返回内容_文本, “\\”, “\”, , , 真)
返回内容_文本＝子文本替换 (返回内容_文本, “\/”, “/”, , , 真)
调试输出 (返回内容_文本, t1)
返回 (返回内容_文本)

欢迎光临精易论坛 (https://125.confly.eu.org/)