Overview
Comment: | (/ω\) |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | trunk |
Files: | files | file ages | folders |
SHA3-256: |
bb2048dbf73dadab4c4da806349a3147 |
User & Date: | 顽雨沉风 on 2024-01-23 05:41:40 |
Other Links: | manifest | tags |
Context
2024-01-23
| ||
05:42 | (/ω\) check-in: 97579aac1b user: 顽雨沉风 tags: trunk | |
05:41 | (/ω\) check-in: bb2048dbf7 user: 顽雨沉风 tags: trunk | |
05:39 | (/ω\) check-in: 155b00bc3f user: 顽雨沉风 tags: trunk | |
Changes
Added 残局文料/lib_lua/ipml_mj_ysaf.lua version [0dc413ec49].
> > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 | local 八位通用大字集码转本机码库 = require("u8_to_a") local d_5 = {} local 简件系库 = require("lfs") function _G.require_u8(modname) return require(八位通用大字集码转本机码库.u8_to_a(modname)) end do local k1 = 0 function _G.递增示() k1 = k1 + 1 print(k1) end end --~ do --~ local k1 = os.execute --~ function _G.os.execute(command) --~ return k1(八位通用大字集码转本机码库.u2a(command)) --~ end --~ end function d_5.读件(o1, o2) local k1 local k1_3 k1_3 = io.open(o1, o2 or "r") k1 = k1_3:read("a") k1_3:flush() k1_3:close() return k1 end function d_5.读件排(o1_9, o1) local k1_9 k1_9 = {} for o2 = 1, #o1_9 do k1_9[#k1_9 + 1] = d_5.读件(o1_9[o2], o1) end return k1_9 end function d_5.写件(o1, o2, o3) local k1_3 k1_3 = io.open(o1, o3 or "w") k1_3:write(o2) k1_3:flush() k1_3:close() end function d_5.写件_一维(o1, o1_9, o2, o3) local k1 = table.concat(o1_9, "\n") if o3 then k1 = o3(k1) end d_5.写件(o1, k1, o2) end function d_5.删注释_lua_多行注释(o1) o1 = o1:gsub("%-%-%[%[.-%]%]", "") return o1 end function d_5.删注释_lua_单行注释(o1) o1 = o1:gsub("%-%-.-\n", "") return o1 end function d_5.删注释_lua(o1) o1 = d_5.删注释_lua_多行注释(o1) o1 = d_5.删注释_lua_单行注释(o1) return o1 end function d_5.筛排(o1_9, o1, o2, o3) local k1_8 local k1_9 k1_9 = {} for o4 = 1, #o1_9 do k1_8 = o1(o1_9[o4], o2, o3) if k1_8 then k1_9[#k1_9 + 1] = k1_8 end end return k1_9 end function d_5.筛件径(o1, o2) local k1 local k1_9 k1_9 = {} for o3 in 简件系库.dir(o1) do if o3:match(o2 or ".") then k1_9[#k1_9 + 1] = o1 .. "/" .. o3 end end return k1_9 end function d_5.加前缀(o1, o2) return o2 .. o1 end function d_5.加前缀与后缀(o1, o2, o3) return o2 .. o1 .. o3 end function d_5.加后缀(o1, o2) return o1 .. o2 end function d_5.filterLinesWithCharacter(text, character) local result = {} -- 将文本按行拆分为一个行的数组 local lines = {} for line in text:gmatch("[^\n]+") do table.insert(lines, line) end -- 遍历每一行,检查是否包含目标字符 for i, line in ipairs(lines) do if line:find(character, 1, true) then table.insert(result, line) end end return result end function d_5.办并说(o1) print(o1) os.execute(o1) end return d_5 |