ybb

expansions/script/c64832008.lua

@@ -75,20 +75,22 @@ function c64832008.costfil(c)
 	return c:IsSetCard(0x6410) and c:IsType(TYPE_MONSTER) and c:IsDiscardable(REASON_COST)
 end
 function c64832008.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return e:GetHandler():IsDiscardable(REASON_COST) and Duel.IsExistingMatchingCard(c64832008.costfil,tp,LOCATION_HAND,0,1,e:GetHandler()) end
+	e:SetLabel(100)
+	return true
+end
+function c64832008.tg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then
+		if e:GetLabel()~=100 then return false end
+		e:SetLabel(0)
+		return ft>-1 and e:GetHandler():IsDiscardable(REASON_COST) and Duel.IsExistingMatchingCard(c64832008.costfil,tp,LOCATION_HAND,0,1,e:GetHandler()) and Duel.IsPlayerCanDraw(tp,2)
+	end
 	local g=Duel.SelectMatchingCard(tp,c64832008.costfil,tp,LOCATION_HAND,0,1,1,e:GetHandler())
-	if g:GetFirst():IsCode(65010094,65010095) then e:SetLabel(1) end
+	if g:GetFirst():IsCode(65010094,65010095) then Duel.SetChainLimit(c64832008.chlimit) end
 	g:AddCard(e:GetHandler())
 	Duel.SendtoGrave(g,REASON_COST+REASON_DISCARD)
-end
-function c64832008.tg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsPlayerCanDraw(tp,2) end
 	Duel.SetTargetPlayer(tp)
 	Duel.SetTargetParam(2)
 	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,2)
-	if e:GetLabel()==1 then
-		Duel.SetChainLimit(c64832008.chlimit)
-	end
 end
 function c64832008.chlimit(e,ep,tp)
 	return tp==ep