得得得得得

expansions/script/c16114242.lua

 --春仙精 霍普尔
 xpcall(function() require("expansions/script/c16199990") end,function() require("script/c16199990") end)
+local m,cm=rk.set(16114211,"FAIRY")
 local m,cm=rk.set(16114242,"FAIRY")
 function cm.initial_effect(c)
-	c:SetSPSummonOnce(m)
+	c:SetSPSummonOnce(16114211)
 	--Recover
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))

expansions/script/c16114243.lua

 --恶魔仙精 贝拉冬娜
 xpcall(function() require("expansions/script/c16199990") end,function() require("script/c16199990") end)
+local m,cm=rk.set(16114208,"FAIRY")
 local m,cm=rk.set(16114243,"FAIRY")
 function cm.initial_effect(c)
-	c:SetSPSummonOnce(m)
+	c:SetSPSummonOnce(16114208)
 	c:EnableReviveLimit()
 	--search
 	local e1=Effect.CreateEffect(c)

expansions/script/c16114244.lua

 --不死仙精 贝拉多阿涅
 xpcall(function() require("expansions/script/c16199990") end,function() require("script/c16199990") end)
+local m,cm=rk.set(16114209,"FAIRY")
 local m,cm=rk.set(16114244,"FAIRY")
 function cm.initial_effect(c)
-	c:SetSPSummonOnce(m)
+	c:SetSPSummonOnce(16114209)
 	c:EnableReviveLimit()
 	--search
 	local e1=Effect.CreateEffect(c)

expansions/script/c33700170.lua

@@ -45,8 +45,7 @@ function c33700170.initial_effect(c)
 	c:RegisterEffect(e4)
 end
 function c33700170.costfilter(c)
-	return c:IsType(TYPE_MONSTER) and c:IsDiscardable()
- and c:IsSetCard(0x6440) and c:GetAttack()>0
+	return c:IsType(TYPE_MONSTER) and c:IsDiscardable() and c:IsSetCard(0x6440) and c:GetAttack()>0
 end
 function c33700170.cost(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(c33700170.costfilter,tp,LOCATION_HAND,0,1,e:GetHandler()) end
@@ -76,16 +75,16 @@ function c33700170.splimit(e,c,sump,sumtype,sumpos,targetp)
 end
 function c33700170.tg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then 
-		return   (Duel.CheckLocation(tp,LOCATION_SZONE,6) or Duel.CheckLocation(tp,LOCATION_SZONE,7))  and Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>=5 end
+		return   (Duel.CheckLocation(tp,LOCATION_SZONE,6) or Duel.CheckLocation(tp,LOCATION_SZONE,7)) and Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>=5 end
 	Duel.SetTargetPlayer(tp)
 end
 function c33700170.filter(c)
-	return c:IsSetCard(0x3440) and c:IsType(TYPE_PENDULUM) and not c:IsForbidden()IsAbleToHand()
+	return c:IsSetCard(0x3440) and c:IsType(TYPE_PENDULUM) and not c:IsForbidden() and c:IsAbleToHand()
 end
 function c33700170.damfilter(c)
 	return not c:IsSetCard(0x3440) 
 end
-function c33700170.op(e,tp,eg,ep,ev,re,r,rp).op(e,tp,eg,ep,ev,re,r,rp)
+function c33700170.op(e,tp,eg,ep,ev,re,r,rp)
 	if not e:GetHandler():IsRelateToEffect(e) then return end
 	local p=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER)
 	Duel.ConfirmDecktop(p,5)
@@ -94,14 +93,14 @@ function c33700170.op(e,tp,eg,ep,ev,re,r,rp).op(e,tp,eg,ep,ev,re,r,rp)
 	if g:GetCount()>0 and g:IsExists(c33700170.filter) and  (Duel.CheckLocation(tp,LOCATION_SZONE,6) or Duel.CheckLocation(tp,LOCATION_SZONE,7))  then
 		Duel.Hint(HINT_SELECTMSG,p,HINTMSG_TARGET)
 		local sg=g:FilterSelect(p,c33700170.filter,1,1,nil)
-		Duel.MoveToField(sg:GetFirst(),tp,tp,LOCATION_SZONE,POS_FACEUP,true)
+		Duel.MoveToField(sg:GetFirst(),tp,tp,LOCATION_PZONE,POS_FACEUP,true)
 		Duel.DisableShuffleCheck()
 		Duel.SortDecktop(tp,tp,4)
 		if tg>0 then 
-		Duel.Damage(tp,tg*400,REASON_EFFECT)	   
+			Duel.Damage(tp,tg*400,REASON_EFFECT)	   
+		end
 	end
 end
-end
 function c33700170.chcon(e,tp,eg,ep,ev,re,r,rp)
 	local rc=re:GetHandler()
 	local loc=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_LOCATION)

expansions/script/c33701370.lua

@@ -27,7 +27,7 @@ end
 function cm.damcon(e,tp,eg,ep,ev,re,r,rp)
 	return Duel.GetTurnPlayer()~=tp
 end
-function cm.activate(e,tp,eg,ep,ev,re,r,rp)
+function cm.damop(e,tp,eg,ep,ev,re,r,rp)
 	Duel.Damage(tp,100,REASON_EFFECT,true)
 	Duel.Damage(1-tp,100,REASON_EFFECT,true)
 	Duel.RDComplete()

expansions/script/c71400008.lua

@@ -45,7 +45,10 @@ function c71400008.op1(e,tp,eg,ep,ev,re,r,rp)
 	local g=Duel.SelectMatchingCard(tp,aux.TRUE,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
 	if g:GetCount()>0 then
 		Duel.HintSelection(g)
-		Duel.Destroy(g,REASON_EFFECT)
+		if Duel.Destroy(g,REASON_EFFECT)>0 then
+			Duel.BreakEffect()
+			Duel.SetLP(tp,Duel.GetLP(tp)-1200)
+		end
 	end
 end
 function c71400008.con2(e,tp,eg,ep,ev,re,r,rp)

expansions/script/c71400025.lua

@@ -3,10 +3,8 @@ xpcall(function() require("expansions/script/c71400001") end,function() require(
 function c71400025.initial_effect(c)
 	--Activate
 	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(71400025,0))
 	e1:SetType(EFFECT_TYPE_ACTIVATE)
 	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetCondition(yume.nonYumeCon)
 	e1:SetTarget(c71400025.tg1)
 	e1:SetCost(c71400025.cost1)
 	e1:SetOperation(c71400025.op1)

expansions/script/c71400064.lua

@@ -35,6 +35,7 @@ function c71400064.initial_effect(c)
 	e3:SetDescription(aux.Stringid(71400064,2))
 	e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e3:SetType(EFFECT_TYPE_QUICK_O)
+	e3:SetCode(EVENT_FREE_CHAIN)
 	e3:SetRange(LOCATION_MZONE)
 	e3:SetCountLimit(1,71500064)
 	e3:SetCost(c71400064.cost3)