[触动精灵]触动精灵官方手册流水账1

--[[功能:输出变量类型值 包含遍历表 包括嵌套表
--参数 第一个参数可以是任何类型变量 如果是table 第二个参数是设置表元素的间隔符的 也可以不写
 --]]
function showInfo(t, tab)    
        return try{
        function ()            
            --下面代码随便写 有可能抛出异常即可                
            local str = str or ""
            --print(type(t))
            --if not t then
            if type(t)~="table" then                
                --error("table is nil")
                return type(t) .. ":"  .. tostring(t)
            end
            tab = tab or "  "
            tab = tab .. "  "
            str = str .. "{\n"

            if type(t) == "table" then
                for k, v in pairs(t) do
                    if type(k) == "number" then
                        str = str .. string.sub(tab, 2, string.len(tab)) .. "[" .. tostring(k) .. "]" .. " = "
                    else
                        str = str .. string.sub(tab, 2, string.len(tab)) .. "[\"" .. tostring(k) .. "\"]" .. " = "
                    end
                    if type(v) == "string" then
                        str = str .. "\"" .. v .. "\"" .. "\n"
                    elseif type(v) == "number" then
                        str = str .. tostring(v) .. "\n"
                    elseif type(v) == "boolean" then
                        str = str .. tostring(v) .. "\n"
                    elseif type(v) == "function" then
                        str = str .. tostring(v) .. "\n"
                    elseif type(v) == "thread" then
                        str = str .. "thread : " .. tostring(v) .. "\n"
                    elseif type(v) == "userdata" then
                        str = str .. "userdata : " .. tostring(v) .. "\n"
                    elseif type(v) == "table" then
                        str = str .. showInfo(v, tab) .. "\n"
                    else
                        str = str .. "unknow : " .. tostring(v) .. "\n"
                    end
                end
                str = str .. string.sub(tab, 2, string.len(tab) - 1) .. "}"
            else
                str = t
            end
            return str
        end,
        catch{
            function (errors)
                --这里对应函数名要改
                local tempStr=""
                tempStr="函数[" .. tostring("traversalTable") .. "] 错误信息：".. tostring(errors)
                traceprint(tempStr)
                dialog(tempStr, 3)
            end            
        }
    }    
end

--[[
获取一定区域内 和指定颜色相似的颜色点的数量
sim注意按照触动的习惯来把 80 90 而不是0.8 .09
colorStr 是十六进制的颜色数值 不过也可以是颜色字符串
getColorNum(5,164,347,479,0x00b98c,9
--]]
function getColorNum(x1,y1,x2,y2,colorStr,sim)
    return try{
        function ()            
            --下面代码随便写 有可能抛出异常即可
            local result=0
            local tempColor
            local tempPercent
            keepScreen(true);
            for y=y1,y2 do
                for x=x1,x2 do
                    tempColor=getColor(x, y)
                    if tempColor>=tonumber(colorStr) then
                        tempPercent=tonumber(colorStr)/tempColor
                    else
                        tempPercent=tempColor/tonumber(colorStr)
                    end
                    if tempPercent*100>tonumber(sim) then
                        result=result+1
                    end    
                    --mSleep(1)
                end                
            end
            keepScreen(false); 
            return result
        end,
        catch{
            function (errors)
                --这里对应函数名要改
                local tempStr=""
                tempStr="函数[" .. tostring("getColorNum") .. "] 错误信息：".. tostring(errors)
                traceprint(tempStr)
                dialog(tempStr, 3)
            end            
        }
    }    
end

config={}
----日志相关(暂时不考虑多日志并存的情况)
config["isLog"]=true--是否开启日志输出和日志文件
config["logFileName"]=tostring(config["scriptName"]) .. tostring(os.date("%Y%m%d%H%M%S",os.time())) --只是当前日志文件名字不是完整路径年月日时分秒 如XXXX20190816112336 加了个前缀
config["logMode"]=0--0表示写入本地日志文件--1 - 生成 1 个以时间戳命名的后缀为 .log 的文件到 log 文件夹下 2 - 异步发送到服务器（支持引擎 v1.7.0 及 Android v2.4.1 以上版本）3 - 同步发送到服务器（仅支持触动精灵 iOS v1.7.0 及以上版本）
-----是否开启日志行号和文件名显示(不需要设置） 注意 这个只是再调试状态下才能出现 正式脚本下debug库是无效的  如果debug库里面的文件名里面没找到.lua 自然当前debug库是无效的 那么日志输出就不要带行号和文件名
config["isAddLineAndFilename"]=(string.find(tostring(debug.getinfo(1).source),".lua") and {true} or {false})[1]


--输出日志信息到日志窗口和日志文件 日志文件的输出还有是否有行号和文件名由配置表控制 
function traceprint(str)
    local info 
    local tempStr=""
    if config["isAddLineAndFilename"] then--是不是处于调试模式
        info = debug.getinfo(2)
        tempStr="[" .. tostring(info["source"]) .. "]" .. "第" .. tostring(info["currentline"]) .. "行  " .. tostring(str)
    else
        tempStr=tostring(str)
    end
    if config["isLog"] then
        wLog(config["logFileName"], tostring(tempStr))
    end
    nLog(tempStr)
    mSleep(5)--为了nLog的显示顺序的暂时解决办法
end

--脚本是否过期判断 设置过期时间在配置表的config["expireTime"]里面设置 格式是"2019-10-02 12:30:12"或者表{2019,10,2,12,30,12} 开启判断是 config["isExpireTime"] =true
--返回值没有 过期了就弹出窗口然后停止脚本
function isExpireTime()
    return try{
        function ()            
            --下面代码随便写 有可能抛出异常即可            
            local result=-1
            local nowTime
            local expireTime
            nowTime=getNetTime()
            if nowTime==0 then  
                error("无法获取到网络时间 请检查")
            end
            
            expireTime=dataToTimeStamp(config["expireTime"])
            if nowTime>expireTime then
                --过期了                    
                result=1
                traceprint("脚本过期了 请检查")
                dialog("脚本过期了 请检查", 0)
                lua_exit()
            else
                --在试用期内
                result=-1
                traceprint("在试用期内 到期时间[".. tostring(config["expireTime"])  .. "]")
            end        
            --return result
        end,
        catch{
            function (errors)
                --这里对应函数名要改
                local tempStr=""
                tempStr="函数[" .. tostring("isExpireTime") .. "] 错误信息：".. tostring(errors)
                traceprint(tempStr)
                dialog(tempStr, 3)
            end            
        }
    }    
end

--清理输入框的内容 前提是当前光标已经处于输入框的尾部了
--参数不写 默认删除15下  写了就按照参数数量删除
function clearInputBox(delNum)    
    return try{
        function ()            
            --下面代码随便写 有可能抛出异常即可    
            delNum=tonumber(delNum) or 15--不写就是默认删除15下
            for i=1,delNum do
                inputText("\b")
                mSleep(10)
            end
        end,
        catch{
            function (errors)
                --这里对应函数名要改
                local tempStr=""
                tempStr="函数[" .. tostring("clearInputBox") .. "] 错误信息：".. tostring(errors)
                traceprint(tempStr)
                dialog(tempStr, 3)
            end            
        }
    }
end

--取前后两个字符串之间的内容 就是易语言的取文本中间函数
--返回值 没东西返回nil 又符合要求的返回对应字符串
--注意的是前缀后缀里面如果夹杂着正则的元字符 需要转义 不然获取的结果就有误 --还有注意处理的字符串如果出现多个前缀后缀 那么只能取到第一个符合要求的
function getTextCenterStr(str,prefixStr,suffixStr)    
    return try{
        function ()            
            --下面代码随便写 有可能抛出异常即可    
            local result=""
            local tempTable
            str=tostring(str)  prefixStr=tostring(prefixStr)  suffixStr=tostring(suffixStr)
            tempTable=string.match(str,prefixStr .. "(.-)" .. suffixStr)
            result=tempTable
            return result
        end,
        catch{
            function (errors)
                --这里对应函数名要改
                local tempStr=""
                tempStr="函数[" .. tostring("getTextCenterStr") .. "] 错误信息：".. tostring(errors)
                traceprint(tempStr)
                dialog(tempStr, 3)
            end            
        }
    }
end

--播放音乐
--参数 第一个要音频的完整路径 一般是在 config["userPath"] 文件夹里面 第二个参数单位是秒 不写默认10秒
--支持 配置表 config["systype"] 获取是安卓还是IOS
function playSound(videoPath,limitTime)    
    return try{
        function ()            
            --下面代码随便写 有可能抛出异常即可    
            limitTime=tonumber(limitTime) or 10
            
            if fileExist(videoPath)==false then
             error("[" .. tostring(videoPath) .. "] 无法找到对应文件 请检查")
            end
            
            if config["systype"]=="android" then 
                playAudio(videoPath);    --播放 test.mp3
                mSleep(limitTime*1000)
                stopAudio(); --停止播放
            else
                playAudio(videoPath);    --播放 test.mp3
                mSleep(limitTime*1000)
                playAudio(""); --iOS 停止播放，Android 参考 stopAudio 函数
            end
            
        end,
        catch{
            function (errors)
                --这里对应函数名要改
                local tempStr=""
                tempStr="函数[" .. tostring("playSound") .. "] 错误信息：".. tostring(errors)
                traceprint(tempStr)
                dialog(tempStr, 3)
            end            
        }
    }
end