xif

expansions/script/c17091005.lua

@@ -19,24 +19,15 @@ function cm.initial_effect(c)
 	e2:SetCountLimit(1)
 	e2:SetOperation(cm.lvop)
 	c:RegisterEffect(e2)
-	--666
+	--切腹斩
 	local e3=Effect.CreateEffect(c)
 	e3:SetType(EFFECT_TYPE_FIELD)
+	e3:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
 	e3:SetRange(LOCATION_MZONE)
 	e3:SetTargetRange(0,LOCATION_ONFIELD)
 	e3:SetCode(EFFECT_SELF_DESTROY)
 	e3:SetCondition(cm.sdcon)
 	c:RegisterEffect(e3)
-	local e4=Effect.CreateEffect(c)
-	e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-	e4:SetProperty(EFFECT_FLAG_DELAY)
-	e4:SetCode(EVENT_SSET)
-	e4:SetRange(LOCATION_MZONE)
-	e4:SetOperation(cm.desop)
-	c:RegisterEffect(e4)
-	local e5=e4:Clone()
-	e5:SetCode(EVENT_MSET)
-	c:RegisterEffect(e5)
 	--atklimit
 	local e6=Effect.CreateEffect(c)
 	e6:SetType(EFFECT_TYPE_SINGLE)
@@ -59,18 +50,10 @@ function cm.lvop(e,tp,eg,ep,ev,re,r,rp)
 	e1:SetValue(lv)
 	e1:SetReset(RESET_EVENT+0xff0000)
 	c:RegisterEffect(e1)
-	if lv==666 then
-		local sg=Duel.GetMatchingGroup(Card.IsFacedown,tp,0,LOCATION_ONFIELD,nil)
-		Duel.Destroy(sg,REASON_EFFECT)
-	end
 end
 function cm.sdcon(e)
 	return e:GetHandler():GetLevel()==666
 end
-function cm.desop(e,tp,eg,ep,ev,re,r,rp)
-	if eg:IsExists(Card.IsControler,1,nil,tp) then return true end
-	Duel.Destroy(eg,REASON_EFFECT)
-end
 function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	local sg=Duel.GetMatchingGroup(Card.IsFacedown,tp,0,LOCATION_ONFIELD,nil)
 	Duel.Destroy(sg,REASON_EFFECT)

expansions/script/c66915004.lua

@@ -37,7 +37,7 @@ function c66915004.initial_effect(c)
     c:RegisterEffect(e55)
     --spsummon
     local e222=Effect.CreateEffect(c)
-    e222:SetCategory(CATEGORY_SPECIAL_SUMMON)
+    e222:SetCategory(CATEGORY_NEGATE)
     e222:SetType(EFFECT_TYPE_QUICK_O)
     e222:SetRange(LOCATION_MZONE)
     e222:SetCode(EVENT_BECOME_TARGET)
@@ -64,7 +64,7 @@ function c66915004.initial_effect(c)
     e11:SetType(EFFECT_TYPE_FIELD)
     e11:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
     e11:SetRange(LOCATION_SZONE)
-    e11:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
+    e11:SetTargetRange(LOCATION_MZONE,0)
     e11:SetTarget(c66915004.tgtg)
     e11:SetValue(1)
     c:RegisterEffect(e11)
@@ -94,7 +94,7 @@ function c66915004.tglimit(e,c)
     return c~=e:GetHandler()
 end
 function c66915004.spcon(e,tp,eg,ep,ev,re,r,rp)
-    return eg:IsContains(e:GetHandler()) and Duel.IsChainDisablable(ev) and Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_SZONE,0,1,nil)
+    return eg:IsContains(e:GetHandler()) and Duel.IsChainDisablable(ev) and Duel.IsExistingMatchingCard(c66915004.cfilter,tp,LOCATION_SZONE,0,1,nil)
 end
 function c66915004.distg(e,tp,eg,ep,ev,re,r,rp,chk)
     if chk==0 then return true end