fix

script/c39853199.lua

@@ -22,9 +22,15 @@ function c39853199.initial_effect(c)
 	c:RegisterEffect(e2)
 	--return
 	local e3=Effect.CreateEffect(c)
-	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
-	e3:SetCode(EVENT_SPSUMMON_SUCCESS)
-	e3:SetOperation(c39853199.regop)
+	e3:SetDescription(aux.Stringid(39853199,2))
+	e3:SetCategory(CATEGORY_TOHAND)
+	e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetCountLimit(1)
+	e3:SetCode(EVENT_PHASE+PHASE_END)
+	e3:SetCondition(c39853199.retcon)
+	e3:SetTarget(c39853199.rettg)
+	e3:SetOperation(c39853199.retop)
 	c:RegisterEffect(e3)
 end
 function c39853199.destg1(e,tp,eg,ep,ev,re,r,rp,chk)
@@ -54,19 +60,9 @@ function c39853199.desop2(e,tp,eg,ep,ev,re,r,rp)
 		Duel.Destroy(tc,REASON_EFFECT)
 	end
 end
-function c39853199.regop(e,tp,eg,ep,ev,re,r,rp)
+function c39853199.retcon(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
-	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(39853199,2))
-	e1:SetCategory(CATEGORY_TOHAND)
-	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
-	e1:SetRange(LOCATION_MZONE)
-	e1:SetCountLimit(1)
-	e1:SetCode(EVENT_PHASE+PHASE_END)
-	e1:SetTarget(c39853199.rettg)
-	e1:SetOperation(c39853199.retop)
-	e1:SetReset(RESET_EVENT+0x1ee0000+RESET_PHASE+PHASE_END)
-	c:RegisterEffect(e1)
+	return c:IsStatus(STATUS_SUMMON_TURN) and bit.band(c:GetSummonType(),SUMMON_TYPE_SPECIAL)==SUMMON_TYPE_SPECIAL
 end
 function c39853199.rettg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return true end

script/c49249907.lua

@@ -11,9 +11,14 @@ function c49249907.initial_effect(c)
 	c:RegisterEffect(e1)
 	--return
 	local e2=Effect.CreateEffect(c)
-	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
-	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
-	e2:SetOperation(c49249907.regop)
+	e2:SetCategory(CATEGORY_TOHAND)
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCountLimit(1)
+	e2:SetCode(EVENT_PHASE+PHASE_END)
+	e2:SetCondition(c49249907.retcon)
+	e2:SetTarget(c49249907.rettg)
+	e2:SetOperation(c49249907.retop)
 	c:RegisterEffect(e2)
 end
 function c49249907.filter(c,e,tp)
@@ -32,18 +37,9 @@ function c49249907.spop(e,tp,eg,ep,ev,re,r,rp)
 		Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
 	end
 end
-function c49249907.regop(e,tp,eg,ep,ev,re,r,rp)
+function c49249907.retcon(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
-	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_TOHAND)
-	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
-	e1:SetRange(LOCATION_MZONE)
-	e1:SetCountLimit(1)
-	e1:SetCode(EVENT_PHASE+PHASE_END)
-	e1:SetTarget(c49249907.rettg)
-	e1:SetOperation(c49249907.retop)
-	e1:SetReset(RESET_EVENT+0x1ee0000+RESET_PHASE+PHASE_END)
-	c:RegisterEffect(e1)
+	return c:IsStatus(STATUS_SUMMON_TURN) and bit.band(c:GetSummonType(),SUMMON_TYPE_SPECIAL)==SUMMON_TYPE_SPECIAL
 end
 function c49249907.rettg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return true end

script/c93368494.lua

@@ -45,9 +45,15 @@ function c93368494.initial_effect(c)
 	c:RegisterEffect(e6)
 	--return
 	local e7=Effect.CreateEffect(c)
-	e7:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
-	e7:SetCode(EVENT_SPSUMMON_SUCCESS)
-	e7:SetOperation(c93368494.regop)
+	e7:SetDescription(aux.Stringid(93368494,2))
+	e7:SetCategory(CATEGORY_TOHAND)
+	e7:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
+	e7:SetRange(LOCATION_MZONE)
+	e7:SetCountLimit(1)
+	e7:SetCode(EVENT_PHASE+PHASE_END)
+	e7:SetCondition(c93368494.retcon)
+	e7:SetTarget(c93368494.rettg)
+	e7:SetOperation(c93368494.retop)
 	c:RegisterEffect(e7)
 end
 function c93368494.atkcon(e,tp,eg,ep,ev,re,r,rp)
@@ -82,19 +88,9 @@ function c93368494.thop(e,tp,eg,ep,ev,re,r,rp)
 		Duel.SendtoHand(g,nil,REASON_EFFECT)
 	end
 end
-function c93368494.regop(e,tp,eg,ep,ev,re,r,rp)
+function c93368494.retcon(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
-	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(93368494,2))
-	e1:SetCategory(CATEGORY_TOHAND)
-	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
-	e1:SetRange(LOCATION_MZONE)
-	e1:SetCountLimit(1)
-	e1:SetCode(EVENT_PHASE+PHASE_END)
-	e1:SetTarget(c93368494.rettg)
-	e1:SetOperation(c93368494.retop)
-	e1:SetReset(RESET_EVENT+0x1ee0000+RESET_PHASE+PHASE_END)
-	c:RegisterEffect(e1)
+	return c:IsStatus(STATUS_SUMMON_TURN) and bit.band(c:GetSummonType(),SUMMON_TYPE_SPECIAL)==SUMMON_TYPE_SPECIAL
 end
 function c93368494.rettg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return true end

script/constant.lua

@@ -147,7 +147,7 @@ STATUS_ACTIVATED			=0x800000	--效果已发动
 STATUS_JUST_POS				=0x1000000	--
 STATUS_CONTINUOUS_POS		=0x2000000	--连续变更表示形式？
 STATUS_IS_PUBLIC			=0x4000000	--公开展示
-STATUS_ACT_FROM_HAND		=0x8000000	--在手牌发动
+STATUS_ACT_FROM_HAND		=0x8000000	--從手牌发动
 STATUS_OPPO_BATTLE			=0x10000000	--和對手的怪兽戰鬥
 --Assume
 ASSUME_CODE			=1