missing card & setcode fix

Setcode Fusion 0xa3

script/c80831721.lua

@@ -30,7 +30,7 @@ function c80831721.cost(e,tp,eg,ep,ev,re,r,rp,chk)
 	Duel.PayLPCost(tp,math.floor(Duel.GetLP(tp)/2))
 end
 function c80831721.filter(c)
-	return c:IsSetCard(0x1004) and c:IsAbleToHand()
+	return c:IsSetCard(0xa3) and c:IsAbleToHand()
 end
 function c80831721.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(c80831721.filter,tp,LOCATION_DECK,0,1,nil) end

script/c8102334.lua

+--ゲート・ブロッカー
+function c8102334.initial_effect(c)
+	--disable
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetCode(EFFECT_DISABLE)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetTargetRange(0,LOCATION_SZONE)
+	e1:SetTarget(c8102334.distarget)
+	c:RegisterEffect(e1)
+	--disable effect
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e2:SetCode(EVENT_CHAIN_SOLVING)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetOperation(c8102334.disoperation)
+	c:RegisterEffect(e2)
+	--prevent counter
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_FIELD)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetCode(EFFECT_CANNOT_PLACE_COUNTER)
+	e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e3:SetTargetRange(1,1)
+	e3:SetValue(1)
+	c:RegisterEffect(e3)
+	--target
+	local e4=Effect.CreateEffect(c)
+	e4:SetType(EFFECT_TYPE_FIELD)
+	e4:SetRange(LOCATION_MZONE)
+	e4:SetTargetRange(LOCATION_MZONE,0)
+	e4:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
+	e4:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
+	e4:SetTarget(c8102334.tglimit)
+	e4:SetValue(1)
+	c:RegisterEffect(e4)
+end
+function c8102334.distarget(e,c)
+	return c~=e:GetHandler() and c:IsType(TYPE_FIELD)
+end
+function c8102334.disoperation(e,tp,eg,ep,ev,re,r,rp)
+	local tl=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_LOCATION)
+	if tl==LOCATION_SZONE and re:IsActiveType(TYPE_FIELD) then
+		Duel.NegateEffect(ev)
+	end
+end
+function c8102334.tglimit(e,c)
+	return c~=e:GetHandler()
+end
\ No newline at end of file