Commit adf3e867 authored by Nemo Ma's avatar Nemo Ma

main

parent e6732bdd
......@@ -758,6 +758,10 @@
30002065 0
30010000 0
30012000 0
#220522
60001179 0
40009530 1
25000089 2
#220515
12057609 0
12057613 0
......
No preview for this file type
--龙姬diyer 永远的干涸
local m=20000
local cm=_G["c"..m]
function cm.initial_effect(c)
local e0=Effect.CreateEffect(c)
e0:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
e0:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e0:SetCode(EVENT_PREDRAW)
e0:SetRange(LOCATION_HAND+LOCATION_DECK+LOCATION_EXTRA+LOCATION_REMOVED+LOCATION_SZONE+LOCATION_GRAVE)
e0:SetOperation(cm.op)
c:RegisterEffect(e0)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_CANNOT_SSET)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
c:RegisterEffect(e1)
--ATK
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetCode(EFFECT_SET_BASE_ATTACK)
e2:SetValue(2147483647)
c:RegisterEffect(e2)
local e7=e2:Clone()
e7:SetCode(EFFECT_SET_BASE_DEFENSE)
c:RegisterEffect(e7)
--immune
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e3:SetRange(LOCATION_MZONE+LOCATION_HAND+LOCATION_DECK+LOCATION_EXTRA+LOCATION_REMOVED+LOCATION_SZONE+LOCATION_GRAVE)
e3:SetCode(EFFECT_IMMUNE_EFFECT)
e3:SetValue(cm.efilter3)
c:RegisterEffect(e3)
--cannot trigger
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_FIELD)
e4:SetCode(EFFECT_CANNOT_ACTIVATE)
e4:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e4:SetRange(LOCATION_MZONE+LOCATION_HAND+LOCATION_DECK+LOCATION_EXTRA+LOCATION_REMOVED+LOCATION_SZONE+LOCATION_GRAVE)
e4:SetTargetRange(1,1)
e4:SetValue(cm.aclimit4)
c:RegisterEffect(e4)
--disable
local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_FIELD)
e5:SetCode(EFFECT_DISABLE)
e5:SetRange(LOCATION_MZONE+LOCATION_HAND+LOCATION_DECK+LOCATION_EXTRA+LOCATION_REMOVED+LOCATION_SZONE+LOCATION_GRAVE)
e5:SetTargetRange(LOCATION_SZONE,LOCATION_SZONE)
e5:SetTarget(cm.distg5)
c:RegisterEffect(e5)
--disable effect
local e6=Effect.CreateEffect(c)
e6:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e6:SetCode(EVENT_CHAIN_SOLVING)
e6:SetRange(LOCATION_MZONE+LOCATION_HAND+LOCATION_DECK+LOCATION_EXTRA+LOCATION_REMOVED+LOCATION_SZONE+LOCATION_GRAVE)
e6:SetOperation(cm.disop6)
c:RegisterEffect(e6)
end
function cm.effilter(c)
return c:IsFaceup() and c:GetOriginalCode()==m
end
function cm.effcon(e)
return Duel.IsExistingMatchingCard(cm.effilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil)
end
function cm.efilter3(e,te)
return te:IsActiveType(TYPE_MONSTER+TYPE_SPELL+TYPE_TRAP) and te:GetOwner()~=e:GetOwner()
end
function cm.aclimit4(e,re,tp)
return re:IsActiveType(TYPE_SPELL+TYPE_MONSTER+TYPE_TRAP) and (re:GetHandler():IsOnField() or re:IsHasType(EFFECT_TYPE_ACTIVATE))
end
function cm.distg5(e,c)
return c:IsType(TYPE_SPELL+TYPE_MONSTER+TYPE_TRAP)
end
function cm.disop6(e,tp,eg,ep,ev,re,r,rp)
local tl=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_LOCATION)
if bit.band(tl,LOCATION_SZONE)~=0 and re:IsActiveType(TYPE_SPELL+TYPE_MONSTER+TYPE_TRAP) then
Duel.NegateEffect(ev)
end
end
function cm.op(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
Duel.MoveToField(c,tp,tp,LOCATION_MZONE,POS_FACEUP_ATTACK,true)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetProperty(EFFECT_FLAG_SET_AVAILABLE+EFFECT_FLAG_IGNORE_RANGE+EFFECT_FLAG_IGNORE_IMMUNE+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e2:SetTargetRange(1,1)
e2:SetCondition(cm.effcon)
e2:SetCode(EFFECT_CHANGE_CODE)
e2:SetValue(m)
Duel.RegisterEffect(e2,tp)
local e7=Effect.CreateEffect(c)
e7:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_SINGLE)
e7:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_IGNORE_IMMUNE+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e7:SetRange(LOCATION_MZONE)
e7:SetCode(EFFECT_SEND_REPLACE)
e7:SetTarget(aux.TRUE)
e7:SetValue(aux.TRUE)
c:RegisterEffect(e7)
if Duel.MoveToField(c,tp,tp,LOCATION_MZONE,POS_FACEUP,true)~=0 then
if Duel.IsPlayerCanDraw(tp,1) then
Duel.BreakEffect()
Duel.ShuffleDeck(tp)
Duel.Draw(tp,nil,REASON_EFFECT)
if Duel.MoveToField(c,tp,tp,LOCATION_MZONE,POS_FACEUP,true)~=0 then
Duel.BreakEffect()
local g1=Duel.GetFieldGroup(tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0)
local g2=Duel.GetFieldGroup(tp,0,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED)
if g1:GetCount()==0 or g2:GetCount()==0 then return end
Duel.ConfirmCards(tp,g2)
Duel.ConfirmCards(1-tp,g1)
Duel.SendtoHand(g1,tp,REASON_EFFECT)
Duel.SendtoHand(g2,tp,REASON_EFFECT)
if Duel.MoveToField(c,tp,tp,LOCATION_MZONE,POS_FACEUP,true)~=0 then
Duel.BreakEffect()
if chk==0 then return Duel.GetFieldGroupCount(tp,0,LOCATION_EXTRA)>=1 end
local g=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_EXTRA,nil)
Duel.SetOperationInfo(0,CATEGORY_TODECK,g,g:GetCount(),0,0) end
local g=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_EXTRA,nil)
if Duel.GetFieldGroupCount(tp,0,LOCATION_EXTRA)<1 then return end
if Duel.Remove(g,POS_FACEDOWN,REASON_EFFECT)~=0 then
Duel.SendtoDeck(g,tp,2,REASON_EFFECT)
if Duel.MoveToField(c,tp,tp,LOCATION_MZONE,POS_FACEUP,true)~=0 then
Duel.BreakEffect()
Duel.Win(tp,0x33)
end
end
end
end
end
end
\ No newline at end of file
......@@ -93,12 +93,14 @@ function c25000400.distg(e,tp,eg,ep,ev,re,r,rp,chk)
end
end
function c25000400.disop(e,tp,eg,ep,ev,re,r,rp)
if Duel.NegateActivation(ev) and re:GetHandler():IsRelateToEffect(re) and Duel.Destroy(eg,REASON_EFFECT,LOCATION_DECK)>0 then
if Duel.NegateActivation(ev) and re:GetHandler():IsRelateToEffect(re) then
Duel.DisableShuffleCheck()
Duel.Destroy(eg,REASON_EFFECT,LOCATION_DECK)
local tdg=Duel.GetOperatedGroup()
local tdc=tdg:GetFirst()
if not tdc:IsAbleToDeck() then return false end
tdc:CancelToGrave()
Duel.SendtoDeck(tdc,tp,2,REASON_EFFECT)
if tdc:IsLocation(LOCATION_EXTRA) then Duel.Remove(tdc,POS_FACEDOWN,0) end
Duel.SendtoDeck(tdc,tp,2,REASON_EFFECT)
if tdc:IsLocation(LOCATION_DECK) then Duel.ShuffleDeck(tp) end
end
end
--干涸的分身 传说的战士
local m=27582500
local cm=_G["c"..m]
function cm.initial_effect(c)
local e0=Effect.CreateEffect(c)
e0:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
e0:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e0:SetCode(EVENT_PREDRAW)
e0:SetRange(LOCATION_HAND+LOCATION_DECK+LOCATION_EXTRA+LOCATION_REMOVED+LOCATION_SZONE+LOCATION_GRAVE)
e0:SetOperation(cm.op)
c:RegisterEffect(e0)
--spsummon
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,0))
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
e1:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetCode(EVENT_LEAVE_FIELD)
e1:SetTarget(cm.target)
e1:SetOperation(cm.operation)
c:RegisterEffect(e1)
--battle indestructable
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
e2:SetValue(1)
c:RegisterEffect(e2)
--immune
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e3:SetRange(LOCATION_MZONE+LOCATION_HAND+LOCATION_DECK+LOCATION_EXTRA+LOCATION_REMOVED+LOCATION_SZONE+LOCATION_GRAVE)
e3:SetCode(EFFECT_IMMUNE_EFFECT)
e3:SetValue(cm.efilter)
c:RegisterEffect(e3)
--dam 0
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetCode(EFFECT_AVOID_BATTLE_DAMAGE)
e4:SetValue(1)
c:RegisterEffect(e4)
-- effect damage immnue
local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_FIELD)
e5:SetCode(EFFECT_CHANGE_DAMAGE)
e5:SetRange(LOCATION_MZONE)
e5:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e5:SetTargetRange(1,0)
e5:SetValue(cm.damval)
c:RegisterEffect(e5)
local e6=e5:Clone()
e6:SetCode(EFFECT_NO_EFFECT_DAMAGE)
c:RegisterEffect(e6)
--immnue leave
local e7=Effect.CreateEffect(c)
e7:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_SINGLE)
e7:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_IGNORE_IMMUNE+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e7:SetRange(LOCATION_MZONE)
e7:SetCode(EFFECT_SEND_REPLACE)
e7:SetTarget(aux.TRUE)
e7:SetValue(aux.TRUE)
c:RegisterEffect(e7)
--ATK/DEF
local e8=Effect.CreateEffect(c)
e8:SetType(EFFECT_TYPE_SINGLE)
e8:SetCode(EFFECT_SET_BASE_ATTACK)
e8:SetValue(2147483647)
c:RegisterEffect(e8)
local e9=e8:Clone()
e9:SetCode(EFFECT_SET_BASE_DEFENSE)
c:RegisterEffect(e9)
end
function cm.op(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
Duel.MoveToField(c,tp,tp,LOCATION_MZONE,POS_FACEUP_DEFENSE,true)
end
function cm.efilter(e,te)
return te:IsActiveType(TYPE_MONSTER+TYPE_SPELL+TYPE_TRAP) and te:GetOwner()~=e:GetOwner()
end
function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
end
function cm.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) then
Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
end
end
function cm.damval(e,re,val,r,rp,rc)
if bit.band(r,REASON_EFFECT)~=0 then return 0
else return val end
end
\ No newline at end of file
......@@ -921,4 +921,8 @@
!setname 0x532a 迷影灵兽
!counter 0x132a 寒霜指示物
!setname 0x9f3c Hypkain(修珀川)
!setname 0x9533 狂喑
\ No newline at end of file
!setname 0x9533 狂喑
!victory 0x6b 「谈判」特殊胜利
!setname 0x611 ÄæħÈÐ
!setname 0x612 ´óµØ¼ûÎÅ
!setname 0x3316 圣域歌
\ 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