Upd 240630

expansions/lflist.conf

@@ -1686,6 +1686,26 @@
 31409206 0
 31409207 0
 31409208 0
+#Semi-Wild Blade
+260013001 0
+260013002 0
+260013003 0
+260013004 0
+260013008 0
+260013009 0
+260013010 0
+260013011 0
+260013012 0
+260013013 0
+260013015 0
+260013016 0
+260013018 0
+260013020 0
+260013024 0
+260013027 0
+260013028 0
+260013029 0
+260013035 0
 #耻辱柱
 #all 阳羽 cards
 49920003 0
@@ -2105,6 +2125,18 @@
 60362066 0
 74920585 0
 77103950 1
+#240630
+53797021 0
+57300254 0
+57300259 0
+88100600 0
+88100601 0
+88100602 0
+53797010 1
+53797032 1
+57300261 1
+53797005 2
+53797016 2
 #240616
 70002043 0
 10105695 0
@@ -3891,7 +3923,7 @@
 22060140 0
 31407001 0
 #211003
-40009593 0
+40009593 1
 9330001 0
 14000354 0
 14000366 0

expansions/script/c11633020.lua

@@ -155,7 +155,7 @@ function s.initial_effect(c)
 	e2:SetTargetRange(LOCATION_MZONE,0)
 	e2:SetTarget(aux.TargetBoolFunction(Card.IsAttribute,ATTRIBUTE_WATER))
 	e2:SetValue(function (e)
-		return Duel.GetFlagEffect(0,id)*100
+		return Duel.GetFlagEffect(0,id)*50
 	end)
 	c:RegisterEffect(e2)
 	local e3=e2:Clone()

expansions/script/c11633025.lua

@@ -195,7 +195,7 @@ function s.atkop(e,tp,eg,ep,ev,re,r,rp)
 		e1:SetType(EFFECT_TYPE_SINGLE)
 		e1:SetCode(EFFECT_UPDATE_ATTACK)
 		e1:SetValue(function (e,c)
-			if c:IsControler(tp) then return num*100 else return -100*num end
+			if c:IsControler(tp) then return num*50 else return -50*num end
 		end)
 		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
 		tc:RegisterEffect(e1)

expansions/script/c11633030.lua

@@ -190,7 +190,7 @@ function s.atkop(e,tp,eg,ep,ev,re,r,rp)
 		e1:SetType(EFFECT_TYPE_SINGLE)
 		e1:SetCode(EFFECT_UPDATE_ATTACK)
 		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
-		e1:SetValue(2000)
+		e1:SetValue(1500)
 		tc:RegisterEffect(e1)
 		local e2=Effect.CreateEffect(e:GetHandler())
 		e2:SetDescription(aux.Stringid(id,0))

expansions/script/c11633060.lua

@@ -148,14 +148,8 @@ function s.initial_effect(c)
 	e1:SetTarget(s.tdtg)
 	e1:SetOperation(s.tdop)
 	c:RegisterEffect(e1)
---
-	local e2=Effect.CreateEffect(c)
-	e2:SetType(EFFECT_TYPE_SINGLE)
-	e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
-	e2:SetRange(LOCATION_MZONE)
-	e2:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
-	e2:SetValue(aux.tgoval)
-	c:RegisterEffect(e2)
+	--can not be effect target 
+	
 	--must attack
 	local e3=Effect.CreateEffect(c)
 	e3:SetType(EFFECT_TYPE_FIELD)

expansions/script/c11638001.lua

+local m=11638001
+local cm=_G["c"..m]
+cm.name="忍者杀手"
+function cm.initial_effect(c)
+	--special summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_HAND+LOCATION_GRAVE)
+	e1:SetCountLimit(1,m)
+	e1:SetCondition(cm.spcon1)
+	e1:SetTarget(cm.sptg)
+	e1:SetOperation(cm.spop)
+	c:RegisterEffect(e1)
+	local e2=e1:Clone()
+	e2:SetType(EFFECT_TYPE_QUICK_O)
+	e2:SetCode(EVENT_FREE_CHAIN)
+	e2:SetHintTiming(0,TIMING_END_PHASE)
+	e2:SetCondition(cm.spcon2)
+	c:RegisterEffect(e2)
+	--attack all
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_SINGLE)
+	e3:SetCode(EFFECT_ATTACK_ALL)
+	e3:SetValue(cm.atkfilter)
+	c:RegisterEffect(e3)
+	--ninja all
+	local e4=Effect.CreateEffect(c)
+	e4:SetType(EFFECT_TYPE_FIELD)
+	e4:SetCode(EFFECT_ADD_SETCODE)
+	e4:SetRange(LOCATION_MZONE)
+	e4:SetTargetRange(0,LOCATION_MZONE)
+	e4:SetTarget(aux.TargetBoolFunction(Card.IsFaceup))
+	e4:SetValue(0x2b)
+	c:RegisterEffect(e4)
+	--activate from hand
+	local e5=Effect.CreateEffect(c)
+	e5:SetType(EFFECT_TYPE_FIELD)
+	e5:SetCode(EFFECT_QP_ACT_IN_NTPHAND)
+	e5:SetRange(LOCATION_MZONE)
+	e5:SetTarget(cm.ninjatg)
+	e5:SetTargetRange(LOCATION_HAND,0)
+	c:RegisterEffect(e5)
+	local e6=e5:Clone()
+	e6:SetCode(EFFECT_TRAP_ACT_IN_HAND)
+	c:RegisterEffect(e6)
+	if not cm.global_check then
+		cm.global_check=true
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_SUMMON_SUCCESS)
+		ge1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+		ge1:SetOperation(cm.sumsayop)
+		Duel.RegisterEffect(ge1,0)
+		local ge2=ge1:Clone()
+		ge2:SetCode(EVENT_SPSUMMON_SUCCESS)
+		Duel.RegisterEffect(ge2,0)
+		local ge3=Effect.CreateEffect(c)
+		ge3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge3:SetCode(EVENT_ATTACK_ANNOUNCE)
+		ge3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+		ge3:SetOperation(cm.atksayop)
+		Duel.RegisterEffect(ge3,0)
+		local ge4=Effect.CreateEffect(c)
+		ge4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge4:SetCode(EVENT_TO_GRAVE)
+		ge4:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+		ge4:SetOperation(cm.leavesayop)
+		Duel.RegisterEffect(ge4,0)
+	end
+end
+function cm.ninjafilter(c)
+	return c:IsFaceup() and c:IsSetCard(0x2b)
+end
+function cm.spcon1(e,tp,eg,ep,ev,re,r,rp)
+	return not Duel.IsExistingMatchingCard(cm.ninjafilter,tp,0,LOCATION_MZONE,1,nil)
+end
+function cm.spcon2(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.IsExistingMatchingCard(cm.ninjafilter,tp,0,LOCATION_MZONE,1,nil)
+end
+function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
+end
+function cm.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if not c:IsRelateToEffect(e) then return end
+	Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
+end
+function cm.atkfilter(e,c)
+	return c:IsFaceup() and c:IsSetCard(0x2b)
+end
+function cm.ninjatg(e,c)
+	return aux.IsCodeListed(c,11638001)
+end
+function cm.exninjafilter(c)
+	return c:IsFaceup() and c:IsSetCard(0x2b) and not c:IsCode(11638001) and not c:IsCode(11638004) and not c:IsCode(11638003)
+end
+function cm.ninjaSfilter(c)
+	return c:IsFaceup() and c:IsCode(11638001)
+end
+function cm.Yexninjafilter(c)
+	return Duel.IsExistingMatchingCard(cm.ninjaSfilter,c:GetControler(),0,LOCATION_MZONE,1,nil)
+end
+function cm.Nexninjafilter(c)
+	return not Duel.IsExistingMatchingCard(cm.ninjaSfilter,c:GetControler(),0,LOCATION_MZONE,1,nil)
+end
+function cm.sumsayop(e,tp,eg,ep,ev,re,r,rp)
+	local b1=eg:IsExists(Card.IsCode,1,nil,11638001)
+	local b2=eg:IsExists(Card.IsCode,1,nil,11638003)
+	local b3=eg:IsExists(Card.IsCode,1,nil,11638004)
+	--
+	local b4=eg:IsExists(cm.exninjafilter,1,nil)
+	--
+	if b1 then
+		if Duel.GetFlagEffect(0,11638001)==0 then
+			Debug.Message("Domo，初次见面，忍者杀手desu")
+		else
+			Debug.Message("Domo，忍者杀手desu")
+		end
+		Duel.RegisterFlagEffect(0,11638001,0,0,1)
+	end
+	if b2 then
+		Debug.Message("开始骇入。")
+	end
+	if b3 then
+		if Duel.GetFlagEffect(0,11638004)==0 then
+			Debug.Message("Domo，初次见面，矢本·小姬desu")
+		else
+			Debug.Message("Domo，矢本·小姬desu")
+		end
+		Duel.RegisterFlagEffect(0,11638004,0,0,1)
+	end
+	if b4 then
+		local tg=eg:Filter(cm.exninjafilter,nil)
+		local noninjia=tg:Filter(cm.Nexninjafilter,nil)
+		local noc=noninjia:GetFirst()
+		while noc do
+			if noc:IsAttribute(ATTRIBUTE_LIGHT) then Debug.Message("Domo，初次见面，代达罗斯desu")
+			elseif noc:IsAttribute(ATTRIBUTE_DARK) then Debug.Message("Domo，初次见面，暗黑忍者desu")
+			elseif noc:IsAttribute(ATTRIBUTE_EARTH) then Debug.Message("Domo，初次见面，地震desu")
+			elseif noc:IsAttribute(ATTRIBUTE_WATER) then Debug.Message("Domo，初次见面，水刑desu")
+			elseif noc:IsAttribute(ATTRIBUTE_FIRE) then Debug.Message("Domo，初次见面，纵火desu")
+			elseif noc:IsAttribute(ATTRIBUTE_WIND) then Debug.Message("Domo，初次见面，地狱风筝desu")
+			end
+			noc=noninjia:GetNext()
+		end
+		local yesninjia=tg:Filter(cm.Yexninjafilter,nil)
+		local yesc=yesninjia:GetFirst()
+		while yesc do
+			if yesc:IsAttribute(ATTRIBUTE_LIGHT) then Debug.Message("Domo，忍者杀手＝san，代达罗斯desu")
+			elseif yesc:IsAttribute(ATTRIBUTE_DARK) then Debug.Message("Domo，忍者杀手＝san，暗黑忍者desu")
+			elseif yesc:IsAttribute(ATTRIBUTE_EARTH) then Debug.Message("Domo，忍者杀手＝san，地震desu")
+			elseif yesc:IsAttribute(ATTRIBUTE_WATER) then Debug.Message("Domo，忍者杀手＝san，水刑desu")
+			elseif yesc:IsAttribute(ATTRIBUTE_FIRE) then Debug.Message("Domo，忍者杀手＝san，纵火desu")
+			elseif yesc:IsAttribute(ATTRIBUTE_WIND) then Debug.Message("Domo，忍者杀手＝san，地狱风筝desu")
+			end
+			yesc=yesninjia:GetNext()
+		end
+		local sg=tg:Filter(Card.IsAttribute,nil,ATTRIBUTE_DIVINE)
+		local sc=sg:GetFirst()
+		while sc do
+			Debug.Message("盛·万松是无敌！无敌！")
+			sc=sg:GetNext()
+		end
+	end
+end
+function cm.atksayop(e,tp,eg,ep,ev,re,r,rp)
+	local ac=Duel.GetAttacker()
+	local bc=Duel.GetAttackTarget()
+	local ap=ac:GetControler()
+	local bp=1-ap
+	local b1=(ac:GetAttack()>=Duel.GetLP(bp) and not bc)
+	local b2=(bc and bc:IsAttackPos() and ac:GetAttack()-bc:GetAttack()>=Duel.GetLP(bp))
+	if ac:IsCode(11638001) and not (b1 or b2) then
+		Debug.Message("咿呀！")
+	end
+	if ac:IsCode(11638001) and (b1 or b2) then
+		Debug.Message("我想要的，是汝的命！")
+		Debug.Message("Washoii！忍者杀无赦！")
+		Debug.Message("咿咿咿呀呀呀！")
+	end
+	if ac:IsCode(11638004) then
+		Debug.Message("咿呀！")
+	end
+	if ac:IsCode(11638003) then
+		Debug.Message("Take·This！")
+	end
+	if ac:IsSetCard(0x2b) and not ac:IsCode(11638001) and not ac:IsCode(11638004) and not ac:IsCode(11638003) then
+		Debug.Message("咿呀！")
+	end
+end
+function cm.leavesayfilter(c,code)
+	return c:IsPreviousLocation(LOCATION_MZONE) and c:IsCode(code)
+end
+function cm.lexninjafilter(c)
+	return c:IsPreviousLocation(LOCATION_MZONE) and c:IsPreviousSetCard(0x2b) and not c:IsCode(11638001) and not c:IsCode(11638004) and not c:IsCode(11638003)
+end
+function cm.leavesayop(e,tp,eg,ep,ev,re,r,rp)
+	local b1=eg:IsExists(cm.leavesayfilter,1,nil,11638001)
+	local b2=eg:IsExists(cm.leavesayfilter,1,nil,11638003)
+	local b3=eg:IsExists(cm.leavesayfilter,1,nil,11638004)
+	if b1 then
+		Debug.Message("咕哇！")
+	end
+	if b2 then
+		Debug.Message("AIeeee！")
+	end
+	if b3 then
+		Debug.Message("咕哇！")
+	end
+	local b4=eg:IsExists(cm.lexninjafilter,1,nil)
+	if b4 then
+		Debug.Message("撒由那拉！")
+	end
+end
\ No newline at end of file

expansions/script/c11638002.lua

+local m=11638002
+local cm=_G["c"..m]
+cm.name="奈落·忍者"
+function cm.initial_effect(c)
+	aux.AddCodeList(c,11638001)
+	c:EnableReviveLimit()
+	--cannot special summon
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_SINGLE)
+	e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e3:SetCode(EFFECT_SPSUMMON_CONDITION)
+	c:RegisterEffect(e3)
+	--code add
+	local e0=Effect.CreateEffect(c)
+	e0:SetType(EFFECT_TYPE_SINGLE)
+	e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e0:SetCode(EFFECT_ADD_CODE)
+	e0:SetRange(LOCATION_MZONE)
+	e0:SetValue(11638001)
+	c:RegisterEffect(e0)
+	--Special Summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e1:SetRange(LOCATION_GRAVE+LOCATION_HAND+LOCATION_DECK)
+	e1:SetCode(EVENT_TO_GRAVE)
+	e1:SetCondition(cm.spcon)
+	e1:SetTarget(cm.sptg)
+	e1:SetOperation(cm.spop)
+	c:RegisterEffect(e1)
+	--damage
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
+	e2:SetCode(EVENT_PHASE+PHASE_END)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCountLimit(1)
+	e2:SetTarget(cm.sp2tg)
+	e2:SetOperation(cm.sp2op)
+	c:RegisterEffect(e2)
+	if cm.counter==nil then
+		cm.counter=true
+		cm[0]=0
+		local e3=Effect.CreateEffect(c)
+		e3:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
+		e3:SetCode(EVENT_DESTROYED)
+		e3:SetOperation(cm.add1count)
+		Duel.RegisterEffect(e3,0)
+		local e4=Effect.CreateEffect(c)
+		e4:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
+		e4:SetCode(EVENT_LEAVE_FIELD)
+		e4:SetOperation(cm.add2count)
+		Duel.RegisterEffect(e4,0)
+		local e5=Effect.CreateEffect(c)
+		e5:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
+		e5:SetCode(EVENT_SPSUMMON_SUCCESS)
+		e5:SetOperation(cm.add3count)
+		Duel.RegisterEffect(e5,0)
+	end
+end
+function cm.add1count(e,tp,eg,ep,ev,re,r,rp)
+	local tc=eg:GetFirst()
+	while tc do
+		if tc:IsReason(REASON_BATTLE) and tc:GetReasonCard():IsSetCard(0x2b)
+			and tc:IsPreviousLocation(LOCATION_MZONE) and tc:IsType(TYPE_MONSTER) then
+			cm[0]=cm[0]+1
+		end
+		tc=eg:GetNext()
+	end
+end
+function cm.add2count(e,tp,eg,ep,ev,re,r,rp)
+	local tc=eg:GetFirst()
+	while tc do
+		if tc:IsReason(REASON_EFFECT) and tc:GetReasonEffect() and tc:GetReasonEffect():GetHandler():IsSetCard(0x2b) and tc:IsPreviousLocation(LOCATION_MZONE) and tc:IsType(TYPE_MONSTER) then
+			cm[0]=cm[0]+1
+		end
+		tc=eg:GetNext()
+	end
+end
+function cm.add3count(e,tp,eg,ep,ev,re,r,rp)
+	local tc=eg:GetFirst()
+	while tc do
+		local g=tc:GetMaterial()
+		if #g>0 and tc:IsSetCard(0x2b) and tc:IsSummonType(SUMMON_TYPE_SPECIAL) then
+			local ct=#g
+			cm[0]=cm[0]+ct
+		end
+		tc=eg:GetNext()
+	end
+end
+function cm.cfilter(c,tp)
+	return c:GetReasonPlayer()~=tp and c:IsOriginalCodeRule(11638001)
+end
+function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
+	return eg:IsExists(cm.cfilter,1,nil,tp)
+end
+function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,true,true) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
+end
+function cm.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,true,true,POS_FACEUP)>0 then
+		local e1=Effect.CreateEffect(e:GetHandler())
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_UPDATE_ATTACK)
+		e1:SetValue(cm[0]*100)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+		c:RegisterEffect(e1)
+		local e2=e1:Clone()
+		e2:SetCode(EFFECT_UPDATE_DEFENSE)
+		c:RegisterEffect(e2)
+	end
+end
+function cm.spfilter(c,e,tp)
+	return c:IsCode(11638001) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function cm.sp2tg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,e:GetHandler(),1,0,0)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE)
+end
+function cm.sp2op(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsRelateToEffect(e) and Duel.SendtoGrave(c,REASON_EFFECT)>0 then
+		if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+		local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(cm.spfilter),tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil,e,tp)
+		if g:GetCount()>0 then
+			Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
+		end
+	end
+	local e4=Effect.CreateEffect(c)
+	e4:SetType(EFFECT_TYPE_FIELD)
+	e4:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e4:SetCode(EFFECT_CANNOT_ACTIVATE)
+	e4:SetTargetRange(1,0)
+	e4:SetValue(cm.aclimit)
+	e4:SetReset(RESET_PHASE+PHASE_END+RESET_OPPO_TURN,3)
+	Duel.RegisterEffect(e4,tp)
+end
+function cm.aclimit(e,re,tp)
+	return re:GetOwner():IsCode(11638002)
+end
\ No newline at end of file