Commit 2dedee68 authored by 聖園ミカ's avatar 聖園ミカ 🐟

byd

parent 0f9305e3
...@@ -111,7 +111,7 @@ function s.leavecon(e,tp,eg,ep,ev,re,r,rp) ...@@ -111,7 +111,7 @@ function s.leavecon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(s.lfcheck,1,nil,tp) and Duel.IsExistingMatchingCard(Card.IsAbleToRemove,tp,0,LOCATION_HAND+LOCATION_ONFIELD,1,nil,tp,POS_FACEDOWN,REASON_EFFECT) and e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) return eg:IsExists(s.lfcheck,1,nil,tp) and Duel.IsExistingMatchingCard(Card.IsAbleToRemove,tp,0,LOCATION_HAND+LOCATION_ONFIELD,1,nil,tp,POS_FACEDOWN,REASON_EFFECT) and e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST)
end end
function s.leaveop(e,tp,eg,ep,ev,re,r,rp) function s.leaveop(e,tp,eg,ep,ev,re,r,rp)
local count=eg:FilterCount(s.lfcheck,1,nil,tp) local count=eg:FilterCount(s.lfcheck,nil,tp)
if e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) and Duel.SelectYesNo(tp,aux.Stringid(id,3)) then if e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) and Duel.SelectYesNo(tp,aux.Stringid(id,3)) then
e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST) e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
local g1=Duel.GetMatchingGroup(nil,tp,0,LOCATION_HAND,nil) local g1=Duel.GetMatchingGroup(nil,tp,0,LOCATION_HAND,nil)
......
...@@ -22,7 +22,7 @@ function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) ...@@ -22,7 +22,7 @@ function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and s.filter1(c,tp) end if chkc then return chkc:IsLocation(LOCATION_GRAVE) and s.filter1(c,tp) end
if chk==0 then return Duel.IsExistingTarget(s.filter1,tp,LOCATION_GRAVE,0,1,nil,tp) and Duel.IsExistingMatchingCard(s.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp) end if chk==0 then return Duel.IsExistingTarget(s.filter1,tp,LOCATION_GRAVE,0,1,nil,tp) and Duel.IsExistingMatchingCard(s.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
local sg=Duel.SelectTarget(tp,s.filter1,tp,LOCATION_GRAVE,0,1,1,nil,tp) local sg=Duel.SelectTarget(tp,s.filter1,tp,LOCATION_GRAVE,0,1,99,nil,tp)
Duel.SetTargetCard(sg) Duel.SetTargetCard(sg)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,sg,#sg,0,0) Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,sg,#sg,0,0)
......
...@@ -18,9 +18,9 @@ function cm.initial_effect(c) ...@@ -18,9 +18,9 @@ function cm.initial_effect(c)
e1:SetCode(EVENT_CHAINING) e1:SetCode(EVENT_CHAINING)
e1:SetRange(LOCATION_PZONE) e1:SetRange(LOCATION_PZONE)
e1:SetCountLimit(1,m) e1:SetCountLimit(1,m)
e1:SetCondition(cm.descon) e1:SetCondition(cm.adescon)
e1:SetTarget(cm.destg) e1:SetTarget(cm.adestg)
e1:SetOperation(cm.desop) e1:SetOperation(cm.adesop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--handes --handes
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
...@@ -105,18 +105,18 @@ function cm.initial_effect(c) ...@@ -105,18 +105,18 @@ function cm.initial_effect(c)
c:RegisterEffect(e9) c:RegisterEffect(e9)
end end
--dice --dice
function cm.descon(e,tp,eg,ep,ev,re,r,rp) function cm.adescon(e,tp,eg,ep,ev,re,r,rp)
return rp==1-tp and not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev) return rp==1-tp and not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev)
end end
function cm.thfilter(c,e,tp) function cm.thfilter(c,e,tp)
return c:IsLevelBelow(7) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsLevelBelow(7) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function cm.destg(e,tp,eg,ep,ev,re,r,rp,chk) function cm.adestg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_COIN,nil,0,tp,1) Duel.SetOperationInfo(0,CATEGORY_COIN,nil,0,tp,1)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
end end
function cm.desop(e,tp,eg,ep,ev,re,r,rp) function cm.adesop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local res=Duel.TossCoin(tp,1) local res=Duel.TossCoin(tp,1)
if res==1 then if res==1 then
......
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