Fix トリックスター・コルチカ

script/c100220203.lua

@@ -8,7 +8,7 @@ function s.initial_effect(c)
 	e1:SetDescription(aux.Stringid(id,0))
 	e1:SetCategory(CATEGORY_DAMAGE)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
-	e1:SetCode(EVENT_BATTLE_DESTROYING)
+	e1:SetCode(EVENT_BATTLE_DESTROYED)
 	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
 	e1:SetRange(LOCATION_GRAVE)
 	e1:SetCountLimit(1,id)
@@ -21,25 +21,35 @@ end
 function s.mat(c)
 	return c:IsLinkSetCard(0xfb) and not c:IsLinkType(TYPE_LINK)
 end
+function s.damfilter(c,tp,e)
+	if c:IsSetCard(0xfb) and c:IsPreviousControler(tp) then return true end
+	local rc=c:GetBattleTarget()
+	return rc:IsSetCard(0xfb)
+		and (not rc:IsLocation(LOCATION_MZONE) and rc:IsPreviousControler(tp)
+			or rc:IsLocation(LOCATION_MZONE) and rc:IsControler(tp))
+end
 function s.damcon(e,tp,eg,ep,ev,re,r,rp)
-	local rc=eg:GetFirst()
-	local bc=rc:GetBattleTarget()
-	return rc:IsRelateToBattle() and rc:IsStatus(STATUS_OPPO_BATTLE) and rc:IsSetCard(0xfb)
-		and bc:IsType(TYPE_MONSTER) and bc:IsLocation(LOCATION_GRAVE+LOCATION_REMOVED) and bc:IsFaceupEx()
+	return not eg:IsContains(e:GetHandler()) and eg:IsExists(s.damfilter,1,nil,tp,e)
+end
+function s.tgfilter(c,e)
+	return c:IsFaceupEx() and c:GetBaseAttack()>0 and c:IsCanBeEffectTarget(e)
 end
 function s.damtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	local rc=eg:GetFirst()
-	local bc=rc:GetBattleTarget()
 	if chkc then return false end
-	if chk==0 then return not bc:IsAttack(0) and bc:IsCanBeEffectTarget(e) end
+	local g=eg:Filter(s.tgfilter,nil,e)
+	if chk==0 then return g:GetCount()>0 end
+	local bc=g:GetFirst()
+	if g:GetCount()>1 then
+		bc=g:FilterSelect(tp,s.tgfilter,1,1,nil,e):GetFirst()
+	end
 	Duel.SetTargetCard(bc)
-	local dam=bc:GetAttack()
+	local dam=bc:GetBaseAttack()
 	Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,dam)
 end
 function s.damop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
 	local tc=Duel.GetFirstTarget()
 	if tc:IsRelateToEffect(e) then
-		Duel.Damage(1-tp,tc:GetAttack(),REASON_EFFECT)
+		Duel.Damage(1-tp,tc:GetBaseAttack(),REASON_EFFECT)
 	end
 end
\ No newline at end of file