Commit a4d574a2 authored by 聖園ミカ's avatar 聖園ミカ 🐟

hop

parent 6d2f6750
--星莲龙骑士-「红龙编年史」 --星莲龙骑士-「红龙编年史」
--
local m=12847002 local m=12847002
local cm=_G["c"..m] local cm=_G["c"..m]
function cm.initial_effect(c) function cm.initial_effect(c)
...@@ -18,230 +17,6 @@ function cm.initial_effect(c) ...@@ -18,230 +17,6 @@ function cm.initial_effect(c)
e2:SetRange(LOCATION_EXTRA) e2:SetRange(LOCATION_EXTRA)
e2:SetCondition(cm.sprcon) e2:SetCondition(cm.sprcon)
e2:SetOperation(cm.sprop) e2:SetOperation(cm.sprop)
More
Toggle navigation
Y
ygopro-222DIY-cards
Project overview
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Locked Files
Issues
0
Merge Requests
0
CI / CD
Security & Compliance
Operations
Packages
Analytics
Wiki
Snippets
Settings
Close sidebar
Open sidebar
alstroemeria-silentlove
ygopro-222DIY-cards
Commits
8fa9d4cc
Commit 8fa9d4cc 2 minutes ago by 聖園ミカ 🐟
Options
Replace c12847002.lua
parent d4fcb564 master
No related merge requests found
Pipeline #31362 canceled with stages
in 1 minute and 42 seconds
Changes
Pipelines
Showing 1 changed file with 40 additions and 117 deletions
expansions/script/c12847002.lua
--星莲龙骑士-「红龙编年史」
local m=12847002
local cm=_G["c"..m]
function cm.initial_effect(c)
c:EnableReviveLimit()
--spsummon condition
--绝对毁灭的阎炮
local s,id,o=GetID()
function s.initial_effect(c)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e1:SetCode(EFFECT_SPSUMMON_CONDITION)
e1:SetCategory(CATEGORY_DESTROY+CATEGORY_REMOVE+CATEGORY_TOGRAVE)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
e1:SetTarget(s.target)
e1:SetOperation(s.activate)
c:RegisterEffect(e1)
--special summon rule
--act in hand
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_SPSUMMON_PROC)
e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e2:SetRange(LOCATION_EXTRA)
e2:SetCondition(cm.sprcon)
e2:SetOperation(cm.sprop)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetCode(EFFECT_TRAP_ACT_IN_HAND)
e2:SetCost(s.cost)
e2:SetCondition(s.condition)
e2:SetDescription(aux.Stringid(id,1))
c:RegisterEffect(e2)
--immune
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetRange(LOCATION_MZONE)
e1:SetValue(1)
c:RegisterEffect(e1)
local e2=e1:Clone()
e2:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
c:RegisterEffect(e2)
--negate
local e4=Effect.CreateEffect(c)
e4:SetDescription(aux.Stringid(m,1))
e4:SetCategory(CATEGORY_NEGATE+CATEGORY_POSITION+CATEGORY_ATKCHANGE)
e4:SetType(EFFECT_TYPE_QUICK_O)
e4:SetCode(EVENT_CHAINING)
e4:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL+EFFECT_FLAG_CANNOT_INACTIVATE)
e4:SetRange(LOCATION_MZONE)
e4:SetCountLimit(1)
e4:SetCondition(cm.discon)
e4:SetTarget(cm.distg)
e4:SetOperation(cm.disop)
c:RegisterEffect(e4)
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
e3:SetCategory(CATEGORY_DESTROY)
e3:SetCountLimit(1,m)
e3:SetCode(EVENT_PHASE+PHASE_END)
e3:SetRange(LOCATION_MZONE)
e3:SetTarget(cm.target2)
e3:SetOperation(cm.operation2)
c:RegisterEffect(e3)
end
function cm.sprfilter(c)
return c:IsFaceup() and c:IsLevelAbove(8) and c:IsAbleToGraveAsCost() and c:IsRace(RACE_DRAGON)
end
function cm.sprfilter1(c,tp,g,sc)
local lv=c:GetLevel()
local atts=c:GetAttribute()
return g:IsExists(cm.sprfilter2,1,c,tp,c,sc,lv,atts)
end
function cm.sprfilter2(c,tp,mc,sc,lv,atts)
local sg=Group.FromCards(c,mc)
return c:IsLevel(lv) and not c:IsAttribute(atts)
and Duel.GetLocationCountFromEx(tp,tp,sg,sc)>0 and not c:IsOriginalCodeRule(mc:GetOriginalCodeRule())
end
function cm.sprcon(e,c)
if c==nil then return true end
local tp=c:GetControler()
local g=Duel.GetMatchingGroup(cm.sprfilter,tp,LOCATION_MZONE,0,nil)
return g:IsExists(cm.sprfilter1,1,nil,tp,g,c)
end
function cm.sprop(e,tp,eg,ep,ev,re,r,rp,c)
local g=Duel.GetMatchingGroup(cm.sprfilter,tp,LOCATION_MZONE,0,nil)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local g1=g:FilterSelect(tp,cm.sprfilter1,1,1,nil,tp,g,c)
local mc=g1:GetFirst()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local g2=g:FilterSelect(tp,cm.sprfilter2,1,1,mc,tp,mc,c,mc:GetLevel(),mc:GetAttribute())
g1:Merge(g2)
Duel.SendtoGrave(g1,REASON_COST)
More
Toggle navigation
Y
ygopro-222DIY-cards
Project overview
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Locked Files
Issues
0
Merge Requests
0
CI / CD
Security & Compliance
Operations
Packages
Analytics
Wiki
Snippets
Settings
Close sidebar
Open sidebar
alstroemeria-silentlove
ygopro-222DIY-cards
Commits
8fa9d4cc
Commit 8fa9d4cc 2 minutes ago by 聖園ミカ 🐟
Options
Replace c12847002.lua
parent d4fcb564 master
No related merge requests found
Pipeline #31362 canceled with stages
in 1 minute and 42 seconds
Changes
Pipelines
Showing 1 changed file with 40 additions and 117 deletions
expansions/script/c12847002.lua
--星莲龙骑士-「红龙编年史」
local m=12847002
local cm=_G["c"..m]
function cm.initial_effect(c)
c:EnableReviveLimit()
--spsummon condition
--绝对毁灭的阎炮
local s,id,o=GetID()
function s.initial_effect(c)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e1:SetCode(EFFECT_SPSUMMON_CONDITION)
e1:SetCategory(CATEGORY_DESTROY+CATEGORY_REMOVE+CATEGORY_TOGRAVE)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
e1:SetTarget(s.target)
e1:SetOperation(s.activate)
c:RegisterEffect(e1)
--special summon rule
--act in hand
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_SPSUMMON_PROC)
e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e2:SetRange(LOCATION_EXTRA)
e2:SetCondition(cm.sprcon)
e2:SetOperation(cm.sprop)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetCode(EFFECT_TRAP_ACT_IN_HAND)
e2:SetCost(s.cost)
e2:SetCondition(s.condition)
e2:SetDescription(aux.Stringid(id,1))
c:RegisterEffect(e2) c:RegisterEffect(e2)
--immune --immune
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
...@@ -305,11 +80,7 @@ function cm.sprop(e,tp,eg,ep,ev,re,r,rp,c) ...@@ -305,11 +80,7 @@ function cm.sprop(e,tp,eg,ep,ev,re,r,rp,c)
local g2=g:FilterSelect(tp,cm.sprfilter2,1,1,mc,tp,mc,c,mc:GetLevel(),mc:GetAttribute()) local g2=g:FilterSelect(tp,cm.sprfilter2,1,1,mc,tp,mc,c,mc:GetLevel(),mc:GetAttribute())
g1:Merge(g2) g1:Merge(g2)
Duel.SendtoGrave(g1,REASON_COST) Duel.SendtoGrave(g1,REASON_COST)
function s.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
Duel.PayLPCost(tp,math.floor(Duel.GetLP(tp)/2))
end end
function cm.discon(e,tp,eg,ep,ev,re,r,rp) function cm.discon(e,tp,eg,ep,ev,re,r,rp)
return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev) and bit.band(Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_LOCATION),LOCATION_ONFIELD)~=0 return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev) and bit.band(Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_LOCATION),LOCATION_ONFIELD)~=0
end end
...@@ -346,7 +117,6 @@ function cm.disop(e,tp,eg,ep,ev,re,r,rp) ...@@ -346,7 +117,6 @@ function cm.disop(e,tp,eg,ep,ev,re,r,rp)
end end
end end
end end
function cm.target2(e,tp,eg,ep,ev,re,r,rp,chk) function cm.target2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsFacedown,tp,0,LOCATION_ONFIELD,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(Card.IsFacedown,tp,0,LOCATION_ONFIELD,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_DESTROY,nil,0,1-tp,0) Duel.SetOperationInfo(0,CATEGORY_DESTROY,nil,0,1-tp,0)
......
--最后的话语 --最后的话语
local s,id,o=GetID()
function s.initial_effect(c) function s.initial_effect(c)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(id,0)) e1:SetDescription(aux.Stringid(id,0))
......
...@@ -75,7 +75,7 @@ function cm.tdop(e,tp,eg,ep,ev,re,r,rp) ...@@ -75,7 +75,7 @@ function cm.tdop(e,tp,eg,ep,ev,re,r,rp)
if g:GetCount()<1 then return end if g:GetCount()<1 then return end
local tc=g:RandomSelect(tp,1) local tc=g:RandomSelect(tp,1)
if c:IsRelateToEffect(e) then if c:IsRelateToEffect(e) then
Duel.Overlay(c,tc) Duel.Overlay(c,tc)
end end
end end
function cm.effcon(e,tp,eg,ep,ev,re,r,rp) function cm.effcon(e,tp,eg,ep,ev,re,r,rp)
...@@ -93,7 +93,7 @@ function cm.tdop2(e,tp,eg,ep,ev,re,r,rp) ...@@ -93,7 +93,7 @@ function cm.tdop2(e,tp,eg,ep,ev,re,r,rp)
local g1=Duel.SelectMatchingCard(tp,cm.desfilter2,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,c,e) local g1=Duel.SelectMatchingCard(tp,cm.desfilter2,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,c,e)
local tc=g1:RandomSelect(tp,1) local tc=g1:RandomSelect(tp,1)
if c:IsRelateToEffect(e) then if c:IsRelateToEffect(e) then
Duel.Overlay(c,tc) Duel.Overlay(c,tc)
end end
end end
function cm.cost2(e,tp,eg,ep,ev,re,r,rp,chk) function cm.cost2(e,tp,eg,ep,ev,re,r,rp,chk)
...@@ -108,7 +108,6 @@ function cm.tdop3(e,tp,eg,ep,ev,re,r,rp) ...@@ -108,7 +108,6 @@ function cm.tdop3(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local g=Duel.GetMatchingGroup(cm.desfilter2,tp,0,LOCATION_ONFIELD,nil) local g=Duel.GetMatchingGroup(cm.desfilter2,tp,0,LOCATION_ONFIELD,nil)
if c:IsRelateToEffect(e) then if c:IsRelateToEffect(e) then
Duel.Overlay(c,g) Duel.Overlay(c,g)
end end
end end
class
\ No newline at end of file
...@@ -65,7 +65,8 @@ function cm.mvop(e,tp,eg,ep,ev,re,r,rp) ...@@ -65,7 +65,8 @@ function cm.mvop(e,tp,eg,ep,ev,re,r,rp)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TURN_SET) e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TURN_SET)
e1:SetValue(TYPE_TRAP+TYPE_CONTINUOUS) e1:SetValue(TYPE_TRAP+TYPE_CONTINUOUS)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end
end end
end end
function cm.distg(e,c) function cm.distg(e,c)
......
-归墟仲裁 天卫 --归墟仲裁 天卫
local m=30015115 local m=30015115
local cm=_G["c"..m] local cm=_G["c"..m]
if not overuins then dofile("expansions/script/c30015500.lua") end if not overuins then dofile("expansions/script/c30015500.lua") end
......
...@@ -12,6 +12,9 @@ local e1=Effect.CreateEffect(c) ...@@ -12,6 +12,9 @@ local e1=Effect.CreateEffect(c)
c:RegisterEffect(e1) c:RegisterEffect(e1)
Duel.AddCustomActivityCounter(id,ACTIVITY_SPSUMMON,s.counterfilter) Duel.AddCustomActivityCounter(id,ACTIVITY_SPSUMMON,s.counterfilter)
end end
function s.counterfilter(c)
return not c:IsSummonLocation(LOCATION_EXTRA) or c:IsType(TYPE_LINK)
end
function s.cost(e,tp,eg,ep,ev,re,r,rp,chk) function s.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetCustomActivityCount(id,tp,ACTIVITY_SPSUMMON)==0 end if chk==0 then return Duel.GetCustomActivityCount(id,tp,ACTIVITY_SPSUMMON)==0 end
local e1=Effect.CreateEffect(e:GetHandler()) local e1=Effect.CreateEffect(e:GetHandler())
......
...@@ -21,7 +21,7 @@ function s.initial_effect(c) ...@@ -21,7 +21,7 @@ function s.initial_effect(c)
local e2 = Effect.CreateEffect(c) local e2 = Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE + EFFECT_TYPE_CONTINUOUS) e2:SetType(EFFECT_TYPE_SINGLE + EFFECT_TYPE_CONTINUOUS)
e2:SetCode(EVENT_LEAVE_FIELD) e2:SetCode(EVENT_LEAVE_FIELD)
e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE + EFFECT_FLAG_CANNOT_NEGATE) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e2:SetOperation(s.regop) e2:SetOperation(s.regop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
if not s.global_flag then if not s.global_flag then
......
...@@ -44,10 +44,8 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -44,10 +44,8 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
local val=Duel.Recover(tp,math.ceil(ev),REASON_EFFECT) local val=Duel.Recover(tp,math.ceil(ev),REASON_EFFECT)
if val<800 then return end if val<800 then return end
Duel.BreakEffect() Duel.BreakEffect()
for val>799 do local ct=math.floor(val/800)
Duel.Draw(tp,1,REASON_EFFECT) Duel.Draw(tp,ct,REASON_EFFECT)
val=val-800
end
end end
function cm.spcon(e,tp,eg,ep,ev,re,r,rp) function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
......
...@@ -28,6 +28,7 @@ function c60010077.initial_effect(c) ...@@ -28,6 +28,7 @@ function c60010077.initial_effect(c)
e2:SetOperation(c60010077.operation) e2:SetOperation(c60010077.operation)
c:RegisterEffect(e2) c:RegisterEffect(e2)
-- --
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e3:SetCode(EVENT_CHAINING) e3:SetCode(EVENT_CHAINING)
e3:SetRange(LOCATION_MZONE) e3:SetRange(LOCATION_MZONE)
......
--卡丘世界独舞曲 --卡丘世界独舞曲
function c82000630.initial_effect(c) function c82000630.initial_effect(c)
function c82000630.initial_effect(c)
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
aux.EnableSpiritReturn(c,EVENT_SUMMON_SUCCESS,EVENT_FLIP) aux.EnableSpiritReturn(c,EVENT_SUMMON_SUCCESS,EVENT_FLIP)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
...@@ -80,4 +79,4 @@ function c82000630.thop(e,tp,eg,ep,ev,re,r,rp) ...@@ -80,4 +79,4 @@ function c82000630.thop(e,tp,eg,ep,ev,re,r,rp)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.SendtoHand(g,nil,REASON_EFFECT)
end end
end end
\ No newline at end of file
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