new cards

deck/18-04-17 new cards.ydk → deck/18-04-19 new cards.ydk

@@ -17,6 +17,7 @@
 100227001
 100227025
 #extra
+100227032
 100227039
 100227040
 100227044
@@ -25,6 +26,7 @@
 100227033
 100227043
 !side
+101004083
 101004087
 101004088
 101004089

script/c100227032.lua

+--No.75 惑乱のゴシップ・シャドー
+--Number 75: Gossip Shadow of Confusion
+--Scripted by Eerie Code
+function c100227032.initial_effect(c)
+	--xyz summon
+	c:EnableReviveLimit()
+	aux.AddXyzProcedure(c,nil,3,2,nil,nil,7)
+	--change effect
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(100227032,0))
+	e1:SetType(EFFECT_TYPE_QUICK_O)
+	e1:SetCode(EVENT_CHAINING)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCountLimit(1)
+	e1:SetCondition(c100227032.chcon)
+	e1:SetCost(c100227032.chcost)
+	e1:SetOperation(c100227032.chop)
+	c:RegisterEffect(e1)
+	--attach
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(100227032,1))
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCountLimit(1,100227032)
+	e2:SetTarget(c100227032.xtg)
+	e2:SetOperation(c100227032.xop)
+	c:RegisterEffect(e2)
+end
+c100227032.xyz_number=75
+function c100227032.chcon(e,tp,eg,ep,ev,re,r,rp)
+	return re:IsActiveType(TYPE_MONSTER) and rp~=tp
+end
+function c100227032.chcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,2,REASON_COST) end
+	e:GetHandler():RemoveOverlayCard(tp,2,2,REASON_COST)
+end
+function c100227032.chop(e,tp,eg,ep,ev,re,r,rp)
+	local g=Group.CreateGroup()
+	Duel.ChangeTargetCard(ev,g)
+	Duel.ChangeChainOperation(ev,c100227032.repop)
+end
+function c100227032.repop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Draw(tp,1,REASON_EFFECT)
+	Duel.Draw(1-tp,1,REASON_EFFECT)
+end
+function c100227032.xfilter(c)
+	return c:IsFaceup() and c:IsType(TYPE_XYZ) and c:IsSetCard(0x48)
+end
+function c100227032.xtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	local c=e:GetHandler()
+	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c100227032.xfilter(chkc) and chkc~=c end
+	if chk==0 then return Duel.IsExistingTarget(c100227032.xfilter,tp,LOCATION_MZONE,0,1,c) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
+	Duel.SelectTarget(tp,c100227032.xfilter,tp,LOCATION_MZONE,0,1,1,c)
+end
+function c100227032.xop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local tc=Duel.GetFirstTarget()
+	if c:IsRelateToEffect(e) and tc:IsRelateToEffect(e) then
+		local g=Group.FromCards(c)
+		local mg=c:GetOverlayGroup()
+		if mg:GetCount()>0 then g:Merge(mg) end
+		Duel.Overlay(tc,g)
+	end
+end

script/c101004083.lua

+--Vendread Anima
+--Script by nekrozar
+function c101004083.initial_effect(c)
+	--special summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(101004083,0))
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetRange(LOCATION_GRAVE)
+	e1:SetCountLimit(1,101004083)
+	e1:SetCost(aux.bfgcost)
+	e1:SetTarget(c101004083.sptg)
+	e1:SetOperation(c101004083.spop)
+	c:RegisterEffect(e1)
+	--gain
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+	e2:SetCode(EVENT_BE_MATERIAL)
+	e2:SetCondition(c101004083.mtcon)
+	e2:SetOperation(c101004083.mtop)
+	c:RegisterEffect(e2)
+end
+function c101004083.spfilter(c,e,tp)
+	return c:IsFaceup() and c:IsSetCard(0x106) and not c:IsCode(101004083) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function c101004083.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_REMOVED) and chkc:IsControler(tp) and c101004083.spfilter(chkc,e,tp) end
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingTarget(c101004083.spfilter,tp,LOCATION_REMOVED,0,1,nil,e,tp) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectTarget(tp,c101004083.spfilter,tp,LOCATION_REMOVED,0,1,1,nil,e,tp)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
+end
+function c101004083.spop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) then
+		Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
+	end
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+	e1:SetTargetRange(1,0)
+	e1:SetTarget(c101004083.splimit)
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	Duel.RegisterEffect(e1,tp)
+end
+function c101004083.splimit(e,c)
+	return c:GetRace()~=RACE_ZOMBIE
+end
+function c101004083.mtcon(e,tp,eg,ep,ev,re,r,rp)
+	return r==REASON_RITUAL and e:GetHandler():IsPreviousLocation(LOCATION_MZONE)
+end
+function c101004083.mtop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetFlagEffect(tp,101004083)~=0 then return end
+	local c=e:GetHandler()
+	local g=eg:Filter(Card.IsSetCard,nil,0x106)
+	local rc=g:GetFirst()
+	if not rc then return end
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_BATTLE_DESTROY_REDIRECT)
+	e1:SetValue(LOCATION_REMOVED)
+	e1:SetReset(RESET_EVENT+0x1fe0000)
+	rc:RegisterEffect(e1,true)
+	if not rc:IsType(TYPE_EFFECT) then
+		local e2=Effect.CreateEffect(c)
+		e2:SetType(EFFECT_TYPE_SINGLE)
+		e2:SetCode(EFFECT_ADD_TYPE)
+		e2:SetValue(TYPE_EFFECT)
+		e2:SetReset(RESET_EVENT+0x1fe0000)
+		rc:RegisterEffect(e2,true)
+	end
+	rc:RegisterFlagEffect(0,RESET_EVENT+0x1fe0000,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(101004083,1))
+	Duel.RegisterFlagEffect(tp,101004083,RESET_PHASE+PHASE_END,0,1)
+end