Commit e8559c06 authored by mercury233's avatar mercury233

fix

parent f93c7308
...@@ -26,9 +26,7 @@ function c101008002.initial_effect(c) ...@@ -26,9 +26,7 @@ function c101008002.initial_effect(c)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
function c101008002.spcon(e,tp,eg,ep,ev,re,r,rp) function c101008002.spcon(e,tp,eg,ep,ev,re,r,rp)
local f1=Duel.GetFieldCard(0,LOCATION_SZONE,5) return Duel.IsExistingMatchingCard(Card.IsFaceup,tp,LOCATION_FZONE,LOCATION_FZONE,1,nil)
local f2=Duel.GetFieldCard(1,LOCATION_SZONE,5)
return (f1~=nil and f1:IsFaceup()) or (f2~=nil and f2:IsFaceup())
end end
function c101008002.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function c101008002.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
......
...@@ -56,7 +56,7 @@ end ...@@ -56,7 +56,7 @@ end
function c101008003.thcon(e,tp,eg,ep,ev,re,r,rp) function c101008003.thcon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local rc=c:GetReasonCard() local rc=c:GetReasonCard()
return c:IsLocation(LOCATION_GRAVE) and r==REASON_LINK and rc:IsRace(RACE_CYBERSE) and rc:GetLink()>=2 return c:IsLocation(LOCATION_GRAVE) and r==REASON_LINK and rc:IsRace(RACE_CYBERSE) and rc:IsLinkAbove(2)
end end
function c101008003.thfilter(c) function c101008003.thfilter(c)
return c:GetType()==TYPE_SPELL and c:IsSetCard(0x119) and c:IsAbleToHand() return c:GetType()==TYPE_SPELL and c:IsSetCard(0x119) and c:IsAbleToHand()
......
...@@ -5,7 +5,7 @@ function c101008004.initial_effect(c) ...@@ -5,7 +5,7 @@ function c101008004.initial_effect(c)
--special summon --special summon
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(101008004,0)) e1:SetDescription(aux.Stringid(101008004,0))
e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_DESTROYED) e1:SetCode(EVENT_DESTROYED)
e1:SetRange(LOCATION_HAND) e1:SetRange(LOCATION_HAND)
...@@ -32,7 +32,7 @@ function c101008004.spop(e,tp,eg,ep,ev,re,r,rp) ...@@ -32,7 +32,7 @@ function c101008004.spop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0
and e:GetLabel()>=2 and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and e:GetLabel()>=2 and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsPlayerCanSpecialSummonMonster(tp,101008104,0,0x4011,0,0,1,RACE_DRAGON,ATTRIBUTE_DARK,POS_FACEUP) and Duel.IsPlayerCanSpecialSummonMonster(tp,101008104,0,0x4011,0,0,1,RACE_DRAGON,ATTRIBUTE_DARK)
and Duel.SelectYesNo(tp,aux.Stringid(101008004,1)) then and Duel.SelectYesNo(tp,aux.Stringid(101008004,1)) then
Duel.BreakEffect() Duel.BreakEffect()
local token=Duel.CreateToken(tp,101008104) local token=Duel.CreateToken(tp,101008104)
......
...@@ -71,7 +71,7 @@ end ...@@ -71,7 +71,7 @@ end
function c101008010.spop(e,tp,eg,ep,ev,re,r,rp,chk) function c101008010.spop(e,tp,eg,ep,ev,re,r,rp,chk)
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and Duel.SpecialSummonStep(tc,0,tp,tp,false,false,POS_FACEUP) then if tc:IsRelateToEffect(e) and Duel.SpecialSummonStep(tc,0,tp,tp,false,false,POS_FACEUP) then
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(101008010,2)) Duel.Hint(HINT_SELECTMSG,tp,HINGMSG_NUMBER)
local lv=Duel.AnnounceNumber(tp,1,2,3,4) local lv=Duel.AnnounceNumber(tp,1,2,3,4)
local e1=Effect.CreateEffect(e:GetHandler()) local e1=Effect.CreateEffect(e:GetHandler())
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
......
--TG ハルバード・キャノン/バスター --TG ハルバード・キャノンバスター
-- --
--Script by Djeeta --Script by Djeeta
function c101008012.initial_effect(c) function c101008012.initial_effect(c)
......
...@@ -16,9 +16,9 @@ function c101008014.initial_effect(c) ...@@ -16,9 +16,9 @@ function c101008014.initial_effect(c)
e1:SetTarget(c101008014.rmtg) e1:SetTarget(c101008014.rmtg)
e1:SetOperation(c101008014.rmop) e1:SetOperation(c101008014.rmop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--tohand --tograve
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(101008014,0)) e2:SetDescription(aux.Stringid(101008014,1))
e2:SetCategory(CATEGORY_TOGRAVE) e2:SetCategory(CATEGORY_TOGRAVE)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e2:SetProperty(EFFECT_FLAG_DELAY) e2:SetProperty(EFFECT_FLAG_DELAY)
......
...@@ -4,6 +4,7 @@ ...@@ -4,6 +4,7 @@
function c101008018.initial_effect(c) function c101008018.initial_effect(c)
--special summon --special summon
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(101008018,0))
e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_IGNITION) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_HAND) e1:SetRange(LOCATION_HAND)
......
...@@ -18,7 +18,7 @@ function c101008021.initial_effect(c) ...@@ -18,7 +18,7 @@ function c101008021.initial_effect(c)
e2:SetDescription(aux.Stringid(101008021,1)) e2:SetDescription(aux.Stringid(101008021,1))
e2:SetCategory(CATEGORY_REMOVE) e2:SetCategory(CATEGORY_REMOVE)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP) e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetCode(EVENT_SPSUMMON_SUCCESS) e2:SetCode(EVENT_SPSUMMON_SUCCESS)
e2:SetCountLimit(1,101008021+100) e2:SetCountLimit(1,101008021+100)
e2:SetTarget(c101008021.rmtg) e2:SetTarget(c101008021.rmtg)
......
--ダイナレスラー・キメラ・レッスル --ダイナレスラー・キメラ・Tレッスル
-- --
--Script by mercury233 --Script by mercury233
function c101008030.initial_effect(c) function c101008030.initial_effect(c)
...@@ -29,6 +29,7 @@ function c101008030.initial_effect(c) ...@@ -29,6 +29,7 @@ function c101008030.initial_effect(c)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--atkup --atkup
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetCategory(CATEGORY_ATKCHANGE)
e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F) e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
e4:SetCode(EVENT_BATTLE_DESTROYING) e4:SetCode(EVENT_BATTLE_DESTROYING)
e4:SetCondition(c101008030.atkcon) e4:SetCondition(c101008030.atkcon)
......
...@@ -39,22 +39,20 @@ function c101008031.initial_effect(c) ...@@ -39,22 +39,20 @@ function c101008031.initial_effect(c)
end end
c101008031.material_setcode=0xc008 c101008031.material_setcode=0xc008
function c101008031.target(e,tp,eg,ep,ev,re,r,rp,chk) function c101008031.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>=5 or Duel.GetFieldGroupCount(1-tp,LOCATION_DECK,0)>=5 end
end
function c101008031.operation(e,tp,eg,ep,ev,re,r,rp)
local b1=Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>=5 local b1=Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>=5
local b2=Duel.GetFieldGroupCount(1-tp,LOCATION_DECK,0)>=5 local b2=Duel.GetFieldGroupCount(1-tp,LOCATION_DECK,0)>=5
if chk==0 then return b1 or b2 end local op=nil
if b1 and b2 then if b1 and b2 then
e:SetLabel(Duel.SelectOption(tp,aux.Stringid(101008031,0),aux.Stringid(101008031,1))) op=Duel.SelectOption(tp,aux.Stringid(101008031,0),aux.Stringid(101008031,1))
elseif b1 then elseif b1 then
Duel.SelectOption(tp,aux.Stringid(101008031,0)) op=Duel.SelectOption(tp,aux.Stringid(101008031,0))
e:SetLabel(0)
else else
Duel.SelectOption(tp,aux.Stringid(101008031,1)) op=Duel.SelectOption(tp,aux.Stringid(101008031,1))+1
e:SetLabel(1)
end end
end local p=op==0 and tp or 1-tp
function c101008031.operation(e,tp,eg,ep,ev,re,r,rp)
local p=e:GetLabel()==0 and tp or 1-tp
if Duel.GetFieldGroupCount(p,LOCATION_DECK,0)<5 then return end
Duel.SortDecktop(tp,p,5) Duel.SortDecktop(tp,p,5)
end end
function c101008031.drtg(e,tp,eg,ep,ev,re,r,rp,chk) function c101008031.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
......
...@@ -30,7 +30,7 @@ function c101008032.initial_effect(c) ...@@ -30,7 +30,7 @@ function c101008032.initial_effect(c)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--attack --attack
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetDescription(aux.Stringid(101008032,1)) e4:SetDescription(aux.Stringid(101008032,0))
e4:SetCategory(CATEGORY_DESTROY+CATEGORY_DAMAGE) e4:SetCategory(CATEGORY_DESTROY+CATEGORY_DAMAGE)
e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e4:SetCode(EVENT_ATTACK_ANNOUNCE) e4:SetCode(EVENT_ATTACK_ANNOUNCE)
...@@ -84,7 +84,7 @@ function c101008032.atkcon(e,tp,eg,ep,ev,re,r,rp) ...@@ -84,7 +84,7 @@ function c101008032.atkcon(e,tp,eg,ep,ev,re,r,rp)
return tc and tc:IsFaceup() and tc:IsControler(1-tp) and tc:IsType(TYPE_LINK) return tc and tc:IsFaceup() and tc:IsControler(1-tp) and tc:IsType(TYPE_LINK)
end end
function c101008032.cfilter(c,lk) function c101008032.cfilter(c,lk)
return c:IsType(TYPE_LINK) and c:GetLink()==lk and c:IsAbleToRemoveAsCost() return c:IsType(TYPE_LINK) and c:IsLink(lk) and c:IsAbleToRemoveAsCost()
end end
function c101008032.atkcost(e,tp,eg,ep,ev,re,r,rp,chk) function c101008032.atkcost(e,tp,eg,ep,ev,re,r,rp,chk)
local tc=e:GetLabelObject() local tc=e:GetLabelObject()
......
...@@ -52,13 +52,13 @@ function c101008036.get_zone(c,seq) ...@@ -52,13 +52,13 @@ function c101008036.get_zone(c,seq)
return zone return zone
end end
function c101008036.spfilter(c,e,tp,seq) function c101008036.spfilter(c,e,tp,seq)
if not (c:IsType(TYPE_LINK) and c:IsRace(RACE_CYBERSE) and c:GetLink()==4) then return false end if not (c:IsType(TYPE_LINK) and c:IsRace(RACE_CYBERSE) and c:IsLink(4)) then return false end
local zone=c101008036.get_zone(c,seq) local zone=c101008036.get_zone(c,seq)
return zone~=0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,tp,zone) return zone~=0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,tp,zone)
end end
function c101008036.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c101008036.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
local seq=e:GetHandler():GetSequence() local seq=e:GetHandler():GetSequence()
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c101008036.filter(chkc,e,tp,seq) end if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c101008036.spfilter(chkc,e,tp,seq) end
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingTarget(c101008036.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp,seq) end and Duel.IsExistingTarget(c101008036.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp,seq) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
......
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