游戏王残局简化版

Check-in [9942dfa51d]
Login

Check-in [9942dfa51d]

Overview
Comment:不指了
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256: 9942dfa51d737af33ccd58fbb0785ad768df839340f7f6bbaac88e89d7cf9894
User & Date: 顽雨沉风 on 2024-02-04 11:21:09
Other Links: manifest | tags
Context
2024-02-04
11:32
不指了 check-in: eda1d2cdc8 user: 顽雨沉风 tags: trunk
11:21
不指了 check-in: 9942dfa51d user: 顽雨沉风 tags: trunk
11:17
不指了 check-in: 054bca82de user: 顽雨沉风 tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Modified 残局文料/lua_lib/常用库.lua from [c1466248e1] to [44b26a6c6f]. 

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
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131

local d_4 = {}
local 简文件库 = require("lfs")
--~ 排
--~ 办排中值的能
--~ 入参2
--~ 入参3
--~ 入参4
function d_4.历排(o1_0, o1, o2_0, o3_0, o4_0)
  local k1_0
  --~ 集排
  k1_0 = {}
  for o2 = 1, #o1_0 do
    k1_0[#k1_0 + 1] = o1(o1_0[o2], o2_0, o3_0, o4_0)
    end
  return k1_0
  end
--~ 文
--~ 历文的能
--~ 入参2
--~ 入参3
function d_4.历文(o1, o2, o1_0, o2_0)
  local k1_0
  --~ 集排
  k1_0 = {}
  for o3_0 in o2(o1, o1_0, o2_0) do
    k1_0[#k1_0 + 1] = o3_0
    end
  return k1_0
  end
--~ 表中值
--~ 值类
--~ 办值的能
function d_4.操类(o1_0, o1, o2)
  if type(o1_0) == o1 then
    return o2(o1_0)
  else
    return o1_0
    end
  end
--~ 排中文
--~ 入参2
--~ 入参3
--~ 入参4
function d_4.全筛文(o1, o2, o3, o4)
  if string.find(o1, o2, o3, o4) then
    return o1
    end
  end
--~ 文
--~ 前缀
function d_4.加前缀(o1, o2)
  return (o2 or "") .. o1
  end
--~ 文
--~ 后缀
function d_4.加后缀(o1, o2)
  return o1 .. (o2 or "")
  end
--~ 令
function d_4.办令(o1)
  print(o1)
  os.execute(o1)
  end
--~ 文
--~ 前缀
function d_4.全筛前缀(o1, o2)
  if string.sub(o1, 1, #o2) == o2 then
    return o1
    end
  end
--~ 文
--~ 后缀
function d_4.全筛后缀(o1, o2)
  if string.sub(o1, -#o2) == o2 then
    return o1
    end
  end
--~ 目对
function d_4.用令行工具操文件(o1_0)
  local k1_9
  --~ 令行排
  k1_9 = d_4.历文(o1_0.文件目, 简文件库.dir)
  k1_9 = d_4.历排(k1_9, d_4.全筛后缀, o1_0.文件类)
  for o1 = 1, #k1_9 do
    k1_9[o1] = d_4.加前缀(k1_9[o1], o1_0.文件目)
    k1_9[o1] = d_4.加前缀(k1_9[o1], [["]])
    k1_9[o1] = d_4.加后缀(k1_9[o1], [["]])
    k1_9[o1] = d_4.加前缀(k1_9[o1], o1_0.令行前缀)
    d_4.办令(k1_9[o1])
    end
  end
--~ 文件路
--~ 式
function d_4.读文件(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_4.加对限(o1_0)
  for o1 = 1, #o1_0 do
    o1_0[o1] = d_4.加前缀(o1_0[o1], [[k1_0["]])
    o1_0[o1] = string.gsub(o1_0[o1], "=", "\"]=", 1)
    end
  table.insert(o1_0, 1, "local k1_0 = {}")
  table.insert(o1_0, "return k1_0")
  return table.concat(o1_0, "\n")
  end
--~ 文
--~ 文件路
--~ 式
function d_4.写文件(o1, o2, o3)
  local k1_3
  --~ 文件
  k1_3 = io.open(o2, o3 or "w")
  k1_3:write(o1)
  k1_3:flush()
  k1_3:close()
  end
--~ 文
function d_4.删左右空白(o1)
  o1 = string.gsub(o1, "^%s+", "")
  return string.gsub(o1, "%s+$", "")
  end
return d_4

|






|












|











|










|






|




|



|





|






|





|


|
|

|
|
|
|
|




|











|

|









|








|



|

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
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131

local d = {}
local 简文件库 = require("lfs")
--~ 排
--~ 办排中值的能
--~ 入参2
--~ 入参3
--~ 入参4
function d.历排(o1_0, o1, o2_0, o3_0, o4_0)
  local k1_0
  --~ 集排
  k1_0 = {}
  for o2 = 1, #o1_0 do
    k1_0[#k1_0 + 1] = o1(o1_0[o2], o2_0, o3_0, o4_0)
    end
  return k1_0
  end
--~ 文
--~ 历文的能
--~ 入参2
--~ 入参3
function d.历文(o1, o2, o1_0, o2_0)
  local k1_0
  --~ 集排
  k1_0 = {}
  for o3_0 in o2(o1, o1_0, o2_0) do
    k1_0[#k1_0 + 1] = o3_0
    end
  return k1_0
  end
--~ 表中值
--~ 值类
--~ 办值的能
function d.操类(o1_0, o1, o2)
  if type(o1_0) == o1 then
    return o2(o1_0)
  else
    return o1_0
    end
  end
--~ 排中文
--~ 入参2
--~ 入参3
--~ 入参4
function d.全筛文(o1, o2, o3, o4)
  if string.find(o1, o2, o3, o4) then
    return o1
    end
  end
--~ 文
--~ 前缀
function d.加前缀(o1, o2)
  return (o2 or "") .. o1
  end
--~ 文
--~ 后缀
function d.加后缀(o1, o2)
  return o1 .. (o2 or "")
  end
--~ 令
function d.办令(o1)
  print(o1)
  os.execute(o1)
  end
--~ 文
--~ 前缀
function d.全筛前缀(o1, o2)
  if string.sub(o1, 1, #o2) == o2 then
    return o1
    end
  end
--~ 文
--~ 后缀
function d.全筛后缀(o1, o2)
  if string.sub(o1, -#o2) == o2 then
    return o1
    end
  end
--~ 目对
function d.用令行工具操文件(o1_0)
  local k1_9
  --~ 令行排
  k1_9 = d.历文(o1_0.文件目, 简文件库.dir)
  k1_9 = d.历排(k1_9, d.全筛后缀, o1_0.文件类)
  for o1 = 1, #k1_9 do
    k1_9[o1] = d.加前缀(k1_9[o1], o1_0.文件目)
    k1_9[o1] = d.加前缀(k1_9[o1], [["]])
    k1_9[o1] = d.加后缀(k1_9[o1], [["]])
    k1_9[o1] = d.加前缀(k1_9[o1], o1_0.令行前缀)
    d.办令(k1_9[o1])
    end
  end
--~ 文件路
--~ 式
function d.读文件(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.加对限(o1_0)
  for o1 = 1, #o1_0 do
    o1_0[o1] = d.加前缀(o1_0[o1], [[k1_0["]])
    o1_0[o1] = string.gsub(o1_0[o1], "=", "\"]=", 1)
    end
  table.insert(o1_0, 1, "local k1_0 = {}")
  table.insert(o1_0, "return k1_0")
  return table.concat(o1_0, "\n")
  end
--~ 文
--~ 文件路
--~ 式
function d.写文件(o1, o2, o3)
  local k1_3
  --~ 文件
  k1_3 = io.open(o2, o3 or "w")
  k1_3:write(o1)
  k1_3:flush()
  k1_3:close()
  end
--~ 文
function d.删左右空白(o1)
  o1 = string.gsub(o1, "^%s+", "")
  return string.gsub(o1, "%s+$", "")
  end
return d