list

expansions/lflist.conf

@@ -78,6 +78,11 @@
 130005119 0
 130005120 0
 #
+22050210 0
+30000007 0
+31400012 0
+65020203 0
+#
 810001 0
 810002 0
 810003 0
@@ -1168,6 +1173,10 @@
 117681594 0
 115284026 0
 #limit
+#
+22050180 1
+33403513 1
+#
 31400038 1
 65000000 1
 77770010 1

expansions/script/c14010147.lua

---破名椛
-local m=14010147
-local cm=_G["c"..m]
-function cm.initial_effect(c)
-	--limit
-	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(m,0))
-	e1:SetType(EFFECT_TYPE_QUICK_O)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER)
-	e1:SetRange(LOCATION_HAND)
-	e1:SetCountLimit(1,m)
-	e1:SetCost(cm.cost)
-	e1:SetTarget(cm.target)
-	e1:SetOperation(cm.operation)
-	c:RegisterEffect(e1)
-end
-function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return e:GetHandler():IsDiscardable() end
-	Duel.SendtoGrave(e:GetHandler(),REASON_COST+REASON_DISCARD)
-end
-function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return true end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CODE)
-	local ac=Duel.AnnounceCard(tp)
-	Duel.SetTargetParam(ac)
-	Duel.SetOperationInfo(0,CATEGORY_ANNOUNCE,nil,0,tp,ANNOUNCE_CARD)
-end
-function cm.operation(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	local ac=Duel.GetChainInfo(0,CHAININFO_TARGET_PARAM)
-	e:GetHandler():SetHint(CHINT_CARD,ac)
-	--splimit
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_FIELD)
-	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
-	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
-	e1:SetTargetRange(1,1)
-	e1:SetTarget(cm.splimit)
-	e1:SetLabel(ac)
-	e1:SetReset(RESET_PHASE+PHASE_END)
-	Duel.RegisterEffect(e1,tp)
-	--actlimit
-	local e2=Effect.CreateEffect(c)
-	e2:SetType(EFFECT_TYPE_FIELD)
-	e2:SetCode(EFFECT_CANNOT_ACTIVATE)
-	e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
-	e2:SetTargetRange(1,1)
-	e2:SetLabel(ac)
-	e2:SetValue(cm.aclimit)
-	e2:SetReset(RESET_PHASE+PHASE_END)
-	Duel.RegisterEffect(e2,tp)  
-end
-function cm.splimit(e,c,sump,sumtype,sumpos,targetp,se)
-	return c:IsCode(e:GetLabel())
-end
-function cm.aclimit(e,re,tp)
-	return re:GetHandler():IsCode(e:GetLabel())
-end
\ No newline at end of file

expansions/script/c14010148.lua

---亡都祭
-local m=14010148
-local cm=_G["c"..m]
-function cm.initial_effect(c)
-	--tograve
-	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(m,0))
-	e1:SetCategory(CATEGORY_TOGRAVE)
-	e1:SetType(EFFECT_TYPE_QUICK_O)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetHintTiming(0,TIMING_END_PHASE)
-	e1:SetRange(LOCATION_HAND)
-	e1:SetCountLimit(1,m)
-	e1:SetCost(cm.cost)
-	e1:SetCondition(cm.condition)
-	e1:SetTarget(cm.target)
-	e1:SetOperation(cm.operation)
-	c:RegisterEffect(e1)
-end
-function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return e:GetHandler():IsDiscardable() end
-	Duel.SendtoGrave(e:GetHandler(),REASON_COST+REASON_DISCARD)
-end
-function cm.condition(e,tp,eg,ep,ev,re,r,rp)
-	return Duel.IsExistingMatchingCard(Card.IsFaceup,tp,0,LOCATION_FZONE,1,nil)
-end
-function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	local g=Duel.GetMatchingGroup(Card.IsAbleToGrave,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
-	if chk==0 then return #g>0 end
-	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,g,#g,tp,LOCATION_ONFIELD)
-end
-function cm.operation(e,tp,eg,ep,ev,re,r,rp)
-	local g=Duel.GetMatchingGroup(Card.IsAbleToGrave,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
-	Duel.SendtoGrave(g,REASON_EFFECT)
-end
\ No newline at end of file

expansions/script/c65010212.lua

---虚拟水神战士
-if not pcall(function() require("expansions/script/c65010201") end) then require("script/c65010201") end
-local m,cm=rscf.DefineCard(65010212,"VrAqua")
-function cm.initial_effect(c)
-	--summon with no tribute
-	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(m,0))
-	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
-	e1:SetType(EFFECT_TYPE_SINGLE)
-	e1:SetCode(EFFECT_SUMMON_PROC)
-	e1:SetValue(1)
-	e1:SetCondition(cm.con)
-	c:RegisterEffect(e1)   
-	local e2=rsef.STF(c,EVENT_SUMMON_SUCCESS,{m,1},{1,m},"tg,atk",nil,nil,nil,rsop.target(cm.tgfilter,"tg",LOCATION_MZONE+LOCATION_HAND,0,1,1,c),cm.tgop)
-	local e3=rsef.QO(c,nil,{m,2},{1,m+100},"rec","ptg",LOCATION_MZONE,rscon.phase("mp1_o","mp2_o"),nil,rsop.target(100,"rec"),cm.recop)
-end
-function cm.cfilter(c)
-	return c:IsFacedown() or not c:IsRace(RACE_CYBERSE)
-end
-function cm.con(e)
-	return not Duel.IsExistingMatchingCard(cm.cfilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil)
-end
-function cm.tgfilter(c)
-	return c:IsAbleToGrave() and rsva.IsSetM(c)
-end
-function cm.tgop(e,tp)
-	if rsop.SelectToGrave(tp,cm.tgfilter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,aux.ExceptThisCard(e),{})<=0 then return end
-	local c=rscf.GetFaceUpSelf(e)
-	if not c then return end
-	Duel.BreakEffect()
-	local e1,e2=rscf.QuickBuff(c,"atk+,def+",1000,"reset",{rsreset.est_pend+RESET_DISABLE+RESET_SELF_TURN,2})
-	local e3=rsef.SV_INDESTRUCTABLE(c,"battle",1,nil,{rsreset.est_pend+RESET_SELF_TURN,2},"cd")
-	local e3=rsef.SV_INDESTRUCTABLE(c,"effect",aux.indoval,nil,{rsreset.est_pend+RESET_SELF_TURN,2},"cd")
-end
-function cm.recop(e,tp,eg,ep,ev,re,r,rp)
-	local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
-	Duel.Recover(p,d,REASON_EFFECT)
-end

expansions/script/c65020215.lua

---友希兰
-if not pcall(function() require("expansions/script/c10199990") end) then require("script/c10199990") end
-local m,cm=rscf.DefineCard(65020215)
-function cm.initial_effect(c)
-	local e1=rscf.SetSummonCondition(c,nil,rsval.spconbe)
-	local e2=rsef.FTO(c,EVENT_SUMMON_SUCCESS,{m,0},{1,m},"sp,atk,def","de",LOCATION_HAND,cm.spcon,nil,rsop.target2(cm.fun,rscf.spfilter2(),"sp"),cm.spop)
-	local e5=rsef.RegisterClone(c,e2,"code",EVENT_SPSUMMON_SUCCESS)
-	local e3=rsef.SV_INDESTRUCTABLE(c,"battle")
-	local e4=rsef.QO_NEGATE(c,"neg",nil,"des",LOCATION_MZONE,rscon.negcon(cm.filter))
-end
-function cm.spcon(e,tp,eg)
-	local tc=eg:GetFirst()
-	return #eg==1 and tc:GetSummonPlayer() ~= tp and tc:IsFaceup()
-end
-function cm.fun(g,e,tp,eg)
-	Duel.SetTargetCard(eg)
-end
-function cm.spop(e,tp,eg)
-	local c=rscf.GetSelf(e)
-	local tc=rscf.GetTargetCard(Card.IsFaceup)
-	if c and rssf.SpecialSummon(c)>0 and tc then
-		local code=tc:GetOriginalCode()
-		local ba=tc:GetBaseAttack()
-		local bd=tc:GetBaseDefense()
-		local e1=Effect.CreateEffect(c)
-		e1:SetType(EFFECT_TYPE_SINGLE)
-		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
-		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-		e1:SetCode(EFFECT_CHANGE_CODE)
-		e1:SetValue(code)
-		c:RegisterEffect(e1)
-		local e2=Effect.CreateEffect(c)
-		e2:SetType(EFFECT_TYPE_SINGLE)
-		e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
-		e2:SetReset(RESET_EVENT+RESETS_STANDARD)
-		e2:SetLabelObject(e1)
-		e2:SetCode(EFFECT_SET_BASE_ATTACK)
-		e2:SetValue(ba)
-		c:RegisterEffect(e2)
-		local e3=rsef.RegisterClone(c,e2,"code",EFFECT_SET_BASE_DEFENSE,"value",bd)
-		local cid=c:CopyEffect(code,RESET_EVENT+RESETS_STANDARD,1)
-	end
-end
-function cm.filter(e,tp,re,rp)
-	return re:IsActiveType(TYPE_MONSTER) and re:GetHandler():IsAttack(e:GetHandler():GetAttack())
-end
\ No newline at end of file

expansions/script/c89380006.lua

-function c89380006.initial_effect(c)
-    c:SetUniqueOnField(1,1,89380006)
-    local e1=Effect.CreateEffect(c)
-    e1:SetCategory(CATEGORY_TOHAND)
-    e1:SetType(EFFECT_TYPE_QUICK_O)
-    e1:SetCode(EVENT_FREE_CHAIN)
-    e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
-    e1:SetRange(LOCATION_HAND)
-    e1:SetCost(c89380006.spcost)
-    e1:SetTarget(c89380006.target)
-    e1:SetOperation(c89380006.operation)
-    c:RegisterEffect(e1)
-    local e2=Effect.CreateEffect(c)
-    e2:SetType(EFFECT_TYPE_IGNITION)
-    e2:SetRange(LOCATION_SZONE)
-    e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
-    e2:SetCondition(c89380006.drcon)
-    e2:SetCost(c89380006.drcost)
-    e2:SetTarget(c89380006.drtarget)
-    e2:SetOperation(c89380006.drop)
-    c:RegisterEffect(e2)
-end
-function c89380006.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
-    if chk==0 then return e:GetHandler():IsDiscardable() end
-    Duel.SendtoGrave(e:GetHandler(),REASON_COST+REASON_DISCARD)
-end
-function c89380006.spfilter(c)
-    return c:IsSetCard(0xcc00) and not c:IsCode(89380006) and c:IsAbleToHand()
-end
-function c89380006.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-    if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c89380006.spfilter(chkc) end
-    if chk==0 then return Duel.IsExistingTarget(c89380006.spfilter,tp,LOCATION_GRAVE,0,1,nil) end
-    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-    local g=Duel.SelectTarget(tp,c89380006.spfilter,tp,LOCATION_GRAVE,0,1,1,nil)
-    Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
-end
-function c89380006.eqfilter(c)
-    return c:IsCode(89380009) and c:IsFaceup()
-end
-function c89380006.operation(e,tp,eg,ep,ev,re,r,rp)
-    local tc=Duel.GetFirstTarget()
-    if tc:IsRelateToEffect(e) then
-        Duel.SendtoHand(tc,nil,REASON_EFFECT)
-    end
-    local c=e:GetHandler()
-    if Duel.IsExistingMatchingCard(c89380006.eqfilter,tp,LOCATION_MZONE,0,1,nil) and Duel.GetLocationCount(tp,LOCATION_SZONE)>0 and c:IsLocation(LOCATION_GRAVE) and c:CheckUniqueOnField(tp) and not c:IsForbidden() and Duel.SelectYesNo(tp,aux.Stringid(89380006,0)) then
-        Duel.BreakEffect()
-        Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
-        local g=Duel.SelectMatchingCard(tp,c89380006.eqfilter,tp,LOCATION_MZONE,0,1,1,nil)
-        if not (g and Duel.Equip(tp,c,g:GetFirst(),false)) then return end
-        local e1=Effect.CreateEffect(g:GetFirst())
-        e1:SetType(EFFECT_TYPE_SINGLE)
-        e1:SetProperty(EFFECT_FLAG_OWNER_RELATE)
-        e1:SetCode(EFFECT_EQUIP_LIMIT)
-        e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-        e1:SetValue(c89380006.eqlimit)
-        c:RegisterEffect(e1)
-    end
-end
-function c89380006.eqlimit(e,c)
-    return e:GetOwner()==c
-end
-function c89380006.drcon(e,tp,eg,ep,ev,re,r,rp)
-    return e:GetHandler():IsType(TYPE_EQUIP)
-end
-function c89380006.drcost(e,tp,eg,ep,ev,re,r,rp,chk)
-    if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() end
-    Duel.SendtoGrave(e:GetHandler(),REASON_COST)
-end
-function c89380006.drfilter(c,tp)
-    return c:IsSetCard(0xcc00) and not c:IsCode(89380006) and c:CheckUniqueOnField(tp) and not c:IsForbidden()
-end
-function c89380006.drtarget(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-    if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c89380006.drfilter(chkc,tp) end
-    if chk==0 then return Duel.IsExistingTarget(c89380006.drfilter,tp,LOCATION_GRAVE,0,1,nil,tp) end
-    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
-    local g=Duel.SelectTarget(tp,c89380006.drfilter,tp,LOCATION_GRAVE,0,1,1,nil,tp)
-    Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,nil,1,tp,0)
-end
-function c89380006.drop(e,tp,eg,ep,ev,re,r,rp)
-    local tc=Duel.GetFirstTarget()
-    if tc:IsRelateToEffect(e) and Duel.IsExistingMatchingCard(c89380006.eqfilter,tp,LOCATION_MZONE,0,1,nil) and Duel.GetLocationCount(tp,LOCATION_SZONE)>0 then
-        Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
-        local g=Duel.SelectMatchingCard(tp,c89380006.eqfilter,tp,LOCATION_MZONE,0,1,1,nil)
-        if not (g and Duel.Equip(tp,tc,g:GetFirst(),false)) then return end
-        local e1=Effect.CreateEffect(g:GetFirst())
-        e1:SetType(EFFECT_TYPE_SINGLE)
-        e1:SetProperty(EFFECT_FLAG_OWNER_RELATE)
-        e1:SetCode(EFFECT_EQUIP_LIMIT)
-        e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-        e1:SetValue(c89380006.eqlimit)
-        tc:RegisterEffect(e1)
-    end
-end
\ No newline at end of file

expansions/strings.conf

@@ -236,6 +236,7 @@
 !counter 0x956 指示物（神树勇者的庭院）
 !setname 0x957 星幽
 !setname 0x3951 甜心机仆
+!setname 0x5951 虹彩偶像
 
 
 #篁楠 10 0x200-0x20f
@@ -358,6 +359,9 @@
 !setname 0xcc01 博丽（博麗）
 !setname 0xcc02 魔理沙
 !counter 0xcc10	翻车鱼指示物
+!setname 0xcc30 暴噬星皇	インペルード
+!counter 0xcc30	暴噬星皇指示物
+
 
 #廷达的信徒 150 0xf30-0xf3f
 !setname 0xf34 星拟