modify

ocgcore/libeffect.cpp

@@ -283,13 +283,16 @@ int32 scriptlib::effect_set_value(lua_State *L) {
 	return 0;
 }
 int32 scriptlib::effect_set_operation(lua_State *L) {
-	check_param_count(L, 1);
+	check_param_count(L, 2);
 	check_param(L, PARAM_TYPE_EFFECT, 1);
-	check_param(L, PARAM_TYPE_FUNCTION, 2);
 	effect* peffect = *(effect**) lua_touserdata(L, 1);
 	if(peffect->operation)
 		luaL_unref(L, LUA_REGISTRYINDEX, peffect->operation);
-	peffect->operation = interpreter::get_function_handle(L, 2);
+	if(!lua_isnil(L, 2)) {
+		check_param(L, PARAM_TYPE_FUNCTION, 2);
+		peffect->operation = interpreter::get_function_handle(L, 2);
+	} else
+		peffect->operation = 0;
 	return 0;
 }
 int32 scriptlib::effect_set_owner_player(lua_State *L) {

script/c28265983.lua

@@ -64,11 +64,9 @@ function c28265983.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	else
 		e:SetCategory(0)
 		e:SetProperty(0)
-		e:SetOperation(c28265983.nop)
+		e:SetOperation(nil)
 	end
 end
-function c28265983.nop(e,tp,eg,ep,ev,re,r,rp)
-end
 function c28265983.descon1(e,tp,eg,ep,ev,re,r,rp)
 	return ep==tp
 end

script/c39387565.lua

@@ -42,11 +42,9 @@ function c39387565.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	else
 		e:SetCategory(0)
 		e:SetProperty(0)
-		e:SetOperation(c39387565.nop)
+		e:SetOperation(nil)
 	end
 end
-function c39387565.nop(e,tp,eg,ep,ev,re,r,rp)
-end
 function c39387565.cfilter(c)
 	return c:IsFaceup() and c:IsSetCard(0x3b)
 end

script/c65872270.lua

@@ -36,11 +36,9 @@ function c65872270.target(e,tp,eg,ep,ev,re,r,rp,chk)
 		c65872270.destg(e,tp,eg,ep,ev,re,r,rp,1)
 	else
 		e:SetCategory(0)
-		e:SetOperation(c65872270.nop)
+		e:SetOperation(nil)
 	end
 end
-function c65872270.nop(e,tp,eg,ep,ev,re,r,rp)
-end
 function c65872270.descon(e,tp,eg,ep,ev,re,r,rp)
 	return Duel.GetTurnPlayer()==tp
 		and (Duel.GetCurrentPhase()==PHASE_MAIN1 or Duel.GetCurrentPhase()==PHASE_MAIN2)

script/c92266279.lua

@@ -60,11 +60,9 @@ function c92266279.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	else
 		e:SetCategory(0)
 		e:SetProperty(0)
-		e:SetOperation(c92266279.nop)
+		e:SetOperation(nil)
 	end
 end
-function c92266279.nop(e,tp,eg,ep,ev,re,r,rp)
-end
 function c92266279.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.CheckLPCost(tp,1000) and Duel.GetFlagEffect(tp,92266279)==0 end
 	Duel.PayLPCost(tp,1000)