fix

expansions/script/c29001624.lua

 --方舟骑士-但书
+c29001624.named_with_Arknight=1
 function c29001624.initial_effect(c)
-	
+	--link summon
+	c:EnableReviveLimit()
+	aux.AddLinkProcedure(c,c29001624.matfilter,2,2)
+	--search
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(29001624,0))
+	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetCountLimit(1,29001624)
+	e1:SetCondition(c29001624.thcon)
+	e1:SetTarget(c29001624.thtg)
+	e1:SetOperation(c29001624.thop)
+	c:RegisterEffect(e1)
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_SINGLE)
+	e2:SetCode(EFFECT_MATERIAL_CHECK)
+	e2:SetValue(c29001624.valcheck)
+	e2:SetLabelObject(e1)
+	c:RegisterEffect(e2)
+	--Double attack
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_SINGLE)
+	e3:SetCode(EFFECT_EXTRA_ATTACK)
+	e3:SetValue(1)
+	c:RegisterEffect(e3)
+	--Double attack
+	local e4=Effect.CreateEffect(c)
+	e4:SetType(EFFECT_TYPE_FIELD)
+	e4:SetCode(EFFECT_EXTRA_ATTACK)
+	e4:SetTargetRange(LOCATION_MZONE,0)
+	e1:SetTarget(c29001624.tgtg)
+	e4:SetValue(1)
+	c:RegisterEffect(e4)
 end
+function c29001624.tgtg(e,c)
+	return e:GetHandler():GetLinkedGroup():IsContains(c)
+end
+function c29001624.matfilter(c)
+	return c:IsLinkSetCard(0x87af) or (c:IsSetCard(0x87af) or (_G["c"..c:GetCode()] and  _G["c"..c:GetCode()].named_with_Arknight))
+end
+function c29001624.mfilter(c)
+	return c:IsAttribute(ATTRIBUTE_LIGHT)
+end
+function c29001624.valcheck(e,c)
+	local g=c:GetMaterial()
+	if g:IsExists(c29001624.mfilter,1,nil) then
+		e:GetLabelObject():SetLabel(1)
+	else
+		e:GetLabelObject():SetLabel(0)
+	end
+end
+function c29001624.thfilter(c)
+	return c:IsAbleToHand() and c:IsType(TYPE_SPELL) and c.kinkuaoi_LightAK
+end
+function c29001624.thcon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK) and e:GetLabel()==1
+end
+function c29001624.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c29001624.thfilter,tp,LOCATION_DECK,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
+end
+function c29001624.thop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectMatchingCard(tp,c29001624.thfilter,tp,LOCATION_DECK,0,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.SendtoHand(g,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,g)
+	end
+end
\ No newline at end of file

expansions/script/c29016634.lua

 --方舟骑士-临光·耀骑士
-function c29016634.initial_effect(c)
-	
+local m=29016634
+local cm=_G["c"..m]
+cm.named_with_Arknight=1
+function cm.initial_effect(c)
+	aux.AddCodeList(c,29080291) 
+	c:EnableReviveLimit()
+	--spsummon condition
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e1:SetCode(EFFECT_SPSUMMON_CONDITION)
+	e1:SetValue(cm.splimit)
+	c:RegisterEffect(e1)
+	--tohand
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(m,0))
+	e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetRange(LOCATION_HAND+LOCATION_MZONE)
+	e2:SetCountLimit(1,m)
+	e2:SetTarget(cm.thtg)
+	e2:SetOperation(cm.thop)
+	c:RegisterEffect(e2)
+	--change effect
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e3:SetCode(EVENT_CHAIN_SOLVING)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetCondition(cm.chcon)
+	e3:SetOperation(cm.chop)
+	c:RegisterEffect(e3)
 end
+function cm.splimit(e,se,sp,st)
+	--if not se then return end 
+	local sc=se:GetHandler()
+	return (sc:IsSetCard(0x87af) or (_G["c"..sc:GetCode()] and  _G["c"..sc:GetCode()].named_with_Arknight)) 
+end
+function cm.filter(c)
+	return (c:IsSetCard(0x87af) or (_G["c"..c:GetCode()] and  _G["c"..c:GetCode()].named_with_Arknight))  and c:IsAttribute(ATTRIBUTE_LIGHT) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
+end
+function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_DECK,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
+end
+function cm.thop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_DECK,0,1,1,nil)
+	if g:GetCount()>0 and Duel.SendtoHand(g,nil,REASON_EFFECT)>0 and g:GetFirst():IsLocation(LOCATION_HAND) then
+		Duel.ConfirmCards(1-tp,g)
+		Duel.ShuffleDeck(tp)
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
+		local sg=Duel.SelectMatchingCard(tp,Card.IsAbleToDeck,tp,LOCATION_HAND,0,1,1,nil)
+		if sg:GetCount()>0 then
+			Duel.BreakEffect()
+			Duel.ShuffleHand(tp)
+			Duel.SendtoDeck(sg,nil,SEQ_DECKTOP,REASON_EFFECT)
+		end
+	end
+end
+function cm.chcon(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return c:IsSummonType(SUMMON_TYPE_RITUAL) and rp==1-tp and re:IsActiveType(TYPE_MONSTER+TYPE_SPELL+TYPE_TRAP) and Duel.IsPlayerCanSpecialSummonMonster(1-tp,29016635,0,TYPES_TOKEN_MONSTER,0,2500,8,RACE_WARRIOR,ATTRIBUTE_LIGHT,POS_FACEUP,1-tp) and Duel.GetLocationCount(1-tp,LOCATION_MZONE)>0 and c:GetFlagEffect(m)==0
+end
+function cm.chop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:GetFlagEffect(m)==0 and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then
+		Duel.Hint(HINT_CARD,0,m)
+		local g=Group.CreateGroup()
+		Duel.ChangeTargetCard(ev,g)
+		Duel.ChangeChainOperation(ev,cm.repop)
+		e:GetHandler():RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1)
+	end
+end
+function cm.repop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsPlayerCanSpecialSummonMonster(tp,29016635,0,TYPES_TOKEN_MONSTER,0,2500,8,RACE_WARRIOR,ATTRIBUTE_LIGHT,POS_FACEUP,tp)  then
+		local token=Duel.CreateToken(tp,29016635)
+		Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)
+	end
+end
\ No newline at end of file

expansions/script/c29081673.lua

 --方舟骑士长夜临光
-function c29081673.initial_effect(c)
+local m=29081673
+local cm=_G["c"..m]
+cm.named_with_Arknight=1
+function cm.initial_effect(c)
+	aux.AddCodeList(c,29016634)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_DECKDES)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCountLimit(1,m+EFFECT_COUNT_CODE_OATH)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.activate)
+	c:RegisterEffect(e1)
+end
+cm.kinkuaoi_LightAK=true
+function cm.filter(c,e,tp)
+	return c:IsCode(29016634)--(c:IsSetCard(0x87af) or (_G["c"..c:GetCode()] and  _G["c"..c:GetCode()].named_with_Arknight))
+end
+function cm.mfilter(c)
+	return c:GetLevel()>0 and c:IsAttribute(ATTRIBUTE_LIGHT) and (c:IsSetCard(0x87af) or (_G["c"..c:GetCode()] and  _G["c"..c:GetCode()].named_with_Arknight)) and c:IsReleasableByEffect()
+end
+function cm.RitualUltimateFilter(c,filter,e,tp,m1,m2,level_function,greater_or_equal,chk)
+	if bit.band(c:GetType(),0x81)~=0x81 or (filter and not filter(c,e,tp,chk)) or not c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_RITUAL,tp,false,true) then return false end
+	local mg=m1:Filter(Card.IsCanBeRitualMaterial,c,c)
+	if m2 then
+		mg:Merge(m2)
+	end
+	if c.mat_filter then
+		mg=mg:Filter(c.mat_filter,c,tp)
+	else
+		mg:RemoveCard(c)
+	end
+	local lv=level_function(c)
+	Auxiliary.GCheckAdditional=Auxiliary.RitualCheckAdditional(c,lv,greater_or_equal)
+	local res=mg:CheckSubGroup(Auxiliary.RitualCheck,1,lv,tp,c,lv,greater_or_equal)
+	Auxiliary.GCheckAdditional=nil
+	return res
+end
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>4 end
 	
 end
+function cm.activate(e,tp,eg,ep,ev,re,r,rp)
+	Duel.ConfirmDecktop(p,5)
+	local g=Duel.GetDecktopGroup(p,5)
+	local ct=5
+	if #g>0 then
+		local mg1=Duel.GetRitualMaterial(tp)
+		local mg2=g:Filter(cm.mfilter,nil)
+		mg1:Merge(mg2)
+		if Duel.IsExistingMatchingCard(cm.RitualUltimateFilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,nil,cm.filter,e,tp,mg1,nil,Card.GetLevel,"Greater") and Duel.SelectYesNo(tp,aux.Stringid(m,0)) then
+			Duel.BreakEffect()
+			::cancel::
+			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+			local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(cm.RitualUltimateFilter),tp,LOCATION_HAND+LOCATION_GRAVE,0,1,1,nil,cm.filter,e,tp,mg1,nil,Card.GetLevel,"Greater")
+			local tc=g:GetFirst()
+			if tc then
+				local mg=mg1:Filter(Card.IsCanBeRitualMaterial,tc,tc)
+				if tc.mat_filter then
+					mg=mg:Filter(tc.mat_filter,tc,tp)
+				else
+					mg:RemoveCard(tc)
+				end
+				Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
+				aux.GCheckAdditional=aux.RitualCheckAdditional(tc,tc:GetLevel(),"Greater")
+				local mat=mg:SelectSubGroup(tp,aux.RitualCheck,true,1,tc:GetLevel(),tp,tc,tc:GetLevel(),"Greater")
+				aux.GCheckAdditional=nil
+				if not mat then goto cancel end
+				tc:SetMaterial(mat)
+				Duel.ReleaseRitualMaterial(mat)
+				local mat1=mat:Filter(Card.IsLocation,nil,LOCATION_DECK)
+				if #mat1>0 then
+					Duel.SendtoGrave(mat1,REASON_EFFECT+REASON_RELEASE+REASON_MATERIAL)
+				end
+				Duel.BreakEffect()
+				Duel.SpecialSummon(tc,SUMMON_TYPE_RITUAL,tp,tp,false,true,POS_FACEUP)
+				tc:CompleteProcedure()
+				ct=5-#mat1
+			end
+		end
+		if ct>0 then Duel.SortDecktop(tp,tp,ct) end
+	end
+end
\ No newline at end of file

expansions/script/c33201363.lua

@@ -68,7 +68,7 @@ function cm.cfilter(c,code)
 end
 function cm.rthtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	local code=e:GetLabel()
-	if chk==0 then return Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,LOCATION_ONFIELD+LOCATION_GRAVE,1,nil,code) and c:IsAbleToHand() end
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,LOCATION_ONFIELD+LOCATION_GRAVE,1,nil,code) and e:GetHandler():IsAbleToHand() end
 	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,0,0)
 end
 function cm.rthop(e,tp,eg,ep,ev,re,r,rp)
@@ -79,6 +79,10 @@ function cm.rthop(e,tp,eg,ep,ev,re,r,rp)
 		if g:GetCount()>0 then
 			Duel.SendtoHand(g,tp,REASON_EFFECT)
 			Duel.ConfirmCards(1-tp,g)
+			if g:IsExists(Card.IsLocation,1,nil,LOCATION_HAND) then 
+				Duel.BreakEffect()
+				Duel.SendtoHand(c,tp,REASON_EFFECT)
+			end
 		end
 	end
 end

expansions/script/c53799220.lua

@@ -89,7 +89,7 @@ function cm.drop(e,tp,eg,ep,ev,re,r,rp)
 		e1:SetType(EFFECT_TYPE_SINGLE)
 		e1:SetCode(EFFECT_UPDATE_LEVEL)
 		e1:SetValue(ct)
-		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE+RESET_PHASE+PHASE_END)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
 		c:RegisterEffect(e1)
 	end
 end

expansions/script/c65130303.lua

@@ -15,20 +15,20 @@ end
 local KOISHI_CHECK=false
 if Card.SetCardData then KOISHI_CHECK=true end
 function c65130303.cfilter(c)
-	return c:GetOriginalCodeRule()==65130303
+	return c:GetOriginalCodeRule()==65130303 and  c:IsFaceup()
 end
 function c65130303.cfilter2(c,zone1,e)
 	local zone2=1<<c:GetSequence()
-	return not c:IsOriginalCodeRule(65130303) and c:GetFlagEffect(65130303)==0 and c:GetFlagEffect(65130333)==0 and zone1==zone2|zone1 and not c:IsImmuneToEffect(e) 
+	return not c:IsOriginalCodeRule(65130303) and c:GetFlagEffect(65130303)==0 and c:GetFlagEffect(65130333)==0 and zone1==zone2|zone1 and c:IsFaceup() and not c:IsImmuneToEffect(e) 
 end
 function c65130303.cfilter3(c,zc,e)
-	return not c:IsOriginalCodeRule(65130303) and c:GetFlagEffect(65130303)==0 and c:GetFlagEffect(65130333)==0  and c:GetColumnGroup():IsContains(zc) and not c:IsImmuneToEffect(e)
+	return not c:IsOriginalCodeRule(65130303) and c:GetFlagEffect(65130303)==0 and c:GetFlagEffect(65130333)==0  and c:GetColumnGroup():IsContains(zc) and c:IsFaceup() and not c:IsImmuneToEffect(e)
 end
 function c65130303.copycon(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
 	local zone=0
 	local seq=c:GetSequence()
-	if seq>0 then zone=zone|(1<<(seq-1)) end
+	if seq>0 and seq<5 then zone=zone|(1<<(seq-1)) end
 	if seq<4 then zone=zone|(1<<(seq+1)) end
 	return Duel.IsExistingMatchingCard(c65130303.cfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) 
 	and (Duel.IsExistingMatchingCard(c65130303.cfilter2,tp,LOCATION_MZONE,0,1,c,zone,e) or
@@ -53,7 +53,7 @@ function c65130303.ncopycon2(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
 	local zone=0
 	local seq=c:GetSequence()
-	if seq>0 then zone=zone|(1<<(seq-1)) end
+	if seq>0 and seq<5 then zone=zone|(1<<(seq-1)) end
 	if seq<4 then zone=zone|(1<<(seq+1)) end	
 	return not Duel.IsExistingMatchingCard(c65130303.ncfilter2,tp,LOCATION_MZONE,0,1,c,zone) and not Duel.IsExistingMatchingCard(c65130303.ncfilter3,tp,LOCATION_MZONE,LOCATION_MZONE,1,c,c) and c:GetFlagEffect(65130303)~=0 end
 function c65130303.copyop(e,tp,eg,ep,ev,re,r,rp)
@@ -61,7 +61,7 @@ function c65130303.copyop(e,tp,eg,ep,ev,re,r,rp)
 	if c:IsImmuneToEffect(e) then return end
 	local zone=0
 	local seq=c:GetSequence()
-	if seq>0 then zone=zone|(1<<(seq-1)) end
+	if seq>0 and seq<5 then zone=zone|(1<<(seq-1)) end
 	if seq<4 then zone=zone|(1<<(seq+1)) end
 	local g=Duel.GetFieldGroup(tp,LOCATION_MZONE,0):Filter(c65130303.cfilter2,c,zone,e)
 	local tg=Duel.GetFieldGroup(tp,LOCATION_MZONE,LOCATION_MZONE):Filter(c65130303.cfilter3,c,c,e)

expansions/script/c65130319.lua

@@ -56,7 +56,7 @@ function c65130319.spfilter(c,tcode,e,tp)
 	return not c:IsCode(tcode) and c:IsAttack(878) and c:IsDefense(1157) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
 end
 function c65130319.thfilter(c)
-	return c:IsAttack(878) and c:IsDefense(1157) and c:IsAbleToHand()
+	return c:IsAttack(878) and c:IsDefense(1157) and c:IsFaceup() and c:IsAbleToHand()
 end
 function c65130319.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	local c=e:GetHandler()
@@ -86,8 +86,8 @@ function c65130319.thop(e,tp,eg,ep,ev,re,r,rp)
 			e1:SetRange(LOCATION_MZONE)
 			e1:SetValue(1)
 			e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
-			sc:RegisterEffect(e1,true)		  
-			if not tc:IsType(TYPE_TRAPMONSTER) then				 
+			sc:RegisterEffect(e1,true)		
+			if not tc:IsType(TYPE_TRAPMONSTER) then			  
 				 cid=sc:CopyEffect(tcode,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,1)
 			end
 			local e3=Effect.CreateEffect(c)

expansions/script/c91020012.lua

@@ -124,6 +124,7 @@ function cm.valcheck(e,c)
 		e11:SetType(EFFECT_TYPE_SINGLE)
 		e11:SetCode(EFFECT_SET_BASE_ATTACK)
 		e11:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CANNOT_DISABLE)
+		e11:SetCondition(cm.con11)
 		e11:SetRange(LOCATION_MZONE)
 		e11:SetValue(atk)
 		e11:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD)
@@ -134,6 +135,9 @@ function cm.valcheck(e,c)
 		e2:SetValue(def)
 		c:RegisterEffect(e2)
   
+end
+function cm.con11(e,c)
+return e:GetHandler():IsCode(91020012)
 end
 function cm.ttcon1(e,c,minc)
 	if c==nil then return true end