Commit fc52a612 authored by VanillaSalt's avatar VanillaSalt

fix

parent 20455cd0
......@@ -32,12 +32,15 @@ function c1149109.target(e,tp,eg,ep,ev,re,r,rp,chk)
e1:SetCode(EVENT_PHASE+PHASE_STANDBY)
e1:SetCountLimit(1)
e1:SetRange(LOCATION_SZONE)
e1:SetCondition(c1149109.descon)
e1:SetOperation(c1149109.desop)
e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_STANDBY+RESET_SELF_TURN,2)
c:RegisterEffect(e1)
end
function c1149109.descon(e,tp,eg,ep,ev,re,r,rp)
return tp==Duel.GetTurnPlayer()
end
function c1149109.desop(e,tp,eg,ep,ev,re,r,rp)
if tp~=Duel.GetTurnPlayer() then return end
local c=e:GetHandler()
local ct=c:GetTurnCounter()
ct=ct+1
......
......@@ -43,13 +43,15 @@ function c11954712.rmop(e,tp,eg,ep,ev,re,r,rp)
e1:SetCode(EVENT_PHASE+PHASE_STANDBY)
e1:SetCountLimit(1)
e1:SetLabelObject(c)
e1:SetCondition(c11954712.retcon)
e1:SetOperation(c11954712.retop)
e1:SetReset(RESET_PHASE+PHASE_STANDBY+RESET_SELF_TURN)
Duel.RegisterEffect(e1,tp)
end
end
function c11954712.retcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c11954712.retop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()==tp then
Duel.ReturnToField(e:GetLabelObject())
end
Duel.ReturnToField(e:GetLabelObject())
end
......@@ -29,15 +29,18 @@ function c11961740.activate(e,tp,eg,ep,ev,re,r,rp)
e1:SetCode(EVENT_PHASE+PHASE_STANDBY)
e1:SetCountLimit(1)
e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_STANDBY+RESET_SELF_TURN,2)
e1:SetOperation(c11961740.tohand)
e1:SetCondition(c11961740.thcon)
e1:SetOperation(c11961740.thop)
e1:SetLabel(0)
e1:SetLabelObject(tc)
c:RegisterEffect(e1)
end
end
end
function c11961740.tohand(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()~=tp then return end
function c11961740.thcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c11961740.thop(e,tp,eg,ep,ev,re,r,rp)
local ct=e:GetLabel()
e:GetHandler():SetTurnCounter(ct+1)
if ct==1 then
......
......@@ -31,6 +31,7 @@ function c12923641.target(e,tp,eg,ep,ev,re,r,rp,chk)
e2:SetCode(EVENT_PHASE+PHASE_STANDBY)
e2:SetCountLimit(1)
e2:SetRange(LOCATION_SZONE)
e2:SetCondition(c12923641.descon)
e2:SetOperation(c12923641.desop)
e2:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_STANDBY+RESET_SELF_TURN,2)
c:RegisterEffect(e2)
......@@ -42,8 +43,10 @@ function c12923641.activate(e,tp,eg,ep,ev,re,r,rp)
Duel.ChangePosition(g,POS_FACEDOWN_DEFENCE)
end
end
function c12923641.descon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c12923641.desop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()~=tp then return end
local c=e:GetHandler()
local ct=c:GetTurnCounter()
ct=ct+1
......
......@@ -23,6 +23,7 @@ function c14258627.initial_effect(c)
e3:SetCode(EVENT_PHASE+PHASE_STANDBY)
e3:SetRange(LOCATION_MZONE)
e3:SetCountLimit(1)
e3:SetCondition(c14258627.mtcon)
e3:SetOperation(c14258627.mtop)
c:RegisterEffect(e3)
end
......@@ -59,8 +60,10 @@ function c14258627.addown(e,tp,eg,ep,ev,re,r,rp)
e2:SetValue(tc:GetDefence()/2)
tc:RegisterEffect(e2)
end
function c14258627.mtcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c14258627.mtop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()~=tp then return end
if Duel.IsExistingMatchingCard(c14258627.filter,tp,LOCATION_GRAVE,0,1,nil)
and Duel.SelectYesNo(tp,aux.Stringid(14258627,0)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
......
......@@ -17,7 +17,7 @@ function c16308000.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c16308000.filter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c16308000.filter,tp,LOCATION_MZONE,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
local g=Duel.SelectTarget(tp,c16308000.filter,tp,LOCATION_MZONE,0,1,1,nil)
Duel.SelectTarget(tp,c16308000.filter,tp,LOCATION_MZONE,0,1,1,nil)
end
function c16308000.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
......@@ -39,6 +39,7 @@ function c16308000.operation(e,tp,eg,ep,ev,re,r,rp)
e2:SetCountLimit(1)
e2:SetLabel(2)
e2:SetLabelObject(tc)
e2:SetCondition(c16308000.tgcon)
e2:SetOperation(c16308000.tgop)
e2:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_STANDBY+RESET_SELF_TURN,2)
c:RegisterEffect(e2)
......@@ -47,8 +48,10 @@ end
function c16308000.rcon(e)
return e:GetOwner():IsHasCardTarget(e:GetHandler())
end
function c16308000.tgcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c16308000.tgop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()~=tp then return end
local ct=e:GetLabel()
ct=ct-1
e:SetLabel(ct)
......
......@@ -35,6 +35,7 @@ function c17874674.initial_effect(c)
e4:SetRange(LOCATION_SZONE)
e4:SetCode(EVENT_PHASE+PHASE_STANDBY)
e4:SetCountLimit(1)
e4:SetCondition(c17874674.costcon)
e4:SetOperation(c17874674.costop)
c:RegisterEffect(e4)
end
......@@ -92,8 +93,10 @@ function c17874674.ctarget(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetHandler():GetFirstCardTarget()
if tc then e:GetHandler():CancelCardTarget(tc) end
end
function c17874674.costcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c17874674.costop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()~=tp then return end
if Duel.CheckLPCost(tp,500) and Duel.SelectYesNo(tp,aux.Stringid(17874674,1)) then
Duel.PayLPCost(tp,500)
else
......
......@@ -26,6 +26,7 @@ function c21598948.initial_effect(c)
e3:SetCode(EVENT_PHASE+PHASE_STANDBY)
e3:SetRange(LOCATION_SZONE)
e3:SetCountLimit(1)
e3:SetCondition(c21598948.mtcon)
e3:SetOperation(c21598948.mtop)
c:RegisterEffect(e3)
end
......@@ -63,8 +64,10 @@ function c21598948.atkop(e,tp,eg,ep,ev,re,r,rp)
a:RegisterEffect(e1)
end
end
function c21598948.mtcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c21598948.mtop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()~=tp then return end
if Duel.GetLP(tp)>500 and Duel.SelectYesNo(tp,aux.Stringid(21598948,1)) then
Duel.PayLPCost(tp,500)
else
......
......@@ -34,6 +34,7 @@ function c22318971.operation(e,tp,eg,ep,ev,re,r,rp)
e1:SetCode(EVENT_PHASE+PHASE_STANDBY)
e1:SetReset(RESET_PHASE+PHASE_STANDBY+RESET_SELF_TURN)
e1:SetCountLimit(1)
e1:SetCondition(c22318971.retcon)
e1:SetOperation(c22318971.retop)
Duel.RegisterEffect(e1,tp)
local ac=Duel.GetFirstTarget()
......@@ -46,8 +47,9 @@ function c22318971.operation(e,tp,eg,ep,ev,re,r,rp)
end
end
end
function c22318971.retcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c22318971.retop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()==tp then
Duel.ReturnToField(e:GetOwner())
end
Duel.ReturnToField(e:GetOwner())
end
......@@ -38,6 +38,7 @@ function c22359980.initial_effect(c)
e4:SetCode(EVENT_PHASE+PHASE_STANDBY)
e4:SetRange(LOCATION_SZONE)
e4:SetCountLimit(1)
e4:SetCondition(c22359980.mtcon)
e4:SetOperation(c22359980.mtop)
c:RegisterEffect(e4)
end
......@@ -63,8 +64,10 @@ end
function c22359980.atkval(e,c)
return c:GetAttack()/2
end
function c22359980.mtcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c22359980.mtop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()~=tp then return end
if Duel.GetLP(tp)>2000 and Duel.SelectYesNo(tp,aux.Stringid(22359980,0)) then
Duel.PayLPCost(tp,2000)
else
......
......@@ -39,12 +39,15 @@ function c24874630.activate(e,tp,eg,ep,ev,re,r,rp)
e3:SetRange(LOCATION_MZONE)
e3:SetCode(EVENT_PHASE+PHASE_STANDBY)
e3:SetCountLimit(1)
e3:SetOperation(c24874630.rtcost)
e3:SetCondition(c24874630.descon)
e3:SetOperation(c24874630.desop)
e3:SetReset(RESET_EVENT+0x1fe0000)
token:RegisterEffect(e3,true)
end
function c24874630.rtcost(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()~=tp then return end
function c24874630.descon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c24874630.desop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLP(tp)>1000 and Duel.SelectYesNo(tp,aux.Stringid(24874630,0)) then
Duel.PayLPCost(tp,1000)
else
......
......@@ -22,6 +22,7 @@ function c296499.initial_effect(c)
e3:SetCode(EVENT_PHASE+PHASE_STANDBY)
e3:SetRange(LOCATION_SZONE)
e3:SetCountLimit(1)
e3:SetCondition(c296499.mtcon)
e3:SetOperation(c296499.mtop)
c:RegisterEffect(e3)
end
......@@ -35,8 +36,10 @@ end
function c296499.atktarget(e,c)
return c:GetRace()==e:GetLabelObject():GetLabel()
end
function c296499.mtcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c296499.mtop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()~=tp then return end
if Duel.CheckReleaseGroup(tp,Card.IsReleasable,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(296499,0)) then
local g=Duel.SelectReleaseGroup(tp,Card.IsReleasable,1,1,nil)
Duel.Release(g,REASON_COST)
......
......@@ -38,12 +38,15 @@ function c29765339.operation(e,tp,eg,ep,ev,re,r,rp)
e1:SetCode(EVENT_PHASE+PHASE_STANDBY)
e1:SetCountLimit(1)
e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_STANDBY+RESET_SELF_TURN,2)
e1:SetOperation(c29765339.tohand)
e1:SetCondition(c29765339.thcon)
e1:SetOperation(c29765339.thop)
e1:SetLabel(0)
tg:RegisterEffect(e1)
end
function c29765339.tohand(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()~=tp then return end
function c29765339.thcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c29765339.thop(e,tp,eg,ep,ev,re,r,rp)
local ct=e:GetLabel()
if ct==1 then
Duel.SendtoHand(e:GetHandler(),nil,REASON_EFFECT)
......
......@@ -27,12 +27,15 @@ function c31476755.target(e,tp,eg,ep,ev,re,r,rp,chk)
e1:SetCode(EVENT_PHASE+PHASE_STANDBY)
e1:SetCountLimit(1)
e1:SetRange(LOCATION_SZONE)
e1:SetCondition(c31476755.descon)
e1:SetOperation(c31476755.desop)
e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_STANDBY+RESET_SELF_TURN,2)
c:RegisterEffect(e1)
end
function c31476755.descon(e,tp,eg,ep,ev,re,r,rp)
return tp==Duel.GetTurnPlayer()
end
function c31476755.desop(e,tp,eg,ep,ev,re,r,rp)
if tp~=Duel.GetTurnPlayer() then return end
local c=e:GetHandler()
local ct=c:GetTurnCounter()
ct=ct+1
......
......@@ -73,12 +73,15 @@ function c31801517.spop(e,tp,eg,ep,ev,re,r,rp)
e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_STANDBY+RESET_SELF_TURN,2)
end
e1:SetCountLimit(1)
e1:SetCondition(c31801517.spcon2)
e1:SetOperation(c31801517.spop2)
c:RegisterEffect(e1)
c:SetTurnCounter(0)
end
function c31801517.spcon2(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c31801517.spop2(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()~=tp then return end
local c=e:GetHandler()
local ct=c:GetTurnCounter()
ct=ct+1
......
......@@ -7,6 +7,7 @@ function c35798491.initial_effect(c)
e1:SetCode(EVENT_PHASE+PHASE_STANDBY)
e1:SetRange(LOCATION_MZONE)
e1:SetCountLimit(1)
e1:SetCondition(c35798491.mtcon)
e1:SetOperation(c35798491.mtop)
c:RegisterEffect(e1)
--disable and destroy
......@@ -17,8 +18,10 @@ function c35798491.initial_effect(c)
e2:SetOperation(c35798491.disop)
c:RegisterEffect(e2)
end
function c35798491.mtcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c35798491.mtop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()~=tp then return end
if Duel.CheckLPCost(tp,500) then
Duel.PayLPCost(tp,500)
else
......
......@@ -16,6 +16,7 @@ function c35975813.initial_effect(c)
e3:SetCode(EVENT_PHASE+PHASE_STANDBY)
e3:SetRange(LOCATION_MZONE)
e3:SetCountLimit(1)
e3:SetCondition(c35975813.mtcon)
e3:SetOperation(c35975813.mtop)
c:RegisterEffect(e3)
--disable and destroy
......@@ -39,8 +40,10 @@ end
function c35975813.excon(e)
return not Duel.IsExistingMatchingCard(c35975813.exfilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil)
end
function c35975813.mtcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c35975813.mtop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()~=tp then return end
if Duel.CheckLPCost(tp,800) then
Duel.PayLPCost(tp,800)
else
......
......@@ -22,14 +22,17 @@ function c36995273.initial_effect(c)
e3:SetRange(LOCATION_SZONE)
e3:SetCode(EVENT_PHASE+PHASE_STANDBY)
e3:SetCountLimit(1)
e3:SetCondition(c36995273.costcon)
e3:SetOperation(c36995273.costop)
c:RegisterEffect(e3)
end
function c36995273.rmtg(e,c)
return c:IsLocation(LOCATION_MZONE) or bit.band(c:GetOriginalType(),TYPE_MONSTER)~=0
end
function c36995273.costcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c36995273.costop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()~=tp then return end
if Duel.GetLP(tp)>=500 then
Duel.PayLPCost(tp,500)
else
......
......@@ -20,14 +20,17 @@ function c44656491.initial_effect(c)
e3:SetCode(EVENT_PHASE+PHASE_STANDBY)
e3:SetRange(LOCATION_SZONE)
e3:SetCountLimit(1)
e3:SetCondition(c44656491.mtcon)
e3:SetOperation(c44656491.mtop)
c:RegisterEffect(e3)
end
function c44656491.atktarget(e,c)
return c:GetAttack()>=1500
end
function c44656491.mtcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c44656491.mtop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()~=tp then return end
if Duel.GetLP(tp)>100 and Duel.SelectYesNo(tp,aux.Stringid(44656491,0)) then
Duel.PayLPCost(tp,100)
else
......
......@@ -47,13 +47,15 @@ function c47295267.retop(e,tp,eg,ep,ev,re,r,rp)
e2:SetCode(EVENT_PHASE+PHASE_STANDBY)
e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1)
e2:SetCondition(c47295267.descon)
e2:SetOperation(c47295267.desop)
e2:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_STANDBY+RESET_SELF_TURN)
tc:RegisterEffect(e2)
end
end
function c47295267.descon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp and e:GetHandler():IsRace(RACE_MACHINE)
end
function c47295267.desop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()==tp and e:GetHandler():IsRace(RACE_MACHINE) then
Duel.Destroy(e:GetHandler(),REASON_EFFECT)
end
Duel.Destroy(e:GetHandler(),REASON_EFFECT)
end
......@@ -45,13 +45,15 @@ function c47349310.rmop(e,tp,eg,ep,ev,re,r,rp)
e1:SetCode(EVENT_PHASE+PHASE_STANDBY)
e1:SetCountLimit(1)
e1:SetLabelObject(c)
e1:SetCondition(c47349310.retcon)
e1:SetOperation(c47349310.retop)
e1:SetReset(RESET_PHASE+PHASE_STANDBY+RESET_SELF_TURN)
Duel.RegisterEffect(e1,tp)
end
end
function c47349310.retcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c47349310.retop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()==tp then
Duel.ReturnToField(e:GetLabelObject())
end
Duel.ReturnToField(e:GetLabelObject())
end
......@@ -24,6 +24,7 @@ function c51670553.initial_effect(c)
e3:SetCode(EVENT_PHASE+PHASE_STANDBY)
e3:SetCountLimit(1)
e3:SetRange(LOCATION_SZONE)
e3:SetCondition(c51670553.descon)
e3:SetOperation(c51670553.desop)
c:RegisterEffect(e3)
end
......@@ -65,8 +66,10 @@ function c51670553.skipdp(e)
local tc=e:GetHandler():GetFirstCardTarget()
return tc and c51670553.filter(tc)
end
function c51670553.descon(e,tp,eg,ep,ev,re,r,rp)
return tp==Duel.GetTurnPlayer()
end
function c51670553.desop(e,tp,eg,ep,ev,re,r,rp)
if tp~=Duel.GetTurnPlayer() then return end
local c=e:GetHandler()
local ct=c:GetTurnCounter()
ct=ct+1
......
......@@ -7,6 +7,7 @@ function c52248570.initial_effect(c)
e1:SetCode(EVENT_PHASE+PHASE_STANDBY)
e1:SetRange(LOCATION_MZONE)
e1:SetCountLimit(1)
e1:SetCondition(c52248570.mtcon)
e1:SetOperation(c52248570.mtop)
c:RegisterEffect(e1)
--atkup
......@@ -22,8 +23,10 @@ function c52248570.initial_effect(c)
e2:SetOperation(c52248570.atkop)
c:RegisterEffect(e2)
end
function c52248570.mtcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c52248570.mtop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()~=tp then return end
if Duel.CheckLPCost(tp,1000) then
Duel.PayLPCost(tp,1000)
else
......
......@@ -29,12 +29,15 @@ function c5237827.rmop(e,tp,eg,ep,ev,re,r,rp)
e1:SetRange(LOCATION_REMOVED)
e1:SetCode(EVENT_PHASE+PHASE_STANDBY)
e1:SetCountLimit(1)
e1:SetCondition(c5237827.thcon)
e1:SetOperation(c5237827.thop)
e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_STANDBY+RESET_SELF_TURN)
tc:RegisterEffect(e1)
end
end
function c5237827.thcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c5237827.thop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()~=tp then return end
Duel.SendtoHand(e:GetHandler(),nil,REASON_EFFECT)
end
......@@ -13,7 +13,7 @@ function c60627999.initial_effect(c)
e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e2:SetRange(LOCATION_SZONE)
e2:SetCode(EFFECT_SELF_DESTROY)
e2:SetCondition(c60627999.descon)
e2:SetCondition(c60627999.sdescon)
c:RegisterEffect(e2)
--disable spsummon
local e3=Effect.CreateEffect(c)
......@@ -36,12 +36,15 @@ function c60627999.target(e,tp,eg,ep,ev,re,r,rp,chk)
e1:SetCode(EVENT_PHASE+PHASE_STANDBY)
e1:SetCountLimit(1)
e1:SetRange(LOCATION_SZONE)
e1:SetCondition(c60627999.descon)
e1:SetOperation(c60627999.desop)
e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_STANDBY+RESET_SELF_TURN,2)
c:RegisterEffect(e1)
end
function c60627999.descon(e,tp,eg,ep,ev,re,r,rp)
return tp==Duel.GetTurnPlayer()
end
function c60627999.desop(e,tp,eg,ep,ev,re,r,rp)
if tp~=Duel.GetTurnPlayer() then return end
local c=e:GetHandler()
local ct=c:GetTurnCounter()
ct=ct+1
......@@ -50,7 +53,7 @@ function c60627999.desop(e,tp,eg,ep,ev,re,r,rp)
Duel.Destroy(c,REASON_EFFECT)
end
end
function c60627999.descon(e)
function c60627999.sdescon(e)
return Duel.IsExistingMatchingCard(Card.IsType,e:GetHandlerPlayer(),LOCATION_ONFIELD,0,1,e:GetHandler(),TYPE_SPELL+TYPE_TRAP)
end
function c60627999.acttg(e,c)
......
......@@ -7,6 +7,7 @@ function c61370518.initial_effect(c)
e1:SetCode(EVENT_PHASE+PHASE_STANDBY)
e1:SetRange(LOCATION_MZONE)
e1:SetCountLimit(1)
e1:SetCondition(c61370518.mtcon)
e1:SetOperation(c61370518.mtop)
c:RegisterEffect(e1)
--disable and destroy
......@@ -17,8 +18,10 @@ function c61370518.initial_effect(c)
e2:SetOperation(c61370518.disop)
c:RegisterEffect(e2)
end
function c61370518.mtcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c61370518.mtop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()~=tp then return end
if Duel.CheckLPCost(tp,500) then
Duel.PayLPCost(tp,500)
else
......
......@@ -27,6 +27,7 @@ function c61740673.initial_effect(c)
e4:SetCode(EVENT_PHASE+PHASE_STANDBY)
e4:SetRange(LOCATION_SZONE)
e4:SetCountLimit(1)
e4:SetCondition(c61740673.mtcon)
e4:SetOperation(c61740673.mtop)
c:RegisterEffect(e4)
end
......@@ -39,8 +40,10 @@ function c61740673.disoperation(e,tp,eg,ep,ev,re,r,rp)
Duel.NegateEffect(ev)
end
end
function c61740673.mtcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c61740673.mtop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()~=tp then return end
if Duel.GetLP(tp)>700 and Duel.SelectYesNo(tp,aux.Stringid(61740673,0)) then
Duel.PayLPCost(tp,700)
else
......
......@@ -7,11 +7,14 @@ function c65475294.initial_effect(c)
e1:SetCode(EVENT_PHASE+PHASE_STANDBY)
e1:SetCountLimit(1)
e1:SetRange(LOCATION_MZONE)
e1:SetCondition(c65475294.costcon)
e1:SetOperation(c65475294.costop)
c:RegisterEffect(e1)
end
function c65475294.costcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c65475294.costop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()~=tp then return end
local c=e:GetHandler()
if Duel.CheckReleaseGroup(tp,nil,1,c) and Duel.SelectYesNo(tp,aux.Stringid(65475294,0)) then
local g=Duel.SelectReleaseGroup(tp,nil,1,1,c)
......
......@@ -7,6 +7,7 @@ function c72192100.initial_effect(c)
e1:SetCode(EVENT_PHASE+PHASE_STANDBY)
e1:SetRange(LOCATION_MZONE)
e1:SetCountLimit(1)
e1:SetCondition(c72192100.mtcon)
e1:SetOperation(c72192100.mtop)
c:RegisterEffect(e1)
--disable and destroy
......@@ -29,8 +30,10 @@ function c72192100.initial_effect(c)
e3:SetOperation(c72192100.spop)
c:RegisterEffect(e3)
end
function c72192100.mtcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c72192100.mtop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()~=tp then return end
if Duel.CheckLPCost(tp,500) then
Duel.PayLPCost(tp,500)
else
......
......@@ -7,6 +7,7 @@ function c73219648.initial_effect(c)
e1:SetCode(EVENT_PHASE+PHASE_STANDBY)
e1:SetRange(LOCATION_MZONE)
e1:SetCountLimit(1)
e1:SetCondition(c73219648.mtcon)
e1:SetOperation(c73219648.mtop)
c:RegisterEffect(e1)
--disable and destroy
......@@ -25,8 +26,10 @@ function c73219648.initial_effect(c)
e3:SetValue(c73219648.atktg)
c:RegisterEffect(e3)
end
function c73219648.mtcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c73219648.mtop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()~=tp then return end
if Duel.CheckLPCost(tp,500) then
Duel.PayLPCost(tp,500)
else
......
......@@ -62,7 +62,8 @@ function c77565204.activate(e,tp,eg,ep,ev,re,r,rp)
e1:SetCountLimit(1)
e1:SetReset(RESET_EVENT+0x1ff0000+RESET_PHASE+PHASE_STANDBY+RESET_SELF_TURN,2)
e1:SetRange(LOCATION_SZONE)
e1:SetOperation(c77565204.proc)
e1:SetCondition(c77565204.proccon)
e1:SetOperation(c77565204.procop)
e1:SetLabel(code)
e1:SetLabelObject(e)
c:RegisterEffect(e1)
......@@ -71,8 +72,10 @@ end
function c77565204.procfilter(c,code,e,tp)
return c:IsCode(code) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false)
end
function c77565204.proc(e,tp,eg,ep,ev,re,r,rp)
if tp~=Duel.GetTurnPlayer() then return end
function c77565204.proccon(e,tp,eg,ep,ev,re,r,rp)
return tp==Duel.GetTurnPlayer()
end
function c77565204.procop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local ct=c:GetTurnCounter()
ct=ct+1
......
......@@ -36,6 +36,7 @@ function c79569173.target(e,tp,eg,ep,ev,re,r,rp,chk)
e1:SetCode(EVENT_PHASE+PHASE_STANDBY)
e1:SetCountLimit(1)
e1:SetRange(LOCATION_SZONE)
e1:SetCondition(c79569173.descon)
e1:SetOperation(c79569173.desop)
e1:SetReset(RESET_EVENT+0x1fe0000)
c:RegisterEffect(e1)
......@@ -54,8 +55,10 @@ function c79569173.activate(e,tp,eg,ep,ev,re,r,rp)
e1:SetReset(RESET_EVENT+0x1fe0000)
e:GetHandler():RegisterEffect(e1)
end
function c79569173.descon(e,tp,eg,ep,ev,re,r,rp)
return tp==Duel.GetTurnPlayer()
end
function c79569173.desop(e,tp,eg,ep,ev,re,r,rp)
if tp~=Duel.GetTurnPlayer() then return end
local c=e:GetHandler()
local ct=c:GetTurnCounter()
ct=ct+1
......
......@@ -32,13 +32,15 @@ function c79796561.operation(e,tp,eg,ep,ev,re,r,rp)
e1:SetReset(RESET_PHASE+PHASE_STANDBY+RESET_SELF_TURN)
e1:SetLabelObject(tc)
e1:SetCountLimit(1)
e1:SetCondition(c79796561.retcon)
e1:SetOperation(c79796561.retop)
Duel.RegisterEffect(e1,tp)
Duel.Damage(1-tp,600,REASON_EFFECT)
end
end
function c79796561.retcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c79796561.retop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()==tp then
Duel.ReturnToField(e:GetLabelObject())
end
Duel.ReturnToField(e:GetLabelObject())
end
......@@ -51,6 +51,7 @@ function c79850798.initial_effect(c)
e8:SetCode(EVENT_PHASE+PHASE_STANDBY)
e8:SetRange(LOCATION_MZONE)
e8:SetCountLimit(1)
e8:SetCondition(c79850798.mtcon)
e8:SetOperation(c79850798.mtop)
c:RegisterEffect(e8)
end
......@@ -73,8 +74,10 @@ end
function c79850798.sumlimit(e,c,sump,sumtype,sumpos,targetp)
return bit.band(sumpos,POS_FACEDOWN)~=0
end
function c79850798.mtcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c79850798.mtop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()~=tp then return end
if Duel.GetFieldGroupCount(tp,LOCATION_HAND,0)~=0 and Duel.SelectYesNo(tp,aux.Stringid(79850798,1)) then
Duel.SendtoGrave(Duel.GetFieldGroup(tp,LOCATION_HAND,0),REASON_COST)
else
......
......@@ -34,6 +34,7 @@ function c82432018.initial_effect(c)
e5:SetCode(EVENT_PHASE+PHASE_STANDBY)
e5:SetRange(LOCATION_SZONE)
e5:SetCountLimit(1)
e5:SetCondition(c82432018.mtcon)
e5:SetOperation(c82432018.mtop)
c:RegisterEffect(e5)
end
......@@ -50,8 +51,10 @@ function c82432018.operation(e,tp,eg,ep,ev,re,r,rp)
Duel.Equip(tp,e:GetHandler(),tc)
end
end
function c82432018.mtcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c82432018.mtop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()~=tp then return end
if Duel.GetLP(tp)>1000 and Duel.SelectYesNo(tp,aux.Stringid(82432018,0)) then
Duel.PayLPCost(tp,1000)
else
......
......@@ -43,13 +43,15 @@ function c84747429.desop(e,tp,eg,ep,ev,re,r,rp)
e1:SetCode(EVENT_PHASE+PHASE_STANDBY)
e1:SetCountLimit(1)
e1:SetLabelObject(c)
e1:SetCondition(c84747429.retcon)
e1:SetOperation(c84747429.retop)
e1:SetReset(RESET_PHASE+PHASE_STANDBY+RESET_SELF_TURN)
Duel.RegisterEffect(e1,tp)
end
end
function c84747429.retcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c84747429.retop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()==tp then
Duel.ReturnToField(e:GetLabelObject())
end
Duel.ReturnToField(e:GetLabelObject())
end
......@@ -15,14 +15,17 @@ function c85060248.initial_effect(c)
e3:SetCode(EVENT_PHASE+PHASE_STANDBY)
e3:SetRange(LOCATION_MZONE)
e3:SetCountLimit(1)
e3:SetCondition(c85060248.mtcon)
e3:SetOperation(c85060248.mtop)
c:RegisterEffect(e3)
end
function c85060248.atktarget(e,c)
return not c:IsRace(RACE_PSYCHO) and c:IsAttackBelow(2000)
end
function c85060248.mtcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c85060248.mtop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()~=tp then return end
if Duel.GetLP(tp)>500 and Duel.SelectYesNo(tp,aux.Stringid(85060248,0)) then
Duel.PayLPCost(tp,500)
else
......
......@@ -7,6 +7,7 @@ function c8581705.initial_effect(c)
e1:SetCode(EVENT_PHASE+PHASE_STANDBY)
e1:SetRange(LOCATION_MZONE)
e1:SetCountLimit(1)
e1:SetCondition(c8581705.mtcon)
e1:SetOperation(c8581705.mtop)
c:RegisterEffect(e1)
--disable and destroy
......@@ -28,8 +29,10 @@ function c8581705.initial_effect(c)
e3:SetOperation(c8581705.atkop)
c:RegisterEffect(e3)
end
function c8581705.mtcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c8581705.mtop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()~=tp then return end
if Duel.CheckLPCost(tp,500) then
Duel.PayLPCost(tp,500)
else
......
......@@ -23,6 +23,7 @@ function c92394653.initial_effect(c)
e3:SetCode(EVENT_PHASE+PHASE_STANDBY)
e3:SetRange(LOCATION_SZONE)
e3:SetCountLimit(1)
e3:SetCondition(c92394653.mtcon)
e3:SetOperation(c92394653.mtop)
c:RegisterEffect(e3)
end
......@@ -47,8 +48,10 @@ function c92394653.operation(e,tp,eg,ep,ev,re,r,rp)
Duel.SendtoHand(tc,nil,REASON_EFFECT)
end
end
function c92394653.mtcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c92394653.mtop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()~=tp then return end
if Duel.GetLP(tp)>500 and Duel.SelectYesNo(tp,aux.Stringid(92394653,1)) then
Duel.PayLPCost(tp,500)
else
......
......@@ -27,6 +27,7 @@ function c94804055.initial_effect(c)
e3:SetCode(EVENT_PHASE+PHASE_STANDBY)
e3:SetRange(LOCATION_SZONE)
e3:SetCountLimit(1)
e3:SetCondition(c94804055.mtcon)
e3:SetOperation(c94804055.mtop)
c:RegisterEffect(e3)
end
......@@ -74,8 +75,10 @@ function c94804055.target2(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chk==0 then return tg:IsOnField() and tg:IsCanBeEffectTarget(e) end
Duel.SetTargetCard(tg)
end
function c94804055.mtcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c94804055.mtop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()~=tp then return end
if Duel.GetLP(tp)>500 and Duel.SelectYesNo(tp,aux.Stringid(94804055,2)) then
Duel.PayLPCost(tp,500)
else
......
......@@ -7,6 +7,7 @@ function c9603356.initial_effect(c)
e1:SetCode(EVENT_PHASE+PHASE_STANDBY)
e1:SetRange(LOCATION_MZONE)
e1:SetCountLimit(1)
e1:SetCondition(c9603356.mtcon)
e1:SetOperation(c9603356.mtop)
c:RegisterEffect(e1)
--disable and destroy
......@@ -25,8 +26,10 @@ function c9603356.initial_effect(c)
e3:SetOperation(c9603356.rdop)
c:RegisterEffect(e3)
end
function c9603356.mtcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c9603356.mtop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()~=tp then return end
if Duel.CheckLPCost(tp,900) then
Duel.PayLPCost(tp,900)
else
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment