new

gframe/game.cpp

@@ -13,7 +13,7 @@
 #include <dirent.h>
 #endif
 
-const unsigned short PRO_VERSION = 0x1021;
+const unsigned short PRO_VERSION = 0x1022;
 
 namespace ygo {
 

script/c11224934.lua

+--強化空間
+function c11224934.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_ATKCHANGE)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetHintTiming(TIMING_DAMAGE_STEP)
+	e1:SetCondition(c11224934.condition)
+	e1:SetTarget(c11224934.target)
+	e1:SetOperation(c11224934.activate)
+	c:RegisterEffect(e1)
+end
+function c11224934.condition(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetCurrentPhase()~=PHASE_DAMAGE or not Duel.IsDamageCalculated()
+end
+function c11224934.filter(c)
+	return c:IsFaceup() and c:GetOverlayCount()~=0
+end
+function c11224934.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c11224934.filter,tp,LOCATION_MZONE,0,1,nil) end
+end
+function c11224934.activate(e,tp,eg,ep,ev,re,r,rp)
+	local g=Duel.GetMatchingGroup(c11224934.filter,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_UPDATE_ATTACK)
+		e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+RESET_END)
+		e1:SetValue(tc:GetOverlayCount()*300)
+		tc:RegisterEffect(e1)
+		tc=g:GetNext()
+	end
+end

script/c23168060.lua

+--鍵戦士キーマン
+function c23168060.initial_effect(c)
+	--lv change
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(23168060,0))
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetCode(EVENT_SUMMON_SUCCESS)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCountLimit(1)
+	e1:SetCondition(c23168060.condition)
+	e1:SetOperation(c23168060.operation)
+	c:RegisterEffect(e1)
+end
+function c23168060.condition(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():GetLevel()~=3
+end
+function c23168060.operation(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsRelateToEffect(e) and c:IsFaceup() then
+		local e1=Effect.CreateEffect(e:GetHandler())
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_CHANGE_LEVEL)
+		e1:SetValue(3)
+		e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+RESET_END)
+		c:RegisterEffect(e1)
+	end
+end

script/c26046205.lua

+--悪シノビ
+function c26046205.initial_effect(c)
+	--draw
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(26046205,0))
+	e1:SetCategory(CATEGORY_DRAW)
+	e1:SetCode(EVENT_BE_BATTLE_TARGET)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
+	e1:SetCondition(c26046205.condition)
+	e1:SetTarget(c26046205.target)
+	e1:SetOperation(c26046205.operation)
+	c:RegisterEffect(e1)
+end
+function c26046205.condition(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsPosition(POS_FACEUP_ATTACK)
+end
+function c26046205.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
+end
+function c26046205.operation(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Draw(tp,1,REASON_EFFECT)
+end

script/c26211048.lua

@@ -47,7 +47,7 @@ function c26211048.eqop(e,tp,eg,ep,ev,re,r,rp)
 	e1:SetType(EFFECT_TYPE_SINGLE)
 	e1:SetCode(EFFECT_EQUIP_LIMIT)
 	e1:SetReset(RESET_EVENT+0x1fe0000)
-	e1:SetValue(c44505297.eqlimit)
+	e1:SetValue(c26211048.eqlimit)
 	tc:RegisterEffect(e1)
 	if tc:IsFaceup() then
 		local atk=tc:GetTextAttack()/2
@@ -68,6 +68,6 @@ function c26211048.eqop(e,tp,eg,ep,ev,re,r,rp)
 		tc:RegisterEffect(e3)
 	end
 end
-function c44505297.eqlimit(e,c)
+function c26211048.eqlimit(e,c)
 	return e:GetOwner()==c
 end

script/c28378427.lua

+--ダメージ·コンデンサー
+function c28378427.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_BATTLE_DAMAGE)
+	e1:SetCondition(c28378427.condition)
+	e1:SetTarget(c28378427.target)
+	e1:SetOperation(c28378427.activate)
+	c:RegisterEffect(e1)
+end
+function c28378427.condition(e,tp,eg,ep,ev,re,r,rp)
+	return ep==tp
+end
+function c28378427.filter(c,e,tp,dam)
+	return c:IsAttackBelow(dam) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function c28378427.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingMatchingCard(c28378427.filter,tp,LOCATION_DECK,0,1,nil,e,tp,ev) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
+end
+function c28378427.activate(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetLocationCount(tp,LOCATION_MZONE)==0 then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectMatchingCard(tp,c28378427.filter,tp,LOCATION_DECK,0,1,1,nil,e,tp,ev)
+	if g:GetCount()~=0 then
+		Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP_ATTACK)
+	end
+end

script/c37953640.lua

@@ -12,7 +12,7 @@ function c37953640.initial_effect(c)
 end
 c37953640.tuner_filter=aux.FilterBoolFunction(Card.IsRace,RACE_FISH)
 function c37953640.synfilter(c,syncard,f)
-	return c:IsFaceup() and c:IsCanBeSynchroMaterial(syncard) and c:IsRace(RACE_FISH) and (f==nil or f(c))
+	return c:IsFaceup() and c:IsNotTuner() and c:IsCanBeSynchroMaterial(syncard) and c:IsRace(RACE_FISH) and (f==nil or f(c))
 end
 function c37953640.syntg(e,syncard,f,minc)
 	local c=e:GetHandler()
@@ -23,7 +23,8 @@ function c37953640.syntg(e,syncard,f,minc)
 	return res
 end
 function c37953640.synop(e,tp,eg,ep,ev,re,r,rp,syncard,f,minc)
-	local lv=syncard:GetLevel()-e:GetHandler():GetLevel()
+	local c=e:GetHandler()
+	local lv=syncard:GetLevel()-c:GetLevel()
 	local g=Duel.GetMatchingGroup(c37953640.synfilter,syncard:GetControler(),LOCATION_MZONE,LOCATION_MZONE,c,syncard,f)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SMATERIAL)
 	local sg=g:SelectWithSumEqual(tp,Card.GetSynchroLevel,lv,minc,syncard)

script/c50785356.lua

+--ハウリング·ウォリアー
+function c50785356.initial_effect(c)
+	--lv change
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(50785356,0))
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP)
+	e1:SetCode(EVENT_SUMMON_SUCCESS)
+	e1:SetTarget(c50785356.target)
+	e1:SetOperation(c50785356.operation)
+	c:RegisterEffect(e1)
+	local e2=e1:Clone()
+	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
+	c:RegisterEffect(e2)
+end
+function c50785356.filter(c)
+	local lv=c:GetLevel()
+	return c:IsFaceup() and lv>0 and lv~=3
+end
+function c50785356.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c50785356.filter(chkc) end
+	if chk==0 then return Duel.IsExistingTarget(c50785356.filter,tp,LOCATION_MZONE,0,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
+	Duel.SelectTarget(tp,c50785356.filter,tp,LOCATION_MZONE,0,1,1,nil)
+end
+function c50785356.operation(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) and tc:IsFaceup() then
+		local e1=Effect.CreateEffect(e:GetHandler())
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_CHANGE_LEVEL)
+		e1:SetValue(3)
+		e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+RESET_END)
+		tc:RegisterEffect(e1)
+	end
+end

script/c58441120.lua

+--波動共鳴
+function c58441120.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetTarget(c58441120.target)
+	e1:SetOperation(c58441120.activate)
+	c:RegisterEffect(e1)
+end
+function c58441120.filter(c)
+	local lv=c:GetLevel()
+	return c:IsFaceup() and lv>0 and lv~=4
+end
+function c58441120.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_MZONE) and c58441120.filter(chkc) end
+	if chk==0 then return Duel.IsExistingTarget(c58441120.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
+	Duel.SelectTarget(tp,c58441120.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
+end
+function c58441120.activate(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) and tc:IsFaceup() then
+		local e1=Effect.CreateEffect(e:GetHandler())
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_CHANGE_LEVEL)
+		e1:SetValue(4)
+		e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+RESET_END)
+		tc:RegisterEffect(e1)
+	end
+end

script/c58628539.lua

+--エクシーズエフェクト
+function c58628539.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_DESTROY)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetCondition(c58628539.condition)
+	e1:SetTarget(c58628539.target)
+	e1:SetOperation(c58628539.activate)
+	c:RegisterEffect(e1)
+end
+function c58628539.condition(e,tp,eg,ep,ev,re,r,rp)
+	return eg:GetCount()==1 and eg:GetFirst():GetSummonType()==SUMMON_TYPE_XYZ and eg:GetFirst():IsControler(tp)
+end
+function c58628539.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsDestructable() end
+	if chk==0 then return Duel.IsExistingTarget(Card.IsDestructable,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,e:GetHandler()) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
+	local g=Duel.SelectTarget(tp,Card.IsDestructable,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,e:GetHandler())
+	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
+end
+function c58628539.activate(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc and tc:IsRelateToEffect(e) then
+		Duel.Destroy(tc,REASON_EFFECT)
+	end
+end

script/c59563768.lua

+--転身テンシーン
+function c59563768.initial_effect(c)
+	--atk
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_SINGLE)
+	e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCode(EFFECT_UPDATE_ATTACK)
+	e2:SetValue(c59563768.atkval)
+	c:RegisterEffect(e2)
+end
+function c59563768.filter(c)
+	return c:IsFaceup() and c:GetLevel()==2
+end
+function c59563768.atkval(e,c)
+	return Duel.GetMatchingGroupCount(c59563768.filter,e:GetHandlerPlayer(),LOCATION_MZONE,0,nil)*400
+end

script/c73632127.lua

---抹殺の聖刻印
+--ディメンション・スライド
 function c73632127.initial_effect(c)
 	--Activate
 	local e1=Effect.CreateEffect(c)

script/c79852326.lua

+--死霊ゾーマ
+function c79852326.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetTarget(c79852326.target)
+	e1:SetOperation(c79852326.activate)
+	c:RegisterEffect(e1)
+end
+function c79852326.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and 
+		Duel.IsPlayerCanSpecialSummonMonster(tp,79852326,0,0x21,1800,500,4,RACE_ZOMBIE,ATTRIBUTE_DARK) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
+end
+function c79852326.activate(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if not c:IsRelateToEffect(e) then return end
+	if Duel.GetLocationCount(tp,LOCATION_MZONE)==0
+		or not Duel.IsPlayerCanSpecialSummonMonster(tp,79852326,0,0x21,1800,500,4,RACE_ZOMBIE,ATTRIBUTE_DARK) then return end
+	c:AddTrapMonsterAttribute(true,ATTRIBUTE_DARK,RACE_ZOMBIE,4,1800,500)
+	Duel.SpecialSummon(c,0,tp,tp,true,false,POS_FACEUP_DEFENCE)
+	c:TrapMonsterBlock()
+	--damage
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(79852326,0))
+	e1:SetCategory(CATEGORY_DAMAGE)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
+	e1:SetCode(EVENT_LEAVE_FIELD)
+	e1:SetCondition(c79852326.damcon)
+	e1:SetTarget(c79852326.damtg)
+	e1:SetOperation(c79852326.damop)
+	e1:SetReset(RESET_EVENT+0x17e0000)
+	c:RegisterEffect(e1)
+end
+function c79852326.damcon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsReason(REASON_BATTLE)
+end
+function c79852326.damtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	local bc=e:GetHandler():GetBattleTarget()
+	local dam=bc:GetAttack()
+	if dam<0 then dam=0 end
+	Duel.SetTargetPlayer(1-tp)
+	Duel.SetTargetParam(dam)
+	Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,dam)
+end
+function c79852326.damop(e,tp,eg,ep,ev,re,r,rp)
+	local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
+	Duel.Damage(p,d,REASON_EFFECT)
+end

script/c83011278.lua

+--キラー·トマト
+function c83011278.initial_effect(c)
+	--special summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(83011278,0))
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetCode(EVENT_BATTLE_DESTROYED)
+	e1:SetCondition(c83011278.condition)
+	e1:SetTarget(c83011278.target)
+	e1:SetOperation(c83011278.operation)
+	c:RegisterEffect(e1)
+end
+function c83011278.condition(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsLocation(LOCATION_GRAVE) and e:GetHandler():IsReason(REASON_BATTLE)
+end
+function c83011278.filter(c,e,tp)
+	return c:IsAttackBelow(1500) and c:IsAttribute(ATTRIBUTE_DARK) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function c83011278.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingMatchingCard(c83011278.filter,tp,LOCATION_DECK,0,1,nil,e,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
+end
+function c83011278.operation(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetLocationCount(tp,LOCATION_MZONE)==0 then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectMatchingCard(tp,c83011278.filter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
+	if g:GetCount()>0 then
+		Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP_ATTACK)
+	end
+end

script/c83555667.lua

+--破壊輪
+function c83555667.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_DESTROY+CATEGORY_DAMAGE)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetHintTiming(0,0x1e1)
+	e1:SetTarget(c83555667.target)
+	e1:SetOperation(c83555667.activate)
+	c:RegisterEffect(e1)
+end
+function c83555667.filter(c)
+	return c:IsDestructable()
+end
+function c83555667.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_MZONE) and c83555667.filter(chkc) end
+	if chk==0 then return Duel.IsExistingTarget(c83555667.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
+	local g=Duel.SelectTarget(tp,c83555667.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
+	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
+	Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,PLAYER_ALL,0)
+end
+function c83555667.activate(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) then
+		local atk=tc:GetAttack()
+		if Duel.Destroy(tc,REASON_EFFECT)>0 then
+			Duel.Damage(1-tp,atk,REASON_EFFECT)
+			Duel.Damage(tp,atk,REASON_EFFECT)
+		end
+	end
+end

script/c85839825.lua

+--エクシーズエナジー
+function c85839825.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_DESTROY)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCost(c85839825.cost)
+	e1:SetTarget(c85839825.target)
+	e1:SetOperation(c85839825.activate)
+	c:RegisterEffect(e1)
+end
+function c85839825.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.CheckRemoveOverlayCard(tp,1,0,1,REASON_COST) end
+	Duel.RemoveOverlayCard(tp,1,0,1,1,REASON_COST)
+end
+function c85839825.filter(c)
+	return c:IsFaceup() and c:IsDestructable()
+end
+function c85839825.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and c85839825.filter(chkc) end
+	if chk==0 then return Duel.IsExistingTarget(c85839825.filter,tp,0,LOCATION_MZONE,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
+	local g=Duel.SelectTarget(tp,c85839825.filter,tp,0,LOCATION_MZONE,1,1,nil)
+	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
+end
+function c85839825.activate(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc:IsFaceup() and tc:IsRelateToEffect(e) then
+		Duel.Destroy(tc,REASON_EFFECT)
+	end
+end

script/c86174055.lua

+--スピッド·バード
+function c86174055.initial_effect(c)
+	--special summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(86174055,0))
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetCode(EVENT_BATTLE_DESTROYED)
+	e1:SetCondition(c86174055.condition)
+	e1:SetTarget(c86174055.target)
+	e1:SetOperation(c86174055.operation)
+	c:RegisterEffect(e1)
+end
+function c86174055.condition(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsLocation(LOCATION_GRAVE) and e:GetHandler():IsReason(REASON_BATTLE)
+end
+function c86174055.filter(c,e,tp)
+	return c:GetLevel()==2 and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function c86174055.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c86174055.filter(chkc,e,tp) end
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>1
+		and Duel.IsExistingTarget(c86174055.filter,tp,LOCATION_GRAVE,0,2,nil,e,tp) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectTarget(tp,c86174055.filter,tp,LOCATION_GRAVE,0,2,2,nil,e,tp)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,g:GetCount(),0,0)
+end
+function c86174055.operation(e,tp,eg,ep,ev,re,r,rp)
+	local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToEffect,nil,e)
+	local ct=Duel.GetLocationCount(tp,LOCATION_MZONE)
+	if g:GetCount()<=ct then
+		local tc=g:GetFirst()
+		while tc do
+			Duel.SpecialSummonStep(tc,0,tp,tp,false,false,POS_FACEUP)
+			local e1=Effect.CreateEffect(e:GetHandler())
+			e1:SetType(EFFECT_TYPE_SINGLE)
+			e1:SetCode(EFFECT_DISABLE)
+			e1:SetReset(RESET_EVENT+0x1fe0000)
+			tc:RegisterEffect(e1,true)
+			local e2=Effect.CreateEffect(e:GetHandler())
+			e2:SetType(EFFECT_TYPE_SINGLE)
+			e2:SetCode(EFFECT_DISABLE_EFFECT)
+			e2:SetReset(RESET_EVENT+0x1fe0000)
+			tc:RegisterEffect(e2,true)
+			tc=g:GetNext()
+		end
+		Duel.SpecialSummonComplete()
+	end
+end

script/c87106146.lua

+--ダメージ·ゲート
+function c87106146.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_BATTLE_DAMAGE)
+	e1:SetCondition(c87106146.condition)
+	e1:SetTarget(c87106146.target)
+	e1:SetOperation(c87106146.activate)
+	c:RegisterEffect(e1)
+end
+function c87106146.condition(e,tp,eg,ep,ev,re,r,rp)
+	return ep==tp
+end
+function c87106146.filter(c,e,tp,dam)
+	return c:IsAttackBelow(dam) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function c87106146.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c87106146.filter(chkc,e,tp,ev) end
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingTarget(c87106146.filter,tp,LOCATION_GRAVE,0,1,nil,e,tp,ev) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectTarget(tp,c87106146.filter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp,ev)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
+end
+function c87106146.activate(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) then
+		Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
+	end
+end

script/c88120966.lua

@@ -11,11 +11,15 @@ function c88120966.initial_effect(c)
 	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
 	e1:SetCountLimit(2)
 	e1:SetRange(LOCATION_MZONE)
+	e1:SetCondition(c88120966.condition)
 	e1:SetCost(c88120966.cost)
 	e1:SetTarget(c88120966.target)
 	e1:SetOperation(c88120966.operation)
 	c:RegisterEffect(e1)
 end
+function c88120966.condition(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetCurrentPhase()==PHASE_MAIN1
+end
 function c88120966.cost(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
 	e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)

script/c89529919.lua

+--戦士ラーズ
+function c89529919.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(89529919,0))
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
+	e1:SetCode(EVENT_SUMMON_SUCCESS)
+	e1:SetOperation(c89529919.operation)
+	c:RegisterEffect(e1)
+	local e2=e1:Clone()
+	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
+	c:RegisterEffect(e2)
+end
+function c89529919.filter(c)
+	return c:IsLevelBelow(4) and c:IsRace(RACE_WARRIOR) and c:GetCode()~=89529919
+end
+function c89529919.operation(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(89529919,1))
+	local g=Duel.SelectMatchingCard(tp,c89529919.filter,tp,LOCATION_DECK,0,1,1,nil)
+	local tc=g:GetFirst()
+	if tc then
+		Duel.ShuffleDeck(tp)
+		Duel.MoveSequence(tc,0)
+		Duel.ConfirmDecktop(tp,1)
+	end
+end

script/c93369354.lua

@@ -44,7 +44,7 @@ function c93369354.spop(e,tp,eg,ep,ev,re,r,rp)
 end
 c93369354.tuner_filter=aux.FilterBoolFunction(Card.IsAttribute,ATTRIBUTE_WATER)
 function c93369354.synfilter(c,syncard,f)
-	return c:IsFaceup() and c:IsCanBeSynchroMaterial(syncard) and c:IsAttribute(ATTRIBUTE_WATER) and (f==nil or f(c))
+	return c:IsFaceup() and c:IsNotTuner() and c:IsCanBeSynchroMaterial(syncard) and c:IsAttribute(ATTRIBUTE_WATER) and (f==nil or f(c))
 end
 function c93369354.syntg(e,syncard,f,minc)
 	local c=e:GetHandler()
@@ -54,7 +54,8 @@ function c93369354.syntg(e,syncard,f,minc)
 	return g:CheckWithSumEqual(Card.GetSynchroLevel,lv,minc,syncard)
 end
 function c93369354.synop(e,tp,eg,ep,ev,re,r,rp,syncard,f,minc)
-	local lv=syncard:GetLevel()-e:GetHandler():GetLevel()
+	local c=e:GetHandler()
+	local lv=syncard:GetLevel()-c:GetLevel()
 	local g=Duel.GetMatchingGroup(c93369354.synfilter,syncard:GetControler(),LOCATION_MZONE,LOCATION_MZONE,c,syncard,f)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SMATERIAL)
 	local sg=g:SelectWithSumEqual(tp,Card.GetSynchroLevel,lv,minc,syncard)

script/c97896503.lua

+--ズババナイト
+function c97896503.initial_effect(c)
+	--destroy
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(97896503,0))
+	e1:SetCategory(CATEGORY_DESTROY)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
+	e1:SetCode(EVENT_BATTLE_START)
+	e1:SetTarget(c97896503.tg)
+	e1:SetOperation(c97896503.op)
+	c:RegisterEffect(e1)
+end
+function c97896503.tg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local d=Duel.GetAttackTarget()
+	if chk ==0 then	return Duel.GetAttacker()==e:GetHandler()
+		and d~=nil and d:IsPosition(POS_FACEUP_DEFENCE) and d:IsDestructable() end
+	Duel.SetOperationInfo(0,CATEGORY_DESTROY,d,1,0,0)
+end
+function c97896503.op(e,tp,eg,ep,ev,re,r,rp)
+	local d=Duel.GetAttackTarget()
+	if d~=nil and d:IsRelateToBattle() and d:IsDefence() then
+		Duel.Destroy(d,REASON_EFFECT)
+	end
+end

system.conf

@@ -3,7 +3,7 @@
 antialias = 2
 nickname = Player
 gamename = Game
-lastdeck = test
+lastdeck = Burn1
 textfont = c:/windows/fonts/simsun.ttc
 numfont = c:/windows/fonts/arialbd.ttf
 serverport = 7911