10501082

VgD.Lua

@@ -24,10 +24,11 @@ function VgD.RideUp(c)
 end
 function VgD.RideUpFilter1(c,e,lv,code,rc)
     local tp=c:GetControler()
-    if rc:IsAttribute(SKILL_SELF_RIDE) and c:IsCode(code) then
+    if not c:IsType(TYPE_MONSTER) then return false end
+    if rc:IsAttribute(SKILL_SELF_RIDE) and c:IsCode(code) then return false end
+    if (c:IsLevel(lv,lv+1) and c:IsLocation(LOCATION_HAND)) then return true end
+    if (c:IsLevel(lv+1) and c:IsLocation(LOCATION_RIDE) and (VgF.IsExistingMatchingCard(nil,tp,LOCATION_HAND,0,1,nil) or (Duel.IsPlayerAffectedByEffect(tp,AFFECT_CODE_OVERLAY_INSTEAD_WHEN_RIDE) and VgF.GetVMonster(tp):GetOverlayCount()>0))) then return true end
     return false
-    end
-    return ((c:IsLevel(lv,lv+1) and c:IsLocation(LOCATION_HAND)) or (c:IsLevel(lv+1) and c:IsLocation(LOCATION_RIDE) and VgF.IsExistingMatchingCard(nil,tp,LOCATION_HAND,0,1,nil))) and c:IsType(TYPE_MONSTER)
 end
 function VgD.DisCardRideUpFilter(c,e,lv,code,rc)
     local tp=c:GetControler()
@@ -374,7 +375,7 @@ function VgD.MonsterBattle(c)
     e15:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
     e15:SetValue(100)
     c:RegisterEffect(e15)
-    local e16=e15:Clone()
+    local e16=Effect.CreateEffect(c)
     e16:SetType(EFFECT_TYPE_SINGLE)
     e16:SetCode(EFFECT_CANNOT_BE_BATTLE_TARGET)
     e16:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CANNOT_DISABLE)

VgDefinition.Lua

@@ -880,5 +880,8 @@ AFFECT_CODE_NIGHT       =VgID+3 --黑夜
 AFFECT_CODE_DEEP_NIGHT  =VgID+4 --深渊黑夜
 
 
+AFFECT_CODE_OVERLAY_INSTEAD_WHEN_RIDE   =10501082   --不执行『选择手牌中的1张卡，舍弃』而是执行『灵魂爆发1』来将卡RIDE
+
+
 POS_FACEUP_DEFENCE=POS_FACEUP_DEFENSE
 POS_FACEDOWN_DEFENCE=POS_FACEDOWN_DEFENSE
\ No newline at end of file

c10501082.lua

 local cm,m,o=GetID()
 function cm.initial_effect(c)
 	vgf.VgCard(c)
+	local e1=Effect.CreateEffect(c)
+    e1:SetType(EFFECT_TYPE_FIELD)
+    e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+    e1:SetCode(AFFECT_OVERLAY_INSTEAD_WHEN_RIDE)
+    e1:SetRange(LOCATION_MZONE)
+	e1:SetCondition(function (e,tp,eg,ep,ev,re,r,rp)
+		return cm.con(e,tp,eg,ep,ev,re,r,rp) and vgf.VMonsterCondition(e)
+	end)
+    e1:SetTargetRange(1,0)
+    c:RegisterEffect(e1)
+	local e2=Effect.CreateEffect(c)
+    e2:SetType(EFFECT_TYPE_SINGLE)
+    e2:SetCode(EFFECT_CANNOT_BE_BATTLE_TARGET)
+    e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+    e2:SetRange(LOCATION_MZONE)
+    e2:SetCondition(function (e,tp,eg,ep,ev,re,r,rp)
+		return not cm.con(e,tp,eg,ep,ev,re,r,rp) and vgf.VMonsterCondition(e)
+	end)
+    e2:SetValue(function (e,tc)
+		return tc:IsLevelBelow(2) and vgf.RMonsterFilter(tc)
+	end)
+    c:RegisterEffect(e2)
+	vgd.EffectTypeTrigger(c,m,nil,EFFECT_TYPE_SINGLE,EVENT_SPSUMMON_SUCCESS,cm.op,nil,cm.con1)
+end
+function cm.con(e,tp,eg,ep,ev,re,r,rp)
+    local a=vgf.IsExistingMatchingCard(cm.filter1,tp,LOCATION_REMOVED,0,1,nil)
+    local b=vgf.IsExistingMatchingCard(cm.filter2,tp,LOCATION_REMOVED,0,1,nil)
+    -- 白翼（你的封锁区中的卡只有奇数的等级的场合才有效）
+    return not a and b
+end
+function cm.filter1(c)
+    return c:GetLevel()%2==1
+end
+function cm.filter2(c)
+    return c:GetLevel()%2==0
+end
+function cm.con1(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return c:IsSummonType(SUMMON_TYPE_RIDE) or c:IsSummonType(SUMMON_TYPE_SELFRIDE)
+end
+function cm.op(e,tp,eg,ep,ev,re,r,rp)
+	local g=Duel.GetDecktopGroup(tp,1)
+	vgf.Sendto(LOCATION_REMOVED,g,POS_FACEUP,REASON_EFFECT)
 end
\ No newline at end of file