fix

expansions/script/c18700388.lua

@@ -91,6 +91,9 @@ function cm.splimit(e,c)
 end
 function cm.rmfilter(c)
 	return c:IsFaceup() and c:IsAbleToRemove() and c:IsRace(RACE_MACHINE)
+end
+	function cm.cfilter(c)
+	return aux.IsCodeListed(c,18700201) and c:IsFaceup()
 end
 function cm.rmtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and cm.rmfilter(chkc) end
@@ -113,6 +116,9 @@ function cm.rmop(e,tp,eg,ep,ev,re,r,rp)
 		e1:SetOperation(cm.retop)
 		Duel.RegisterEffect(e1,tp)
 	end
+	if Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,5,nil) and Duel.IsPlayerCanDraw(tp,1) then
+		Duel.Draw(tp,1,REASON_EFFECT)
+	end
 end
 function cm.retcon(e,tp,eg,ep,ev,re,r,rp)
 	local tc=e:GetLabelObject()