update 4 skills

wanning/special.lua

@@ -213,6 +213,15 @@ end, function(e,tp,eg,ep,ev,re,r,rp)
 		and Duel.IsPlayerCanSpecialSummonMonster(tp,73915052,0,TYPES_TOKEN_MONSTER,0,0,1,RACE_BEAST,ATTRIBUTE_EARTH)
 end)
 
+function c69015963_filter(c,e,tp)
+  return c:IsCanBeSpecialSummoned(e,0,tp,true,true) and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0
+end
+
+standbyPhaseSkill(69015963, function(e,tp,eg,ep,ev,re,r,rp)
+  local g=Duel.SelectMatchingCard(tp,c69015963_filter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
+  if g then Duel.SpecialSummon(g,0,tp,tp,true,true,POS_FACEUP) end
+end)
+
 addSkill(53239672, function(e1)
   e1:SetType(EFFECT_TYPE_FIELD)
 	e1:SetCode(EFFECT_CHANGE_BATTLE_DAMAGE)
@@ -234,35 +243,51 @@ end, function(e,tp)
   return Duel.GetFieldGroupCount(tp,LOCATION_HAND,0)==0 and Duel.IsExistingMatchingCard(Card.IsAbleToRemove,tp,0,LOCATION_ONFIELD+LOCATION_HAND,1,nil) and Duel.GetTurnPlayer()==1-tp and Duel.GetActivityCount(1-tp,ACTIVITY_ATTACK)==0 and Duel.GetTurnCount()>1
 end, true)
 
---local godCodes={10000000,10000010,10000020}
-local godCodes={55410871,55410871,55410871,55410871,55410871}
+oneTimeSkill(13171876, function(e,tp,eg,ep,ev,re,r,rp)
+  local g=Duel.GetDecktopGroup(1-tp,8)
+  Duel.Exile(g,REASON_RULE)
+  for i=1,8 do
+	local tc=Duel.CreateToken(1-tp,13171876)
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
+	e1:SetCode(EVENT_DRAW)
+	e1:SetOperation(c21082832_op)
+	tc:RegisterEffect(e1)
+  end
+  Duel.SendtoDeck(Duel.GetFieldGroup(tp,LOCATION_HAND,0),nil,2,REASON_RULE)
+  Duel.Draw(tp,5,REASON_RULE)
+end)
+
+function c21082832_op(e,tp,eg,ep,ev,re,r,rp)
+	local lp=Duel.GetLP(tp)-3000
+	if lp<0 then lp=0 end
+	Duel.SetLP(tp,lp)
+end
+
 oneTimeSkill(21082832, function(e,tp,eg,ep,ev,re,r,rp)
-  for _,code in ipairs(godCodes) do
-    local tc=Duel.CreateToken(tp,code)
+  for i=1,5 do
+	local tc=Duel.CreateToken(tp,55410871)
 	Duel.MoveToField(tc,tp,tp,LOCATION_MZONE,POS_FACEUP_ATTACK,true)
-    --tc:RegisterFlagEffect(37818795,RESET_EVENT+RESETS_STANDARD,0,1,2)
-    --[[if code==10000010 then
-      for _,ecode in ipairs({EFFECT_UPDATE_ATTACK,EFFECT_UPDATE_DEFENSE}) do
-        local e1=Effect.CreateEffect(tc)
+	--cannot remove
+	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE)
-        e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_SET_AVAILABLE)
+	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e1:SetCode(EFFECT_CANNOT_REMOVE)
 	e1:SetRange(LOCATION_MZONE)
-        e1:SetCode(ecode)
-        e1:SetValue(4000)
 	e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-        tc:RegisterEffect(e1,true)
-      end
-    end]]
+	c:RegisterEffect(e4)
+	tc:CompleteProcedure()
   end
 end)
 
 function c18940556_tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetAttacker()==e:GetHandler() and Duel.GetAttackTarget() end
-  local g=Duel.GetMatchingGroup(nil,tp,0,LOCATION_ONFIELD+LOCATION_HAND,nil)
+  local g=Duel.GetMatchingGroup(nil,tp,0,LOCATION_ONFIELD,nil)
 	Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,#g,0,0)
 end
 function c18940556_tgop(e,tp,eg,ep,ev,re,r,rp)
-	local g=Duel.GetMatchingGroup(nil,tp,0,LOCATION_ONFIELD+LOCATION_HAND,nil)
+	local g=Duel.GetMatchingGroup(nil,tp,0,LOCATION_ONFIELD,nil)
   if #g>0 then
 	Duel.Remove(g,POS_FACEUP,REASON_EFFECT)
   end
@@ -292,7 +317,7 @@ local function initializeLion(e,tp)
 	e4:SetDescription(aux.Stringid(18940556,1))
 	e4:SetCategory(CATEGORY_REMOVE)
 	e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
-	e4:SetCode(EVENT_BATTLE_START)
+	e4:SetCode(EVENT_BATTLE_CONFIRM)
 	e4:SetTarget(c18940556_tgtg)
 	e4:SetOperation(c18940556_tgop)
   e4:SetReset(RESET_EVENT+RESETS_STANDARD)