Commit 50367411 authored by Nemo Ma's avatar Nemo Ma

fix

parent 322ea0f1
......@@ -4448,95 +4448,6 @@
80604091 1 --Ultimate Offering
80604092 1 --Ultimate Offering
5851097 1 --Vanity's Emptiness
#Limited TCG
7902349 1 --Left Arm of the forbidden one MAIN DECK MONSTERS
44519536 1 --Left Leg of the forbidden one
70903634 1 --Right Arm of the forbidden one
8124921 1 --Right Leg of the forbidden one
61901281 1 --Black Dragon Collapserpent
33396948 1 --Exodia the Forbidden One
64034255 1 --Genex Ally birdman
99177923 1 --Infernity Archfiend
89399912 1 --Tempest, Dragon Ruler of Storms
26889158 1 --Salamangreat Gazelle
81275020 1 --Speedroid Terrortop
99234526 1 --White Dragon Wyverburster
78872731 1 --Zoodiac Ratpier
78080961 1 --SPYRAL Quik-Fix
33508719 1 --Morphing Jar
28985331 1 --Armageddon Knight
14536035 1 --Dark Grepher
69015963 1 --Cyber Stein
12958919 1 --Phantom Skyblaster
43694650 1 --Danger!? Jackalope?
99745551 1 --Danger!? Tsuchinoko?
82385847 1 --Dinowrestler Pankratops
92559258 1 --Servant of Endymion
30539496 1 --True King Lithosagym, the Disaster
38572779 1 --Miscellaneousaurus
5560911 1 --Destrudo the Lost Dragons Frisson
76794549 1 --Astrograph Sorcerer
83190280 1 --Lunalight Tiger
9742784 1 --Jet Synchron
17330916 1 --Performapal Monkeyboard
3078576 1 --Yata-Garasu
26118970 1 --Red Rose Dragon
9047460 1 --Blackwing - Steam the Cloak
34124316 1 --Cyber Jar
72291078 1 --Mecha Phantom Beast O-Lion
20663556 1 --Substitoad
39512984 1 --Gem-Knight Master Diamond EXTRA DECK MONSTERS
90953320 1 --T.G. Hyper Librarian
74586817 1 --Psy-Framelord Omega
27552504 1 --Beatrice, Lady of Eternal
581014 1 --Daigusto Emeral
73539069 1 --Striker Dragon
8491961 1 --Lyrilusc - Recital Starling
81674782 1 --Dimensional Fissure SPELL CARDS
95308449 1 --Final Countdown
81439173 1 --Foolish Burial
18144506 1 --Harpie's Feather Duster
66957584 1 --Infernity Launcher
33782437 1 --One Day of Peace
2295440 1 --One for One
32807846 1 --Reinforcement of the Army
24010609 1 --Sky Striker Mecha Modules - Multirole
14733538 1 --Draco Face-off
73468603 1 --Set Rotation
73628505 1 --Terraforming
58577036 1 --Reasoning
27970830 1 --Gateway of the Six
70368879 1 --Upstart Goblin
83764718 1 --Monster Reborn
83764719 1 --Monster Reborn
71344451 1 --Slash Draw
75500286 1 --Gold Sarcophagus
59750328 1 --Card of Demise
93946239 1 --Into the Void
24940422 1 --Sekka's Light
15854426 1 --Divine Wind of the Mist Valley
54631665 1 --SPYRAL Resort
71650854 1 --Magical Mid-Breaker Field
13035077 1 --Dragonic Diagram
91623717 1 --Chain Strike
72892473 1 --Card Destruction
24224830 1 --Called by the Grave
52340444 1 --Sky Striker Mecha - Hornet Drones
1845204 1 --Instant Fusion
37520316 1 --Mind Control
63166095 1 --Sky Striker Mobilize - Engage!
43040603 1 --Monster Gate
4031928 1 --Change of Heart
46448938 1 --Spellbook of Judgement
32723153 1 --Magical Explosion --TRAP CARDS
30241314 1 --Macro Cosmos
89208725 1 --Metaverse
35316708 1 --Time Seal
43262273 1 --Appointer of the Red Lotus
#Semi-Limited TCG
9411399 2 --Destiny HERO - Malicious
57103969 2 --Fire Formation - Tenki
35261759 2 --Pot of Desires
25000000 0
25000001 0
25000049 0
......
......@@ -50,8 +50,8 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
tc:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD,0,0,rfid)
rc:CreateRelation(tc,RESET_EVENT+RESETS_STANDARD-RESET_TURN_SET)
Duel.SpecialSummonComplete()
assert(false,"或许是由于过于疲惫,落单的怪兽不幸遭遇了来自额外卡组的黑色高级怪兽")
assert(false,"面对为了保护决斗者而揽下所有责任的落单怪兽,对方怪兽提出的和解条件是……")
Debug.Message("或许是由于过于疲惫,落单的怪兽不幸遭遇了来自额外卡组的黑色高级怪兽")
Debug.Message("面对为了保护决斗者而揽下所有责任的落单怪兽,对方怪兽提出的和解条件是……")
end
end
end
......
......@@ -61,8 +61,7 @@ function cm.debcon(e,tp,eg,ep,ev,re,r,rp)
end
function cm.debug(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(Card.IsFaceup,0,LOCATION_MZONE,LOCATION_MZONE,nil)
--Debug.Message("场上的表侧表示怪兽合计等级:"..g:GetSum(Card.GetLevel))
assert(false,"场上的表侧表示怪兽合计等级:"..g:GetSum(Card.GetLevel))
Debug.Message("场上的表侧表示怪兽合计等级:"..g:GetSum(Card.GetLevel))
end
function cm.mzfilter(c)
return c:IsLinkRace(RACE_PSYCHO) and c:IsLinkAttribute(ATTRIBUTE_LIGHT) and c:GetLevel()>=3 and c:GetLevel()<=10
......
......@@ -53,11 +53,11 @@ function cm.pigeon(e,tp,eg,ep,ev,re,r,rp)
for i=1,#list do
Duel.Hint(HINT_CARD,0,list[i])
if Duel.TossCoin(tp,1)==1 then
assert(false,"wd卡,炸了")
Debug.Message("wd卡,炸了")
local g=Duel.GetMatchingGroup(cm.pigeonfilter,0,LOCATION_ONFIELD,LOCATION_ONFIELD,nil,list[i])
dg:Merge(g)
else
assert(false,"算了,先放")
Debug.Message("算了,先放")
end
end
Duel.Destroy(dg,REASON_EFFECT)
......
......@@ -42,20 +42,53 @@ end
function cm.sprcon(e,c)
if c==nil then return true end
local tp=c:GetControler()
local g=Duel.GetMatchingGroup(cm.mzfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,nil)
return g:IsExists(Card.IsLocation,2,nil,LOCATION_GRAVE) and g:IsExists(Card.IsLocation,2,nil,LOCATION_REMOVED) and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0
local mg=Duel.GetMatchingGroup(cm.mzfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,nil)
local g=Group.CreateGroup()
return mg:IsExists(Card.IsLocation,2,nil,LOCATION_GRAVE) and mg:IsExists(Card.IsLocation,2,nil,LOCATION_REMOVED) and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0 and mg:IsExists(cm.syncheck,1,g,g,mg)
end
function cm.syncheck(c,g,mg)
g:AddCard(c)
local res=cm.syngoal(g) or mg:IsExists(cm.syncheck,1,g,g,mg)
g:RemoveCard(c)
return res
end
function cm.syngoal(g)
return #g>=4 and g:IsExists(Card.IsLocation,2,nil,LOCATION_GRAVE) and g:IsExists(Card.IsLocation,2,nil,LOCATION_REMOVED) and g:GetSum(Card.GetLevel)%5==0
end
function cm.sprtg(e,tp,eg,ep,ev,re,r,rp,chk,c)
local g=Duel.GetMatchingGroup(cm.mzfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,nil)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
local sg=g:SelectSubGroup(tp,cm.fselect,Duel.IsSummonCancelable(),4,#g)
local mg=Duel.GetMatchingGroup(cm.mzfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,nil)
local sg=Group.CreateGroup()
local cg=mg:Filter(cm.syncheck,sg,sg,mg)
local cg0=cg
local finish=cm.syngoal(sg)
for i=1,99 do
cg=cg0:Filter(cm.syncheck,sg,sg,cg0)
cg:Sub(sg)
finish=cm.syngoal(sg)
local cancel=not finish and Duel.IsSummonCancelable()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
local tc=cg:SelectUnselect(sg,tp,finish,cancel,4,#cg)
if not tc then break end
if not sg:IsContains(tc) then
sg:AddCard(tc)
if #sg==#cg then finish=true end
else
sg:RemoveCard(tc)
end
end
if finish then
sg:KeepAlive()
e:SetLabelObject(sg)
return true
else return false end
--[[local sg=g:SelectSubGroup(tp,cm.fselect,Duel.IsSummonCancelable(),4,#g)
if sg and sg:GetSum(Card.GetLevel)%5==0 then
sg:KeepAlive()
e:SetLabelObject(sg)
return true
elseif sg and sg:GetSum(Card.GetLevel)%5~=0 then
assert(false,"选择的怪兽合计等级不是5的倍数")
else return false end
Debug.Message("选择的怪兽合计等级不是5的倍数")
else return false end--]]
end
function cm.sprop(e,tp,eg,ep,ev,re,r,rp,c)
local sg=e:GetLabelObject()
......
......@@ -23,10 +23,13 @@ function cm.initial_effect(c)
c:RegisterEffect(e1)
--activate
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e3:SetCode(EVENT_TO_GRAVE)
e3:SetOperation(cm.regop)
e3:SetCategory(CATEGORY_TOHAND)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_PHASE+PHASE_END)
e3:SetRange(LOCATION_GRAVE)
e3:SetCost(cm.thcost)
e3:SetTarget(cm.acttg)
e3:SetOperation(cm.actop)
c:RegisterEffect(e3)
end
function cm.matfilter(c)
......@@ -77,17 +80,17 @@ function cm.regop(e,tp,eg,ep,ev,re,r,rp)
end
function cm.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToExtraAsCost() end
Duel.SendtoDeck(e:GetHandler(),nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
Duel.SendtoDeck(e:GetHandler(),nil,SEQ_DECKSHUFFLE,REASON_COST)
end
function cm.actfilter(c)
return c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
end
function cm.acttg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.actfilter,tp,LOCATION_GRAVE,0,1,nil) end
if chk==0 then return Duel.IsExistingMatchingCard(cm.actfilter,tp,LOCATION_GRAVE,0,1,e:GetHandler()) end
end
function cm.actop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(cm.actfilter),tp,LOCATION_GRAVE,0,1,1,nil)
local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(cm.actfilter),tp,LOCATION_GRAVE,0,1,1,e:GetHandler())
if g:GetCount()>0 then
Duel.BreakEffect()
Duel.SendtoHand(g,nil,REASON_EFFECT)
......
......@@ -80,6 +80,7 @@ function c33200917.spoperation(e,tp,eg,ep,ev,re,r,rp)
if g:GetCount()>0 then
local tc=g:GetFirst()
if Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)~=0 then
tc:RegisterFlagEffect(33200917,RESET_EVENT+RESETS_STANDARD,0,1,fid)
local e2=Effect.CreateEffect(e:GetHandler())
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e2:SetCode(EVENT_PHASE+PHASE_END)
......
......@@ -30,6 +30,7 @@ end
function s.destg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(nil,tp,0,LOCATION_ONFIELD,1,nil) and Duel.IsExistingMatchingCard(s.desfilter,tp,LOCATION_ONFIELD,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_DESTROY,nil,0,0,0)
end
function s.desfilter(c)
return (c:IsRace(RACE_ZOMBIE) or c:IsCode(33201009)) and c:IsFaceup()
......
......@@ -29,7 +29,8 @@ end
function c40009546.cfilter(c)
return c:IsFacedown() or not c:IsSetCard(0x137)
end
function c40009546.condition(e,c)
function c40009546.condition(e)
local c=e:GetHandler()
return not Duel.IsExistingMatchingCard(c40009546.cfilter,c:GetControler(),LOCATION_MZONE,0,1,nil)
end
function c40009546.sfilter(c)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment