Add files via upload

VgD.Lua

@@ -513,7 +513,7 @@ function VgD.MonsterCannotBeAttackedCondition(e,c)
 end
 
 --送去g区
-function VgD.CardToG(c,cost)
+function VgD.CardToG(c,cost,op)
     local type=EFFECT_TYPE_TRIGGER_F
     if VgF.GetValueType(cost)=="function" then type=EFFECT_TYPE_TRIGGER_O end
     local e1=Effect.CreateEffect(c)
@@ -523,7 +523,7 @@ function VgD.CardToG(c,cost)
     e1:SetCode(EVENT_MOVE)
     if VgF.GetValueType(cost)=="function" then e1:SetCost(cost) end
     e1:SetCondition(VgD.CardToGCondition)
-    e1:SetOperation(VgD.CardToGOperation)
+    if VgF.GetValueType(op)~="function" then e1:SetOperation(VgD.CardToGOperation) else  e1:SetOperation(op) end
     c:RegisterEffect(e1)
 end
 function VgD.CardToGCondition(e,tp,eg,ep,ev,re,r,rp)
@@ -1041,7 +1041,6 @@ function VgD.TriggerCountUpOperation(num)
         local label=c:GetFlagEffectLabel(AttackTriggerFlag)
         if not label then label=0 end
         label=label+num
-        Debug.Message(label)
         if label<0 then label=0 end
         c:ResetFlagEffect(AttackTriggerFlag)
         c:RegisterFlagEffect(AttackTriggerFlag,RESET_EVENT+RESETS_STANDARD,0,1,label)

c10101006.lua

@@ -8,7 +8,7 @@ end
 function cm.operation2(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
 	VgF.AtkUp(c,c,10000,nil)
-	if Duel.GetMatchingGroup(VgF.VMonsterFilter,tp,LOCATION_MZONE,0,nil,nil):GetFirst():GetOverlayGroup():FilterCount(Card.IsAbleToGraveAsCost,nil)>=2 and Duel.SelectYesNo(tp,vgf.Stringid(m,3)) then
+	if Duel.GetMatchingGroup(VgF.VMonsterFilter,tp,LOCATION_MZONE,0,nil,nil):GetFirst():GetOverlayGroup():FilterCount(Card.IsAbleToGraveAsCost,nil)>=2 and Duel.SelectEffectYesNo(tp,vgf.stringid(VgID,10)) then
 		local cg=Duel.GetMatchingGroup(VgF.VMonsterFilter,tp,LOCATION_MZONE,0,nil):GetFirst():GetOverlayGroup():FilterSelect(tp,Card.IsAbleToGraveAsCost,2,2,nil)
         if Duel.SendtoGrave(cg,REASON_COST)==2 then
 			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_LEAVEONFIELD)

c10102001.lua

@@ -2,7 +2,7 @@ local cm,m,o=GetID()
 function cm.initial_effect(c)
 	vgf.VgCard(c)
 	vgd.EffectTypeTrigger(c,m,LOCATION_MZONE,EFFECT_TYPE_FIELD,EVENT_CUSTOM+EVENT_RIDE_START,cm.op,nil,cm.con)
-	vgd.EffectTypeTrigger(c,m,LOCATION_MZONE,EFFECT_TYPE_SINGLE,EVENT_ATTACK_ANNOUNCE,cm.op2,vgf.OverlayCost(5),vgf.VMonsterCondition)
+	vgd.EffectTypeTrigger(c,m,LOCATION_MZONE,EFFECT_TYPE_SINGLE,EVENT_ATTACK_ANNOUNCE,cm.op2,vgf.OverlayCost(5),cm.con2)
 end
 function cm.op(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
@@ -16,9 +16,12 @@ function cm.op(e,tp,eg,ep,ev,re,r,rp)
 	Duel.RegisterEffect(e,tp)
 end
 function cm.con(e,tp,eg,ep,ev,re,r,rp)
-	return rp==tp and vgf.VMonsterCondition(e)
+	return Duel.GetTurnPlayer()==tp and vgf.VMonsterCondition(e)
 end
 function cm.op2(e,tp,eg,ep,ev,re,r,rp)
 	local g=Duel.GetMatchingGroup(vgf.IsSequence,tp,LOCATION_MZONE,0,nil,0,4)
 	Duel.ChangePosition(g,POS_FACEUP_ATTACK)
+end
+function cm.con2(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetFlagEffectLabel(tp,ConditionFlag)==10102001 and vgf.VMonsterCondition(e)
 end
\ No newline at end of file

c10102005.lua

 local cm,m,o=GetID()
 function cm.initial_effect(c)
 	vgf.VgCard(c)
+	vgd.EffectTypeTrigger(c,m,nil,EFFECT_TYPE_SINGLE,EVENT_SPSUMMON_SUCCESS,cm.operation,nil,cm.con)
 end
+function cm.con(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return not (c:IsSummonType(SUMMON_TYPE_RIDE) or c:IsSummonType(SUMMON_TYPE_SELFRIDE))
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	vgf.OverlayFill(1)
+	Duel.BreakEffect()
+	if Duel.GetFlagEffectLabel(tp,ConditionFlag)==10102001 and Duel.IsExistingMatchingCard(Card.IsFaceup,tp,LOCATION_DAMAGE,0,1,nil) and Duel.SelectEffectYesNo(tp,vgf.stringid(VgID,10)) then
+        Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DAMAGE)
+        local g=Duel.SelectMatchingCard(tp,Card.IsFaceup,tp,LOCATION_DAMAGE,0,1,1,nil)
+        Duel.ChangePosition(g,POS_FACEDOWN_ATTACK)
+		vgf.AtkUp(c,c,15000)
+	end
+end
\ No newline at end of file

c10102007.lua

 local cm,m,o=GetID()
 function cm.initial_effect(c)
 	vgf.VgCard(c)
+	vgd.CardToG(c,vgf.DamageCost(1),cm.op)
 end
+function m.op(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	vgf.DefUp(c,c,5000)
+end
\ No newline at end of file

c10203005.lua

@@ -2,7 +2,7 @@ local cm,m,o=GetID()
 function cm.initial_effect(c)
 	vgf.VgCard(c)
 	vgd.EffectTypeTrigger(c,m,loc,EFFECT_TYPE_SINGLE,EVENT_SPSUMMON_SUCCESS,cm.op,nil,cm.con)
-	vgd.EffectTypeTrigger(c,m,LOCATION_MZONE,EFFECT_TYPE_SINGLE,EVENT_PHASE,cm.op1,nil,cm.con1)
+	vgd.EffectTypeTrigger(c,m,LOCATION_MZONE,EFFECT_TYPE_FIELD,EVENT_PHASE+PHASE_END,cm.op1,nil,cm.con1)
 	if not cm.global_check then
         cm.global_check=true
         local ge1=Effect.CreateEffect(c)