[按键手机插件开发]08. 数组排序函数例子 _ 按键精灵脚本教程

查看: 5378\|回复: 10	[紫猫] [按键手机插件开发]08. 数组排序函数例子 [复制链接]

紫猫

[紫猫学院创始人]

组别按键认证导师
UID513852
帖子3624
精华47
鲜花4633 朵
铜币28052 个
银币6157 个
在线时间190000
注册时间2010-10-09

1^#

字体大小: t T

发表于 2022-03-10 14:48 | |只看楼主

本系列教程目的是让大家掌握Lua基本语法与按键精灵手机版的插件开发制作，丰富按键精灵生态环境，让按键精灵变得更加强大！
本教程中部分知识点参考《Lua程序设计》书籍，有兴趣可以自行购买→传送门←
按键精灵手机版插件的开发标准草案请阅读帖子：http://bbs.anjian.com/showtopic-697779-1.aspx
紫猫学院也有提供Lua插件开发的VIP教学服务，有兴趣请咨询紫猫老师QQ345911220或微信zimaoxy

今天给大家带来一个Lua自带的数组排序命令功能。
在按键精灵中排序需要我们自己写算法实现，例如快速排序，冒泡排序等，而在Lua中有内置的table.sort()排序命令。
这个命令比较特殊，第一个参数是传入数组，而第二个参数是传入一个匿名函数，通过这个匿名函数返回值来决定排序规则。
下面我们直接上函数代码，完整插件源码见本帖子最后。

上面代码中的函数f就是用来决定升序还是降序的参数，在lua中是非常灵活的，完全可以自定义。下面是我们插件完整源码。

local _zimao = {} --这是内部私有table函数
local zimao = {} --这是对外公开table函数
QMPlugin = zimao --通过这行代码, 实现将zimao表中所有函数对外公开
_zimao.version = "20220310" --插件版本号, 方便自己记忆
local function try(block) -- 保护执行函数
local tablejoin = function (...)
local result = {}
for _, t in ipairs({...}) do
if type(t) == "table" then
for k, v in pairs(t) do
if type(k) == "number" then table.insert(result, v)
else result[k] = v end
end
else
table.insert(result, t)
end
end
return result
end
-- get the try function
local try = block[1]
assert(try)
-- get catch and finally functions
local funcs = tablejoin(block[2] or {}, block[3] or {})
-- try to call it
local result_error = {}
local results = {pcall(try)}
if not results[1] then
-- run the catch function
if funcs and funcs.catch then
result_error = {funcs.catch(results[2])}
end
end
-- run the finally function
if funcs and funcs.finally then
local result_fin = {funcs.finally(table.unpack(results))}
if #result_fin > 0 then
return table.unpack(result_fin)
end
end
-- ok?
if results[1] and #results > 1 then
return table.unpack(results, 2, #results)
else
if #result_error > 0 then
return table.unpack(result_error)
else
return nil
end
end
end
local function catch(block) --异常捕获函数
return {catch = block[1]}
end
local function finally(block) --最终必定执行函数
return {finally = block[1]}
end
-- 常用的内部函数, 不加入私有table中, 直接定义使用
local function traceprint(...) --调用按键精灵的调试输出命令
if QMPlugin then -- 在Lua调试环境下, QMPlugin变量的值是我们插件公开table函数值, 而在按键精灵调试运行环境下, 该变量值被替换为nil
print(...)
else
-- 获取可变长参数的第一个参数值
local line = select(1, ...)
-- 如果第一个参数是字符串, 并且符合格式 _数字 , 则判定为行号意思
if type(line) == "string" and line:match("^%_%d+$") then
-- 第一个参数按照格式 _数字: 传入TracePrint中可实现打印行号功能
LuaAuxLib.TracePrint(line .. ":", table.concat({...}, " ", 2, select("#", ...)))
elseif line == ":" and #{...} > 1 then
-- 第一个参数是冒号 : 时, 表示直接打印输出数据
LuaAuxLib.TracePrint(":", table.concat({...}, " ", 2, select("#", ...)))
else
-- 其他的情况下则加上前缀后, 进行正常输出
LuaAuxLib.TracePrint(":","紫猫学院测试插件：", ...)
end
end
end
-- 实现获取变量信息的插件函数, 需对外公开, 所以使用zimao前缀
function zimao.VarInfo(...)
-- 防止无法获取nil参数
local paramCount = select("#", ...)
local varType, printStr, t = "", "", {}
for i = 1, paramCount do
local v = select(i, ...)
try {
function()
varType = type(v)
if varType == "table" then
printStr = "【" .. varType .." " .. tostring(#v) .. "】" .. LuaAuxLib.Encode_GetJsonLib():encode(v)
elseif varType == "number" or varType == "string" then
printStr = "【" .. varType .." " .. tostring(#tostring(v)) .. "】" .. tostring(v)
elseif varType == "boolean" or varType == "null" then
printStr = "【" .. varType .."】" .. tostring(v)
else
printStr = "【" .. varType .."】未知数据，无法查看！"
end
table.insert( t, #t + 1, printStr )
end,
catch {
function (errors)
-- 下面这个traceprint是我们上面定义过的内部输出命令，注意大小写
traceprint("发生运行时错误！错误代码：VarInfo()，错误信息：", errors)
end
}
}
end
printStr = table.concat( t, ", " )
return printStr
end
-- 实现打印输出变量详细信息数据, 需对外公开
function zimao.TracePrint(...)
-- 通过VarInfo函数获取参数的详细数据信息
local info = zimao.VarInfo(...)
try {
function()
-- 在保护模式下打印输出这个数据内容
traceprint(info)
end,
catch {
function (errors)
traceprint("发生运行时错误！错误代码：TracePrint()，错误信息：", errors)
end
}
}
end
-- 遍历按键精灵的LuaAuxLib库下所有函数命令
function zimao.ScanLuaAuxLib()
-- 以保护模式运行, 避免插件错误造成脚本终止
try {
function()
-- 遍历LuaAuxLib内的内容
for k, v in pairs(LuaAuxLib) do
-- 使用自定义函数traceprint在按键精灵中打印函数名
traceprint("名称: " .. k, "类型: " .. type(v))
end
end,
catch {
function (errors)
traceprint("发生运行时错误！错误代码：ScanLuaAuxLib()，错误信息：", errors)
end
}
}
end
-- 数组排序, false为升序, true为降序, 省略默认为false
function zimao.Sort(list, comp)
return try {
function ()
-- 定义排序规则函数
local f = function(a, b)
if comp then
return a > b
else
return a < b
end
end
-- 返回排序结果
return table.sort(list, f)
end,
catch {
function (errors)
traceprint("发生运行时错误！错误代码：Sort()，错误信息：", errors)
end
}
}
end

复制代码

【紫猫编程学园】火热招生中

教学涉及按键精灵电脑版、按键精灵手机版、易语言、Lua编程。

包含网页、端游、手游、办公、模拟器、插件等。

报名咨询QQ:345911220 或 97682686 或 97682687;

报名咨询微信:zimaoxy; 点我在线交谈

紫猫学园免费教程

加入交流QQ群: 7333555

回顶部

发送短消息 UID 2046181 帖子 357 精华 0 鲜花 24 朵铜币 939 个银币 30 个性别在线时间 9200 注册时间 2013-08-01 最后登录 2024-05-10 759947931 查看公共资料搜索主题搜索帖子 fkldl fkldl 组别初中三年级 UID2046181 帖子357 精华0 鲜花24 朵铜币939 个银币30 个在线时间9200 注册时间2013-08-01	2^# 字体大小: t T 发表于 2022-06-07 23:14 \| \|只看该用户快上课上课上课


	回顶部

发送短消息 UID 2190778 帖子 60 精华 0 鲜花 17 朵铜币 140 个银币 23 个性别在线时间 620 注册时间 2013-10-11 最后登录 2024-06-07 458060705 查看公共资料搜索主题搜索帖子 zetime zetime 组别小学三年级 UID2190778 帖子60 精华0 鲜花17 朵铜币140 个银币23 个在线时间620 注册时间2013-10-11	3^# 字体大小: t T 发表于 2022-06-10 13:37 \| \|只看该用户谢谢分享


	回顶部

发送短消息 UID 7083977 帖子 17 精华 0 鲜花 15 朵铜币 29 个银币 19 个性别在线时间 0 注册时间 2019-10-28 最后登录 2024-02-03 查看公共资料搜索主题搜索帖子 a1104145115a a1104145115a 组别小学一年级 UID7083977 帖子17 精华0 鲜花15 朵铜币29 个银币19 个在线时间0 注册时间2019-10-28	4^# 字体大小: t T 发表于 2022-07-07 01:55 \| \|只看该用户学习学习


	回顶部

发送短消息 UID 3878338 帖子 44 精华 0 鲜花 28 朵铜币 46 个银币 40 个性别在线时间 0 注册时间 2016-04-21 最后登录 2024-08-05 查看公共资料搜索主题搜索帖子 q315767552 q315767552 组别小学二年级 UID3878338 帖子44 精华0 鲜花28 朵铜币46 个银币40 个在线时间0 注册时间2016-04-21	5^# 字体大小: t T 发表于 2022-07-07 02:51 \| \|只看该用户


	回顶部

发送短消息 UID 4648908 帖子 80 精华 0 鲜花 23 朵铜币 36 个银币 26 个性别在线时间 0 注册时间 2017-09-29 最后登录 2023-01-03 查看公共资料搜索主题搜索帖子 szxx111 组别小学四年级 UID4648908 帖子80 精华0 鲜花23 朵铜币36 个银币26 个在线时间0 注册时间2017-09-29	6^# 字体大小: t T 发表于 2022-08-14 08:29 \| \|只看该用户还让不让v不


	回顶部

发送短消息 UID 8306860 帖子 94 精华 0 鲜花 62 朵铜币 90 个银币 80 个性别在线时间 0 注册时间 2021-05-26 最后登录 2024-09-27 44933282 查看公共资料搜索主题搜索帖子 heartwen heartwen 组别小学五年级 UID8306860 帖子94 精华0 鲜花62 朵铜币90 个银币80 个在线时间0 注册时间2021-05-26	7^# 字体大小: t T 发表于 2022-08-14 16:15 \| \|只看该用户按键手机插件开发]08. 数组排序函数例子


	回顶部

发送短消息 UID 5530854 帖子 8 精华 0 鲜花 -2 朵铜币 13 个银币 3 个性别在线时间 20 注册时间 2018-08-28 最后登录 2022-09-20 472572 查看公共资料搜索主题搜索帖子 qq1777372 qq1777372 组别小学一年级 UID5530854 帖子8 精华0 鲜花-2 朵铜币13 个银币3 个在线时间20 注册时间2018-08-28	8^# 字体大小: t T 发表于 2022-09-20 17:10 \| \|只看该用户爆爆爆爆爆爆爆爆爆爆爆vv


	回顶部

发送短消息 UID 2665358 帖子 375 精华 0 鲜花 75 朵铜币 1248 个银币 259 个性别在线时间 6580 注册时间 2014-08-04 最后登录 2024-08-20 53265667 查看公共资料搜索主题搜索帖子 xiang268888 xiang268888 组别初中三年级 UID2665358 帖子375 精华0 鲜花75 朵铜币1248 个银币259 个在线时间6580 注册时间2014-08-04	9^# 字体大小: t T 发表于 2023-05-13 20:16 \| \|只看该用户碍事法师法萨芬


	回顶部

发送短消息 UID 9155162 帖子 14 精华 0 鲜花 13 朵铜币 15 个银币 15 个性别在线时间 0 注册时间 2023-11-16 最后登录 2024-03-01 13816202456@ 查看公共资料搜索主题搜索帖子 cyxyzw cyxyzw 组别小学一年级 UID9155162 帖子14 精华0 鲜花13 朵铜币15 个银币15 个在线时间0 注册时间2023-11-16	10^# 字体大小: t T 发表于 2023-12-27 15:21 \| \|只看该用户学习一下


	回顶部

发送短消息 UID 6145416 帖子 42 精华 0 鲜花 36 朵铜币 110 个银币 51 个性别在线时间 0 注册时间 2019-02-16 最后登录 2024-10-11 查看公共资料搜索主题搜索帖子 CCXing2018 CCXing2018 组别小学二年级 UID6145416 帖子42 精华0 鲜花36 朵铜币110 个银币51 个在线时间0 注册时间2019-02-16	11^# 字体大小: t T 发表于 2024-01-10 19:28 \| \|只看该用户顶起来看看


	回顶部

上一主题| 下一主题

[紫猫] [按键手机插件开发]08. 数组排序函数例子 [复制链接]