游戏王残局简化版

Check-in [bb2048dbf7]
Login

Check-in [bb2048dbf7]

Overview
Comment:(/ω\)
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256: bb2048dbf73dadab4c4da806349a31474fad61bd5775a69b4b8e57fa8e9edc41
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