Add WithHarvesterSpriteBody

And move PrefixByFullness there.
Also put it into Mods.Cnc, as RA is the only shipping mod
using this.

mods/ra/rules/vehicles.yaml

@@ -320,7 +320,6 @@ HARV:
 	RevealsShroud:
 		Range: 4c0
 	WithHarvestAnimation:
-		PrefixByFullness: empty-, half-, full-
 	WithDockingAnimation:
 	GpsDot:
 		String: Harvester
@@ -337,6 +336,9 @@ HARV:
 	Explodes:
 		RequiresCondition: !no-ore
 		Weapon: OreExplosion
+	WithHarvesterSpriteBody:
+		ImageByFullness: harvempty, harvhalf, harv
+	-WithFacingSpriteBody:
 
 MCV:
 	Inherits: ^Vehicle

mods/ra/sequences/vehicles.yaml

@@ -17,43 +17,28 @@ truk:
 	icon: trukicon
 
 harv:
-	idle: harvempty
+	idle:
 		Facings: 32
 		UseClassicFacingFudge: True
-	harvest: harvempty
+	harvest:
 		Start: 32
 		Length: 8
 		Facings: 8
-	empty-idle: harvempty
-		Facings: 32
-		UseClassicFacingFudge: True
-	empty-harvest: harvempty
-		Start: 32
-		Length: 8
-		Facings: 8
-	half-idle: harvhalf
-		Facings: 32
-		UseClassicFacingFudge: True
-	half-harvest: harvhalf
-		Start: 32
-		Length: 8
-		Facings: 8
-	full-idle:
-		Facings: 32
-		UseClassicFacingFudge: True
-	full-harvest:
-		Start: 32
-		Length: 8
-		Facings: 8
-	dock:
+	dock: harv
 		Start: 96
 		Length: 8
-	dock-loop:
+	dock-loop: harv
 		Start: 104
 		Length: 7
 	icon: harvicon
 		Start: 0
 
+harvempty:
+	Inherits: harv
+
+harvhalf:
+	Inherits: harv
+
 hhusk:
 	idle:
 		Facings: 32