Commit 561ad5c1 authored by 聖園ミカ's avatar 聖園ミカ 🐟

vme50

parent 3d40613b
local m=30900400
local cm=_G["c"..m]
cm.name="盖塔战机·大熊号"
cm.name="盖塔战机·飞鹰号"
function cm.initial_effect(c)
--special summon
local e1=Effect.CreateEffect(c)
......@@ -32,7 +32,7 @@ function cm.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return not e:GetHandler():IsPublic() end
end
function cm.spfilter(c)
return c:IsSetCard(0xc82) and c:IsFaceup() and c:IsAbleToHand() and not c:IsCode(m)
return c:IsSetCard(0xc83) and c:IsFaceup() and c:IsAbleToHand() and not c:IsCode(m)
end
function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_MZONE) and cm.spfilter(chkc) end
......@@ -56,7 +56,7 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
end
end
function cm.tgfilter(c)
return c:IsSetCard(0xc82) and c:IsType(TYPE_MONSTER) and not c:IsCode(m) and c:IsAbleToHand()
return c:IsSetCard(0xc83) and c:IsType(TYPE_MONSTER) and not c:IsCode(m) and c:IsAbleToHand()
end
function cm.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.tgfilter,tp,LOCATION_DECK,0,1,nil) end
......
......@@ -32,7 +32,7 @@ function cm.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return not e:GetHandler():IsPublic() end
end
function cm.spfilter(c)
return c:IsSetCard(0xc82) and c:IsFaceup() and c:IsAbleToHand() and not c:IsCode(m)
return c:IsSetCard(0xc83) and c:IsFaceup() and c:IsAbleToHand() and not c:IsCode(m)
end
function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_MZONE) and cm.spfilter(chkc) end
......@@ -56,7 +56,7 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
end
end
function cm.tgfilter(c)
return c:IsSetCard(0xc82) and c:IsType(TYPE_MONSTER) and not c:IsCode(m) and c:IsAbleToGrave()
return c:IsSetCard(0xc83) and c:IsType(TYPE_MONSTER) and not c:IsCode(m) and c:IsAbleToGrave()
end
function cm.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.tgfilter,tp,LOCATION_DECK,0,1,nil) end
......
......@@ -27,7 +27,7 @@ function cm.initial_effect(c)
c:RegisterEffect(e3)
end
function cm.thfilter(c,tp)
return c:IsFaceup() and c:IsSetCard(0xc82) and not c:IsCode(m) and c:IsAbleToHand() and Duel.GetMZoneCount(tp,c)
return c:IsFaceup() and c:IsSetCard(0xc83) and not c:IsCode(m) and c:IsAbleToHand() and Duel.GetMZoneCount(tp,c)
end
function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and cm.thfilter(chkc,tp) end
......@@ -46,7 +46,7 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
end
end
function cm.tgfilter(c)
return c:IsSetCard(0xc82) and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToHand()
return c:IsSetCard(0xc83) and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToHand()
end
function cm.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.tgfilter,tp,LOCATION_DECK,0,1,nil) end
......
......@@ -36,7 +36,7 @@ function s.initial_effect(c)
end
function s.ffilter(c,fc,sub,mg,sg)
return c:IsFusionSetCard(0xc82) and c:IsType(TYPE_MONSTER) and (not sg or not sg:IsExists(Card.IsFusionCode,1,c,c:GetFusionCode()))
return c:IsFusionSetCard(0xc83) and c:IsType(TYPE_MONSTER) and (not sg or not sg:IsExists(Card.IsFusionCode,1,c,c:GetFusionCode()))
end
function s.splimit(e,se,sp,st)
return not e:GetHandler():IsLocation(LOCATION_EXTRA) or aux.fuslimit(e,se,sp,st)
......@@ -45,7 +45,7 @@ function s.thcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonLocation(LOCATION_EXTRA)
end
function s.thfilter(c)
return c:IsSetCard(0xc82) and c:IsAbleToHand()
return c:IsSetCard(0xc83) and c:IsAbleToHand()
end
function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(s.thfilter,tp,LOCATION_DECK,0,1,nil) end
......
......@@ -35,7 +35,7 @@ function s.initial_effect(c)
c:RegisterEffect(e3)
end
function s.ffilter(c,fc,sub,mg,sg)
return c:IsFusionSetCard(0xc82) and (not sg or not sg:IsExists(Card.IsFusionCode,1,c,c:GetFusionCode()))
return c:IsFusionSetCard(0xc83) and (not sg or not sg:IsExists(Card.IsFusionCode,1,c,c:GetFusionCode()))
end
function s.splimit(e,se,sp,st)
return not e:GetHandler():IsLocation(LOCATION_EXTRA) or aux.fuslimit(e,se,sp,st)
......@@ -71,7 +71,7 @@ function s.sptg2(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return false end
local g=Duel.GetMatchingGroup(s.spfilter,tp,LOCATION_REMOVED,0,nil,e,tp)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>2
and not Duel.IsPlayerAffectedByEffect(tp,59822133)
and not Duel.IsPlayerAffectedByEffect(tp,59832133)
and g:CheckSubGroupEach(s.spchecks) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:SelectSubGroupEach(tp,s.spchecks)
......@@ -81,7 +81,7 @@ end
function s.spop2(e,tp,eg,ep,ev,re,r,rp)
local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToEffect,nil,e)
if g:GetCount()==0 or g:GetCount()>1 and Duel.IsPlayerAffectedByEffect(tp,59822133) then return end
if g:GetCount()==0 or g:GetCount()>1 and Duel.IsPlayerAffectedByEffect(tp,59832133) then return end
if g:GetCount()<=ft then
Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
else
......
......@@ -32,7 +32,7 @@ function s.initial_effect(c)
c:RegisterEffect(e2)
end
function s.ffilter(c,fc,sub,mg,sg)
return c:IsFusionSetCard(0xc82) and c:IsType(TYPE_MONSTER) and (not sg or not sg:IsExists(Card.IsFusionCode,1,c,c:GetFusionCode()))
return c:IsFusionSetCard(0xc83) and c:IsType(TYPE_MONSTER) and (not sg or not sg:IsExists(Card.IsFusionCode,1,c,c:GetFusionCode()))
end
function s.splimit(e,se,sp,st)
return not e:GetHandler():IsLocation(LOCATION_EXTRA) or aux.fuslimit(e,se,sp,st)
......@@ -57,7 +57,7 @@ function s.desop(e,tp,eg,ep,ev,re,r,rp)
end
end
function s.indtg(e,c)
return c:IsFaceup() and c:IsType(TYPE_FUSION) and c:IsSetCard(0xc82)
return c:IsFaceup() and c:IsType(TYPE_FUSION) and c:IsSetCard(0xc83)
end
function s.indct(e,re,r,rp)
if bit.band(r,REASON_EFFECT)~=0 then
......
......@@ -12,7 +12,7 @@ function c30900406.initial_effect(c)
c:RegisterEffect(e1)
end
function c30900406.filter(c,e,tp)
return c:IsFaceup() and c:IsSetCard(0xc82) and c:IsLevel(4) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
return c:IsFaceup() and c:IsSetCard(0xc83) and c:IsLevel(4) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function c30900406.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_REMOVED) and chkc:IsControler(tp) and c30900406.filter(chkc,e,tp) end
......@@ -20,7 +20,7 @@ function c30900406.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
and Duel.IsExistingTarget(c30900406.filter,tp,LOCATION_REMOVED,0,1,nil,e,tp) end
local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
if ft>3 then ft=3 end
if Duel.IsPlayerAffectedByEffect(tp,59822133) then ft=1 end
if Duel.IsPlayerAffectedByEffect(tp,59832133) then ft=1 end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectTarget(tp,c30900406.filter,tp,LOCATION_REMOVED,0,1,ft,nil,e,tp)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,g:GetCount(),0,0)
......@@ -28,7 +28,7 @@ end
function c30900406.operation(e,tp,eg,ep,ev,re,r,rp)
local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToEffect,nil,e)
if g:GetCount()==0 or (g:GetCount()>1 and Duel.IsPlayerAffectedByEffect(tp,59822133)) then return end
if g:GetCount()==0 or (g:GetCount()>1 and Duel.IsPlayerAffectedByEffect(tp,59832133)) then return end
if g:GetCount()<=ft then
Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
else
......@@ -50,5 +50,5 @@ function c30900406.operation(e,tp,eg,ep,ev,re,r,rp)
end
end
function c30900406.splimit(e,c)
return not c:IsSetCard(0xc82)
return not c:IsSetCard(0xc83)
end
\ No newline at end of file
......@@ -23,7 +23,7 @@ function c30900407.initial_effect(c)
c:RegisterEffect(e2)
end
function c30900407.thfilter(c,tp,check)
return c:IsType(TYPE_MONSTER) and c:IsSetCard(0xc82) and c:IsAbleToHand()
return c:IsType(TYPE_MONSTER) and c:IsSetCard(0xc83) and c:IsAbleToHand()
and (check or Duel.IsExistingMatchingCard(c30900407.thfilter2,tp,LOCATION_DECK,0,1,c,c:GetCode(),c:GetOriginalLevel()))
end
function c30900407.thfilter2(c,code,lv)
......
......@@ -27,7 +27,7 @@ function cm.counterfilter(c)
return c:IsRace(RACE_MACHINE) and c:IsAttribute(ATTRIBUTE_DARK)
end
function cm.cfilter(c)
return c:IsFaceup() and c:IsSetCard(0xc82) and c:IsType(TYPE_FUSION)
return c:IsFaceup() and c:IsSetCard(0xc83) and c:IsType(TYPE_FUSION)
end
function cm.condition(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_MZONE,0,1,nil)
......@@ -39,7 +39,7 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
end
end
function cm.thfilter(c)
return c:IsType(TYPE_MONSTER) and c:IsSetCard(0xc82) and c:IsAbleToHand()
return c:IsType(TYPE_MONSTER) and c:IsSetCard(0xc83) and c:IsAbleToHand()
end
function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and cm.thfilter(chkc) end
......
......@@ -64,7 +64,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
e2:SetCost(cm.discost)
e2:SetTarget(cm.distg)
e2:SetOperation(cm.disop)
c:RegisterEffect(e2)
c:RegisterEffect(e2,true)
c:RegisterFlagEffect(0,RESET_EVENT+0x1fe0000,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,0))
end
function cm.discon(e,tp,eg,ep,ev,re,r,rp)
......
......@@ -46,7 +46,7 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
local g=Duel.SelectMatchingCard(tp,cm.pcfilter,tp,LOCATION_DECK+LOCATION_EXTRA,0,1,1,nil)
if g:GetCount()>0 then
Duel.MoveToField(g:GetFirst(),tp,tp,LOCATION_SZONE,POS_FACEUP,true)
Duel.MoveToField(g:GetFirst(),tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end
local hg=Duel.GetMatchingGroup(Card.IsSynchroSummonable,tp,LOCATION_EXTRA,0,nil,nil)
if hg:GetCount()>0 then
......
......@@ -30,7 +30,7 @@ end
function s.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local ck1=Duel.IsExistingMatchingCard(Card.IsAbleToGrave,tp,0,LOCATION_SZONE,1,nil)
local ck2=Duel.IsExistingMatchingCard(s.mf,tp,0,LOCATION_MZONE,1,nil)
if chk==0 then return (ck1 and Duel.IsExistingMatchingCard(s.df1,tp,LOCATION_HAND,0,1,e:GetHandler())) or (ck2 and (Duel.IsExistingMatchingCard(s.df2,tp,LOCATION_HAND,0,1,e:GetHandler()) or Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_FZONE,0,1,e:GetHandler(),64800236)) end
if chk==0 then return (ck1 and Duel.IsExistingMatchingCard(s.df1,tp,LOCATION_HAND,0,1,e:GetHandler())) or (ck2 and (Duel.IsExistingMatchingCard(s.df2,tp,LOCATION_HAND,0,1,e:GetHandler()) or Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_FZONE,0,1,e:GetHandler(),64800236))) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISCARD)
local sg=Duel.GetMatchingGroup(s.df3,tp,LOCATION_HAND,0,nil,ck1,ck2)
local fg=Duel.GetMatchingGroup(Card.IsCode,tp,LOCATION_FZONE,0,nil,64800236)
......
......@@ -67,10 +67,11 @@ function cm.tg0(e,c)
end
function cm.thfil(c,tp)
return c:IsCode(m-1) and c:GetActivateEffect():IsActivatable(tp,true,true)
return c:IsCode(m-1) --and c:GetActivateEffect():IsActivatable(tp,true,true)
end
function cm.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.SelectMatchingCard(tp,cm.thfil,tp,LOCATION_DECK,0,1,1,nil,tp)
local g=Duel.GetMatchingGroup(cm.thfil,tp,LOCATION_DECK,0,1,1,nil,tp)
Debug.Message(#g)
if chk==0 then return #g>0 end
end
function cm.drop(e,tp,eg,ep,ev,re,r,rp)
......
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