Cat in Melissa shot with a crossbow, expected to survive