tnndx

expansions/script/c65010004.lua

@@ -5,16 +5,14 @@ local cm=_G["c"..m]
 function cm.initial_effect(c)
 	aux.AddCodeList(c,65010001)
 	local e1=rsef.ACT(c)
-	local e2=rsef.QO(c,nil,{m,0},{1,m},nil,nil,LOCATION_SZONE,nil,rscost.cost({aux.FilterBoolFunction(Card.IsCode,65010001),"res",LOCATION_MZONE }),nil,cm.op)
+	local e2=rsef.QO(c,nil,{m,0},{1,m},nil,nil,LOCATION_SZONE,nil,rscost.cost(aux.FilterBoolFunction(Card.IsCode,65010001),"res",LOCATION_MZONE ),nil,cm.op)
 	local f=function(rc)
 		return aux.IsCodeListed(rc,65010001)
 	end
-	local e3=rsef.QO(c,nil,{m,1},{1,m+100},"atk,dis","tg",LOCATION_SZONE,nil,rscost.cost({f,"td",LOCATION_GRAVE }),cm.tg2,cm.op2)
+	local e3=rsef.QO(c,nil,{m,1},{1,m+100},"atk,dis","tg",LOCATION_SZONE,nil,rscost.cost(f,"td",LOCATION_GRAVE ),rstg.target2(cm.regfun,Card.IsFaceup,"atk",LOCATION_MZONE,LOCATION_MZONE),cm.op2)
 end
-function cm.tg2(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if chk==0 or chkc then return rstg.TargetCheck(e,tp,eg,ep,ev,re,r,rp,chk,chkc,{Card.IsFaceup,"atk",LOCATION_MZONE,LOCATION_MZONE }) end
-	rstg.TargetSelect(e,tp,eg,ep,ev,re,r,rp,{Card.IsFaceup,"atk",LOCATION_MZONE,LOCATION_MZONE })
-	if rscon.excard(rscf.FilterFaceUp(Card.IsCode,65010001))(e) then
+function cm.regfun(g,e,tp
+	if rscon.excard2(Card.IsCode,LOCATION_MZONE,0,1,nil,65010001)(e) then
 		e:SetLabel(1)
 	else
 		e:SetLabel(0)