Commit c9f19f97 authored by Nemo Ma's avatar Nemo Ma

fix

parent a770cafc
--贴贴
local m=11451495
local cm=_G["c"..m]
local cm,m=GetID()
function cm.initial_effect(c)
--activate
local e0=Effect.CreateEffect(c)
......@@ -22,6 +21,8 @@ function cm.negcon(e,tp,eg,ep,ev,re,r,rp)
end
function cm.negop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_CARD,0,m)
local g=Group.CreateGroup()
Duel.ChangeTargetCard(ev,g)
Duel.ChangeChainOperation(ev,cm.operation)
e:Reset()
end
\ No newline at end of file
......@@ -117,6 +117,8 @@ function cm.ceop(e,tp,eg,ep,ev,re,r,rp)
local g2=Duel.GetMatchingGroup(nil,tp,0,LOCATION_ONFIELD,nil)
if ep~=tp and #g1>0 and #g2>0 and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then
Duel.Hint(HINT_CARD,0,m)
local g=Group.CreateGroup()
Duel.ChangeTargetCard(ev,g)
Duel.ChangeChainOperation(ev,cm.reop)
e:Reset()
end
......
--方舟骑士-稀音
--21.08.27
local m=11451622
local cm=_G["c"..m]
local cm,m=GetID()
cm.named_with_Arknight=1
function cm.initial_effect(c)
--link summon
......@@ -21,10 +20,10 @@ function cm.initial_effect(c)
e1:SetCondition(cm.spcon)
e1:SetTarget(cm.sptg)
e1:SetOperation(cm.spop)
e1:SetLabelObject(e0)
c:RegisterEffect(e1)
local e2=e1:Clone()
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e2:SetRange(LOCATION_MZONE)
e2:SetCondition(cm.spcon2)
c:RegisterEffect(e2)
--immune
......@@ -69,7 +68,7 @@ end
function cm.valcheck(e,c)
local g=c:GetMaterial():Filter(Card.IsType,nil,TYPE_TOKEN)
local eid=e:GetFieldID()
e:SetLabel(eid)
e:GetHandler():RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD,0,1,eid)
cm[eid]={}
for tc in aux.Next(g) do
table.insert(cm[eid],{tc:GetOriginalCode(),cm.getsetcard(tc),TYPES_TOKEN_MONSTER,math.max(0,tc:GetTextAttack()),math.max(0,tc:GetTextDefense()),tc:GetOriginalLevel(),tc:GetOriginalRace(),tc:GetOriginalAttribute()})
......@@ -86,8 +85,8 @@ function cm.cfilter(c,tp)
end
function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return false end
local lab=e:GetLabelObject():GetLabel()
local lab=e:GetHandler():GetFlagEffectLabel(m)
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 or not lab then return false end
local tkset=cm[lab]
for i=1,#tkset do
if type(tkset[i])=="table" and Duel.IsPlayerCanSpecialSummonMonster(tp,table.unpack(tkset[i])) then return true end
......@@ -99,7 +98,7 @@ function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
end
function cm.spop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
local lab=e:GetLabelObject():GetLabel()
local lab=e:GetHandler():GetFlagEffectLabel(m)
local tkset=cm[lab]
local spset={}
for i=1,#tkset do
......@@ -109,6 +108,7 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
end
if #spset==0 then return end
while #spset>1 do
local token=Duel.CreateToken(tp,spset[1])
Duel.Hint(HINT_CARD,tp,spset[1])
if Duel.SelectYesNo(tp,aux.Stringid(m,1)) then
spset={spset[1]}
......
......@@ -11,7 +11,7 @@ function s.initial_effect(c)
aux.AddXyzProcedureLevelFree(c,s.matfilter,s.xyzcheck,3,3,s.ovfilter,aux.Stringid(id,2),s.xyzop)
--[[Once per turn: You can detach all materials from this card; this card gains 1 additional attack during each Battle Phase this turn for each material detached.]]
local e1=Effect.CreateEffect(c)
e1:Desc(0)
--e1:Desc(0)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_MZONE)
e1:SetCountLimit(1)
......@@ -21,7 +21,7 @@ function s.initial_effect(c)
c:RegisterEffect(e1)
--[[If this card destroys a monster(s) by battle while you have no cards with the same name in your GY: You can attach it to this card as material.]]
local e2=Effect.CreateEffect(c)
e2:Desc(1)
--e2:Desc(1)
e2:SetType(EFFECT_TYPE_SINGLE|EFFECT_TYPE_TRIGGER_O)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCode(EVENT_BATTLE_DESTROYING)
......@@ -37,7 +37,7 @@ function s.xyzcheck(g)
return g:GetClassCount(Card.GetCode)==3
end
function s.ovfilter(c)
return c:IsFaceup() and c:IsType(TYPE_XYZ) and c:IsSetCard(0x442) and not c:IsCode(id)
return c:IsFaceup() and c:IsMonster(TYPE_XYZ) and c:IsSetCard(0x442) and not c:IsCode(id)
end
function s.xyzop(e,tp,chk)
if chk==0 then return Duel.GetFlagEffect(tp,id)==0 end
......
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