update

c19636995.lua

 --急き兎馬
---not fully implemented
 function c19636995.initial_effect(c)
 	--special summon
 	local e1=Effect.CreateEffect(c)
@@ -16,19 +15,13 @@ function c19636995.initial_effect(c)
 	local e2=Effect.CreateEffect(c)
 	e2:SetDescription(aux.Stringid(19636995,0))
 	e2:SetCategory(CATEGORY_DESTROY)
-	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
-	e2:SetCode(EVENT_CUSTOM+19636995)
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
+	e2:SetCode(EVENT_MOVE)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCondition(c19636995.descon)
 	e2:SetTarget(c19636995.destg)
 	e2:SetOperation(c19636995.desop)
 	c:RegisterEffect(e2)
-	--custom EVENT_PLACED
-	local e2a=Effect.CreateEffect(c)
-	e2a:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-	e2a:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_IGNORE_IMMUNE)
-	e2a:SetRange(LOCATION_MZONE)
-	e2a:SetCode(EVENT_ADJUST)
-	e2a:SetOperation(c19636995.plchk)
-	c:RegisterEffect(e2a)
 	--direct attack
 	local e3=Effect.CreateEffect(c)
 	e3:SetDescription(aux.Stringid(19636995,1))
@@ -57,6 +50,12 @@ function c19636995.hspval(e,c)
 	end
 	return 0,zone
 end
+function c19636995.desfilter(c,g)
+	return not c:IsStatus(STATUS_SUMMONING+STATUS_SUMMON_DISABLED) and g:IsContains(c)
+end
+function c19636995.descon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():GetColumnGroup():IsExists(c19636995.desfilter,1,nil,eg)
+end
 function c19636995.destg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return true end
 	Duel.SetOperationInfo(0,CATEGORY_DESTROY,e:GetHandler(),1,0,0)
@@ -66,26 +65,6 @@ function c19636995.desop(e,tp,eg,ep,ev,re,r,rp)
 		Duel.Destroy(e:GetHandler(),REASON_EFFECT)
 	end
 end
-function c19636995.plfilter(c)
-	return not c:IsStatus(STATUS_SUMMONING) and not c:IsStatus(STATUS_SUMMON_DISABLED)
-end
-function c19636995.gfilter(c,g)
-	return not g:IsContains(c)
-end
-function c19636995.plchk(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	local cg=c:GetColumnGroup():Filter(c19636995.plfilter,nil)
-	if c:GetFlagEffect(19636996)==0 or c:GetFlagEffectLabel(19636996)~=c:GetSequence() then
-		c:ResetFlagEffect(19636996)
-		c:RegisterFlagEffect(19636996,RESET_EVENT+0x1fd0000,0,1,c:GetSequence())
-		cg:KeepAlive()
-		e:SetLabelObject(cg)
-	elseif cg:IsExists(c19636995.gfilter,1,nil,e:GetLabelObject()) then
-		cg:KeepAlive()
-		e:SetLabelObject(cg)
-		Duel.RaiseSingleEvent(c,EVENT_CUSTOM+19636995,e,0,0,0,0)
-	end
-end
 function c19636995.datop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
 	if c:IsRelateToEffect(e) and c:IsFaceup() then

constant.lua

@@ -555,6 +555,7 @@ EVENT_CHAIN_END					=1026	--连锁串结束时
 EVENT_CHAINING					=1027	--效果发动时
 EVENT_BECOME_TARGET				=1028	--成为效果对象时
 EVENT_DESTROYED					=1029	--被破坏时
+EVENT_MOVE						=1030	--
 EVENT_ADJUST					=1040	--adjust_all()调整後（御前试合）
 EVENT_SUMMON_SUCCESS			=1100	--通常召唤成功时
 EVENT_FLIP_SUMMON_SUCCESS		=1101	--翻转召唤成功时