Break up engine/sprites.asm; address yenatch's comments

event/celebi.asm

@@ -67,7 +67,7 @@ endr
 ; 49912
 
 LoadCelebiGFX: ; 49912
-	callba Function8cf53
+	callba ClearSpriteAnims
 	ld de, SpecialCelebiLeafGFX
 	ld hl, VTiles1
 	lb bc, BANK(SpecialCelebiLeafGFX), 4

event/field_moves.asm

@@ -20,7 +20,7 @@ BlindingFlash: ; 8c7e1
 ; 8c80a
 
 ShakeHeadbuttTree: ; 8c80a
-	callba Function8cf53
+	callba ClearSpriteAnims
 	ld de, CutGrassGFX
 	ld hl, VTiles1
 	lb bc, BANK(CutGrassGFX), 4
@@ -35,7 +35,7 @@ ShakeHeadbuttTree: ; 8c80a
 	ld hl, $3
 	add hl, bc
 	ld [hl], $84
-	ld a, $90
+	ld a, 36 * 4
 	ld [wc3b5], a
 	callba DoNextFrameForAllSprites
 	call GetHeadbuttTreeRelativeLocation
@@ -50,7 +50,7 @@ ShakeHeadbuttTree: ; 8c80a
 	and a
 	jr z, .done
 	dec [hl]
-	ld a, $90
+	ld a, 36 * 4
 	ld [wc3b5], a
 	callba DoNextFrameForAllSprites
 	call DelayFrame
@@ -61,7 +61,7 @@ ShakeHeadbuttTree: ; 8c80a
 	call WaitBGMap
 	xor a
 	ld [hBGMapMode], a
-	callba Function8cf53
+	callba ClearSpriteAnims
 	ld hl, Sprites + 36 * 4
 	ld bc, SpritesEnd - (Sprites + 36 * 4)
 	xor a
@@ -136,7 +136,7 @@ OWCutAnimation: ; 8c940
 ; 8c96d
 
 .LoadCutGFX: ; 8c96d
-	callab Function8cf53 ; pointless to farcall
+	callab ClearSpriteAnims ; pointless to farcall
 	ld de, CutGrassGFX
 	ld hl, VTiles1
 	lb bc, BANK(CutGrassGFX), 4
@@ -411,7 +411,7 @@ endr
 	ret
 
 Function8cb9b: ; 8cb9b (23:4b9b)
-	callab Function8cf53
+	callab ClearSpriteAnims
 	ld de, CutGrassGFX
 	ld hl, VTiles1 tile $00
 	lb bc, BANK(CutGrassGFX), 4

event/magnet_train.asm

@@ -117,7 +117,7 @@ Function8ccc9: ; 8ccc9
 	call ClearBGPalettes
 	call ClearSprites
 	call DisableLCD
-	callab Function8cf53
+	callab ClearSpriteAnims
 	call SetMagnetTrainPals
 	call DrawMagnetTrain
 	ld a, $90

event/sweet_scent.asm

@@ -16,7 +16,7 @@ UnknownScript_0x506c8: ; 0x506c8
 	iffalse UnknownScript_0x506e9
 	checkflag ENGINE_BUG_CONTEST_TIMER
 	iftrue UnknownScript_0x506e5
-	setup_random_encounter
+	randomwildmon
 	startbattle
 	returnafterbattle
 	end