游戏王残局简化版

Check-in [1265aac793]
Login

Check-in [1265aac793]

Overview
Comment:好
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256: 1265aac7936a676601be454d0ee0334ec1b60524a3644f6680fa358ac29c9b67
User & Date: 顽雨沉风 on 2024-02-13 05:10:43
Other Links: manifest | tags
Context
2024-02-13
05:12
好 check-in: 0a84ce44ba user: 顽雨沉风 tags: trunk
05:10
好 check-in: 1265aac793 user: 顽雨沉风 tags: trunk
05:10
好 check-in: 4c19907139 user: 顽雨沉风 tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Modified 残局文料/lua_lib/ipml_mj_ysaf.lua from [4848c3edde] to [215e96f933]. 

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

--~ package.path = [[.\dfns_jvwg_ysaf\?.lua;]] .. package.path
--~ package.cpath = [[.\dfns_jvwg_ysaf\?.dll;]] .. package.cpath
local 字集码互转库 = require("u8_to_a")
local d_5 = {}
--~ function _G.历排(o1_11, u1, u2, u3, o4)
  --~ local k1_8
  --~ local k1_11
  --~ k1_11 = {}
  --~ for o5 = 1, #o1_11 do
    --~ k1_8 = u1(o1_11[o5], u2, u3, o4)
    --~ if k1_8 then
      --~ k1_11[#k1_11 + 1] = k1_8
      --~ end
    --~ end
  --~ return k1_11
  --~ end
--~ function _G.历文(u1, u2, u3, o4)
  --~ local k1_9
  --~ k1_9 = {}
  --~ for o5 in u2(u1, u3, o4) do
    --~ k1_9[#k1_9 + 1] = o5
    --~ end
  --~ return k1_9
  --~ end
--~ local 简件系库 = require("lfs")
--~ require(字集码互转库.u8_to_a("程语_月_基类_字串_内置库_加多"))
--~ 程语_月_标准库_仿照_加多_多编码_大字集_通用





|




|






|


|








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

--~ package.path = [[.\dfns_jvwg_ysaf\?.lua;]] .. package.path
--~ package.cpath = [[.\dfns_jvwg_ysaf\?.dll;]] .. package.cpath
local 字集码互转库 = require("u8_to_a")
local d_5 = {}
--~ function _G.历排(o1_11, u1, u2, u3, u4)
  --~ local k1_8
  --~ local k1_11
  --~ k1_11 = {}
  --~ for o5 = 1, #o1_11 do
    --~ k1_8 = u1(o1_11[o5], u2, u3, u4)
    --~ if k1_8 then
      --~ k1_11[#k1_11 + 1] = k1_8
      --~ end
    --~ end
  --~ return k1_11
  --~ end
--~ function _G.历文(u1, u2, u3, u4)
  --~ local k1_9
  --~ k1_9 = {}
  --~ for o5 in u2(u1, u3, u4) do
    --~ k1_9[#k1_9 + 1] = o5
    --~ end
  --~ return k1_9
  --~ end
--~ local 简件系库 = require("lfs")
--~ require(字集码互转库.u8_to_a("程语_月_基类_字串_内置库_加多"))
--~ 程语_月_标准库_仿照_加多_多编码_大字集_通用
︙︙
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142

function d_5.删空格(u1)
  return u1:gsub(" ", "")
  end
function d_5.筛排(o1_9, u1, u2, u3)
  local k1_8
  local k1_9
  k1_9 = {}
  for o4 = 1, #o1_9 do
    k1_8 = u1(o1_9[o4], u2, u3)
    if k1_8 then
      k1_9[#k1_9 + 1] = k1_8
      end
    end
  return k1_9
  end
--~ function d_5.筛文(u1, u2, u3)
--~ local k1_9
--~ k1_9 = {}
--~ for o4 in u2(u1, u3) do
--~ k1_9[#k1_9 + 1] = o4
--~ end
--~ return k1_9
--~ end
--~ function d_5.判文(u1, u2, u3, o4)
--~ if u1:find(u2 or ".", u3, o4) then
--~ return u1
--~ end
--~ end
--~ function d_5.筛件径(u1, u2)
  --~ local k1_9
  --~ k1_9 = d_5.筛文(u1, 简件系库.dir)
  --~ k1_9 = d_5.筛排(k1_9, d_5.加前缀, u1 .. "/")








|
|









|
|



|
|








111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142

function d_5.删空格(u1)
  return u1:gsub(" ", "")
  end
function d_5.筛排(o1_9, u1, u2, u3)
  local k1_8
  local k1_9
  k1_9 = {}
  for u4 = 1, #o1_9 do
    k1_8 = u1(o1_9[u4], u2, u3)
    if k1_8 then
      k1_9[#k1_9 + 1] = k1_8
      end
    end
  return k1_9
  end
--~ function d_5.筛文(u1, u2, u3)
--~ local k1_9
--~ k1_9 = {}
--~ for u4 in u2(u1, u3) do
--~ k1_9[#k1_9 + 1] = u4
--~ end
--~ return k1_9
--~ end
--~ function d_5.判文(u1, u2, u3, u4)
--~ if u1:find(u2 or ".", u3, u4) then
--~ return u1
--~ end
--~ end
--~ function d_5.筛件径(u1, u2)
  --~ local k1_9
  --~ k1_9 = d_5.筛文(u1, 简件系库.dir)
  --~ k1_9 = d_5.筛排(k1_9, d_5.加前缀, u1 .. "/")
︙︙

Modified 残局文料/lua_lib/常用库.lua from [11a881b2fb] to [27252ada98]. 

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

local s = {}
local 简文件库 = require("lfs")
local ffi = require("ffi")
--~ 排
--~ 办排中值的能
--~ 入参2
--~ 入参3
--~ 入参4
function s.历排(u1_0, u1, u2, u3, o4)
  local k1_0
  --~ 集排
  k1_0 = {}
  for o5 = 1, #u1_0 do
    k1_0[#k1_0 + 1] = u1(u1_0[o5], u2, u3, o4)
    end
  return k1_0
  end
--~ 文
--~ 历文的能
--~ 入参2
--~ 入参3
function s.历文(u1, u2, u3, o4)
  local k1_0
  --~ 集排
  k1_0 = {}
  for o5 in u2(u1, u3, o4) do
    k1_0[#k1_0 + 1] = o5
    end
  return k1_0
  end
--~ 排
--~ 能
function s.历排取一(u1_0, u1)









|




|







|



|








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

local s = {}
local 简文件库 = require("lfs")
local ffi = require("ffi")
--~ 排
--~ 办排中值的能
--~ 入参2
--~ 入参3
--~ 入参4
function s.历排(u1_0, u1, u2, u3, u4)
  local k1_0
  --~ 集排
  k1_0 = {}
  for o5 = 1, #u1_0 do
    k1_0[#k1_0 + 1] = u1(u1_0[o5], u2, u3, u4)
    end
  return k1_0
  end
--~ 文
--~ 历文的能
--~ 入参2
--~ 入参3
function s.历文(u1, u2, u3, u4)
  local k1_0
  --~ 集排
  k1_0 = {}
  for o5 in u2(u1, u3, u4) do
    k1_0[#k1_0 + 1] = o5
    end
  return k1_0
  end
--~ 排
--~ 能
function s.历排取一(u1_0, u1)
︙︙
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74

  for u2, u2_0 in pairs(u1_0) do
    --~ 键
    --~ 值
    k1, k2 = s.历对取一的模(k1, k2, u2, u2_0, u1)
    end
  return k1, k2
  end
function s.历对取一的模(u1, u2, u3, o4, o5)
  if u1 == nil then
    return u3, o4
  elseif o5(u1, u2, u3, o4) then
    return u3, o4
  else
    return u1, u2
    end
  end
function s.历对(u1_0, u1, u2)
  local k1
  local k1_0, k2_0








|

|
|
|








56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74

  for u2, u2_0 in pairs(u1_0) do
    --~ 键
    --~ 值
    k1, k2 = s.历对取一的模(k1, k2, u2, u2_0, u1)
    end
  return k1, k2
  end
function s.历对取一的模(u1, u2, u3, u4, o5)
  if u1 == nil then
    return u3, u4
  elseif o5(u1, u2, u3, u4) then
    return u3, u4
  else
    return u1, u2
    end
  end
function s.历对(u1_0, u1, u2)
  local k1
  local k1_0, k2_0
︙︙
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111

    return u1_0
    end
  end
--~ 排中文
--~ 入参2
--~ 入参3
--~ 入参4
function s.全筛文(u1, u2, u3, o4)
  print(4)
  if string.find(u1, u2, u3, o4) then
    return u1
    end
  end
--~ 文
--~ 前缀
function s.加前缀(u1, u2)
  return (u2 or "") .. u1








|

|








95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111

    return u1_0
    end
  end
--~ 排中文
--~ 入参2
--~ 入参3
--~ 入参4
function s.全筛文(u1, u2, u3, u4)
  print(4)
  if string.find(u1, u2, u3, u4) then
    return u1
    end
  end
--~ 文
--~ 前缀
function s.加前缀(u1, u2)
  return (u2 or "") .. u1
︙︙
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261

function s.位右移(u1, u2)
  return bit.rshift(u1, u2)
  end
--~ 键
--~ 最大值
--~ 键
--~ 值
function s.筛对中最大值(u1, u2, u3, o4)
  if u2 < o4 then
    return true
    end
  end
--~ 最短键
--~ 值
--~ 键
--~ 值
function s.筛对中最短键(u1, u2, u3, o4)
  if #u1 > #u3 then
    return true
    end
  end
--~ 最短文
--~ 值
function s.筛排中最短文(u1, u2)








|
|







|








238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261

function s.位右移(u1, u2)
  return bit.rshift(u1, u2)
  end
--~ 键
--~ 最大值
--~ 键
--~ 值
function s.筛对中最大值(u1, u2, u3, u4)
  if u2 < u4 then
    return true
    end
  end
--~ 最短键
--~ 值
--~ 键
--~ 值
function s.筛对中最短键(u1, u2, u3, u4)
  if #u1 > #u3 then
    return true
    end
  end
--~ 最短文
--~ 值
function s.筛排中最短文(u1, u2)
︙︙

Modified 残局文料/lua_lib/程序语言_月_基础类型_功能_传入参数_转化.lua from [391963f222] to [bfa46fcbfd]. 

1
2
3
4
5
6
7
8
9
10
11
12

local d_2 = {}
--~ 传参_参数数量
function d_2.二个参数(u1, u2, u3, o4)
  return u1(u2(u3), u2(o4))
  end
function d_2.三个参数(u1, u2, u3, o4, o5)
  return u1(u2(u3), u2(o4), u2(o5))
  end
function d_2.四个参数(u1, u2, u3, o4, o5, o6)
  return u1(u2(u3), u2(o4), u2(o5), u2(o6))
  end
return d_2



|
|

|
|

|
|



1
2
3
4
5
6
7
8
9
10
11
12

local d_2 = {}
--~ 传参_参数数量
function d_2.二个参数(u1, u2, u3, u4)
  return u1(u2(u3), u2(u4))
  end
function d_2.三个参数(u1, u2, u3, u4, o5)
  return u1(u2(u3), u2(u4), u2(o5))
  end
function d_2.四个参数(u1, u2, u3, u4, o5, o6)
  return u1(u2(u3), u2(u4), u2(o5), u2(o6))
  end
return d_2

Modified 残局文料/lua_lib/程序语言_月_基础类型_字串_全筛.lua from [4855a6670e] to [6a2d3523bf]. 

1
2
3
4
5
6
7
8
9
10
11

local d_2 = {}
function d_2.找字(u1, u2, u3, o4)
  --~ print(u1, u2, u3, o4)
  if u1:find(u2, u3, o4) then
    return u1
    end
  end
--~ function d_2.返全文_普态_前缀态(u1, u2)
  --~ return d_2.返全文(u1, u2, 1, true)
  --~ end
--~ function d_2.返选文(u1, u2)


|
|
|








1
2
3
4
5
6
7
8
9
10
11

local d_2 = {}
function d_2.找字(u1, u2, u3, u4)
  --~ print(u1, u2, u3, u4)
  if u1:find(u2, u3, u4) then
    return u1
    end
  end
--~ function d_2.返全文_普态_前缀态(u1, u2)
  --~ return d_2.返全文(u1, u2, 1, true)
  --~ end
--~ function d_2.返选文(u1, u2)
︙︙

Modified 残局文料/lua_lib/程序语言_月_基础类型_字串_逐一.lua from [fdbe1c96b6] to [0966247b71]. 

1
2
3
4
5
6
7
8
9
10
11

local d_2 = {}
function d_2.处理后返回新排(u1, u2, u3, o4)
  local k1_9
  k1_9 = {}
  for o5 in u2(u1, u3, o4) do
    k1_9[#k1_9 + 1] = o5
    end
  return k1_9
  end
return d_2



|


|







1
2
3
4
5
6
7
8
9
10
11

local d_2 = {}
function d_2.处理后返回新排(u1, u2, u3, u4)
  local k1_9
  k1_9 = {}
  for o5 in u2(u1, u3, u4) do
    k1_9[#k1_9 + 1] = o5
    end
  return k1_9
  end
return d_2

Modified 残局文料/lua_lib/程序语言_月_基础类型_序排_逐一.lua from [bbc8107701] to [6811fd6086]. 

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19

local d_2 = {}
function d_2.处理后返回新排(o1_11, u1, u2, u3, o4)
  local k1_8
  local k1_11
  k1_11 = {}
  for o5 = 1, #o1_11 do
    k1_8 = u1(o1_11[o5], u2, u3, o4)
    if k1_8 then
      k1_11[#k1_11 + 1] = k1_8
      end
    end
  return k1_11
  end
--~ function d_2.处理(o1_11, u1, u2, u3)
  --~ for o4 = 1, #o1_11 do
    --~ u1(o1_11[o4], u2, u3)
    --~ end
  --~ end
return d_2


|




|







|
|




1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19

local d_2 = {}
function d_2.处理后返回新排(o1_11, u1, u2, u3, u4)
  local k1_8
  local k1_11
  k1_11 = {}
  for o5 = 1, #o1_11 do
    k1_8 = u1(o1_11[o5], u2, u3, u4)
    if k1_8 then
      k1_11[#k1_11 + 1] = k1_8
      end
    end
  return k1_11
  end
--~ function d_2.处理(o1_11, u1, u2, u3)
  --~ for u4 = 1, #o1_11 do
    --~ u1(o1_11[u4], u2, u3)
    --~ end
  --~ end
return d_2

Modified 残局文料/lua_lib/算机_程语_月_基类_文.lua from [14fdf6b4ca] to [ffc2cb32ce]. 

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

local string = string
local s = {}
function s.连(u1, u2, u3, o4, o5, o6, o7, o8, o9)
  return u1 .. (u2 or "") .. (u3 or "") .. (o4 or "") .. (o5 or "") .. (o6 or "") .. (o7 or "") .. (o8 or "") .. (o9 or "")
  end
--~ 排中文
--~ 入参2
--~ 入参3
--~ 入参4
function s.全筛文(u1, u2, u3, o4)
  --~ print(4)
  if string.find(u1, u2, u3, o4) then
    return u1
    end
  end
return s



|
|





|

|





1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

local string = string
local s = {}
function s.连(u1, u2, u3, u4, o5, o6, o7, o8, o9)
  return u1 .. (u2 or "") .. (u3 or "") .. (u4 or "") .. (o5 or "") .. (o6 or "") .. (o7 or "") .. (o8 or "") .. (o9 or "")
  end
--~ 排中文
--~ 入参2
--~ 入参3
--~ 入参4
function s.全筛文(u1, u2, u3, u4)
  --~ print(4)
  if string.find(u1, u2, u3, u4) then
    return u1
    end
  end
return s

Modified 残局文料/lua_lib/算机_程语_月_基类_能_传能_历_基类_文_取全.lua from [c415239de3] to [1e7c04fe27]. 

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

local s = {}
-- 启
--~ 文
--~ 历文的能
--~ 入参2
--~ 入参3
function s.历文(u1, u2, u3, o4)
  local k1_0
  --~ 集排
  k1_0 = {}
  for o5 in u2(u1, u3, o4) do
    k1_0[#k1_0 + 1] = o5
    end
  return k1_0
  end
return s







|



|






1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

local s = {}
-- 启
--~ 文
--~ 历文的能
--~ 入参2
--~ 入参3
function s.历文(u1, u2, u3, u4)
  local k1_0
  --~ 集排
  k1_0 = {}
  for o5 in u2(u1, u3, u4) do
    k1_0[#k1_0 + 1] = o5
    end
  return k1_0
  end
return s

Modified 残局文料/lua_lib/算机_程语_月_基类_能_传能_历_基类_表_对_取一.lua from [d5ac2842e1] to [17381efe7c].

︙︙
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

  end
-- 模
--~ 键
--~ 值
--~ 对中键
--~ 对中值
--~ 能
function s.模(u1, u2, u3, o4, o5)
  if u1 == nil then
    return u3, o4
  elseif o5(u1, u2, u3, o4) then
    return u3, o4
  else
    return u1, u2
    end
  end
-- 最短
--~ 最短键
--~ 值
--~ 键
--~ 值
function s._筛最短键(u1, u2, u3, o4)
  if #u1 > #u3 then
    return true
    end
  end
--~ 对
function s.筛最短键(u1_0)
  return s.历对(u1_0, s._筛最短键)
  end
-- 最大
--~ 键
--~ 最大值
--~ 键
--~ 值
function s._筛最大值(u1, u2, u3, o4)
  if u2 < o4 then
    return true
    end
  end
--~ 对
function s.筛最大值(u1_0)
  return s.历对(u1_0, s._筛最大值)
  end








|

|
|
|









|













|
|








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

  end
-- 模
--~ 键
--~ 值
--~ 对中键
--~ 对中值
--~ 能
function s.模(u1, u2, u3, u4, o5)
  if u1 == nil then
    return u3, u4
  elseif o5(u1, u2, u3, u4) then
    return u3, u4
  else
    return u1, u2
    end
  end
-- 最短
--~ 最短键
--~ 值
--~ 键
--~ 值
function s._筛最短键(u1, u2, u3, u4)
  if #u1 > #u3 then
    return true
    end
  end
--~ 对
function s.筛最短键(u1_0)
  return s.历对(u1_0, s._筛最短键)
  end
-- 最大
--~ 键
--~ 最大值
--~ 键
--~ 值
function s._筛最大值(u1, u2, u3, u4)
  if u2 < u4 then
    return true
    end
  end
--~ 对
function s.筛最大值(u1_0)
  return s.历对(u1_0, s._筛最大值)
  end
︙︙

Modified 残局文料/lua_lib/算机_程语_月_基类_能_传能_历_基类_表_对_取全.lua from [1499e6e6da] to [d4891684d0]. 

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

local s = {}
-- 全与局
--~ 对
--~ 能
--~ 入参3
function s.历对(u1_0, u1, u2)
  local k1, k2
  local k1_0
  --~ 对
  k1_0 = {}
  for u3, o4 in pairs(u1_0) do
    --~ 键
    --~ 值
    k1, k2 = u1(u3, o4, u2)
    if k1 then
      k1_0[k1] = k2
    else
      end
    end
  return k1_0
  end
--~ 对
--~ 能
--~ 入参2
--~ 入参3
function s.历值(u1_0, u1, u2, u3)
  local k1_0
  --~ 对
  k1_0 = {}
  for o4, o5 in pairs(u1_0) do
    k1_0[o4] = u1(o5, u2, u3)
    end
  return k1_0
  end
--~ 键
--~ 值
--~ 要找的值
function s.全等筛值(u1, u2, u3)
  if u2 == u3 then
    return u1, u2
  else
    end
  end
return s











|


|















|
|














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

local s = {}
-- 全与局
--~ 对
--~ 能
--~ 入参3
function s.历对(u1_0, u1, u2)
  local k1, k2
  local k1_0
  --~ 对
  k1_0 = {}
  for u3, u4 in pairs(u1_0) do
    --~ 键
    --~ 值
    k1, k2 = u1(u3, u4, u2)
    if k1 then
      k1_0[k1] = k2
    else
      end
    end
  return k1_0
  end
--~ 对
--~ 能
--~ 入参2
--~ 入参3
function s.历值(u1_0, u1, u2, u3)
  local k1_0
  --~ 对
  k1_0 = {}
  for u4, o5 in pairs(u1_0) do
    k1_0[u4] = u1(o5, u2, u3)
    end
  return k1_0
  end
--~ 键
--~ 值
--~ 要找的值
function s.全等筛值(u1, u2, u3)
  if u2 == u3 then
    return u1, u2
  else
    end
  end
return s

Modified 残局文料/lua_lib/算机_程语_月_基类_能_传能_历_基类_表_排_取全.lua from [6ad5385441] to [427ffeb571]. 

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

local s = {}
-- 返旧与返新与不返
-- 排数
--~ 排
--~ 办排中值的能
--~ 入参2
--~ 入参3
--~ 入参4
function s.历排(u1_0, u1, u2, u3, o4)
  local k1_0
  --~ 集排
  k1_0 = {}
  for o5 = 1, #u1_0 do
    k1_0[#k1_0 + 1] = u1(u1_0[o5], u2, u3, o4)
    end
  return k1_0
  end
--~ 排
--~ 排
--~ 办排中值的能
--~ 入参3
--~ 入参4
--~ 入参5
function s.历二排(u1_0, u2_0, u1, u2, u3, o4)
  local k1_0
  --~ 集排
  k1_0 = {}
  for o5 = 1, #u1_0 do
    k1_0[#k1_0 + 1] = u1(u1_0[o5], u2_0[o5], u2, u3, o4)
    end
  return k1_0
  end
--~ 排
--~ 排
--~ 排
--~ 办排中值的能
--~ 入参4
--~ 入参5
--~ 入参6
function s.历三排(u1_0, u2_0, u3_0, u1, u2, u3, o4)
  local k1_0
  --~ 集排
  k1_0 = {}
  for o5 = 1, #u1_0 do
    k1_0[#k1_0 + 1] = u1(u1_0[o5], u2_0[o5], u3_0[o5], u2, u3, o4)
    end
  return k1_0
  end
return s









|




|









|




|










|




|





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

local s = {}
-- 返旧与返新与不返
-- 排数
--~ 排
--~ 办排中值的能
--~ 入参2
--~ 入参3
--~ 入参4
function s.历排(u1_0, u1, u2, u3, u4)
  local k1_0
  --~ 集排
  k1_0 = {}
  for o5 = 1, #u1_0 do
    k1_0[#k1_0 + 1] = u1(u1_0[o5], u2, u3, u4)
    end
  return k1_0
  end
--~ 排
--~ 排
--~ 办排中值的能
--~ 入参3
--~ 入参4
--~ 入参5
function s.历二排(u1_0, u2_0, u1, u2, u3, u4)
  local k1_0
  --~ 集排
  k1_0 = {}
  for o5 = 1, #u1_0 do
    k1_0[#k1_0 + 1] = u1(u1_0[o5], u2_0[o5], u2, u3, u4)
    end
  return k1_0
  end
--~ 排
--~ 排
--~ 排
--~ 办排中值的能
--~ 入参4
--~ 入参5
--~ 入参6
function s.历三排(u1_0, u2_0, u3_0, u1, u2, u3, u4)
  local k1_0
  --~ 集排
  k1_0 = {}
  for o5 = 1, #u1_0 do
    k1_0[#k1_0 + 1] = u1(u1_0[o5], u2_0[o5], u3_0[o5], u2, u3, u4)
    end
  return k1_0
  end
return s

Modified 残局文料/lua_lib/算机_程语_月_基类_能_传能_历_基类_表_排_取联.lua from [3c47f874b6] to [af06bee05c]. 

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

local s = {}
-- 启
--~ 排
--~ 办排中值的能
--~ 入参2
--~ 入参3
function s.历排(u1_0, u1, u2, u3, o4)
  local k1
  --~ 和
  k1 = u1_0[1] or 0
  for o5 = 2, #u1_0 do
    k1 = u1(k1, u2(u1_0[o5], u3, o4))
    end
  return k1
  end
return s







|




|





1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

local s = {}
-- 启
--~ 排
--~ 办排中值的能
--~ 入参2
--~ 入参3
function s.历排(u1_0, u1, u2, u3, u4)
  local k1
  --~ 和
  k1 = u1_0[1] or 0
  for o5 = 2, #u1_0 do
    k1 = u1(k1, u2(u1_0[o5], u3, u4))
    end
  return k1
  end
return s

Modified 残局文料/lua_lib/算机_程语_月_基类_能_传能_历_基类_表_排_相加.lua from [7672cfcd27] to [01ab4d0675]. 

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18

local s = {}
-- 启
-- 启
--~ 排
--~ 办排中值的能
--~ 入参2
--~ 入参3
--~ 入参4
function s.历排(u1_0, u1, u2, u3, o4)
  local k1
  --~ 和
  k1 = 0
  for o5 = 1, #u1_0 do
    k1 = k1 + u1(u1_0[o5], u2, u3, o4)
    end
  return k1
  end
return s









|




|





1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18

local s = {}
-- 启
-- 启
--~ 排
--~ 办排中值的能
--~ 入参2
--~ 入参3
--~ 入参4
function s.历排(u1_0, u1, u2, u3, u4)
  local k1
  --~ 和
  k1 = 0
  for o5 = 1, #u1_0 do
    k1 = k1 + u1(u1_0[o5], u2, u3, u4)
    end
  return k1
  end
return s

Modified 残局文料/lua_lib/计算机_系统_窗口群_命令行_无窗口.lua from [1a6326b93a] to [ba0d0e5411]. 

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22

local d_2 = {}
--~ local 件径库 = 常用库.导入库_通用大字集态_八位态("计算机_系统_窗口群_文件系统_路径")
--~ local 历排库 = 常用库.导入库_通用大字集态_八位态("程序语言_月_基础类型_序排_逐一")
--~ local 前后缀库 = 常用库.导入库_通用大字集态_八位态("程序语言_月_基础类型_字串_前缀与后缀")
function d_2.执行命令(u1)
  print(u1)
  os.execute(u1)
  end
--~ function d_2.逐一执行命令(u1)
  --~ 历排库.处理(u1, d_2.执行命令)
  --~ end
--~ 件夹
--~ function d_2.入文件夹路径而用文件路径执行命令_全筛态_加前缀与后缀态_不虑子文件夹内态(u1, u2, u3, o4, o5, o6)
  --~ local k1_9
  --~ k1_9 = 件径库.入文件夹路径而返文件路径排_全筛态(u1, u2, u3, o4)
  --~ k1_9 = 前后缀库.逐一在前后加上英文双引号(k1_9)
  --~ k1_9 = 前后缀库.逐一加前缀与后缀(k1_9, o5, o6)
  --~ d_2.逐一执行命令(k1_9)
  --~ end
--~ function d_2.入文件夹路径而用文件路径执行命令_全筛后缀态_加前缀态_不虑子文件夹内态(u1, u2, u3)
  --~ return d_2.入文件夹路径而用文件路径执行命令_全筛态_加前缀与后缀态_不虑子文件夹内态(u1, u2, -#u2, true, u3)
  --~ end













|

|








1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22

local d_2 = {}
--~ local 件径库 = 常用库.导入库_通用大字集态_八位态("计算机_系统_窗口群_文件系统_路径")
--~ local 历排库 = 常用库.导入库_通用大字集态_八位态("程序语言_月_基础类型_序排_逐一")
--~ local 前后缀库 = 常用库.导入库_通用大字集态_八位态("程序语言_月_基础类型_字串_前缀与后缀")
function d_2.执行命令(u1)
  print(u1)
  os.execute(u1)
  end
--~ function d_2.逐一执行命令(u1)
  --~ 历排库.处理(u1, d_2.执行命令)
  --~ end
--~ 件夹
--~ function d_2.入文件夹路径而用文件路径执行命令_全筛态_加前缀与后缀态_不虑子文件夹内态(u1, u2, u3, u4, o5, o6)
  --~ local k1_9
  --~ k1_9 = 件径库.入文件夹路径而返文件路径排_全筛态(u1, u2, u3, u4)
  --~ k1_9 = 前后缀库.逐一在前后加上英文双引号(k1_9)
  --~ k1_9 = 前后缀库.逐一加前缀与后缀(k1_9, o5, o6)
  --~ d_2.逐一执行命令(k1_9)
  --~ end
--~ function d_2.入文件夹路径而用文件路径执行命令_全筛后缀态_加前缀态_不虑子文件夹内态(u1, u2, u3)
  --~ return d_2.入文件夹路径而用文件路径执行命令_全筛态_加前缀与后缀态_不虑子文件夹内态(u1, u2, -#u2, true, u3)
  --~ end
︙︙

Modified 残局文料/lua_lib/计算机_系统_窗口群_文件系统_路径.lua from [fc9fc45a11] to [77b6d87a63]. 

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17

local d_2 = {}
local 历文库 = 常用库.导入库_通用大字集态_八位态("程序语言_月_基础类型_字串_逐一")
local 历排库 = 常用库.导入库_通用大字集态_八位态("程序语言_月_基础类型_序排_逐一")
local 前后缀库 = 常用库.导入库_通用大字集态_八位态("程序语言_月_基础类型_字串_前缀与后缀")
local 全筛文库 = 常用库.导入库_通用大字集态_八位态("程序语言_月_基础类型_字串_全筛")
local 简单文件系统库 = require("lfs")
function d_2.入文件夹路径而返文件路径排_全筛态(u1, u2, u3, o4)
  local k1_9
  k1_9 = d_2.入文件夹路径而返文件路径排(u1)
  return 历排库.处理后返回新排(k1_9, 全筛文库.找字, u2, u3, o4)
  end
function d_2.入文件夹路径而返文件路径排(u1)
  local k1_9
  k1_9 = d_2.入文件夹路径而返文件名排(u1)
  return 前后缀库.逐一加前缀(k1_9, u1 .. "/")
  end
function d_2.入文件夹路径而返文件名排(u1)







|


|








1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17

local d_2 = {}
local 历文库 = 常用库.导入库_通用大字集态_八位态("程序语言_月_基础类型_字串_逐一")
local 历排库 = 常用库.导入库_通用大字集态_八位态("程序语言_月_基础类型_序排_逐一")
local 前后缀库 = 常用库.导入库_通用大字集态_八位态("程序语言_月_基础类型_字串_前缀与后缀")
local 全筛文库 = 常用库.导入库_通用大字集态_八位态("程序语言_月_基础类型_字串_全筛")
local 简单文件系统库 = require("lfs")
function d_2.入文件夹路径而返文件路径排_全筛态(u1, u2, u3, u4)
  local k1_9
  k1_9 = d_2.入文件夹路径而返文件路径排(u1)
  return 历排库.处理后返回新排(k1_9, 全筛文库.找字, u2, u3, u4)
  end
function d_2.入文件夹路径而返文件路径排(u1)
  local k1_9
  k1_9 = d_2.入文件夹路径而返文件名排(u1)
  return 前后缀库.逐一加前缀(k1_9, u1 .. "/")
  end
function d_2.入文件夹路径而返文件名排(u1)
︙︙