fix

expansions/lflist.conf

@@ -2941,7 +2941,6 @@
 91300025 0 --未知：猎兽之王
 11771765 0 --承继之契约
 88881027 0 --骷界王战 加尔塞力克王
-14000020 0 --时穿剑阵·破军
 60002414 0 --瀚海晏霞 兰生幽谷
 22022780 0 --人理之基 迦尔纳
 11561078 0 --银河眼统合龙
@@ -6927,7 +6926,6 @@
 13000751 2
 13000753 2
 13020032 2
-14000020 0
 40011441 0
 43990091 0
 43990093 0

expansions/script/c14000020.lua

---时穿剑阵·破军
-local m=14000020
-local cm=_G["c"..m]
-cm.named_with_Chronoblade=1
-xpcall(function() require("expansions/script/c14000001") end,function() require("script/c14000001") end)
-function cm.initial_effect(c)
-	--link summon
-	aux.AddLinkProcedure(c,nil,5,5,cm.lcheck)
-	c:EnableReviveLimit()
-	--chrbeffects
-	chrb.dire(c,true,5)
-	chrb.ChronoDamageEffect(c,nil,EFFECT_FLAG_CARD_TARGET,nil,nil,cm.atktg,cm.atkop,nil,true)
-end
-function cm.lcheck(g,lc)
-	return g:GetClassCount(Card.GetCode)==#g
-end
-function cm.atktg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) end
-	if chk==0 then return true end
-	Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(m,1))
-	Duel.SelectTarget(tp,nil,tp,LOCATION_MZONE,0,1,1,nil)
-	Duel.SetOperationInfo(0,CATEGORY_ATKCHANGE,nil,1,tp,LOCATION_MZONE)
-end
-function cm.atkop(e,tp,eg,ep,ev,re,r,rp)
-	chrb.move(e,tp,eg,ep,ev,re,r,rp,true)
-	local c,tc=e:GetHandler(),Duel.GetFirstTarget()
-	if tc:IsFaceup() and tc:IsRelateToEffect(e) then
-		Duel.BreakEffect()
-		local e1=Effect.CreateEffect(c)
-		e1:SetType(EFFECT_TYPE_SINGLE)
-		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
-		e1:SetCode(EFFECT_EXTRA_ATTACK)
-		e1:SetValue(1)
-		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
-		tc:RegisterEffect(e1)
-	end
-end
\ No newline at end of file

expansions/script/c98500507.lua

@@ -34,17 +34,18 @@ function s.initial_effect(c)
 	c:RegisterEffect(e2)
 	--token
 	local e3=Effect.CreateEffect(c)
-	e3:SetDescription(aux.Stringid(98500507,0))
+	e3:SetDescription(aux.Stringid(40844552,0))
 	e3:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN)
 	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e3:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetCountLimit(1,m)
 	e3:SetProperty(EFFECT_FLAG_DELAY)
 	e3:SetTarget(s.target)
 	e3:SetOperation(s.operation)
 	c:RegisterEffect(e3)
 	--lv change
 	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(98500507,0))
+	e1:SetDescription(aux.Stringid(26082117,0))
 	e1:SetType(EFFECT_TYPE_IGNITION)
 	e1:SetCountLimit(1)
 	e1:SetRange(LOCATION_MZONE)
@@ -92,22 +93,27 @@ function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function s.operation(e,tp,eg,ep,ev,re,r,rp)
 	if not Duel.IsPlayerCanSpecialSummonMonster(tp,40844553,0,TYPES_TOKEN_MONSTER,1000,1000,4,RACE_WARRIOR,ATTRIBUTE_EARTH,POS_FACEUP_DEFENSE) then return end
-	if Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_MZONE,0,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(id,1)) then
+	local b1=Duel.IsExistingMatchingCard(Card.IsDiscardable,tp,LOCATION_HAND,0,1,nil) and Duel.IsPlayerCanSpecialSummonMonster(tp,40844553,0,TYPES_TOKEN_MONSTER,1000,1000,4,RACE_WARRIOR,ATTRIBUTE_EARTH,POS_FACEUP_DEFENSE)
+	local b2=Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_GRAVE,0,1,nil) and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_MZONE,0,1,nil) and Duel.IsPlayerCanSpecialSummonMonster(tp,40844553,0,TYPES_TOKEN_MONSTER,1000,1000,4,RACE_WARRIOR,ATTRIBUTE_EARTH,POS_FACEUP_DEFENSE)
+	local op=aux.SelectFromOptions(tp,
+		{b1,aux.Stringid(id,0)},
+		{b2,aux.Stringid(id,1)})
+	if op==1 then
 		local ft=math.min((Duel.GetLocationCount(tp,LOCATION_MZONE)),2)
 		if Duel.IsPlayerAffectedByEffect(tp,59822133) then ft=1 end
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
-		local g=Duel.SelectMatchingCard(tp,s.cfilter,tp,LOCATION_GRAVE,0,1,ft,nil)
-		local ct=Duel.Remove(g,POS_FACEUP,REASON_COST)
+		local ct=Duel.DiscardHand(tp,Card.IsDiscardable,1,ft,REASON_COST+REASON_DISCARD,nil)
 		repeat
 		local token=Duel.CreateToken(tp,40844553)
 		Duel.SpecialSummonStep(token,0,tp,tp,false,false,POS_FACEUP_DEFENSE)
 		ct=ct-1
 		until ct==0
 		Duel.SpecialSummonComplete()
-	else
+	elseif op==2 then
 		local ft=math.min((Duel.GetLocationCount(tp,LOCATION_MZONE)),2)
 		if Duel.IsPlayerAffectedByEffect(tp,59822133) then ft=1 end
-		local ct=Duel.DiscardHand(tp,Card.IsDiscardable,1,ft,REASON_COST+REASON_DISCARD,nil)
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
+		local g=Duel.SelectMatchingCard(tp,s.cfilter,tp,LOCATION_GRAVE,0,1,ft,nil)
+		local ct=Duel.Remove(g,POS_FACEUP,REASON_COST)
 		repeat
 		local token=Duel.CreateToken(tp,40844553)
 		Duel.SpecialSummonStep(token,0,tp,tp,false,false,POS_FACEUP_DEFENSE)
@@ -119,7 +125,7 @@ end
 function s.tg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return true end
 	local lv=e:GetHandler():GetLevel()
-	Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(98500507,1))
+	Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(26082117,1))
 	e:SetLabel(Duel.AnnounceLevel(tp,1,6,lv))
 end
 function s.op(e,tp,eg,ep,ev,re,r,rp)