update cdb

expansions/script/c71400030.lua

@@ -20,7 +20,7 @@ function c71400030.initial_effect(c)
 	--banish
 	local e2=Effect.CreateEffect(c)
 	e2:SetCategory(CATEGORY_REMOVE)
-	e2:SetType(EFFECT_TYPE_TRIGGER_F)
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
 	e2:SetCode(EVENT_SUMMON_SUCCESS)
 	e2:SetRange(LOCATION_MZONE)
 	e2:SetDescription(aux.Stringid(71400030,0))

expansions/script/c71400058.lua

@@ -9,7 +9,6 @@ function c71400058.initial_effect(c)
 	e1:SetType(EFFECT_TYPE_QUICK_O)
 	e1:SetCode(EVENT_FREE_CHAIN)
 	e1:SetRange(LOCATION_FZONE)
-	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
 	e1:SetDescription(aux.Stringid(71400058,0))
 	e1:SetCountLimit(1)
 	e1:SetTarget(c71400058.tg1)

expansions/script/c71402001.lua

@@ -22,7 +22,7 @@ function c71402001.initial_effect(c)
 	e2:SetRange(LOCATION_GRAVE+LOCATION_REMOVED)
 	e2:SetCountLimit(1)
 	e2:SetCost(c71402001.cost2)
-	e2:SetTarget(c71402001.tg3)
+	e2:SetTarget(c71402001.tg2)
 	e2:SetOperation(c71402001.op2)
 	c:RegisterEffect(e2)
 	--double tuner check
@@ -81,6 +81,11 @@ function c71402001.cost2(e,tp,eg,ep,ev,re,r,rp,chk)
 	Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,1,tp,LOCATION_HAND)
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
 end
+function c71402001.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
+	Duel.SetOperationInfo(0,CATEGORY_REMOVE,Duel.GetFirstTarget(),1,tp,LOCATION_HAND)
+end
 function c71402001.op2(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
 	if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 then

expansions/script/c71402003.lua

@@ -42,13 +42,13 @@ function c71402003.initial_effect(c)
 	end
 end
 function c71402003.mfilter(c)
-	return c:GetFlagEffect(71402003)==0 and c:IsLocation(LOCATION_ONFIELD)
+	return c:GetFlagEffect(71402003)>0 and c:IsLocation(LOCATION_ONFIELD) and c:IsLinkType(TYPE_EFFECT)
 end
 function c71402003.checkop(e,tp,eg,ep,ev,re,r,rp)
 	local rc=re:GetHandler()
 	if not rc:IsRelateToEffect(re) or not re:IsActiveType(TYPE_MONSTER) then return end
 	local loc=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_LOCATION)
-	if loc==LOCATION_MZONE and rc:GetFlagEffect(71402003)==0 then
+	if loc&LOCATION_ONFIELD~=0 and rc:GetFlagEffect(71402003)==0 then
 		rc:RegisterFlagEffect(71402003,RESET_EVENT+RESETS_STANDARD,0,1)
 	end
 end

expansions/strings.conf

@@ -671,6 +671,7 @@
 !setname 0xc81 陆莲花
 !setname 0xc82 艾莎
 !setname 0xc85 山海异兽
+!setname 0xc86 元素精灵
 !setname 0xc8e 刻神指令
 !setname 0xc8f 时刻喷射龙
 !counter 0xc8f 王之指示物