游戏王残局简化版

Check-in [6f45c2f05c]
Login

Check-in [6f45c2f05c]

Overview
Comment:0.0.1213
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256: 6f45c2f05c7a2b709af867f57ba5adc0a23be2a289252211f08f2307ea0ffd9e
User & Date: 顽雨沉风 on 2023-07-11 14:20:58
Other Links: manifest | tags
Context
2023-07-11
14:23
0.0.1214 check-in: 5744929923 user: 顽雨沉风 tags: trunk
14:20
0.0.1213 check-in: 6f45c2f05c user: 顽雨沉风 tags: trunk
11:08
0.0.1212 check-in: 3727ffca0c user: 顽雨沉风 tags: trunk
Changes

Modified script/c0.lua from [7bc74f5d08] to [c79df2a08d].

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
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249

str = {}
fun = {}

str["Debug.ReloadFieldBegin"] = Debug.ReloadFieldBegin

Debug.ReloadFieldBegin = function(str_1, str_2)
  str["不洗牌"] = str_1 & DUEL_PSEUDO_SHUFFLE
  str["无BP"] = str_1 & DUEL_ATTACK_FIRST_TURN
  if str_2 then
    if str_2 == 3 then
    str["规则"] = "大师3 "
    elseif str_2 == 4 then
      str["规则"] = "新大师 "
    elseif str_2 == 5 then
      str["规则"] = "大师2020 "
      end
  else
    str["规则"] = "大师2020 "
    end
  str["Debug.ReloadFieldBegin"](str_1, str_2)
  end

fun["通关邀请"] = function()
  effect_1 = Effect.GlobalEffect()
  effect_1:SetType(EFFECT_TYPE_FIELD
    + EFFECT_TYPE_CONTINUOUS)
  effect_1:SetCode(EVENT_DAMAGE)
  function cache_1()
    cache_1 = Duel.GetLP(1)
    if cache_1 <= 0 then
      if cache_1 < 0 then
        Debug.ShowHint("QB:「你居然二解了,请加群告诉我怎么二解。」")
        end
      cache_1 = true
    else
      cache_1 = false
      end
    return cache_1
    end
  effect_1:SetCondition(cache_1)
  function cache_1()
    Debug.ShowHint("残局群181175613")
    return
    end
  effect_1:SetOperation(cache_1)
  Duel.RegisterEffect(effect_1
    , 0)
  end

fun["是否效果卡"] = function(card)
  cache_1 = Card.IsType(card, TYPE_SPELL)
  cache_2 = Card.IsType(card, TYPE_TRAP)
  cache_3 = Card.IsType(card, TYPE_EFFECT)
  if cache_1
  or cache_2
  or cache_3 then
    return true
    end
  cache_1 = Card.IsType(card, TYPE_PENDULUM)
  if cache_1 then
    cache_1 = Card.IsCode(card, 28363749)
    cache_2 = Card.IsCode(card, 19474136)
    cache_3 = Card.IsCode(card, 17390179)
    cache_4 = Card.IsCode(card, 83980492)
    if cache_1
    or cache_2
    or cache_3
    or cache_4 then
    else
      return true
      end
    end
  return false
  end

fun["开局说明"] = function()
  if str["开局说明吗"] == 1 then
    return
  else
    str["开局说明吗"] = 1
    end
  cache_1 = 0
  cache_1 = cache_1 + LOCATION_DECK
  cache_1 = cache_1 + LOCATION_HAND
  cache_1 = cache_1 + LOCATION_MZONE
  cache_1 = cache_1 + LOCATION_SZONE
  cache_1 = cache_1 + LOCATION_GRAVE
  cache_1 = cache_1 + LOCATION_REMOVED
  cache_1 = cache_1 + LOCATION_EXTRA
  str["这个残局的效果卡数量"] = Duel.GetMatchingGroupCount(fun["是否效果卡"],0,cache_1,cache_1,nil)
  cache_1 = Duel.GetOverlayGroup(0, LOCATION_MZONE, LOCATION_MZONE)
  for k in aux.Next(cache_1) do
    cache_1 = fun["是否效果卡"](k)
    if cache_1 then
      str["这个残局的效果卡数量"] = str["这个残局的效果卡数量"] + 1
      end
    end
  str["开局说明"] =""
  str["开局说明"] = str["开局说明"] .. str["这个残局的效果卡数量"]
  str["开局说明"] = str["开局说明"] .. "卡 "
  str["开局说明"] = str["开局说明"] .. str["规则"]
  if str["不洗牌"] == 0 then
  else
    str["开局说明"] = str["开局说明"] .. "伪洗牌 "
    end
  if str["无BP"] == 0 then
    str["开局说明"] = str["开局说明"] .. "无BP "
    end
  if str["开局添加手卡"] then
    str["开局说明"] = str["开局说明"] .. "选"
    str["开局说明"] = str["开局说明"] .. str["开局添加手卡"]
    str["开局说明"] = str["开局说明"] .. "卡 "
    end
  if str["禁格"] then
    str["开局说明"] = str["开局说明"] .. "禁"
    str["开局说明"] = str["开局说明"] .. str["禁格"]
    str["开局说明"] = str["开局说明"] .. "格 "
    end
  if str["印卡"] then
    str["开局说明"] = str["开局说明"] .. "印卡 "
    end
  Debug.ShowHint(str["开局说明"])
  fun["通关邀请"]()
  end

fun["开局添加手卡"] = function(str_1)
  str["开局添加手卡"] = str_1
  effect_1 = Effect.GlobalEffect()
  effect_1:SetType(EFFECT_TYPE_FIELD
    + EFFECT_TYPE_CONTINUOUS)
  effect_1:SetCode(EVENT_ADJUST)
  effect_1:SetCountLimit(1)
  function cache_1()
    if str["已添加手卡"] == 1 then
      return false
    else
      str["已添加手卡"] = 1
      return true
      end
    end
  effect_1:SetCondition(cache_1)
  function cache_1(effect_event
    , player_who_activate_the_effect)
    str["玩家选定的卡"] = Duel.SelectMatchingCard(player_who_activate_the_effect
       , Card.IsAbleToHand
       , player_who_activate_the_effect
       , LOCATION_DECK
       , 0
       , str_1
       , str_1
       , nil)
    Duel.SendtoHand(str["玩家选定的卡"]
      , nil
      , REASON_RULE)
    end
  effect_1:SetOperation(cache_1)
  Duel.RegisterEffect(effect_1
    , 0)
  fun["开局说明"]()
  end

fun["禁格"] = function(str_1)
  str["禁格"] = str_1
  effect_1 = Effect.GlobalEffect()
  effect_1:SetType(EFFECT_TYPE_FIELD)
  effect_1:SetCode(EFFECT_USE_EXTRA_MZONE)
  effect_1:SetValue(str_1)
  Duel.RegisterEffect(effect_1,0)
  end

fun["印卡"] = function(str_1, str_2, str_3)
  str["印卡"] = 1
  if str_3 then
  else
    str_3 = str_2
    end
  str["当前印卡数"] = 1
  effect_1 = Effect.CreateEffect(str_1)
  effect_1:SetType(EFFECT_TYPE_IGNITION)
  effect_1:SetProperty(EFFECT_FLAG_BOTH_SIDE
    + EFFECT_FLAG_UNCOPYABLE
    + EFFECT_FLAG_CANNOT_NEGATE
    + EFFECT_FLAG_CANNOT_DISABLE)
  cache_1 = function()
    Duel.SetChainLimit(aux.FALSE)
    return true
    end
  effect_1:SetTarget(cache_1)
  effect_1:SetRange(LOCATION_EXTRA)
  function print_hand(effect_event
      , player_who_activate_the_effect)
    announce_card = Duel.AnnounceCard(player_who_activate_the_effect)
    card = Duel.CreateToken(player_who_activate_the_effect
      , announce_card)
    if str["当前印卡数"] <= str_2 then
      str["当前印卡数"] = str["当前印卡数"] + 1
      Duel.SendtoHand(card,nil,REASON_RULE)
    else
      if str["当前印卡数"] <= str_3 then
        str["当前印卡数"] = str["当前印卡数"] + 1
        Duel.Remove(card,POS_FACEUP,REASON_RULE)
        Duel.SendtoDeck(card,player_who_activate_the_effect,0,REASON_RULE)
      else
        Debug.ShowHint("印卡过多!")
        end
      end
    end
  effect_1:SetOperation(print_hand)
  str_1:RegisterEffect(effect_1)
  end
  
fun["全部回到卡组"] = function()
  Debug.ShowHint("胜利条件:让对方的卡回到卡组。")
  
  effect_1 = Effect.GlobalEffect()
  
  effect_1:SetType(EFFECT_TYPE_FIELD
  + EFFECT_TYPE_CONTINUOUS)
  
  effect_1:SetCode(EVENT_ADJUST)
  
  cache_1 = function()
    cache_1 = 0
    cache_1 = cache_1 + LOCATION_HAND
    cache_1 = cache_1 + LOCATION_MZONE
    cache_1 = cache_1 + LOCATION_SZONE
    cache_1 = cache_1 + LOCATION_GRAVE
    cache_1 = cache_1 + LOCATION_REMOVED
    
    cache_1 = Duel.GetFieldGroupCount(1,cache_1,0)
    
    if cache_1 == 0 then
      return true
    else
      return false
      end
    end
    
  effect_1:SetCondition(cache_1)
  
  cache_1 = function()
    Debug.ShowHint("目标已达成!")
    Duel.SetLP(1,0)
    end
  
  effect_1:SetOperation(cache_1)
  
  Duel.RegisterEffect(effect_1,0)
  end






|



|
|
|
|
|
|
|

|
|

|


|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|


|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|


|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|


|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|


|
|
|
|
|
|
|


|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|

|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
>
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
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
str = {}
fun = {}

str["Debug.ReloadFieldBegin"] = Debug.ReloadFieldBegin

Debug.ReloadFieldBegin = function(str_1, str_2) --{
  str["不洗牌"] = str_1 & DUEL_PSEUDO_SHUFFLE
  str["无BP"] = str_1 & DUEL_ATTACK_FIRST_TURN
  if str_2 then
  if str_2 == 3 then
  str["规则"] = "大师3 "
  elseif str_2 == 4 then
  str["规则"] = "新大师 "
  elseif str_2 == 5 then
  str["规则"] = "大师2020 "
  end
  else
  str["规则"] = "大师2020 "
  end
  str["Debug.ReloadFieldBegin"](str_1, str_2)
  end --}

fun["通关邀请"] = function()
effect_1 = Effect.GlobalEffect()
effect_1:SetType(EFFECT_TYPE_FIELD
+ EFFECT_TYPE_CONTINUOUS)
effect_1:SetCode(EVENT_DAMAGE)
function cache_1()
cache_1 = Duel.GetLP(1)
if cache_1 <= 0 then
if cache_1 < 0 then
Debug.ShowHint("QB:「你居然二解了,请加群告诉我怎么二解。」")
end
cache_1 = true
else
cache_1 = false
end
return cache_1
end
effect_1:SetCondition(cache_1)
function cache_1()
Debug.ShowHint("残局群181175613")
return
end
effect_1:SetOperation(cache_1)
Duel.RegisterEffect(effect_1
, 0)
end

fun["是否效果卡"] = function(card)
cache_1 = Card.IsType(card, TYPE_SPELL)
cache_2 = Card.IsType(card, TYPE_TRAP)
cache_3 = Card.IsType(card, TYPE_EFFECT)
if cache_1
or cache_2
or cache_3 then
return true
end
cache_1 = Card.IsType(card, TYPE_PENDULUM)
if cache_1 then
cache_1 = Card.IsCode(card, 28363749)
cache_2 = Card.IsCode(card, 19474136)
cache_3 = Card.IsCode(card, 17390179)
cache_4 = Card.IsCode(card, 83980492)
if cache_1
or cache_2
or cache_3
or cache_4 then
else
return true
end
end
return false
end

fun["开局说明"] = function()
if str["开局说明吗"] == 1 then
return
else
str["开局说明吗"] = 1
end
cache_1 = 0
cache_1 = cache_1 + LOCATION_DECK
cache_1 = cache_1 + LOCATION_HAND
cache_1 = cache_1 + LOCATION_MZONE
cache_1 = cache_1 + LOCATION_SZONE
cache_1 = cache_1 + LOCATION_GRAVE
cache_1 = cache_1 + LOCATION_REMOVED
cache_1 = cache_1 + LOCATION_EXTRA
str["这个残局的效果卡数量"] = Duel.GetMatchingGroupCount(fun["是否效果卡"],0,cache_1,cache_1,nil)
cache_1 = Duel.GetOverlayGroup(0, LOCATION_MZONE, LOCATION_MZONE)
for k in aux.Next(cache_1) do
cache_1 = fun["是否效果卡"](k)
if cache_1 then
str["这个残局的效果卡数量"] = str["这个残局的效果卡数量"] + 1
end
end
str["开局说明"] =""
str["开局说明"] = str["开局说明"] .. str["这个残局的效果卡数量"]
str["开局说明"] = str["开局说明"] .. "卡 "
str["开局说明"] = str["开局说明"] .. str["规则"]
if str["不洗牌"] == 0 then
else
str["开局说明"] = str["开局说明"] .. "伪洗牌 "
end
if str["无BP"] == 0 then
str["开局说明"] = str["开局说明"] .. "无BP "
end
if str["开局添加手卡"] then
str["开局说明"] = str["开局说明"] .. "选"
str["开局说明"] = str["开局说明"] .. str["开局添加手卡"]
str["开局说明"] = str["开局说明"] .. "卡 "
end
if str["禁格"] then
str["开局说明"] = str["开局说明"] .. "禁"
str["开局说明"] = str["开局说明"] .. str["禁格"]
str["开局说明"] = str["开局说明"] .. "格 "
end
if str["印卡"] then
str["开局说明"] = str["开局说明"] .. "印卡 "
end
Debug.ShowHint(str["开局说明"])
fun["通关邀请"]()
end

fun["开局添加手卡"] = function(str_1)
str["开局添加手卡"] = str_1
effect_1 = Effect.GlobalEffect()
effect_1:SetType(EFFECT_TYPE_FIELD
+ EFFECT_TYPE_CONTINUOUS)
effect_1:SetCode(EVENT_ADJUST)
effect_1:SetCountLimit(1)
function cache_1()
if str["已添加手卡"] == 1 then
return false
else
str["已添加手卡"] = 1
return true
end
end
effect_1:SetCondition(cache_1)
function cache_1(effect_event
, player_who_activate_the_effect)
str["玩家选定的卡"] = Duel.SelectMatchingCard(player_who_activate_the_effect
, Card.IsAbleToHand
, player_who_activate_the_effect
, LOCATION_DECK
, 0
, str_1
, str_1
, nil)
Duel.SendtoHand(str["玩家选定的卡"]
, nil
, REASON_RULE)
end
effect_1:SetOperation(cache_1)
Duel.RegisterEffect(effect_1
, 0)
fun["开局说明"]()
end

fun["禁格"] = function(str_1)
str["禁格"] = str_1
effect_1 = Effect.GlobalEffect()
effect_1:SetType(EFFECT_TYPE_FIELD)
effect_1:SetCode(EFFECT_USE_EXTRA_MZONE)
effect_1:SetValue(str_1)
Duel.RegisterEffect(effect_1,0)
end

fun["印卡"] = function(str_1, str_2, str_3)
str["印卡"] = 1
if str_3 then
else
str_3 = str_2
end
str["当前印卡数"] = 1
effect_1 = Effect.CreateEffect(str_1)
effect_1:SetType(EFFECT_TYPE_IGNITION)
effect_1:SetProperty(EFFECT_FLAG_BOTH_SIDE
+ EFFECT_FLAG_UNCOPYABLE
+ EFFECT_FLAG_CANNOT_NEGATE
+ EFFECT_FLAG_CANNOT_DISABLE)
cache_1 = function()
Duel.SetChainLimit(aux.FALSE)
return true
end
effect_1:SetTarget(cache_1)
effect_1:SetRange(LOCATION_EXTRA)
function print_hand(effect_event
, player_who_activate_the_effect)
announce_card = Duel.AnnounceCard(player_who_activate_the_effect)
card = Duel.CreateToken(player_who_activate_the_effect
, announce_card)
if str["当前印卡数"] <= str_2 then
str["当前印卡数"] = str["当前印卡数"] + 1
Duel.SendtoHand(card,nil,REASON_RULE)
else
if str["当前印卡数"] <= str_3 then
str["当前印卡数"] = str["当前印卡数"] + 1
Duel.Remove(card,POS_FACEUP,REASON_RULE)
Duel.SendtoDeck(card,player_who_activate_the_effect,0,REASON_RULE)
else
Debug.ShowHint("印卡过多!")
end
end
end
effect_1:SetOperation(print_hand)
str_1:RegisterEffect(effect_1)
end

fun["全部回到卡组"] = function()
Debug.ShowHint("胜利条件:让对方的卡回到卡组。")

effect_1 = Effect.GlobalEffect()

effect_1:SetType(EFFECT_TYPE_FIELD
+ EFFECT_TYPE_CONTINUOUS)

effect_1:SetCode(EVENT_ADJUST)

cache_1 = function()
cache_1 = 0
cache_1 = cache_1 + LOCATION_HAND
cache_1 = cache_1 + LOCATION_MZONE
cache_1 = cache_1 + LOCATION_SZONE
cache_1 = cache_1 + LOCATION_GRAVE
cache_1 = cache_1 + LOCATION_REMOVED

cache_1 = Duel.GetFieldGroupCount(1,cache_1,0)

if cache_1 == 0 then
return true
else
return false
end
end

effect_1:SetCondition(cache_1)

cache_1 = function()
Debug.ShowHint("目标已达成!")
Duel.SetLP(1,0)
end

effect_1:SetOperation(cache_1)

Duel.RegisterEffect(effect_1,0)
end