add new cards

deck/20-07-15 new cards.ydk → deck/20-07-16 new cards.ydk

 #created by ...
 #main
+101102063
 100269001
 100415024
 100415025
@@ -57,6 +58,7 @@
 101102074
 101102076
 #extra
+101102050
 101102035
 101102036
 101102039

script/c101102012.lua

@@ -68,7 +68,7 @@ function c101102012.splimit(e,c)
 	return not (c:IsLevelAbove(3) or c:IsRankAbove(3))
 end
 function c101102012.thfilter(c)
-	return c:IsSetCard(0x24e) and not c:IsCode(101102012) and c:IsAbleToHand()
+	return c:IsSetCard(0x24e) and c:IsType(TYPE_MONSTER) and not c:IsCode(101102012) and c:IsAbleToHand()
 end
 function c101102012.thcon(e,tp,eg,ep,ev,re,r,rp)
 	return Duel.IsExistingMatchingCard(aux.NecroValleyFilter(c101102012.thfilter),tp,LOCATION_GRAVE,0,1,nil)

script/c101102050.lua

+--転晶のコーディネラル
+--
+--Script by mercury233
+function c101102050.initial_effect(c)
+	--link summon
+	c:EnableReviveLimit()
+	aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkType,TYPE_EFFECT),2,2)
+	--indestructable
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
+	e1:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
+	e1:SetTarget(c101102050.indtg)
+	e1:SetValue(aux.indoval)
+	c:RegisterEffect(e1)
+	--swap control
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(101102050,0))
+	e2:SetCategory(CATEGORY_CONTROL)
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCountLimit(1,101102050)
+	e2:SetTarget(c101102050.cttg)
+	e2:SetOperation(c101102050.ctop)
+	c:RegisterEffect(e2)
+end
+function c101102050.indtg(e,tc)
+	local c=e:GetHandler()
+	return c:IsLinkState() and tc==c or c:GetLinkedGroup():IsContains(tc)
+end
+function c101102050.ctfilter(c,tp)
+	return c:IsControler(tp) and c:IsAbleToChangeControler() and Duel.GetMZoneCount(tp,c,tp,LOCATION_REASON_CONTROL)>0
+end
+function c101102050.cttg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local g=e:GetHandler():GetLinkedGroup()
+	if chk==0 then return #g==2 and g:IsExists(c101102050.ctfilter,1,nil,tp) and g:IsExists(c101102050.ctfilter,1,nil,1-tp) end
+	Duel.SetOperationInfo(0,CATEGORY_CONTROL,g,2,0,0)
+end
+function c101102050.ctop(e,tp,eg,ep,ev,re,r,rp)
+	local g=e:GetHandler():GetLinkedGroup()
+	local a=g:GetFirst()
+	local b=g:GetNext()
+	if a and b then
+		Duel.SwapControl(a,b)
+	end
+end

script/c101102062.lua

@@ -36,7 +36,7 @@ function c101102062.activate(e,tp,eg,ep,ev,re,r,rp)
 		local d=Duel.GetChainInfo(0,CHAININFO_TARGET_PARAM)
 		if Duel.Recover(tp,d,REASON_EFFECT)<=0 then return end
 		local tg=Duel.GetMatchingGroup(c101102062.cfilter,tp,LOCATION_HAND,0,nil)
-		if #tg<=0 or not Duel.SelectYesNo(tp,aux.Stringid(101102062,0)) then return end
+		if #tg<=0 or not Duel.IsPlayerCanDraw(tp) or not Duel.SelectYesNo(tp,aux.Stringid(101102062,0)) then return end
 		Duel.BreakEffect()
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
 		local g=Duel.SelectMatchingCard(tp,c101102062.cfilter,tp,LOCATION_HAND,0,1,63,nil)

script/c101102063.lua

+--暗黒界の援軍
+--
+--Script by mercury233
+function c101102063.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_HANDES)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCountLimit(1,101102063+EFFECT_COUNT_CODE_OATH)
+	e1:SetTarget(c101102063.target)
+	e1:SetOperation(c101102063.activate)
+	c:RegisterEffect(e1)
+end
+function c101102063.filter(c,e,tp)
+	return c:IsLevelBelow(4) and c:IsRace(RACE_FIEND) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function c101102063.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and c101102063.filter(chkc,e,tp) end
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingTarget(c101102063.filter,tp,LOCATION_GRAVE,0,1,nil,e,tp)
+		and Duel.GetMatchingGroupCount(Card.IsRace,tp,LOCATION_HAND,0,nil,RACE_FIEND)>0 end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectTarget(tp,c101102063.filter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
+	Duel.SetOperationInfo(0,CATEGORY_HANDES,nil,1,tp,1)
+end
+function c101102063.activate(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) and Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)>0 then
+		Duel.BreakEffect()
+		Duel.DiscardHand(tp,Card.IsRace,1,1,REASON_EFFECT+REASON_DISCARD,nil,RACE_FIEND)
+	end
+end