Commit 67049e4d authored by TanakaKotoha's avatar TanakaKotoha

polo

parent 785335e5
No preview for this file type
...@@ -8,6 +8,7 @@ function cm.initial_effect(c) ...@@ -8,6 +8,7 @@ function cm.initial_effect(c)
e1:SetDescription(aux.Stringid(m,0)) e1:SetDescription(aux.Stringid(m,0))
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
e1:SetCode(EVENT_SUMMON_SUCCESS) e1:SetCode(EVENT_SUMMON_SUCCESS)
e1:SetCondition(cm.sucon)
e1:SetOperation(cm.sumsuc) e1:SetOperation(cm.sumsuc)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--a d A --a d A
...@@ -15,7 +16,10 @@ function cm.initial_effect(c) ...@@ -15,7 +16,10 @@ function cm.initial_effect(c)
local e3=REIKAI.CHRUCH_KNIGHT_ADV(c,cm.gacon,cm.gatg,{1,m},cm.gaop) local e3=REIKAI.CHRUCH_KNIGHT_ADV(c,cm.gacon,cm.gatg,{1,m},cm.gaop)
end end
function cm.des(c) function cm.des(c)
return not c:IsRace(RACE_WARRIOR) return not (c:IsRace(RACE_WARRIOR) and c:IsFaceup())
end
function cm.sucon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_ADVANCE)
end end
function cm.sumsuc(e,tp,eg,ep,ev,re,r,rp) function cm.sumsuc(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
......
...@@ -93,7 +93,6 @@ function c65010314.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -93,7 +93,6 @@ function c65010314.operation(e,tp,eg,ep,ev,re,r,rp)
else else
c:CancelToGrave(false) c:CancelToGrave(false)
end end
Duel.Hint(HINT_MUSIC,0,aux.Stringid(65010314,0))
end end
function c65010314.defcon(e) function c65010314.defcon(e)
local eq=e:GetHandler():GetEquipTarget() local eq=e:GetHandler():GetEquipTarget()
...@@ -117,7 +116,6 @@ function c65010314.atkop(e,tp,eg,ep,ev,re,r,rp) ...@@ -117,7 +116,6 @@ function c65010314.atkop(e,tp,eg,ep,ev,re,r,rp)
e1:SetValue(bc:GetAttack()/2) e1:SetValue(bc:GetAttack()/2)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
Duel.Hint(HINT_MUSIC,0,aux.Stringid(65010314,1))
end end
function c65010314.descost(e,tp,eg,ep,ev,re,r,rp,chk) function c65010314.descost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler():GetEquipTarget() local c=e:GetHandler():GetEquipTarget()
...@@ -137,5 +135,4 @@ function c65010314.desop(e,tp,eg,ep,ev,re,r,rp) ...@@ -137,5 +135,4 @@ function c65010314.desop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(c65010314.dfilter,tp,0,LOCATION_ONFIELD,nil) local g=Duel.GetMatchingGroup(c65010314.dfilter,tp,0,LOCATION_ONFIELD,nil)
local ct=Duel.Destroy(g,REASON_EFFECT) local ct=Duel.Destroy(g,REASON_EFFECT)
Duel.Damage(1-tp,ct*500,REASON_EFFECT) Duel.Damage(1-tp,ct*500,REASON_EFFECT)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(65010314,1))
end end
\ No newline at end of file
...@@ -135,7 +135,4 @@ function c65010315.desop(e,tp,eg,ep,ev,re,r,rp) ...@@ -135,7 +135,4 @@ function c65010315.desop(e,tp,eg,ep,ev,re,r,rp)
local ct=Duel.Destroy(dg,REASON_EFFECT) local ct=Duel.Destroy(dg,REASON_EFFECT)
Duel.Recover(tp,ct*500,REASON_EFFECT) Duel.Recover(tp,ct*500,REASON_EFFECT)
end end
Duel.Hint(HINT_MUSIC,0,aux.Stringid(65010315,1))
end end
...@@ -103,7 +103,6 @@ function c65010316.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -103,7 +103,6 @@ function c65010316.operation(e,tp,eg,ep,ev,re,r,rp)
else else
c:CancelToGrave(false) c:CancelToGrave(false)
end end
Duel.Hint(HINT_MUSIC,0,aux.Stringid(65010316,0))
end end
function c65010316.discon1(e,tp,eg,ep,ev,re,r,rp) function c65010316.discon1(e,tp,eg,ep,ev,re,r,rp)
local ec=e:GetHandler():GetEquipTarget() local ec=e:GetHandler():GetEquipTarget()
......
...@@ -70,7 +70,6 @@ function c960010.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -70,7 +70,6 @@ function c960010.activate(e,tp,eg,ep,ev,re,r,rp)
e4:SetCode(EFFECT_SET_DEFENSE) e4:SetCode(EFFECT_SET_DEFENSE)
token:RegisterEffect(e4) token:RegisterEffect(e4)
Duel.BreakEffect() Duel.BreakEffect()
Duel.Hint(HINT_MUSIC,0,aux.Stringid(960010,0))
Duel.Recover(tp,500,REASON_EFFECT) Duel.Recover(tp,500,REASON_EFFECT)
end end
end end
......
...@@ -41,15 +41,6 @@ function c960011.initial_effect(c) ...@@ -41,15 +41,6 @@ function c960011.initial_effect(c)
e2:SetTarget(c960011.sptg) e2:SetTarget(c960011.sptg)
e2:SetOperation(c960011.spop) e2:SetOperation(c960011.spop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--spsummon bgm
local e8=Effect.CreateEffect(c)
e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e8:SetCode(EVENT_SPSUMMON_SUCCESS)
e8:SetOperation(c960011.sumsuc)
c:RegisterEffect(e8)
end
function c960011.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(960011,0))
end end
function c960011.matfilter(c) function c960011.matfilter(c)
return (c:IsLinkType(TYPE_NORMAL) and c:IsLinkSetCard(0xbb1)) or c:IsLinkCode(960001) return (c:IsLinkType(TYPE_NORMAL) and c:IsLinkSetCard(0xbb1)) or c:IsLinkCode(960001)
...@@ -81,7 +72,6 @@ function c960011.spop(e,tp,eg,ep,ev,re,r,rp) ...@@ -81,7 +72,6 @@ function c960011.spop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c960011.spfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp) local g=Duel.SelectMatchingCard(tp,c960011.spfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.Hint(HINT_MUSIC,0,aux.Stringid(960011,1))
Duel.SpecialSummon(g,0,tp,tp,true,true,POS_FACEUP) Duel.SpecialSummon(g,0,tp,tp,true,true,POS_FACEUP)
g:GetFirst():CompleteProcedure() g:GetFirst():CompleteProcedure()
end end
......
...@@ -45,15 +45,6 @@ function c960015.initial_effect(c) ...@@ -45,15 +45,6 @@ function c960015.initial_effect(c)
e1:SetOperation(c960015.thop) e1:SetOperation(c960015.thop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
Duel.AddCustomActivityCounter(960015,ACTIVITY_SPSUMMON,c960015.counterfilter) Duel.AddCustomActivityCounter(960015,ACTIVITY_SPSUMMON,c960015.counterfilter)
--spsummon bgm
local e8=Effect.CreateEffect(c)
e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e8:SetCode(EVENT_SPSUMMON_SUCCESS)
e8:SetOperation(c960015.sumsuc)
c:RegisterEffect(e8)
end
function c960015.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(960015,1))
end end
function c960015.lcheck(g) function c960015.lcheck(g)
return g:IsExists(Card.IsLinkSetCard,1,nil,0xbb1) return g:IsExists(Card.IsLinkSetCard,1,nil,0xbb1)
...@@ -105,7 +96,6 @@ end ...@@ -105,7 +96,6 @@ end
function c960015.thop(e,tp,eg,ep,ev,re,r,rp) function c960015.thop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) then if tc:IsRelateToEffect(e) then
Duel.Hint(HINT_MUSIC,0,aux.Stringid(960015,3))
Duel.SendtoHand(tc,nil,REASON_EFFECT) Duel.SendtoHand(tc,nil,REASON_EFFECT)
end end
end end
\ No newline at end of file
...@@ -66,7 +66,6 @@ end ...@@ -66,7 +66,6 @@ end
function c960016.desop(e,tp,eg,ep,ev,re,r,rp) function c960016.desop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetFieldGroup(tp,0,LOCATION_ONFIELD) local g=Duel.GetFieldGroup(tp,0,LOCATION_ONFIELD)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.Hint(HINT_MUSIC,0,aux.Stringid(960016,1))
Duel.Destroy(g,REASON_EFFECT) Duel.Destroy(g,REASON_EFFECT)
end end
end end
......
...@@ -20,15 +20,6 @@ function c960017.initial_effect(c) ...@@ -20,15 +20,6 @@ function c960017.initial_effect(c)
local e7=e6:Clone() local e7=e6:Clone()
e7:SetCode(EFFECT_UPDATE_DEFENSE) e7:SetCode(EFFECT_UPDATE_DEFENSE)
c:RegisterEffect(e7) c:RegisterEffect(e7)
--spsummon bgm
local e8=Effect.CreateEffect(c)
e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e8:SetCode(EVENT_SPSUMMON_SUCCESS)
e8:SetOperation(c960017.sumsuc)
c:RegisterEffect(e8)
end
function c960017.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(960017,0))
end end
function c960017.adval(e,c) function c960017.adval(e,c)
return Duel.GetFieldGroupCount(c:GetControler(),LOCATION_HAND,0)*1000 return Duel.GetFieldGroupCount(c:GetControler(),LOCATION_HAND,0)*1000
......
...@@ -26,15 +26,6 @@ function c960018.initial_effect(c) ...@@ -26,15 +26,6 @@ function c960018.initial_effect(c)
e1:SetTarget(c960018.atktg) e1:SetTarget(c960018.atktg)
e1:SetOperation(c960018.atkop) e1:SetOperation(c960018.atkop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--spsummon bgm
local e8=Effect.CreateEffect(c)
e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e8:SetCode(EVENT_SPSUMMON_SUCCESS)
e8:SetOperation(c960018.sumsuc)
c:RegisterEffect(e8)
end
function c960018.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(960018,0))
end end
function c960018.atkcon(e,tp,eg,ep,ev,re,r,rp) function c960018.atkcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetCurrentPhase()>=PHASE_BATTLE_START and Duel.GetCurrentPhase()<=PHASE_BATTLE return Duel.GetCurrentPhase()>=PHASE_BATTLE_START and Duel.GetCurrentPhase()<=PHASE_BATTLE
......
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