Update c60000056.lua

expansions/script/c60000056.lua

@@ -103,7 +103,7 @@ function cm.con1(e,tp,eg,ep,ev,re,r,rp)
 	return (Duel.GetCurrentPhase()>=PHASE_BATTLE_START and Duel.GetCurrentPhase()<=PHASE_BATTLE)
 end
 function cm.spfilter(c,e,tp)
-	return c:IsType(TYPE_MONSTER) and c:IsSetCard(0x62a) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+	return c:IsType(TYPE_MONSTER) and c:IsSetCard(0x62a) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetFlagEffect(tp,c:GetCode())<1
 end
 function cm.tg1(e,tp,eg,ep,ev,re,r,rp,chk)
 	local c=e:GetHandler()
@@ -125,21 +125,9 @@ function cm.op1(e,tp,eg,ep,ev,re,r,rp)
 				local g=Duel.SelectMatchingCard(tp,cm.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
 				local tc=g:GetFirst()
 				if g:GetCount()>0 and Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)~=0 then
-					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:SetLabel(tc:GetCode())
-					e1:SetTarget(cm.splimit)
-					e1:SetReset(RESET_PHASE+PHASE_END)
-					Duel.RegisterEffect(e1,tp)
+					Duel.RegisterFlagEffect(tp,tc:GetCode(),RESET_PHASE+PHASE_END,0,1)
 				end
 			end
 		end
 	end
 end
-function cm.splimit(e,c,sump,sumtype,sumpos,targetp,se)
-	return se and se:GetHandler():IsCode(m) and c:GetCode()==e:GetLabel()
-	and not c:IsLocation(LOCATION_HAND+LOCATION_GRAVE)
-end