Merge branch 'master' of https://github.com/purerosefallen/specials

doom-pot-nlose/c55144522.lua

+--強欲な壺
+function c55144522.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_DRAW)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetTarget(c55144522.target)
+	e1:SetOperation(c55144522.activate)
+	c:RegisterEffect(e1)
+	if not c55144522.doom then
+		c55144522.doom=true
+		local e1=Effect.GlobalEffect()
+		e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		e1:SetCode(EVENT_ADJUST)
+		e1:SetOperation(function(e)
+			for tp=0,1 do
+				if Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_DECK,0,1,nil,55144522) then
+					Auxiliary.InitializeDoom(tp,10)
+				end
+			end
+			e:Reset()
+		end)
+		Duel.RegisterEffect(e1,0)
+	end
+end
+function c55144522.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsPlayerCanDraw(tp,2) end
+	Duel.SetTargetPlayer(tp)
+	Duel.SetTargetParam(2)
+	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,2)
+end
+function c55144522.activate(e,tp,eg,ep,ev,re,r,rp)
+	local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
+	Duel.Draw(p,d,REASON_EFFECT)
+end
+
+function Auxiliary.DoomChance(p,DOOM_LEVEL)
+	return math.random()<=DOOM_LEVEL*0.1*p
+end
+function Auxiliary.DoomValue(p,DOOM_LEVEL)
+	if p<=0 then return p end
+	if DOOM_LEVEL==0 then return 0 end
+	return math.random(math.ceil(DOOM_LEVEL*0.1*p))
+end
+function Auxiliary.InitializeDoom(PLAYER_AI,DOOM_LEVEL)
+	local e1=Effect.GlobalEffect()
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetTargetRange(1,0)
+	e1:SetCode(EFFECT_DRAW_COUNT)
+	e1:SetValue(function(e)
+		return math.min(1+Auxiliary.DoomValue(5,DOOM_LEVEL),Duel.GetFieldGroupCount(0,LOCATION_DECK,0))
+	end)
+	Duel.RegisterEffect(e1,PLAYER_AI)
+	local e1=Effect.GlobalEffect()
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetTargetRange(1,0)
+	e1:SetCode(EFFECT_HAND_LIMIT)
+	e1:SetValue(100)
+	Duel.RegisterEffect(e1,PLAYER_AI)
+	local e1=Effect.GlobalEffect()
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetTargetRange(1,0)
+	e1:SetCode(EFFECT_SET_SUMMON_COUNT_LIMIT)
+	e1:SetValue(100)
+	Duel.RegisterEffect(e1,PLAYER_AI)
+	local e1=Effect.GlobalEffect()
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetTargetRange(1,0)
+	e1:SetCode(EFFECT_CANNOT_LOSE_KOISHI)
+	e1:SetValue(1)
+	Duel.RegisterEffect(e1,1-PLAYER_AI)
+	local e1=Effect.GlobalEffect()
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e1:SetCode(EVENT_PHASE_START+PHASE_DRAW)
+	e1:SetCountLimit(1)
+	e1:SetCondition(function(e,tp,eg,ep,ev,re,r,rp)
+		return Duel.GetTurnPlayer()==PLAYER_AI
+	end)
+	e1:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
+		if Duel.GetFieldGroupCount(PLAYER_AI,LOCATION_DECK,0)<=6 then
+			local g=Duel.GetFieldGroup(PLAYER_AI,LOCATION_GRAVE+LOCATION_REMOVED,0)
+			Duel.SendtoDeck(g,nil,2,REASON_RULE)
+			Duel.ShuffleDeck(PLAYER_AI)
+		end
+		Duel.Recover(PLAYER_AI,Auxiliary.DoomValue(2000,DOOM_LEVEL),REASON_RULE)
+		--[[local e1=Effect.GlobalEffect()
+		e1:SetType(EFFECT_TYPE_FIELD)
+		e1:SetCode(EFFECT_SET_SUMMON_COUNT_LIMIT)
+		e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+		e1:SetTargetRange(1,0)
+		e1:SetValue(1+Auxiliary.DoomValue(10,DOOM_LEVEL))
+		e1:SetReset(RESET_PHASE+PHASE_END)
+		Duel.RegisterEffect(e1,0)]]
+	end)
+	Duel.RegisterEffect(e1,PLAYER_AI)
+	--if Duel.IsExistingMatchingCard(Card.IsCode,0,LOCATION_EXTRA,0,1,nil,48905153,59822133) then
+		--[[local e1=Effect.GlobalEffect()
+		e1:SetType(EFFECT_TYPE_FIELD)
+		e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+		e1:SetTargetRange(1,0)
+		e1:SetCode(EFFECT_EXTRA_TOMAIN_KOISHI)
+		e1:SetValue(1)
+		Duel.RegisterEffect(e1,PLAYER_AI)]]
+	--end
+	local e3=Effect.GlobalEffect()
+	e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e3:SetCode(EVENT_PRE_DAMAGE_CALCULATE)
+	e3:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
+	e3:SetCondition(function(e,tp,eg,ep,ev,re,r,rp)
+		local tc=Duel.GetAttacker()
+		return tc and tc:IsControler(PLAYER_AI)
+	end)
+	e3:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
+		local tc=Duel.GetAttacker()
+		if not tc then return end
+		local atk=tc:GetAttack()
+		if atk<=0 then return end
+		local e1=Effect.CreateEffect(tc)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_UPDATE_ATTACK)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+		e1:SetReset(RESET_PHASE+PHASE_DAMAGE_CAL)
+		e1:SetValue(Auxiliary.DoomValue(atk,DOOM_LEVEL))
+		tc:RegisterEffect(e1,true)
+	end)
+	Duel.RegisterEffect(e3,PLAYER_AI)
+	--[[local reg=Card.RegisterEffect
+	Card.RegisterEffect=function(c,e,b)
+		if e:IsHasType(0x7f0) then
+			local con=e:GetCondition()
+			e:SetCondition(function(e,tp,eg,ep,ev,re,r,rp)
+				return not con or con(e,tp,eg,ep,ev,re,r,rp) or (tp==PLAYER_AI and Auxiliary.DoomChance(0.8,DOOM_LEVEL))
+			end)
+			local cost=e:GetCost()
+			e:SetCost(function(e,tp,eg,ep,ev,re,r,rp,chk)
+				if chk==0 then return not cost or cost(e,tp,eg,ep,ev,re,r,rp,0) or (tp==PLAYER_AI and Auxiliary.DoomChance(0.7,DOOM_LEVEL)) end
+				if cost and cost(e,tp,eg,ep,ev,re,r,rp,0) and not (tp==PLAYER_AI and Auxiliary.DoomChance(0.7,DOOM_LEVEL)) then
+					cost(e,tp,eg,ep,ev,re,r,rp,1)
+				end
+			end)
+		end
+		reg(c,e,b)
+	end]]
+	local lp=Duel.GetLP(PLAYER_AI)
+	Duel.SetLP(PLAYER_AI,lp*(1+DOOM_LEVEL*0.1))
+	Duel.Draw(PLAYER_AI,math.ceil(DOOM_LEVEL*0.5),REASON_RULE)
+end

nextneg/special.lua

+function Auxiliary.PreloadUds()
+	local e1=Effect.GlobalEffect()
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
+	e1:SetCode(EVENT_CHAINING)
+	e1:SetCondition(function(e,tp,eg,ep,ev,re,r,rp)
+		return ep==tp
+	end)
+	e1:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
+		local c=re:GetHandler()
+		Duel.SetChainLimit(function(re,ep,tp)
+			return tp==ep
+		end)
+		for _,code in pairs({EFFECT_CANNOT_DISABLE, EFFECT_CANNOT_INACTIVATE, EFFECT_CANNOT_DISEFFECT}) do
+			local e2=Effect.CreateEffect(c)
+			e2:SetType(EFFECT_TYPE_SINGLE)
+			e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_SET_AVAILABLE)
+			e2:SetCode(code)
+			e2:SetReset(RESET_CHAIN+RESET_EVENT+RESETS_STANDARD)
+			e2:SetValue(1)
+			c:RegisterEffect(e2,true)
+		end
+		e:Reset()
+	end)
+	Duel.RegisterEffect(e1,1)
+end

viewdeck-removal/special.lua

+function operate(tp)
+	local mg=Duel.GetFieldGroup(tp,0,LOCATION_DECK)
+	local eg=Duel.GetFieldGroup(tp,0,LOCATION_EXTRA)
+	Duel.ConfirmCards(tp,mg)
+	Duel.Hint(tp,HINT_SELECTMSG,HINTMSG_OPPO)
+	local rg=mg:Select(tp,3,3,nil)
+	Duel.ConfirmCards(tp,eg)
+	if #eg>0 then
+		Duel.Hint(tp,HINT_SELECTMSG,HINTMSG_OPPO)
+		local rg2=eg:Select(tp,1,1,nil)
+		rg:Merge(rg2)
+	end
+	Duel.ShuffleDeck(1-tp)
+	Duel.ShuffleExtra(1-tp)
+	Duel.Exile(rg,REASON_RULE)
+	Duel.ShuffleDeck(1-tp)
+	Duel.ShuffleExtra(1-tp)
+end
+
+function inititialize()
+	operate(0)
+	operate(1)
+	Duel.Draw(0,5,REASON_RULE)
+	Duel.Draw(1,5,REASON_RULE)
+end
+
+function Auxiliary.PreloadUds()
+	-- one more draw
+	local e1=Effect.GlobalEffect()
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
+	e1:SetCode(EVENT_ADJUST)
+	e1:SetOperation(function(e)
+		inititialize()
+		e:Reset()
+	end)
+	Duel.RegisterEffect(e1,0)
+end

viewdeck/special.lua

+function inititialize()
+	--Duel.Draw(1,1,REASON_RULE)
+	Duel.ConfirmCards(0,Duel.GetFieldGroup(0,0,LOCATION_EXTRA))
+	Duel.ConfirmCards(1,Duel.GetFieldGroup(1,0,LOCATION_EXTRA))
+	Duel.ConfirmCards(0,Duel.GetFieldGroup(0,0,LOCATION_DECK))
+	Duel.ConfirmCards(1,Duel.GetFieldGroup(1,0,LOCATION_DECK))
+	Duel.ShuffleDeck(0)
+	Duel.ShuffleDeck(1)
+	Duel.ShuffleExtra(0)
+	Duel.ShuffleExtra(1)
+end
+
+function Auxiliary.PreloadUds()
+	-- one more draw
+	local e1=Effect.GlobalEffect()
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
+	e1:SetCode(EVENT_ADJUST)
+	e1:SetOperation(function(e)
+		inititialize()
+		e:Reset()
+	end)
+	Duel.RegisterEffect(e1,0)
+end

wanning/special.lua

+local skillLists={}
+
+local function addSkill(code, skill)
+  if not skillLists[code] then
+    skillLists[code]={}
+  end
+  table.insert(skillLists[code], skill)
+end
+
+local function getAllSkillCodes()
+  local skillCodes={}
+  for code,_ in pairs(skillLists) do
+    table.insert(skillCodes, code)
+  end
+  return skillCodes
+end
+
+local function registerSkillForPlayer(tp, code)
+  local skills=skillLists[code]
+  for _,skill in ipairs(skills) do
+    local e1=Effect.GlobalEffect()
+    e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_IGNORE_IMMUNE)
+    skill(e1)
+    Duel.RegisterEffect(e1,tp)
+  end
+end
+
+local function wrapDeckSkill(code, effectFactory)
+  addSkill(code, function(e2)
+    local e1=Effect.GlobalEffect()
+    e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_SET_AVAILABLE)
+    e1:SetRange(LOCATION_DECK)
+    effectFactory(e1)
+    e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_GRANT)
+    e2:SetTargetRange(LOCATION_DECK,0)
+    e2:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE+EFFECT_FLAG_SET_AVAILABLE)
+    e2:SetTarget(function(e,c)
+      local dg=Duel.GetFieldGroup(e:GetHandlerPlayer(),LOCATION_DECK,0)
+      if #dg==0 then return false end
+      local minc=dg:GetMinGroup(Card.GetSequence):GetFirst()
+      return c==minc
+    end)
+    e2:SetLabelObject(e1)
+  end)
+end
+
+local function phaseSkill(code, phase, op, con, both)
+  wrapDeckSkill(code, function(e1)
+    e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+    e1:SetCode(EVENT_PHASE+phase)
+    e1:SetCountLimit(1,0x7ffffff-code)
+    e1:SetCondition(function(e,tp,eg,ep,ev,re,r,rp)
+      return (both or Duel.GetTurnPlayer()==tp) and (not con or con(e,tp,eg,ep,ev,re,r,rp))
+    end)
+    e1:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
+      Duel.Hint(HINT_CARD,0,code)
+      op(e,tp,eg,ep,ev,re,r,rp)
+    end)
+  end)
+end
+
+local function oneTimeSkill(code, op)
+  addSkill(code, function(e1)
+    e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+    e1:SetCode(EVENT_ADJUST)
+    e1:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
+      Duel.Hint(HINT_CARD,0,code)
+      op(e,tp,eg,ep,ev,re,r,rp)
+      e:Reset()
+    end)
+  end)
+end
+
+local function standbyPhaseSkill(code, op, con, both)
+  phaseSkill(code, PHASE_STANDBY, op, con, both)
+end
+
+local function endPhaseSkill(code, op, con, both)
+  phaseSkill(code, PHASE_END, op, con, both)
+end
+
+standbyPhaseSkill(48356796, function(e,tp,eg,ep,ev,re,r,rp)
+  Duel.Draw(tp,2,REASON_RULE)
+end)
+
+standbyPhaseSkill(2295831, function(e,tp,eg,ep,ev,re,r,rp)
+  local g=Duel.SelectMatchingCard(tp,Card.IsAbleToHand,tp,LOCATION_DECK,0,1,1,nil)
+  if g:GetCount()>0 then
+    Duel.SendtoHand(g,nil,REASON_EFFECT)
+    Duel.ConfirmCards(1-tp,g)
+  end
+end, function(e,tp,eg,ep,ev,re,r,rp)
+  return Duel.IsExistingMatchingCard(Card.IsAbleToHand, tp, LOCATION_DECK, 0, 1, nil)
+end)
+
+standbyPhaseSkill(84257639, function(e,tp,eg,ep,ev,re,r,rp)
+  Duel.Recover(tp,8000,REASON_EFFECT)
+end)
+
+endPhaseSkill(19523799, function(e,tp,eg,ep,ev,re,r,rp)
+  Duel.Damage(1-tp,3200,REASON_EFFECT)
+end)
+
+for _,event in ipairs({EVENT_SUMMON_SUCCESS,EVENT_FLIP_SUMMON_SUCCESS,EVENT_SPSUMMON_SUCCESS}) do
+  wrapDeckSkill(23434538, function(e1)
+    e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+    e1:SetCode(event)
+    e1:SetCondition(function(e,tp,eg,ep,ev,re,r,rp)
+      local count = eg:FilterCount(function(c)
+        return c:IsControler(1-tp) and c:IsType(TYPE_MONSTER)
+      end, 1, nil)
+      return ep~=tp and count>0 and Duel.GetMZoneCount(tp)>=count
+    end)
+    e1:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
+      Duel.Hint(HINT_CARD,0,23434538)
+      local tg=eg:Filter(function(c)
+        return c:IsControler(1-tp) and c:IsType(TYPE_MONSTER)
+      end, nil)
+      for tc in aux.Next(tg) do
+        local cc=Duel.CreateToken(tp,tc:GetOriginalCode())
+        Duel.MoveToField(cc,tp,tp,LOCATION_MZONE,tc:GetPosition(),true)
+      end
+    end)
+  end)
+end
+
+wrapDeckSkill(1372887, function(e1)
+  e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+  e1:SetCode(EVENT_CHAIN_SOLVED)
+  e1:SetCondition(function(e,tp,eg,ep,ev,re,r,rp)
+    return ep~=tp and not re:GetHandler():IsType(TYPE_TOKEN)
+  end)
+  e1:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
+    Duel.Hint(HINT_CARD,0,1372887)
+    local cc=Duel.CreateToken(tp,re:GetHandler():GetOriginalCode())
+    Duel.SendtoHand(cc,nil,REASON_RULE)
+    if(cc:IsLocation(LOCATION_HAND)) then
+      Duel.ConfirmCards(1-tp,cc)
+    end
+    Duel.ShuffleHand(tp)
+  end)
+end)
+
+function c69015963_filter(c,e,tp)
+	return c:IsCanBeSpecialSummoned(e,0,tp,true,false,POS_FACEUP_ATTACK) and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0
+end
+
+endPhaseSkill(69015963, function(e,tp,eg,ep,ev,re,r,rp)
+  Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectMatchingCard(tp,c69015963_filter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
+	if g:GetCount()>0 then
+		Duel.SpecialSummon(g,0,tp,tp,true,false,POS_FACEUP_ATTACK)
+	end
+end, function(e,tp,eg,ep,ev,re,r,rp)
+  return Duel.IsExistingMatchingCard(c69015963_filter,tp,LOCATION_EXTRA,0,1,nil,e,tp)
+end)
+
+standbyPhaseSkill(14532163, function(e,tp,eg,ep,ev,re,r,rp)
+  local sg=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_ONFIELD,nil)
+	Duel.Destroy(sg,REASON_EFFECT)
+end, function(e,tp)
+  return Duel.IsExistingMatchingCard(aux.TRUE,tp,0,LOCATION_ONFIELD,1,nil)
+end)
+
+phaseSkill(71490127, PHASE_BATTLE_START, function(e,tp,eg,ep,ev,re,r,rp)
+  local num=#Duel.GetMatchingGroup(Card.IsFacedown,tp,LOCATION_SZONE,0,nil)
+  for _=1,num do
+    local tc=Duel.CreateToken(tp,99267150)
+    Duel.MoveToField(tc,tp,tp,LOCATION_MZONE,POS_FACEUP_ATTACK,true)
+  end
+end, function(e,tp)
+  return (#Duel.GetMatchingGroup(Card.IsFacedown,tp,LOCATION_SZONE,0,nil))>0
+end,true)
+
+addSkill(9952083, function(e1)
+  e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetCode(EFFECT_SET_SUMMON_COUNT_LIMIT)
+	e1:SetProperty(e1:GetProperty()|EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetTargetRange(1,0)
+	e1:SetValue(3)
+end)
+
+local function destroyReplaceFilter(c,tp)
+  return c:IsControler(tp) and c:IsReason(REASON_EFFECT)
+end
+
+addSkill(47529357, function(e1)
+  e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e1:SetProperty(e1:GetProperty()|EFFECT_FLAG_IGNORE_IMMUNE)
+	e1:SetCode(EFFECT_DESTROY_REPLACE)
+	e1:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk)
+    if chk==0 then return eg:IsExists(destroyReplaceFilter,1,nil,tp) end
+    return true
+  end)
+	e1:SetValue(function(e,c)
+    return destroyReplaceFilter(c,e:GetHandlerPlayer())
+  end)
+	e1:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
+    Duel.Hint(HINT_CARD,0,47529357)
+  end)
+end)
+
+standbyPhaseSkill(73915051, function(e,tp,eg,ep,ev,re,r,rp)
+  local count=math.min((Duel.GetMZoneCount(tp)),4)
+  for i=1,count do
+    local token=Duel.CreateToken(tp,73915051+i)
+    Duel.SpecialSummonStep(token,0,tp,tp,false,false,POS_FACEUP_DEFENSE)
+  end
+  Duel.SpecialSummonComplete()
+end, function(e,tp,eg,ep,ev,re,r,rp)
+  return not Duel.IsPlayerAffectedByEffect(tp,59822133)
+		and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsPlayerCanSpecialSummonMonster(tp,73915052,0,TYPES_TOKEN_MONSTER,0,0,1,RACE_BEAST,ATTRIBUTE_EARTH)
+end)
+
+addSkill(53239672, function(e1)
+  e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetCode(EFFECT_CHANGE_BATTLE_DAMAGE)
+	e1:SetProperty(e1:GetProperty()|EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetTargetRange(1,0)
+	e1:SetValue(function(e)
+    Duel.Hint(HINT_CARD,0,53239672)
+    return 0
+  end)
+  e1:SetCondition(function(e)
+    return Duel.GetFieldGroupCount(e:GetHandlerPlayer(),LOCATION_HAND,0)==0
+  end)
+end)
+
+endPhaseSkill(53239672, function(e,tp,eg,ep,ev,re,r,rp)
+  local sg=Duel.GetMatchingGroup(Card.IsAbleToRemove,tp,0,LOCATION_ONFIELD+LOCATION_HAND,nil)
+	Duel.Remove(sg,POS_FACEDOWN,REASON_EFFECT)
+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(21082832, function(e,tp,eg,ep,ev,re,r,rp)
+  for _,code in ipairs(godCodes) do
+    local tc=Duel.CreateToken(tp,code)
+    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)
+        e1:SetType(EFFECT_TYPE_SINGLE)
+        e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_SET_AVAILABLE)
+        e1:SetRange(LOCATION_MZONE)
+        e1:SetCode(ecode)
+        e1:SetValue(4000)
+        e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+        tc:RegisterEffect(e1,true)
+      end
+    end]]
+  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)
+	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)
+  if #g>0 then
+    Duel.Remove(g,POS_FACEUP,REASON_EFFECT)
+  end
+end
+
+local function initializeLion(e,tp)
+  Duel.Hint(HINT_CARD,0,4392470)
+  local cc=Duel.CreateToken(tp,4392470)
+  Duel.MoveToField(cc,tp,tp,LOCATION_MZONE,POS_FACEUP_ATTACK,true)
+  local e4=Effect.CreateEffect(cc)
+	e4:SetType(EFFECT_TYPE_FIELD)
+  e4:SetCode(4392470)
+  e4:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
+  e4:SetRange(LOCATION_MZONE)
+  e4:SetReset(RESET_EVENT+RESETS_STANDARD)
+  e4:SetTargetRange(1,0)
+  cc:RegisterEffect(e4,true)
+  local e1=Effect.CreateEffect(cc)
+  e1:SetType(EFFECT_TYPE_SINGLE)
+  e1:SetCode(EFFECT_ADD_TYPE)
+  e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CLIENT_HINT)
+  e1:SetDescription(1016)
+  e1:SetValue(TYPE_EFFECT)
+  e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+  cc:RegisterEffect(e1,true)
+  local e4=Effect.CreateEffect(cc)
+	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:SetTarget(c18940556_tgtg)
+	e4:SetOperation(c18940556_tgop)
+  e4:SetReset(RESET_EVENT+RESETS_STANDARD)
+  cc:RegisterEffect(e4,true)
+end
+
+wrapDeckSkill(4392470, function(e1)
+  e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+  e1:SetCode(EVENT_ADJUST)
+  e1:SetCondition(function(e,tp,eg,ep,ev,re,r,rp)
+    return not Duel.IsPlayerAffectedByEffect(tp,4392470)
+  end)
+  e1:SetOperation(initializeLion)
+end)
+
+standbyPhaseSkill(42829885, function(e,tp,eg,ep,ev,re,r,rp)
+  local p=tp
+	local g=Duel.GetFieldGroup(p,0,LOCATION_HAND)
+	if g:GetCount()>0 then
+		Duel.ConfirmCards(p,g)
+		Duel.Hint(HINT_SELECTMSG,p,HINTMSG_TODECK)
+		local sg=g:Select(p,1,1,nil)
+		Duel.SendtoDeck(sg,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
+		Duel.ShuffleHand(1-p)
+	end
+end, function(e,tp,eg,ep,ev,re,r,rp)
+  return Duel.GetFieldGroupCount(tp,0,LOCATION_HAND)>0 and Duel.GetTurnPlayer()==1-tp
+end, true)
+
+addSkill(99177923, function(e1)
+  e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetCode(EFFECT_CANNOT_LOSE_KOISHI)
+	e1:SetProperty(e1:GetProperty()|EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetTargetRange(1,0)
+	e1:SetValue(1)
+end)
+
+endPhaseSkill(99177923, function(e,tp,eg,ep,ev,re,r,rp)
+  local g=Duel.GetDecktopGroup(tp,8)
+	Duel.DisableShuffleCheck()
+  Duel.Exile(g,REASON_EFFECT)
+end, function(e,tp,eg,ep,ev,re,r,rp)
+  return Duel.GetLP(tp)<=0
+end)
+
+local function initialize()
+  local skillSelections={}
+  local skillCodes=getAllSkillCodes()
+  for tp=0,1 do
+    local g=Group.CreateGroup()
+    for _,code in ipairs(skillCodes) do
+      local c=Duel.CreateToken(tp,code)
+      Duel.Remove(c,POS_FACEDOWN,REASON_RULE)
+      g:AddCard(c)
+    end
+    local tc=g:Select(tp,1,1,nil):GetFirst()
+    skillSelections[tp]=tc:GetOriginalCode()
+    Duel.Exile(g,REASON_RULE)
+  end
+  for tp=0,1 do
+    registerSkillForPlayer(tp,skillSelections[tp])
+  end
+end
+
+function Auxiliary.PreloadUds()
+	local e1=Effect.GlobalEffect()
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
+	e1:SetCode(EVENT_ADJUST)
+	e1:SetOperation(function(e)
+		initialize()
+		e:Reset()
+	end)
+	Duel.RegisterEffect(e1,0)
+end