Commit 046043bb authored by 聖園ミカ's avatar 聖園ミカ 🐟

byd

parent 814e140e
No preview for this file type
--millennium bug
function c98629999.initial_effect(c)
function c29999999.initial_effect(c)
--cannot special summon
local e1=Effect.CreateEffect(c)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
......@@ -10,32 +10,32 @@ function c98629999.initial_effect(c)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetCode(EFFECT_TRIBUTE_LIMIT)
e2:SetValue(c98629999.tlimit)
e2:SetValue(c29999999.tlimit)
c:RegisterEffect(e2)
--summon with 2 tribute
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(98629999,0))
e3:SetDescription(aux.Stringid(29999999,0))
e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_LIMIT_SUMMON_PROC)
e3:SetCondition(c98629999.ttcon)
e3:SetOperation(c98629999.ttop)
e3:SetCondition(c29999999.ttcon)
e3:SetOperation(c29999999.ttop)
e3:SetValue(SUMMON_TYPE_ADVANCE)
c:RegisterEffect(e3)
local e4=Effect.CreateEffect(c)
e4:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetCode(EFFECT_LIMIT_SET_PROC)
e4:SetCondition(c98629999.setcon)
e4:SetCondition(c29999999.setcon)
c:RegisterEffect(e4)
--atkup
local e5=Effect.CreateEffect(c)
e5:SetDescription(aux.Stringid(98629999,1))
e5:SetDescription(aux.Stringid(29999999,1))
e5:SetCategory(CATEGORY_DESTROY)
e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
e5:SetCode(EVENT_SUMMON_SUCCESS)
e5:SetTarget(c98629999.destg)
e5:SetOperation(c98629999.desop)
e5:SetTarget(c29999999.destg)
e5:SetOperation(c29999999.desop)
c:RegisterEffect(e5)
--cannot activite
local e6=Effect.CreateEffect(c)
......@@ -44,16 +44,16 @@ function c98629999.initial_effect(c)
e6:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e6:SetRange(LOCATION_MZONE)
e6:SetTargetRange(1,1)
e6:SetValue(c98629999.actlimit)
e6:SetCondition(c98629999.ctcon)
e6:SetValue(c29999999.actlimit)
e6:SetCondition(c29999999.ctcon)
c:RegisterEffect(e6)
--disable
local e7=Effect.CreateEffect(c)
e7:SetType(EFFECT_TYPE_FIELD)
e7:SetRange(LOCATION_MZONE)
e7:SetTargetRange(LOCATION_OVERLAY+LOCATION_ONFIELD+LOCATION_GRAVE+LOCATION_REMOVED+LOCATION_HAND+LOCATION_DECK+LOCATION_EXTRA,LOCATION_OVERLAY+LOCATION_ONFIELD+LOCATION_GRAVE+LOCATION_REMOVED+LOCATION_HAND+LOCATION_DECK+LOCATION_EXTRA)
e7:SetTarget(c98629999.disable)
e7:SetCondition(c98629999.discon)
e7:SetTarget(c29999999.disable)
e7:SetCondition(c29999999.discon)
e7:SetCode(EFFECT_DISABLE)
c:RegisterEffect(e7)
--disable summon
......@@ -63,8 +63,8 @@ function c98629999.initial_effect(c)
e8:SetCode(EFFECT_CANNOT_SUMMON)
e8:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e8:SetTargetRange(1,1)
e8:SetTarget(c98629999.sumlimit)
e8:SetCondition(c98629999.sumcon)
e8:SetTarget(c29999999.sumlimit)
e8:SetCondition(c29999999.sumcon)
c:RegisterEffect(e8)
local e9=e8:Clone()
e9:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
......@@ -85,7 +85,7 @@ function c98629999.initial_effect(c)
e13:SetRange(LOCATION_MZONE)
e13:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e13:SetTargetRange(1,1)
e13:SetValue(c98629999.damval)
e13:SetValue(c29999999.damval)
c:RegisterEffect(e13)
--destroy
local e14=Effect.CreateEffect(c)
......@@ -93,68 +93,68 @@ function c98629999.initial_effect(c)
e14:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e14:SetRange(LOCATION_MZONE)
e14:SetCode(EFFECT_SELF_DESTROY)
e14:SetCondition(c98629999.descon)
e14:SetCondition(c29999999.descon)
c:RegisterEffect(e14)
end
function c98629999.tlimit(e,c)
function c29999999.tlimit(e,c)
local atk=c:GetAttack()
local def=c:GetDefense()
return not (atk<2000 and def<2000 and c:IsLevelAbove(10))
end
function c98629999.ttcon(e,c,minc)
function c29999999.ttcon(e,c,minc)
if c==nil then return true end
return minc<=2 and Duel.CheckTribute(c,2)
end
function c98629999.ttop(e,tp,eg,ep,ev,re,r,rp,c)
function c29999999.ttop(e,tp,eg,ep,ev,re,r,rp,c)
local g=Duel.SelectTribute(tp,c,2,2)
c:SetMaterial(g)
Duel.Release(g,REASON_SUMMON+REASON_MATERIAL)
end
function c98629999.setcon(e,c,minc)
function c29999999.setcon(e,c,minc)
if not c then return true end
return false
end
function c98629999.desfilter(c)
function c29999999.desfilter(c)
local atk=c:GetAttack()
local def=c:GetDefense()
return c:IsFaceup() and (atk>=2000 or def>=2000)
end
function c98629999.destg(e,tp,eg,ep,ev,re,r,rp,chk)
function c29999999.destg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
local g=Duel.GetMatchingGroup(c98629999.desfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
local g=Duel.GetMatchingGroup(c29999999.desfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,g:GetCount(),0,0)
end
function c98629999.desop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(c98629999.desfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
function c29999999.desop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(c29999999.desfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
if g:GetCount()>0 then
Duel.Destroy(g,REASON_EFFECT)
end
end
function c98629999.ctcon(e)
function c29999999.ctcon(e)
local tp=e:GetHandlerPlayer()
return e:GetHandler():IsSummonType(SUMMON_TYPE_NORMAL)
end
function c98629999.actlimit(e,re,rp)
function c29999999.actlimit(e,re,rp)
local rc=re:GetHandler()
return re:IsActiveType(TYPE_MONSTER) and (rc:IsAttackAbove(2000) or rc:IsDefenseAbove(2000))
end
function c98629999.disable(e,c)
return c~=e:GetHandler() and not c:IsCode(98629999) and (c:IsType(TYPE_EFFECT) or bit.band(c:GetOriginalType(),TYPE_EFFECT)==TYPE_EFFECT) and (c:GetAttack()>=2000 or c:GetDefense()>=2000)
function c29999999.disable(e,c)
return c~=e:GetHandler() and not c:IsCode(29999999) and (c:IsType(TYPE_EFFECT) or bit.band(c:GetOriginalType(),TYPE_EFFECT)==TYPE_EFFECT) and (c:GetAttack()>=2000 or c:GetDefense()>=2000)
end
function c98629999.discon(e)
function c29999999.discon(e)
local tp=e:GetHandlerPlayer()
return e:GetHandler():IsSummonType(SUMMON_TYPE_NORMAL)
end
function c98629999.sumlimit(e,c,sump,sumtype,sumpos,targetp)
function c29999999.sumlimit(e,c,sump,sumtype,sumpos,targetp)
return c~=e:GetHandler() and (c:GetAttack()>=2000 or c:GetDefense()>=2000)
end
function c98629999.sumcon(e)
function c29999999.sumcon(e)
local tp=e:GetHandlerPlayer()
return e:GetHandler():IsSummonType(SUMMON_TYPE_NORMAL)
end
function c98629999.damval(e,re,val,r,rp,rc)
function c29999999.damval(e,re,val,r,rp,rc)
if val>=2000 then return 0 else return val end
end
function c98629999.descon(e)
function c29999999.descon(e)
return e:GetHandler():IsAttackAbove(2000) or e:GetHandler():IsDefenseAbove(2000)
end
\ No newline at end of file
--枪械少女 苏娜
local m=37989070
local cm=_G["c"..m]
function cm.initial_effect(c)
--link summon
c:EnableReviveLimit()
aux.AddLinkProcedure(c,nil,3,3)
--direct attack
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetCode(EFFECT_DIRECT_ATTACK)
e0:SetCondition(cm.dircon)
c:RegisterEffect(e0)
--spsummon
local e3=Effect.CreateEffect(c)
e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetRange(LOCATION_MZONE)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
e3:SetCountLimit(1,m)
e3:SetTarget(cm.sptg)
e3:SetOperation(cm.spop)
c:RegisterEffect(e3)
end
function cm.tgfilter(c)
return c:IsType(TYPE_MONSTER)
end
function cm.dircon(e)
return e:GetHandler():GetLinkedGroup():IsExists(cm.tgfilter,1,nil)
end
function cm.filter(c,e,tp,zone)
return c:IsRace(RACE_SPELLCASTER) and c:GetBaseAttack()==2400 and c:IsType(TYPE_LINK) and not c:IsCode(m)
and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,tp,zone)
end
function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
local zone=bit.band(e:GetHandler():GetLinkedZone(tp),0x1f)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and cm.filter(chkc,e,tp,zone) end
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingTarget(cm.filter,tp,LOCATION_GRAVE,0,1,nil,e,tp,zone) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectTarget(tp,cm.filter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp,zone)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
end
function cm.spop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
local zone=bit.band(e:GetHandler():GetLinkedZone(tp),0x1f)
if tc:IsRelateToEffect(e) and zone~=0 then
Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP,zone)
end
end
--夏之使魔 苏娜
local m=37989071
local cm=_G["c"..m]
function cm.initial_effect(c)
--special summon
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetProperty(EFFECT_FLAG_UNCOPYABLE)
e2:SetCode(EFFECT_SPSUMMON_PROC)
e2:SetRange(LOCATION_HAND)
e2:SetCondition(cm.spcon)
e2:SetValue(cm.spval)
c:RegisterEffect(e2)
end
function cm.cfilter(c)
return c:IsFaceup() and c:IsRace(RACE_SPELLCASTER) and c:IsType(TYPE_LINK) and c:GetBaseAttack()==2400
end
function cm.checkzone(tp)
local zone=0
local g=Duel.GetMatchingGroup(cm.cfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
for tc in aux.Next(g) do
zone=bit.bor(zone,tc:GetLinkedZone(tp))
end
return bit.band(zone,0x1f)
end
function cm.spcon(e,c)
if c==nil then return true end
local tp=c:GetControler()
local zone=cm.checkzone(tp)
return Duel.GetLocationCount(tp,LOCATION_MZONE,tp,LOCATION_REASON_TOFIELD,zone)>0
end
function cm.spval(e,c)
local tp=c:GetControler()
local zone=cm.checkzone(tp)
return 0,zone
end
......@@ -510,6 +510,8 @@
#△逸轩 1246660891 266 0xe50-0xe5f
!setname 0xe51 颜彩
#胆小的兔子 2490482695 299 0x750-0x75f
#沃亚森斯奥克斯 2201771890 300 0x930-0x93f
!setname 0x93a 能力者
!setname 0xa93a 念能力者
......@@ -801,12 +803,25 @@
#格拉摩根 1025644096 400 0xf10-0xf1f
!setname 0xf11 闪击
!setname 0x3f1a 瓦尔里纳
!setname 0x5f1a 云上骑士
!setname 0x6f1a 目镜
!setname 0x9f1a 魔合成
!setname 0xaf1a 蒸汽淑女
!setname 0xcf1a 泪骑士
!setname 0x3f1b 焰之巫女
!setname 0x5f1b 魔合妖魔
!setname 0x6f1b 降灵术师
!setname 0x9f1b 超新星格斗技场
!setname 0xaf1b 影潜者
!setname 0xcf1b 王冠圣域
!setname 0x5f1b 降灵术师
!setname 0x7f1b 魔合成
!setname 0xaf1b 魔合妖魔
!setname 0x3f1c 灾漩
!setname 0x5f1c 哈利
!setname 0x6f1c 奇术人形
!setname 0x9f1c 反抗黎骑
!setname 0xaf1c 朱斯贝克
!setname 0xcf1c 破天黎骑
!counter 0xf11 能量指示物
#cm.named_with_BeastDeity 兽神
#cm.named_with_BlueDeathster 葬空死团
#cm.named_with_Chrono 时刻
......@@ -1108,7 +1123,7 @@
#AddCodeList(65080012) 雪暴世界卡名记述
!counter 0xda0 崇净指示物
#举火人 3146095889 657 0x???-0x???
#举火人 3146095889 657
#AddCodeList(c,65710000) 万象笔记卡名记述
#今晚有宵夜吗 3080579137 666 0x660-0x66f
......@@ -1377,7 +1392,6 @@
##持剑者 380518667 221
##◇兔锅 1874883039 222
##◇星空璀璨之地 3077843411 280-281
##胆小的兔子 2490482695 299
#◇礟襪 2829508765 330-331
!setname 0x87d 圣律
##虹霓文花 2538420075 395
......
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