new scripts

script/c10352095.lua

@@ -0,0 +1,49 @@
+--»Ã»óÖ®¾íÎï
+function c10352095.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_EQUIP)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetTarget(c10352095.target)
+	e1:SetOperation(c10352095.operation)
+	c:RegisterEffect(e1)
+	--ATTRIBUTE	
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_EQUIP)
+	e2:SetCode(EFFECT_CHANGE_ATTRIBUTE)
+	e2:SetValue(c10352095.value)
+	c:RegisterEffect(e2)
+	e1:SetLabelObject(e2)
+	--Equip limit
+	local e4=Effect.CreateEffect(c)
+	e4:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+	e4:SetType(EFFECT_TYPE_SINGLE)
+	e4:SetCode(EFFECT_EQUIP_LIMIT)
+	e4:SetValue(1)
+	c:RegisterEffect(e4)
+end
+function c10352095.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsFaceup() end
+	if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
+	Duel.SelectTarget(tp,Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
+	Duel.Hint(HINT_SELECTMSG,tp,563)
+	local rc=Duel.AnnounceAttribute(tp,1,0xffffff)
+	e:GetLabelObject():SetLabel(rc)
+	e:GetHandler():SetHint(CHINT_ATTRIBUTE,rc)
+	Duel.SetOperationInfo(0,CATEGORY_EQUIP,e:GetHandler(),1,0,0)
+end
+function c10352095.operation(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if e:GetHandler():IsRelateToEffect(e) and tc:IsRelateToEffect(e) and tc:IsFaceup() then
+		Duel.Equip(tp,e:GetHandler(),tc)
+	end
+end
+function c10352095.value(e,c)
+	return Duel.GetMatchingGroupCount(Card.IsFaceup,e:GetHandler():GetControler(),LOCATION_MZONE,0,nil)*800
+end
+function c10352095.value(e,c)
+	return e:GetLabel()
+end

script/c15894048.lua

@@ -0,0 +1,17 @@
+--究極恐獣
+function c15894048.initial_effect(c)
+	--attack
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_FIRST_ATTACK)
+	c:RegisterEffect(e1)
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_SINGLE)
+	e2:SetCode(EFFECT_MUST_ATTACK)
+	c:RegisterEffect(e2)
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_SINGLE)
+	e3:SetCode(EFFECT_ATTACK_ALL)
+	e3:SetValue(1)
+	c:RegisterEffect(e3)
+end

script/c2833249.lua

@@ -0,0 +1,26 @@
+--¸o¤ÎѪ×å
+function c2833249.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetTarget(c2833249.target)
+	e1:SetOperation(c2833249.operation)
+	c:RegisterEffect(e1)
+end
+function c2833249.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsFaceup,tp,LOCATION_MZONE,0,1,nil) end
+end
+function c2833249.operation(e,tp,eg,ep,ev,re,r,rp)
+	local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,LOCATION_MZONE,0,nil)
+	local tc=g:GetFirst()
+	while tc do
+		local e1=Effect.CreateEffect(e:GetHandler())
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_CHANGE_RACE)
+		e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
+		e1:SetValue(RACE_DRAGON)
+		tc:RegisterEffect(e1)
+		tc=g:GetNext()
+	end
+end

script/c30126992.lua

@@ -9,24 +9,18 @@ function c30126992.initial_effect(c)
 	e1:SetRange(LOCATION_HAND)
 	e1:SetCondition(c30126992.spcon)
 	c:RegisterEffect(e1)
-	--spsummon limit
+	--negate
 	local e2=Effect.CreateEffect(c)
-	e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
-	e2:SetType(EFFECT_TYPE_SINGLE)
-	e2:SetCode(EFFECT_SPSUMMON_CONDITION)
+	e2:SetDescription(aux.Stringid(30126992,0))
+	e2:SetCategory(CATEGORY_TODECK)
+	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCountLimit(1)
+	e2:SetCost(c30126992.tdcost)
+	e2:SetTarget(c30126992.tdtg)
+	e2:SetOperation(c30126992.tdop)
 	c:RegisterEffect(e2)
-	--negate
-	local e3=Effect.CreateEffect(c)
-	e3:SetDescription(aux.Stringid(30126992,0))
-	e3:SetCategory(CATEGORY_TODECK)
-	e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e3:SetType(EFFECT_TYPE_IGNITION)
-	e3:SetRange(LOCATION_MZONE)
-	e3:SetCountLimit(1)
-	e3:SetCost(c30126992.tdcost)
-	e3:SetTarget(c30126992.tdtg)
-	e3:SetOperation(c30126992.tdop)
-	c:RegisterEffect(e3)
 end
 function c30126992.spcon(e,c)
 	if c==nil then return true end

script/c41160595.lua

@@ -0,0 +1,34 @@
+--コーリング·マジック
+function c41160595.initial_effect(c)
+	--set
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(41160595,0))
+	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
+	e1:SetCode(EVENT_TO_GRAVE)
+	e1:SetCondition(c41160595.setcon)
+	e1:SetTarget(c41160595.settg)
+	e1:SetOperation(c41160595.setop)
+	c:RegisterEffect(e1)
+end
+function c41160595.setcon(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return bit.band(r,0x41)==0x41 and rp~=tp and c:GetPreviousControler()==tp
+		and c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsPreviousPosition(POS_FACEDOWN)
+end
+function c41160595.filter(c)
+	return c:GetType()==TYPE_SPELL+TYPE_QUICKPLAY and c:IsSSetable()
+end
+function c41160595.settg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0
+		and Duel.IsExistingMatchingCard(c41160595.filter,tp,LOCATION_DECK,0,1,nil) end
+end
+function c41160595.setop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
+	local g=Duel.SelectMatchingCard(tp,c41160595.filter,tp,LOCATION_DECK,0,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.SSet(tp,g:GetFirst())
+		Duel.ConfirmCards(1-tp,g)
+	end
+end

script/c41382147.lua

@@ -0,0 +1,55 @@
+--星見鳥ラリス
+function c41382147.initial_effect(c)
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCode(EFFECT_UPDATE_ATTACK)
+	e1:SetCondition(c41382147.atkcon)
+	e1:SetValue(c41382147.atkval)
+	c:RegisterEffect(e1)
+	--remove
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(41382147,0))
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
+	e2:SetCategory(CATEGORY_REMOVE)
+	e2:SetCode(EVENT_DAMAGE_STEP_END)
+	e2:SetCondition(c41382147.rmcon)
+	e2:SetTarget(c41382147.rmtg)
+	e2:SetOperation(c41382147.rmop)
+	c:RegisterEffect(e2)
+end
+function c41382147.atkcon(e)
+	local ph=Duel.GetCurrentPhase()
+	return (ph==PHASE_DAMAGE or ph==PHASE_DAMAGE_CAL)
+		and (Duel.GetAttacker()==e:GetHandler() or Duel.GetAttackTarget()==e:GetHandler()) and Duel.GetAttackTarget()~=nil
+end
+function c41382147.atkval(e,c)
+	return e:GetHandler():GetBattleTarget():GetLevel()*200
+end
+function c41382147.rmcon(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return c:IsRelateToBattle() and c==Duel.GetAttacker() and c:IsFaceup()
+end
+function c41382147.rmtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	Duel.SetOperationInfo(0,CATEGORY_REMOVE,e:GetHandler(),1,0,0)
+end
+function c41382147.rmop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsRelateToEffect(e) and c:IsFaceup() and Duel.Remove(c,POS_FACEUP,REASON_EFFECT+REASON_TEMPORARY)==1 then
+		local e1=Effect.CreateEffect(e:GetHandler())
+		e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		e1:SetCode(EVENT_PHASE_START+PHASE_BATTLE)
+		e1:SetReset(RESET_PHASE+PHASE_END+RESET_SELF_TURN,2)
+		e1:SetLabelObject(c)
+		e1:SetCountLimit(1)
+		e1:SetOperation(c41382147.retop)
+		Duel.RegisterEffect(e1,tp)
+	end
+end
+function c41382147.retop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetTurnPlayer()==tp then
+		Duel.ReturnToField(e:GetLabelObject())
+	end
+end

script/c48356796.lua

@@ -0,0 +1,41 @@
+--éW¹â¤Î±¦Ôý
+function c48356796.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCondition(c48356796.accon)
+	c:RegisterEffect(e1)
+	--Effect Draw
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD)
+	e2:SetCode(EFFECT_DRAW_COUNT)
+	e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e2:SetRange(LOCATION_SZONE) 
+	e2:SetTargetRange(1,0)
+	e2:SetValue(2)
+	e2:SetCondition(c48356796.drawcon)
+	c:RegisterEffect(e2)
+	--Effect Disable Field
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_FIELD)
+	e3:SetCode(EFFECT_DISABLE_FIELD)
+	e3:SetRange(LOCATION_SZONE)
+	e3:SetTargetRange(LOCATION_SZONE,0)
+	e3:SetOperation(c48356796.disop)
+	c:RegisterEffect(e3)
+end
+function c48356796.accon(e,tp,eg,ep,ev,re,r,rp)
+	local c=Duel.GetLocationCount(tp,LOCATION_SZONE)
+	if e:GetHandler():IsFacedown() then return c>0 end
+	return c>1		 
+end
+function c48356796.filter(c)
+	return c:IsCode(48356796) and c:IsFaceup()
+end
+function c48356796.drawcon(e)
+	return Duel.IsExistingMatchingCard(c48356796.filter,e:GetHandlerPlayer(),LOCATION_SZONE,0,1,e:GetHandler())
+end
+function c48356796.disop(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.SelectDisableField(tp,1,LOCATION_SZONE,0,0)
+end

script/c76848240.lua

@@ -0,0 +1,39 @@
+--½~Œ²»¿ÉÇÖîIÓò
+function c76848240.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetHintTiming(TIMING_STANDBY_PHASE)
+	e1:SetCondition(c76848240.condition)
+	e1:SetCost(c76848240.cost)
+	e1:SetOperation(c76848240.operation)
+	c:RegisterEffect(e1)
+end
+function c76848240.condition(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetCurrentPhase()==PHASE_STANDBY and Duel.GetTurnPlayer()==tp  
+end
+function c76848240.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+    if chk==0 then return Duel.IsExistingMatchingCard(Card.IsDiscardable,tp,LOCATION_HAND,0,1,e:GetHandler()) end
+	Duel.DiscardHand(tp,Card.IsDiscardable,1,1,REASON_COST+REASON_DISCARD)
+end
+function c76848240.operation(e,tp,eg,ep,ev,re,r,rp)
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetCode(EFFECT_CANNOT_SUMMON)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetTargetRange(0,1)
+	e1:SetReset(RESET_PHASE+PHASE_END,2)
+	e1:SetCondition(c76848240.efcon)
+	e1:SetLabel(Duel.GetTurnCount())
+	Duel.RegisterEffect(e1,tp)
+	local e2=e1:Clone()
+	e2:SetCode(EFFECT_CANNOT_MSET)
+	Duel.RegisterEffect(e2,tp)
+	local e3=e1:Clone()
+	e3:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+	Duel.RegisterEffect(e3,tp)
+end
+function c76848240.efcon(e)
+	return Duel.GetTurnCount()~=e:GetLabel()
+end