Split out map object code.

1 files changed, 1 insertions, 3682 deletions

diff --git a/main.asm b/main.asm
index 77ff826bc..52affc04e 100644
--- a/main.asm
+++ b/main.asm
@@ -56,3688 +56,7 @@ PushOAMEnd
 ; 4049
 
 
-INCLUDE "engine/facings.asm"
-
-
-Data4273:: ; 4273
-	db $00, $00, $01, $02, $00, $00
-	db $06, $00, $01, $0c, $00, $00
-	db $03, $00, $01, $00, $00, $00
-	db $04, $00, $01, $00, $00, $00
-	db $01, $00, $01, $00, $00, $00
-	db $02, $00, $01, $00, $00, $00
-	db $06, $00, $01, $00, $00, $00
-	db $06, $01, $01, $00, $00, $00
-	db $06, $02, $01, $00, $00, $00
-	db $06, $03, $01, $00, $00, $00
-	db $05, $00, $01, $00, $00, $00
-	db $07, $00, $01, $02, $00, $00
-	db $08, $00, $01, $00, $00, $00
-	db $09, $00, $01, $00, $00, $00
-	db $0a, $00, $01, $00, $00, $00
-	db $0b, $00, $01, $00, $00, $00
-	db $0c, $00, $01, $00, $00, $00
-	db $0d, $00, $01, $00, $00, $00
-	db $0e, $00, $01, $00, $00, $00
-	db $0f, $00, $01, $02, $00, $00
-	db $10, $00, $01, $02, $00, $00
-	db $15, $00, $09, $2e, $01, $c0
-	db $16, $00, $0a, $2e, $00, $00
-	db $06, $00, $01, $0c, $00, $00
-	db $06, $00, $01, $2e, $10, $00
-	db $11, $00, $01, $2e, $00, $40
-	db $12, $00, $01, $02, $00, $00
-	db $13, $00, $00, $8e, $01, $00
-	db $14, $00, $08, $8e, $02, $00
-	db $17, $00, $00, $82, $00, $00
-	db $19, $02, $01, $00, $00, $00
-	db $18, $03, $01, $00, $00, $00
-	db $11, $00, $0c, $2e, $01, $c0
-	db $11, $00, $0d, $2e, $01, $c0
-	db $1a, $00, $0e, $8e, $01, $00
-	db $1b, $00, $0f, $8e, $02, $00
-	db $03, $00, $01, $00, $00, $20
-	db $00, $00, $01, $00, $00, $00
-; 4357
-
-
-Function4357:: ; 4357
-	push bc
-	ld hl, OBJECT_01
-	add hl, bc
-	ld a, [hl]
-	push af
-	ld h, b
-	ld l, c
-	ld bc, ObjectStruct2 - ObjectStruct1
-	xor a
-	call ByteFill
-	pop af
-	cp $ff
-	jr z, .asm_4379
-	bit 7, a
-	jr nz, .asm_4379
-	call GetMapObject
-	ld hl, OBJECT_00
-	add hl, bc
-	ld [hl], $ff
-
-.asm_4379
-	pop bc
-	ret
-; 437b
-
-Function437b: ; 437b
-	call Function4386
-	ret c
-	call Function43f3
-	call Function4427
-	ret
-; 4386
-
-Function4386: ; 4386
-	ld hl, OBJECT_FLAGS
-	add hl, bc
-	res 6, [hl]
-	ld a, [XCoord]
-	ld e, a
-	ld hl, OBJECT_MAP_X
-	add hl, bc
-	ld a, [hl]
-	add $1
-	sub e
-	jr c, .asm_43b2
-	cp $c
-	jr nc, .asm_43b2
-	ld a, [YCoord]
-	ld e, a
-	ld hl, OBJECT_MAP_Y
-	add hl, bc
-	ld a, [hl]
-	add $1
-	sub e
-	jr c, .asm_43b2
-	cp $b
-	jr nc, .asm_43b2
-	jr .asm_43dc
-
-.asm_43b2
-	ld hl, OBJECT_FLAGS
-	add hl, bc
-	set 6, [hl]
-	ld a, [XCoord]
-	ld e, a
-	ld hl, OBJECT_20
-	add hl, bc
-	ld a, [hl]
-	add $1
-	sub e
-	jr c, .asm_43de
-	cp $c
-	jr nc, .asm_43de
-	ld a, [YCoord]
-	ld e, a
-	ld hl, OBJECT_21
-	add hl, bc
-	ld a, [hl]
-	add $1
-	sub e
-	jr c, .asm_43de
-	cp $b
-	jr nc, .asm_43de
-
-.asm_43dc
-	and a
-	ret
-
-.asm_43de
-	ld hl, OBJECT_04
-	add hl, bc
-	bit 1, [hl]
-	jr nz, .asm_43eb
-	call Function4357
-	scf
-	ret
-
-.asm_43eb
-	ld hl, OBJECT_FLAGS
-	add hl, bc
-	set 6, [hl]
-	and a
-	ret
-; 43f3
-
-Function43f3: ; 43f3
-	ld hl, OBJECT_09
-	add hl, bc
-	ld a, [hl]
-	and a
-	jr z, .asm_4409
-	ld hl, OBJECT_FLAGS
-	add hl, bc
-	bit 5, [hl]
-	jr nz, .asm_4426
-	cp $1
-	jr z, .asm_4414
-	jr .asm_4421
-
-.asm_4409
-	call Function47bc
-	ld hl, OBJECT_FLAGS
-	add hl, bc
-	bit 5, [hl]
-	jr nz, .asm_4426
-
-.asm_4414
-	call Function47dd
-	ld hl, OBJECT_09
-	add hl, bc
-	ld a, [hl]
-	and a
-	ret z
-	cp $1
-	ret z
-
-.asm_4421
-	ld hl, Pointers4b45
-	rst JumpTable
-	ret
-
-.asm_4426
-	ret
-; 4427
-
-Function4427: ; 4427
-	ld hl, OBJECT_04
-	add hl, bc
-	bit 0, [hl]
-	jr nz, Function44a3
-
-	ld hl, OBJECT_FLAGS
-	add hl, bc
-	bit 6, [hl]
-	jr nz, Function44a3
-
-	bit 5, [hl]
-	jr nz, Function4448
-
-	ld de, Pointers445f
-	jr Function444d
-; 4440
-
-Function4440: ; 4440
-	ld hl, OBJECT_04
-	add hl, bc
-	bit 0, [hl]
-	jr nz, Function44a3
-	; fallthrough
-; 4448
-
-Function4448: ; 4448
-	ld de, Pointers445f + 2
-	jr Function444d
-; 444d
-
-Function444d: ; 444d
-	ld hl, OBJECT_11
-	add hl, bc
-	ld a, [hl]
-	ld l, a
-	ld h, 0
-	add hl, hl
-	add hl, hl
-	add hl, de
-	ld a, [hli]
-	ld h, [hl]
-	ld l, a
-	call _hl_
-	ret
-; 445f
-
-Pointers445f: ; 445f
-	dw Function44a3
-	dw Function44a3
-	dw Function44b5
-	dw Function44aa
-	dw Function44c1
-	dw Function44aa
-	dw Function4508
-	dw Function44aa
-	dw Function4529
-	dw Function44aa
-	dw Function4539
-	dw Function44a3
-	dw Function456e
-	dw Function456e
-	dw Function457b
-	dw Function44a3
-	dw Function4582
-	dw Function4582
-	dw Function4589
-	dw Function4589
-	dw Function4590
-	dw Function45a4
-	dw Function45ab
-	dw Function44aa
-	dw Function45be
-	dw Function45be
-	dw Function45c5
-	dw Function45c5
-	dw Function45da
-	dw Function44a3
-	dw Function45ed
-	dw Function44a3
-	dw Function44e4
-	dw Function44aa
-; 44a3
-
-Function44a3: ; 44a3
-	ld hl, OBJECT_FACING
-	add hl, bc
-	ld [hl], $ff
-	ret
-; 44aa
-
-Function44aa: ; 44aa
-	call GetSpriteDirection
-	or $0
-	ld hl, OBJECT_FACING
-	add hl, bc
-	ld [hl], a
-	ret
-; 44b5
-
-Function44b5: ; 44b5
-	ld hl, OBJECT_FACING
-	add hl, bc
-	ld a, [hl]
-	and $1
-	jr nz, Function44c1
-	jp Function44aa
-; 44c1
-
-Function44c1: ; 44c1
-	ld hl, OBJECT_04
-	add hl, bc
-	bit 3, [hl]
-	jp nz, Function44aa
-	ld hl, OBJECT_12
-	add hl, bc
-	ld a, [hl]
-	inc a
-	and $f
-	ld [hl], a
-	rrca
-	rrca
-	and $3
-	ld d, a
-	call GetSpriteDirection
-	or $0
-	or d
-	ld hl, OBJECT_FACING
-	add hl, bc
-	ld [hl], a
-	ret
-; 44e4
-
-Function44e4: ; 44e4
-	ld hl, OBJECT_04
-	add hl, bc
-	bit 3, [hl]
-	jp nz, Function44aa
-	ld hl, OBJECT_12
-	add hl, bc
-	ld a, [hl]
-	add $2
-	and $f
-	ld [hl], a
-	rrca
-	rrca
-	and $3
-	ld d, a
-	call GetSpriteDirection
-	or $0
-	or d
-	ld hl, OBJECT_FACING
-	add hl, bc
-	ld [hl], a
-	ret
-; 4508
-
-Function4508: ; 4508
-	ld hl, OBJECT_04
-	add hl, bc
-	bit 3, [hl]
-	jp nz, Function44aa
-	ld hl, OBJECT_12
-	add hl, bc
-	inc [hl]
-	ld a, [hl]
-	rrca
-	rrca
-	rrca
-	and $3
-	ld d, a
-	call GetSpriteDirection
-	or $0
-	or d
-	ld hl, OBJECT_FACING
-	add hl, bc
-	ld [hl], a
-	ret
-; 4529
-
-Function4529: ; 4529
-	call Function453f
-	ld hl, OBJECT_08
-	add hl, bc
-	ld a, [hl]
-	or $0
-	ld hl, OBJECT_FACING
-	add hl, bc
-	ld [hl], a
-	ret
-; 4539
-
-Function4539: ; 4539
-	call Function453f
-	jp Function44a3
-; 453f
-
-Function453f: ; 453f
-	ld hl, OBJECT_12
-	add hl, bc
-	ld a, [hl]
-	and $f0
-	ld e, a
-	ld a, [hl]
-	inc a
-	and $f
-	ld d, a
-	cp $4
-	jr c, .asm_4558
-	ld d, 0
-	ld a, e
-	add $10
-	and $30
-	ld e, a
-
-.asm_4558
-	ld a, d
-	or e
-	ld [hl], a
-	swap e
-	ld d, 0
-	ld hl, .Directions
-	add hl, de
-	ld a, [hl]
-	ld hl, OBJECT_08
-	add hl, bc
-	ld [hl], a
-	ret
-; 456a
-
-.Directions ; 456a
-	db $00, $0c, $04, $08
-; 456e
-
-Function456e: ; 456e
-	call GetSpriteDirection
-	rrca
-	rrca
-	add $10
-	ld hl, OBJECT_FACING
-	add hl, bc
-	ld [hl], a
-	ret
-; 457b
-
-Function457b: ; 457b
-	ld hl, OBJECT_FACING
-	add hl, bc
-	ld [hl], $15
-	ret
-; 4582
-
-Function4582: ; 4582
-	ld hl, OBJECT_FACING
-	add hl, bc
-	ld [hl], $14
-	ret
-; 4589
-
-Function4589: ; 4589
-	ld hl, OBJECT_FACING
-	add hl, bc
-	ld [hl], $17
-	ret
-; 4590
-
-Function4590: ; 4590
-	ld hl, OBJECT_12
-	add hl, bc
-	ld a, [hl]
-	inc a
-	and $f
-	ld [hl], a
-	and $8
-	jr z, Function45a4
-	ld hl, OBJECT_FACING
-	add hl, bc
-	ld [hl], $4
-	ret
-; 45a4
-
-Function45a4: ; 45a4
-	ld hl, OBJECT_FACING
-	add hl, bc
-	ld [hl], $0
-	ret
-; 45ab
-
-Function45ab: ; 45ab
-	ld hl, OBJECT_12
-	add hl, bc
-	ld a, [hl]
-	inc a
-	ld [hl], a
-	and $c
-	rrca
-	rrca
-	add $18
-	ld hl, OBJECT_FACING
-	add hl, bc
-	ld [hl], a
-	ret
-; 45be
-
-Function45be: ; 45be
-	ld hl, OBJECT_FACING
-	add hl, bc
-	ld [hl], $16
-	ret
-; 45c5
-
-Function45c5: ; 45c5
-	ld a, [VariableSprites + 3]
-	ld d, $17
-	cp $33
-	jr z, .asm_45d4
-	cp $47
-	jr z, .asm_45d4
-	ld d, $16
-
-.asm_45d4
-	ld hl, OBJECT_FACING
-	add hl, bc
-	ld [hl], d
-	ret
-; 45da
-
-Function45da: ; 45da
-	ld hl, OBJECT_12
-	add hl, bc
-	inc [hl]
-	ld a, [hl]
-
-	ld hl, OBJECT_FACING
-	add hl, bc
-	and 2
-	ld a, $1c
-	jr z, .asm_45eb
-	inc a
-.asm_45eb
-	ld [hl], a
-	ret
-; 45ed
-
-Function45ed: ; 45ed
-	ld hl, OBJECT_12
-	add hl, bc
-	inc [hl]
-	ld a, [hl]
-	ld hl, OBJECT_FACING
-	add hl, bc
-	and 4
-	ld a, $1e
-	jr z, .asm_45fe
-	inc a
-
-.asm_45fe
-	ld [hl], a
-	ret
-; 4600
-
-Function4600: ; 4600
-
-	ld hl, OBJECT_MAP_X
-	add hl, bc
-	ld a, [hl]
-	ld hl, OBJECT_NEXT_MAP_X
-	add hl, bc
-	ld [hl], a
-
-	ld hl, OBJECT_MAP_Y
-	add hl, bc
-	ld a, [hl]
-	ld hl, OBJECT_NEXT_MAP_Y
-	add hl, bc
-	ld [hl], a
-
-	ld hl, OBJECT_STANDING_TILE
-	add hl, bc
-	ld a, [hl]
-	ld hl, OBJECT_NEXT_TILE
-	add hl, bc
-	ld [hl], a
-
-	call Function4661
-	ld hl, OBJECT_STANDING_TILE
-	add hl, bc
-	ld a, [hl]
-
-	call Function4679
-	ret
-; 462a
-
-Function462a: ; 462a
-
-	ld hl, OBJECT_NEXT_MAP_X
-	add hl, bc
-	ld a, [hl]
-	ld hl, OBJECT_MAP_X
-	add hl, bc
-	ld [hl], a
-
-	ld hl, OBJECT_NEXT_MAP_Y
-	add hl, bc
-	ld a, [hl]
-	ld hl, OBJECT_MAP_Y
-	add hl, bc
-	ld [hl], a
-
-	ret
-; 463f
-
-Function463f: ; 463f
-	ld hl, OBJECT_FLAGS
-	add hl, bc
-	bit 3, [hl]
-	jr z, .asm_464f
-	ld hl, OBJECT_STANDING_TILE
-	add hl, bc
-	ld a, [hl]
-	call Function4661
-
-.asm_464f
-	ld hl, OBJECT_STANDING_TILE
-	add hl, bc
-	ld a, [hl]
-	call Function4679
-	ret c
-	ld hl, OBJECT_NEXT_TILE
-	add hl, bc
-	ld a, [hl]
-	call Function4679
-	ret
-; 4661
-
-Function4661: ; 4661
-	call Function188e
-	jr z, .asm_466b
-	call Function1875
-	jr c, .asm_4672
-
-.asm_466b
-	ld hl, OBJECT_FLAGS
-	add hl, bc
-	set 3, [hl]
-	ret
-
-.asm_4672
-	ld hl, OBJECT_FLAGS
-	add hl, bc
-	res 3, [hl]
-	ret
-; 4679
-
-Function4679: ; 4679
-	and a
-	ret
-; 467b
-
-Function467b: ; 467b
-	xor a
-	ld hl, OBJECT_12
-	add hl, bc
-	ld [hl], a
-	ld hl, OBJECT_27
-	add hl, bc
-	ld [hli], a
-	ld [hli], a
-	ld [hli], a
-	ld [hl], a
-	ld hl, OBJECT_07
-	add hl, bc
-	ld [hl], $ff
-	ret
-; 4690
-
-Function4690: ; 4690
-	ld hl, OBJECT_07
-	add hl, bc
-	ld [hl], a
-	ld hl, OBJECT_04
-	add hl, bc
-	bit 2, [hl]
-	jr nz, .asm_46a6
-
-	add a
-	add a
-	and $c
-	ld hl, OBJECT_08
-	add hl, bc
-	ld [hl], a
-
-.asm_46a6
-	; fallthrough
-; 46a6
-
-Function46a6: ; 46a6
-
-	call GetStepVector
-
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	ld [hl], a
-
-	ld a, d
-	call Function4730
-	ld hl, OBJECT_NEXT_MAP_X
-	add hl, bc
-	add [hl]
-	ld hl, OBJECT_MAP_X
-	add hl, bc
-	ld [hl], a
-	ld d, a
-
-	ld a, e
-	call Function4730
-	ld hl, OBJECT_NEXT_MAP_Y
-	add hl, bc
-	add [hl]
-	ld hl, OBJECT_MAP_Y
-	add hl, bc
-	ld [hl], a
-	ld e, a
-
-	push bc
-	call Function2a3c
-	pop bc
-
-	ld hl, OBJECT_STANDING_TILE
-	add hl, bc
-	ld [hl], a
-
-	ret
-; 46d7
-
-Function46d7: ; 46d7
-
-	call GetStepVector
-
-	ld hl, OBJECT_SPRITE_X
-	add hl, bc
-	ld a, [hl]
-	add d
-	ld [hl], a
-
-	ld hl, OBJECT_SPRITE_Y
-	add hl, bc
-	ld a, [hl]
-	add e
-	ld [hl], a
-
-	ret
-; 46e9
-
-GetStepVector: ; 46e9
-; Return (x, y, duration, speed) in (d, e, a, h).
-	ld hl, OBJECT_07
-	add hl, bc
-	ld a, [hl]
-	and $f
-	add a
-	add a
-	ld l, a
-	ld h, 0
-	ld de, StepVectors
-	add hl, de
-	ld d, [hl]
-	inc hl
-	ld e, [hl]
-	inc hl
-	ld a, [hli]
-	ld h, [hl]
-	ret
-; 4700
-
-StepVectors: ; 4700
-; x,  y, duration, speed
-	; slow
-	db  0,  1, 16, 1
-	db  0, -1, 16, 1
-	db -1,  0, 16, 1
-	db  1,  0, 16, 1
-	; normal
-	db  0,  2,  8, 2
-	db  0, -2,  8, 2
-	db -2,  0,  8, 2
-	db  2,  0,  8, 2
-	; fast
-	db  0,  4,  4, 4
-	db  0, -4,  4, 4
-	db -4,  0,  4, 4
-	db  4,  0,  4, 4
-; 4730
-
-Function4730: ; 4730
-	add a
-	ret z
-	ld a, 1
-	ret nc
-	ld a, -1
-	ret
-; 4738
-
-Function4738: ; 4738
-	ld hl, OBJECT_07
-	add hl, bc
-	ld a, [hl]
-	and $3
-	ld [wd151], a
-	call Function46d7
-	ld a, [wd14e]
-	add d
-	ld [wd14e], a
-	ld a, [wd14f]
-	add e
-	ld [wd14f], a
-	ld hl, wd150
-	set 5, [hl]
-	ret
-; 4759
-
-Function4759: ; 4759
-	push bc
-	ld e, a
-	ld d, 0
-	ld hl, OBJECT_01
-	add hl, bc
-	ld a, [hl]
-	call GetMapObject
-	add hl, de
-	ld a, [hl]
-	pop bc
-	ret
-; 4769
-
-Function4769: ; 4769
-	ld hl, OBJECT_01
-	add hl, bc
-	ld a, [hl]
-	cp $ff
-	jr z, .asm_477d
-	push bc
-	call GetMapObject
-	ld hl, $0004
-	add hl, bc
-	ld a, [hl]
-	pop bc
-	ret
-
-.asm_477d
-	ld a, $6
-	ret
-; 4780
-
-Function4780: ; 4780
-	ld hl, OBJECT_27
-	add hl, bc
-	ld [hl], $0
-	ret
-; 4787
-
-Function4787: ; 4787
-	ld hl, OBJECT_27
-	add hl, bc
-	inc [hl]
-	ret
-; 478d
-
-Function478d: ; 478d
-	ld hl, OBJECT_27
-	add hl, bc
-	dec [hl]
-	ret
-; 4793
-
-Function4793: ; 4793
-	ld hl, OBJECT_27
-	add hl, bc
-	ld a, [hl]
-	pop hl
-	rst JumpTable
-	ret
-; 479b
-
-Function479b: ; 479b
-	ld hl, OBJECT_28
-	add hl, bc
-	ld [hl], $0
-	ret
-; 47a2
-
-Function47a2: ; 47a2
-	ld hl, OBJECT_28
-	add hl, bc
-	inc [hl]
-	ret
-; 47a8
-
-Function47a8: ; 47a8
-	ld hl, OBJECT_28
-	add hl, bc
-	ld a, [hl]
-	pop hl
-	rst JumpTable
-	ret
-; 47b0
-
-Function47b0: ; 47b0
-	ld hl, OBJECT_28
-	add hl, bc
-	ld a, [hl]
-	ret
-; 47b6
-
-Function47b6: ; 47b6
-	ld hl, OBJECT_28
-	add hl, bc
-	ld [hl], a
-	ret
-; 47bc
-
-Function47bc: ; 47bc
-	ld hl, OBJECT_MAP_X
-	add hl, bc
-	ld d, [hl]
-	ld hl, OBJECT_MAP_Y
-	add hl, bc
-	ld e, [hl]
-	push bc
-	call Function2a3c
-	pop bc
-	ld hl, OBJECT_STANDING_TILE
-	add hl, bc
-	ld [hl], a
-	call Function4600
-	call Function467b
-	ld hl, OBJECT_09
-	add hl, bc
-	ld [hl], $1
-	ret
-; 47dd
-
-Function47dd: ; 47dd
-	call Function479b
-	call Function1a2f
-	ld a, [hl]
-	ld hl, .Pointers
-	rst JumpTable
-	ret
-; 47e9
-
-.Pointers ; 47e9
-	dw Function4821
-	dw Function4822
-	dw Function482c
-	dw Function4838
-	dw Function4842
-	dw Function4851
-	dw Function4869
-	dw Function487c
-	dw Function4882
-	dw Function4888
-	dw Function488e
-	dw Function4891
-	dw Function4894
-	dw Function4897
-	dw Function489d
-	dw Function48a0
-	dw Function48a6
-	dw Function48ac
-	dw Function48ff
-	dw Function49e5
-	dw Function4a21
-	dw Function4958
-	dw Function496e
-	dw Function4abc
-	dw Function498d
-	dw Function4984
-	dw Function4a46
-	dw Function4a89
-; 4821
-
-Function4821: ; 4821
-	ret
-; 4822
-
-Function4822: ; 4822
-	call Random
-	ld a, [hRandomAdd]
-	and 1
-	jp Function4af0
-; 482c
-
-Function482c: ; 482c
-	call Random
-	ld a, [hRandomAdd]
-	and 1
-	or 2
-	jp Function4af0
-; 4838
-
-Function4838: ; 4838
-	call Random
-	ld a, [hRandomAdd]
-	and 3
-	jp Function4af0
-; 4842
-
-Function4842: ; 4842
-	call Random
-	ld a, [hRandomAdd]
-	and $c
-	ld hl, OBJECT_08
-	add hl, bc
-	ld [hl], a
-	jp Function4b1d
-; 4851
-
-Function4851: ; 4851
-	ld hl, OBJECT_08
-	add hl, bc
-	ld a, [hl]
-	and $c
-	ld d, a
-	call Random
-	ld a, [hRandomAdd]
-	and $c
-	cp d
-	jr nz, .asm_4865
-	xor $c
-
-.asm_4865
-	ld [hl], a
-	jp Function4b26
-; 4869
-
-Function4869: ; 4869
-	call Function462a
-	call Function467b
-	ld hl, OBJECT_11
-	add hl, bc
-	ld [hl], $1
-	ld hl, OBJECT_09
-	add hl, bc
-	ld [hl], $5
-	ret
-; 487c
-
-Function487c: ; 487c
-	ld hl, Function5000
-	jp Function5041
-; 4882
-
-Function4882: ; 4882
-	ld hl, Function5015
-	jp Function5041
-; 4888
-
-Function4888: ; 4888
-	ld hl, Function5026
-	jp Function5041
-; 488e
-
-Function488e: ; 488e
-	jp Function5037
-; 4891
-
-Function4891: ; 4891
-	jp Function5037
-; 4894
-
-Function4894: ; 4894
-	jp Function5037
-; 4897
-
-Function4897: ; 4897
-	ld hl, Function5000
-	jp Function5041
-; 489d
-
-Function489d: ; 489d
-	jp Function5037
-; 48a0
-
-Function48a0: ; 48a0
-	ld hl, Function54e6
-	jp Function5041
-; 48a6
-
-Function48a6: ; 48a6
-	ld hl, Function500e
-	jp Function5041
-; 48ac
-
-Function48ac: ; 48ac
-	call Function4793
-	dw Function48b3
-	dw Function48f8
-; 48b3
-
-Function48b3: ; 48b3
-	ld hl, OBJECT_STANDING_TILE
-	add hl, bc
-	ld a, [hl]
-	call CheckPitTile
-	jr z, .asm_48f5
-	ld hl, OBJECT_FLAGS
-	add hl, bc
-	bit 2, [hl]
-	res 2, [hl]
-	jr z, .asm_48ee
-	ld hl, OBJECT_32
-	add hl, bc
-	ld a, [hl]
-	and $3
-	or $0
-	call Function4690
-	call Function6ec1
-	jr c, .asm_48eb
-	ld de, SFX_STRENGTH
-	call PlaySFX
-	call Function5538
-	call Function463f
-	ld hl, OBJECT_09
-	add hl, bc
-	ld [hl], $f
-	ret
-
-.asm_48eb
-	call Function462a
-
-.asm_48ee
-	ld hl, OBJECT_07
-	add hl, bc
-	ld [hl], $ff
-	ret
-
-.asm_48f5
-	call Function4787
-	; fallthrough
-; 48f8
-
-Function48f8: ; 48f8
-	ld hl, OBJECT_07
-	add hl, bc
-	ld [hl], $ff
-	ret
-; 48ff
-
-Function48ff: ; 48ff
-	ld hl, OBJECT_MAP_X
-	add hl, bc
-	ld d, [hl]
-	ld hl, OBJECT_MAP_Y
-	add hl, bc
-	ld e, [hl]
-	ld hl, OBJECT_32
-	add hl, bc
-	ld a, [hl]
-	push bc
-	call Function1ae5
-	ld hl, OBJECT_07
-	add hl, bc
-	ld a, [hl]
-	cp $ff
-	jr z, .asm_494a
-	ld hl, OBJECT_NEXT_MAP_X
-	add hl, bc
-	ld a, [hl]
-	cp d
-	jr z, .asm_492d
-	jr c, .asm_4929
-	ld a, $3
-	jr .asm_493d
-
-.asm_4929
-	ld a, $2
-	jr .asm_493d
-
-.asm_492d
-	ld hl, OBJECT_NEXT_MAP_Y
-	add hl, bc
-	ld a, [hl]
-	cp e
-	jr z, .asm_494a
-	jr c, .asm_493b
-	ld a, $0
-	jr .asm_493d
-
-.asm_493b
-	ld a, $1
-
-.asm_493d
-	ld d, a
-	ld hl, OBJECT_07
-	add hl, bc
-	ld a, [hl]
-	and $c
-	or d
-	pop bc
-	jp Function5412
-
-.asm_494a
-	pop bc
-	ld hl, OBJECT_07
-	add hl, bc
-	ld [hl], $ff
-	ld hl, OBJECT_11
-	add hl, bc
-	ld [hl], $1
-	ret
-; 4958
-
-Function4958: ; 4958
-	call Function467b
-	ld hl, OBJECT_07
-	add hl, bc
-	ld [hl], $ff
-	ld hl, OBJECT_11
-	add hl, bc
-	ld [hl], $9
-	ld hl, OBJECT_09
-	add hl, bc
-	ld [hl], $4
-	ret
-; 496e
-
-Function496e: ; 496e
-	call Function467b
-	ld hl, OBJECT_07
-	add hl, bc
-	ld [hl], $ff
-	ld hl, OBJECT_11
-	add hl, bc
-	ld [hl], $a
-	ld hl, OBJECT_09
-	add hl, bc
-	ld [hl], $4
-	ret
-; 4984
-
-Function4984: ; 4984
-	call Function4793
-	dw Function4996
-	dw Function499c
-	dw Function49b8
-; 498d
-
-Function498d: ; 498d
-	call Function4793
-	dw Function4996
-	dw Function499c
-	dw Function49c4
-; 4996
-
-Function4996: ; 4996
-	call Function467b
-	call Function4787
-	; fallthrough
-; 499c
-
-Function499c: ; 499c
-	ld hl, OBJECT_11
-	add hl, bc
-	ld [hl], $1
-	ld hl, OBJECT_32
-	add hl, bc
-	ld a, [hl]
-	ld a, $10
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	ld [hl], a
-	ld hl, OBJECT_09
-	add hl, bc
-	ld [hl], $3
-	call Function4787
-	ret
-; 49b8
-
-Function49b8: ; 49b8
-	ld de, .data_49c0
-	call Function49d0
-	jr Function4984
-; 49c0
-
-.data_49c0 ; 49c0
-	db $0c, $08, $00, $04
-; 49c4
-
-Function49c4: ; 49c4
-	ld de, .data_49cc
-	call Function49d0
-	jr Function498d
-; 49cc
-
-.data_49cc ; 49cc
-	db $08, $0c, $04, $00
-; 49d0
-
-Function49d0: ; 49d0
-	ld hl, OBJECT_08
-	add hl, bc
-	ld a, [hl]
-	and $c
-	rrca
-	rrca
-	push hl
-	ld l, a
-	ld h, $0
-	add hl, de
-	ld a, [hl]
-	pop hl
-	ld [hl], a
-	call Function478d
-	ret
-; 49e5
-
-Function49e5: ; 49e5
-	call Function4aa8
-	ld hl, OBJECT_11
-	add hl, bc
-	ld [hl], $7
-	ld hl, OBJECT_STEP_DURATION
-	add hl, de
-	ld a, [hl]
-	inc a
-	add a
-	add $0
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	ld [hl], a
-	ld hl, OBJECT_07
-	add hl, de
-	ld a, [hl]
-	and 3
-	ld d, $e
-	cp 0
-	jr z, .asm_4a0f
-	cp 1
-	jr z, .asm_4a0f
-	ld d, $c
-
-.asm_4a0f
-	ld hl, OBJECT_SPRITE_Y_OFFSET
-	add hl, bc
-	ld [hl], d
-	ld hl, OBJECT_SPRITE_X_OFFSET
-	add hl, bc
-	ld [hl], $0
-	ld hl, OBJECT_09
-	add hl, bc
-	ld [hl], $13
-	ret
-; 4a21
-
-Function4a21: ; 4a21
-	call Function467b
-	call Function4aa8
-	ld hl, OBJECT_11
-	add hl, bc
-	ld [hl], $8
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	ld [hl], $0
-	ld hl, OBJECT_SPRITE_Y_OFFSET
-	add hl, bc
-	ld [hl], $f0
-	ld hl, OBJECT_SPRITE_X_OFFSET
-	add hl, bc
-	ld [hl], $0
-	ld hl, OBJECT_09
-	add hl, bc
-	ld [hl], $13
-	ret
-; 4a46
-
-Function4a46: ; 4a46
-	call Function467b
-	call Function4aa8
-	ld hl, OBJECT_11
-	add hl, bc
-	ld [hl], $e
-	ld hl, OBJECT_STEP_DURATION
-	add hl, de
-	ld a, [hl]
-	inc a
-	add a
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	ld [hl], a
-	ld hl, OBJECT_07
-	add hl, de
-	ld a, [hl]
-	and 3
-	ld e, a
-	ld d, 0
-	ld hl, .data_4a81
-	add hl, de
-	add hl, de
-	ld d, [hl]
-	inc hl
-	ld e, [hl]
-	ld hl, OBJECT_SPRITE_X_OFFSET
-	add hl, bc
-	ld [hl], d
-	ld hl, OBJECT_SPRITE_Y_OFFSET
-	add hl, bc
-	ld [hl], e
-	ld hl, OBJECT_09
-	add hl, bc
-	ld [hl], $13
-	ret
-; 4a81
-
-.data_4a81  ; 4a81
-	;   x,  y
-	db  0, -4
-	db  0,  8
-	db  6,  2
-	db -6,  2
-; 4a89
-
-Function4a89: ; 4a89
-	call Function467b
-	call Function4aa8
-	ld hl, OBJECT_11
-	add hl, bc
-	ld [hl], $f
-	ld hl, OBJECT_STEP_DURATION
-	add hl, de
-	ld a, [hl]
-	add $ff
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	ld [hl], a
-	ld hl, OBJECT_09
-	add hl, bc
-	ld [hl], $13
-	ret
-; 4aa8
-
-Function4aa8: ; 4aa8
-	ld hl, OBJECT_32
-	add hl, bc
-	ld a, [hl]
-	push bc
-	call Function1ae5
-	ld d, b
-	ld e, c
-	pop bc
-	ld hl, OBJECT_29
-	add hl, bc
-	ld [hl], e
-	inc hl
-	ld [hl], d
-	ret
-; 4abc
-
-Function4abc: ; 4abc
-	call Function467b
-	ld hl, OBJECT_11
-	add hl, bc
-	ld [hl], $0
-	ld hl, OBJECT_32
-	add hl, bc
-	ld a, [hl]
-	call Function4ade
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	ld [hl], e
-	ld hl, OBJECT_30
-	add hl, bc
-	ld [hl], a
-	ld hl, OBJECT_09
-	add hl, bc
-	ld [hl], $15
-	ret
-; 4ade
-
-Function4ade: ; 4ade
-	ld d, a
-	and $3f
-	ld e, a
-	ld a, d
-	rlca
-	rlca
-	and $3
-	ld d, a
-	inc d
-	ld a, $1
-.asm_4aeb
-	dec d
-	ret z
-	add a
-	jr .asm_4aeb
-; 4af0
-
-Function4af0: ; 4af0
-	call Function4690
-	call Function6ec1
-	jr c, Function4b17
-	call Function463f
-	ld hl, OBJECT_11
-	add hl, bc
-	ld [hl], $2
-	ld hl, wd4cf
-	ld a, [$ffaf]
-	cp [hl]
-	jr z, .asm_4b10
-	ld hl, OBJECT_09
-	add hl, bc
-	ld [hl], $7
-	ret
-
-.asm_4b10
-	ld hl, OBJECT_09
-	add hl, bc
-	ld [hl], $6
-	ret
-
-Function4b17: ; 4b17
-	call Function467b
-	call Function462a
-	; fallthrough
-; 4b1d
-
-Function4b1d: ; 4b1d
-	call Random
-	ld a, [hRandomAdd]
-	and $7f
-	jr Function4b2d
-; 4b26
-
-Function4b26: ; 4b26
-	call Random
-	ld a, [hRandomAdd]
-	and $1f
-	; fallthrough
-; 4b2d
-
-Function4b2d: ; 4b2d
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	ld [hl], a
-	ld hl, OBJECT_07
-	add hl, bc
-	ld [hl], $ff
-	ld hl, OBJECT_11
-	add hl, bc
-	ld [hl], $1
-	ld hl, OBJECT_09
-	add hl, bc
-	ld [hl], $3
-	ret
-; 4b45
-
-Pointers4b45: ; 4b45
-	dw Function47bc
-	dw Function47dd
-	dw Function4e2b
-	dw Function4ddd
-	dw Function4e21
-	dw Function4e0c
-	dw Function4e56
-	dw Function4e47
-	dw Function4b86
-	dw Function4bbf
-	dw Function4e83
-	dw Function4dff
-	dw Function4c18
-	dw Function4c89
-	dw Function4d14
-	dw Function4ecd
-	dw Function4d7e
-	dw Function4daf
-	dw Function4dc8
-	dw Function4f04
-	dw Function4f33
-	dw Function4f33
-	dw Function4f77
-	dw Function4f7a
-	dw Function4df0
-	dw Function4f83
-; 4b79
-
-Function4b79: ; 4b79
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	dec [hl]
-	ret nz
-	ld hl, OBJECT_09
-	add hl, bc
-	ld [hl], $1
-	ret
-; 4b86
-
-Function4b86: ; 4b86
-	call Function47a8
-	dw Function4b8d
-	dw Function4ba9
-; 4b8d
-
-Function4b8d: ; 4b8d
-	call Function46d7
-	call UpdateJumpPosition
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	dec [hl]
-	ret nz
-	call Function4600
-	call Function46a6
-	ld hl, OBJECT_FLAGS
-	add hl, bc
-	res 3, [hl]
-	call Function47a2
-	ret
-; 4ba9
-
-Function4ba9: ; 4ba9
-	call Function46d7
-	call UpdateJumpPosition
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	dec [hl]
-	ret nz
-	call Function4600
-	ld hl, OBJECT_09
-	add hl, bc
-	ld [hl], $1
-	ret
-; 4bbf
-
-Function4bbf: ; 4bbf
-	call Function47a8
-	dw Function4bca
-	dw Function4bd2
-	dw Function4bf2
-	dw Function4bfd
-; 4bca
-
-Function4bca: ; 4bca
-	ld hl, wd150
-	set 7, [hl]
-	call Function47a2
-;	fallthrough
-; 4bd2
-
-Function4bd2: ; 4bd2
-	call UpdateJumpPosition
-	call Function4738
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	dec [hl]
-	ret nz
-	call Function4600
-	ld hl, OBJECT_FLAGS
-	add hl, bc
-	res 3, [hl]
-	ld hl, wd150
-	set 6, [hl]
-	set 4, [hl]
-	call Function47a2
-	ret
-; 4bf2
-
-Function4bf2: ; 4bf2
-	call Function46a6
-	ld hl, wd150
-	set 7, [hl]
-	call Function47a2
-;	fallthrough
-; 4bfd
-
-Function4bfd: ; 4bfd
-	call UpdateJumpPosition
-	call Function4738
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	dec [hl]
-	ret nz
-	ld hl, wd150
-	set 6, [hl]
-	call Function4600
-	ld hl, OBJECT_09
-	add hl, bc
-	ld [hl], $1
-	ret
-; 4c18
-
-Function4c18: ; 4c18
-	call Function47a8
-	dw Function4c23
-	dw Function4c32
-	dw Function4c42
-	dw Function4c5d
-; 4c23
-
-Function4c23: ; 4c23
-	ld hl, OBJECT_12
-	add hl, bc
-	ld [hl], $0
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	ld [hl], $10
-	call Function47a2
-;	fallthrough
-; 4c32
-
-Function4c32: ; 4c32
-	ld hl, OBJECT_11
-	add hl, bc
-	ld [hl], $4
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	dec [hl]
-	ret nz
-	call Function47a2
-	ret
-; 4c42
-
-Function4c42: ; 4c42
-	ld hl, OBJECT_12
-	add hl, bc
-	ld [hl], $0
-	ld hl, OBJECT_31
-	add hl, bc
-	ld [hl], $10
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	ld [hl], $10
-	ld hl, OBJECT_FLAGS
-	add hl, bc
-	res 3, [hl]
-	call Function47a2
-;	fallthrough
-; 4c5d
-
-Function4c5d: ; 4c5d
-	ld hl, OBJECT_11
-	add hl, bc
-	ld [hl], $4
-	ld hl, OBJECT_31
-	add hl, bc
-	inc [hl]
-	ld a, [hl]
-	ld d, $60
-	call Sine
-	ld a, h
-	sub $60
-	ld hl, OBJECT_SPRITE_Y_OFFSET
-	add hl, bc
-	ld [hl], a
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	dec [hl]
-	ret nz
-	ld hl, OBJECT_12
-	add hl, bc
-	ld [hl], $0
-	ld hl, OBJECT_09
-	add hl, bc
-	ld [hl], $1
-	ret
-; 4c89
-
-Function4c89: ; 4c89
-	call Function47a8
-	dw Function4c9a
-	dw Function4caa
-	dw Function4cb3
-	dw Function4cc9
-	dw Function4ceb
-	dw Function4cf5
-	dw Function4d01
-; 4c9a
-
-Function4c9a: ; 4c9a
-	ld hl, OBJECT_11
-	add hl, bc
-	ld [hl], $0
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	ld [hl], $10
-	call Function47a2
-	ret
-; 4caa
-
-Function4caa: ; 4caa
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	dec [hl]
-	ret nz
-	call Function47a2
-;	fallthrough
-; 4cb3
-
-Function4cb3: ; 4cb3
-	ld hl, OBJECT_12
-	add hl, bc
-	ld [hl], $0
-	ld hl, OBJECT_31
-	add hl, bc
-	ld [hl], $0
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	ld [hl], $10
-	call Function47a2
-	ret
-; 4cc9
-
-Function4cc9: ; 4cc9
-	ld hl, OBJECT_11
-	add hl, bc
-	ld [hl], $4
-	ld hl, OBJECT_31
-	add hl, bc
-	inc [hl]
-	ld a, [hl]
-	ld d, $60
-	call Sine
-	ld a, h
-	sub $60
-	ld hl, OBJECT_SPRITE_Y_OFFSET
-	add hl, bc
-	ld [hl], a
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	dec [hl]
-	ret nz
-	call Function47a2
-;	fallthrough
-; 4ceb
-
-Function4ceb: ; 4ceb
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	ld [hl], $10
-	call Function47a2
-	ret
-; 4cf5
-
-Function4cf5: ; 4cf5
-	ld hl, OBJECT_11
-	add hl, bc
-	ld [hl], $4
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	dec [hl]
-	ret nz
-; 4d01
-
-Function4d01: ; 4d01
-	ld hl, OBJECT_12
-	add hl, bc
-	ld [hl], $0
-	ld hl, OBJECT_SPRITE_Y_OFFSET
-	add hl, bc
-	ld [hl], $0
-	ld hl, OBJECT_09
-	add hl, bc
-	ld [hl], $1
-	ret
-; 4d14
-
-Function4d14: ; 4d14
-	call Function47a8
-	dw Function4d1f
-	dw Function4d2e
-	dw Function4d4f
-	dw Function4d6b
-; 4d1f
-
-Function4d1f: ; 4d1f
-	ld hl, OBJECT_11
-	add hl, bc
-	ld [hl], $0
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	ld [hl], $10
-	call Function47a2
-;	fallthrough
-; 4d2e
-
-Function4d2e: ; 4d2e
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	dec [hl]
-	ret nz
-	ld hl, OBJECT_11
-	add hl, bc
-	ld [hl], $2
-	ld hl, OBJECT_12
-	add hl, bc
-	ld [hl], $0
-	ld hl, OBJECT_31
-	add hl, bc
-	ld [hl], $0
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	ld [hl], $10
-	call Function47a2
-;	fallthrough
-; 4d4f
-
-Function4d4f: ; 4d4f
-	ld hl, OBJECT_31
-	add hl, bc
-	inc [hl]
-	ld a, [hl]
-	ld d, $60
-	call Sine
-	ld a, h
-	sub $60
-	ld hl, OBJECT_SPRITE_Y_OFFSET
-	add hl, bc
-	ld [hl], a
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	dec [hl]
-	ret nz
-	call Function47a2
-;	fallthrough
-; 4d6b
-
-Function4d6b: ; 4d6b
-	ld hl, OBJECT_12
-	add hl, bc
-	ld [hl], $0
-	ld hl, OBJECT_SPRITE_Y_OFFSET
-	add hl, bc
-	ld [hl], $0
-	ld hl, OBJECT_09
-	add hl, bc
-	ld [hl], $1
-	ret
-; 4d7e
-
-Function4d7e: ; 4d7e
-	call Function47a8
-	dw Function4d85
-	dw Function4d94
-; 4d85
-
-Function4d85: ; 4d85
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	ld [hl], $8
-	ld hl, OBJECT_SPRITE_Y_OFFSET
-	add hl, bc
-	ld [hl], $0
-	call Function47a2
-	; fallthrough
-; 4d94
-
-Function4d94: ; 4d94
-	ld hl, OBJECT_SPRITE_Y_OFFSET
-	add hl, bc
-	ld a, [hl]
-	xor 1
-	ld [hl], a
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	dec [hl]
-	ret nz
-	ld hl, OBJECT_SPRITE_Y_OFFSET
-	add hl, bc
-	ld [hl], $0
-	ld hl, OBJECT_09
-	add hl, bc
-	ld [hl], $1
-	ret
-; 4daf
-
-Function4daf: ; 4daf
-	call Function4db5
-	jp Function4b79
-; 4db5
-
-Function4db5: ; 4db5
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	ld a, [hl]
-	and $1
-	ld a, $1
-	jr z, .asm_4dc2
-	ld a, $0
-
-.asm_4dc2
-	ld hl, OBJECT_11
-	add hl, bc
-	ld [hl], a
-	ret
-; 4dc8
-
-Function4dc8: ; 4dc8
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	ld a, [hl]
-	and $1
-	ld a, $4
-	jr z, .asm_4dd5
-	ld a, $5
-
-.asm_4dd5
-	ld hl, OBJECT_11
-	add hl, bc
-	ld [hl], a
-	jp Function4b79
-; 4ddd
-
-Function4ddd: ; 4ddd
-	ld hl, OBJECT_07
-	add hl, bc
-	ld [hl], $ff
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	dec [hl]
-	ret nz
-	ld hl, OBJECT_09
-	add hl, bc
-	ld [hl], $1
-	ret
-; 4df0
-
-Function4df0: ; 4df0
-	ld hl, OBJECT_07
-	add hl, bc
-	ld [hl], $ff
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	dec [hl]
-	ret nz
-	jp Function4357
-; 4dff
-
-Function4dff: ; 4dff
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	dec [hl]
-	ret nz
-	ld hl, OBJECT_09
-	add hl, bc
-	ld [hl], $1
-	ret
-; 4e0c
-
-Function4e0c: ; 4e0c
-	call Function47a8
-	dw Function4e13
-	dw Function4e21
-; 4e13
-
-Function4e13: ; 4e13
-	call Function4769
-	call Function1a47
-	ld hl, OBJECT_08
-	add hl, bc
-	ld [hl], a
-	call Function47a2
-	; fallthrough
-; 4e21
-
-Function4e21: ; 4e21
-	call Function4fb2
-	ld hl, OBJECT_07
-	add hl, bc
-	ld [hl], $ff
-	ret
-; 4e2b
-
-Function4e2b: ; 4e2b
-	call Function4fb2
-	call Function46d7
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	dec [hl]
-	ret nz
-	call Function4600
-	ld hl, OBJECT_07
-	add hl, bc
-	ld [hl], $ff
-	ld hl, OBJECT_09
-	add hl, bc
-	ld [hl], $1
-	ret
-; 4e47
-
-Function4e47: ; 4e47
-	call Function46d7
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	dec [hl]
-	ret nz
-	call Function4600
-	jp Function4b1d
-; 4e56
-
-Function4e56: ; 4e56
-; AnimateStep?
-	call Function47a8
-	dw Function4e5d
-	dw Function4e65
-; 4e5d
-
-Function4e5d: ; 4e5d
-	ld hl, wd150
-	set 7, [hl]
-	call Function47a2
-	; fallthrough
-; 4e65
-
-Function4e65: ; 4e65
-	call Function4738
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	dec [hl]
-	ret nz
-	ld hl, wd150
-	set 6, [hl]
-	call Function4600
-	ld hl, OBJECT_07
-	add hl, bc
-	ld [hl], $ff
-	ld hl, OBJECT_09
-	add hl, bc
-	ld [hl], $1
-	ret
-; 4e83
-
-Function4e83: ; 4e83
-	call Function47a8
-	dw Function4e8e
-	dw Function4ea4
-	dw Function4ead
-	dw Function4ec0
-; 4e8e
-
-Function4e8e: ; 4e8e
-	ld hl, OBJECT_07
-	add hl, bc
-	ld [hl], $ff
-	ld hl, OBJECT_12
-	add hl, bc
-	ld a, [hl]
-	ld [hl], $2
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	ld [hl], $2
-	call Function47a2
-	; fallthrough
-; 4ea4
-
-Function4ea4: ; 4ea4
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	dec [hl]
-	ret nz
-	call Function47a2
-	; fallthrough
-; 4ead
-
-Function4ead: ; 4ead
-	ld hl, OBJECT_29
-	add hl, bc
-	ld a, [hl]
-	ld hl, OBJECT_08
-	add hl, bc
-	ld [hl], a
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	ld [hl], $2
-	call Function47a2
-	; fallthrough
-; 4ec0
-
-Function4ec0: ; 4ec0
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	dec [hl]
-	ret nz
-	ld hl, OBJECT_09
-	add hl, bc
-	ld [hl], $1
-	ret
-; 4ecd
-
-Function4ecd: ; 4ecd
-	call Function46d7
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	dec [hl]
-	ret nz
-	push bc
-	ld hl, OBJECT_MAP_X
-	add hl, bc
-	ld d, [hl]
-	ld hl, OBJECT_MAP_Y
-	add hl, bc
-	ld e, [hl]
-	ld hl, OBJECT_01
-	add hl, bc
-	ld a, [hl]
-	ld b, a
-	callba Function807e
-	pop bc
-	ld hl, OBJECT_FLAGS
-	add hl, bc
-	res 2, [hl]
-	call Function4600
-	ld hl, OBJECT_07
-	add hl, bc
-	ld [hl], $ff
-	ld hl, OBJECT_09
-	add hl, bc
-	ld [hl], $1
-	ret
-; 4f04
-
-Function4f04: ; 4f04
-	ld hl, OBJECT_29
-	add hl, bc
-	ld e, [hl]
-	inc hl
-	ld d, [hl]
-	ld hl, OBJECT_00
-	add hl, de
-	ld a, [hl]
-	and a
-	jr z, .asm_4f30
-	ld hl, OBJECT_SPRITE_X
-	add hl, de
-	ld a, [hl]
-	ld hl, OBJECT_SPRITE_X
-	add hl, bc
-	ld [hl], a
-	ld hl, OBJECT_SPRITE_Y
-	add hl, de
-	ld a, [hl]
-	ld hl, OBJECT_SPRITE_Y
-	add hl, bc
-	ld [hl], a
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	ld a, [hl]
-	and a
-	ret z
-	dec [hl]
-	ret nz
-
-.asm_4f30
-	jp Function4357
-; 4f33
-
-Function4f33: ; 4f33
-	call Function47a8
-	dw Function4f3a
-	dw Function4f43
-; 4f3a
-
-Function4f3a: ; 4f3a
-	xor a
-	ld hl, OBJECT_29
-	add hl, bc
-	ld [hl], a
-	call Function47a2
-	; fallthrough
-; 4f43
-
-Function4f43: ; 4f43
-	ld hl, OBJECT_29
-	add hl, bc
-	ld d, [hl]
-	ld a, [wd14f]
-	sub d
-	ld [wd14f], a
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	dec [hl]
-	jr z, .asm_4f68
-	ld a, [hl]
-	call Function4f6c
-	ld hl, OBJECT_29
-	add hl, bc
-	ld [hl], a
-	ld d, a
-	ld a, [wd14f]
-	add d
-	ld [wd14f], a
-	ret
-
-.asm_4f68
-	call Function4357
-	ret
-; 4f6c
-
-Function4f6c: ; 4f6c
-	ld hl, OBJECT_30
-	add hl, bc
-	and 1
-	ld a, [hl]
-	ret z
-	cpl
-	inc a
-	ret
-; 4f77
-
-Function4f77: ; 4f77
-	call Function47a8 ; ????
-; 4f7a
-
-Function4f7a: ; 4f7a
-	call Function47a8
-	dw Function4f83
-	dw Function4f83
-	dw Function4f83
-; 4f83
-
-Function4f83: ; 4f83
-	call Function47a8
-	dw Function4f8a
-	dw Function4f99
-; 4f8a
-
-Function4f8a: ; 4f8a
-	ld hl, OBJECT_11
-	add hl, bc
-	ld [hl], $10
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	ld [hl], $10
-	call Function47a2
-; 4f99
-
-Function4f99: ; 4f99
-	ld hl, OBJECT_STEP_DURATION
-	add hl, bc
-	dec [hl]
-	ret nz
-	ld hl, OBJECT_SPRITE_Y_OFFSET
-	add hl, bc
-	ld [hl], $60
-	ld hl, OBJECT_12
-	add hl, bc
-	ld [hl], $0
-	ld hl, OBJECT_09
-	add hl, bc
-	ld [hl], $1
-	ret
-; 4fb2
-
-Function4fb2: ; 4fb2
-	ret
-; 4fb3
-
-Function4fb3: ; 4fb3
-	ld hl, OBJECT_29
-	add hl, bc
-	inc [hl]
-	ld a, [hl]
-	srl a
-	srl a
-	and 7
-	ld l, a
-	ld h, 0
-	ld de, .y
-	add hl, de
-	ld a, [hl]
-	ld hl, OBJECT_SPRITE_Y_OFFSET
-	add hl, bc
-	ld [hl], a
-	ret
-; 4fcd
-
-.y ; 4fcd
-	db 0, -1, -2, -3, -4, -3, -2, -1
-; 4fd5
-
-UpdateJumpPosition: ; 4fd5
-	call GetStepVector
-	ld a, h
-	ld hl, OBJECT_31
-	add hl, bc
-	ld e, [hl]
-	add e
-	ld [hl], a
-	nop
-	srl e
-	ld d, 0
-	ld hl, .y
-	add hl, de
-	ld a, [hl]
-	ld hl, OBJECT_SPRITE_Y_OFFSET
-	add hl, bc
-	ld [hl], a
-	ret
-; 4ff0
-
-.y ; 4ff0
-	db  -4,  -6,  -8, -10, -11, -12, -12, -12
-	db -11, -10,  -9,  -8,  -6,  -4,   0,   0
-; 5000
-
-Function5000: ; 5000
-	ld a, [wc2de]
-	ld hl, wc2df
-	ld [hl], a
-	ld a, $3e
-	ld [wc2de], a
-	ld a, [hl]
-	ret
-; 500e
-
-Function500e: ; 500e
-	ld hl, wc2e3
-	call Function1aae
-	ret
-; 5015
-
-Function5015: ; 5015
-	ld hl, OBJECT_27
-	add hl, bc
-	ld e, [hl]
-	inc [hl]
-	ld d, 0
-	ld hl, wc2e2
-	ld a, [hli]
-	ld h, [hl]
-	ld l, a
-	add hl, de
-	ld a, [hl]
-	ret
-; 5026
-
-Function5026: ; 5026
-	ld hl, OBJECT_27
-	add hl, bc
-	ld e, [hl]
-	inc [hl]
-	ld d, 0
-	ld hl, wc2e6
-	ld a, [hli]
-	ld h, [hl]
-	ld l, a
-	add hl, de
-	ld a, [hl]
-	ret
-; 5037
-
-Function5037: ; 5037
-	ld hl, Function503d
-	jp Function5041
-; 503d
-
-Function503d: ; 503d
-	ld a, [wc2e2]
-	ret
-; 5041
-
-Function5041: ; 5041
-	call Function5055
-.asm_5044
-	xor a
-	ld [wc2ea], a
-	call Function505e
-	call Function506b
-	ld a, [wc2ea]
-	and a
-	jr nz, .asm_5044
-	ret
-; 5055
-
-Function5055: ; 5055
-	ld a, l
-	ld [wc2eb], a
-	ld a, h
-	ld [wc2ec], a
-	ret
-; 505e
-
-Function505e: ; 505e
-	ld hl, wc2eb
-	ld a, [hli]
-	ld h, [hl]
-	ld l, a
-	jp [hl]
-; 5065
-
-Function5065: ; 5065
-	ld a, $1
-	ld [wc2ea], a
-	ret
-; 506b
-
-Function506b: ; 506b
-	push af
-	call Function54b8
-	pop af
-	ld hl, MovementPointers
-	rst JumpTable
-	ret
-; 5075
-
-
-; 5075
-INCLUDE "engine/movement.asm"
-; 54b8
-
-
-Function54b8: ; 54b8
-	ld e, a
-	ld a, [wd4ce]
-	cp $ff
-	ret z
-	ld a, [wd4cd]
-	ld d, a
-	ld a, [$ffaf]
-	cp d
-	ret nz
-	ld a, e
-	cp $3e
-	ret z
-	cp $47
-	ret z
-	cp $4b
-	ret z
-	cp $50
-	ret z
-	cp $8
-	ret c
-	push af
-	ld hl, wd4d0
-	inc [hl]
-	ld e, [hl]
-	ld d, 0
-	ld hl, wd4d1
-	add hl, de
-	pop af
-	ld [hl], a
-	ret
-; 54e6
-
-Function54e6: ; 54e6
-	ld hl, wd4d0
-	ld a, [hl]
-	and a
-	jr z, .asm_5503
-	cp $ff
-	jr z, .asm_5503
-	dec [hl]
-	ld e, a
-	ld d, 0
-	ld hl, wd4d1
-	add hl, de
-	inc e
-	ld a, $ff
-.asm_54fc
-	ld d, [hl]
-	ld [hld], a
-	ld a, d
-	dec e
-	jr nz, .asm_54fc
-	ret
-
-.asm_5503
-	call Function550a
-	ret c
-	ld a, $3e
-	ret
-; 550a
-
-Function550a: ; 550a
-	ld a, [wd4cd]
-	cp $ff
-	jr z, .asm_5520
-	push bc
-	call Function1ae5
-	ld hl, OBJECT_00
-	add hl, bc
-	ld a, [hl]
-	pop bc
-	and a
-	jr z, .asm_5520
-	and a
-	ret
-
-.asm_5520
-	ld a, $ff
-	ld [wd4ce], a
-	ld a, $47
-	scf
-	ret
-; 5529
-
-Function5529: ; 5529
-	push bc
-	ld de, .data_5535
-	call Function55b9
-	call Function55ac
-	pop bc
-	ret
-
-.data_5535
-	db $00, $05, $1b
-; 5538
-
-Function5538: ; 5538
-	push bc
-	ld de, .data_5544
-	call Function55b9
-	call Function55ac
-	pop bc
-	ret
-
-.data_5544
-	db $00, $05, $22
-; 5547
-
-Function5547: ; 5547
-	push bc
-	ld de, .data_5553
-	call Function55b9
-	call Function55ac
-	pop bc
-	ret
-
-.data_5553
-	db $00, $05, $1c
-; 5556
-
-Function5556: ; 5556
-	push bc
-	ld de, .data_5562
-	call Function55b9
-	call Function55ac
-	pop bc
-	ret
-
-.data_5562
-	db $00, $06, $23
-; 5565
-
-Function5565: ; 5565
-	push bc
-	push af
-	ld de, .data_5576
-	call Function55b9
-	pop af
-	ld [wc2f5], a
-	call Function55ac
-	pop bc
-	ret
-
-.data_5576
-	db $00, $05, $1d
-; 5579
-
-Function5579: ; 5579
-	push bc
-	ld a, [$ffaf]
-	ld c, a
-	call Function5582
-	pop bc
-	ret
-; 5582
-
-Function5582: ; 5582
-	ld de, ObjectStructs
-	ld a, $d
-.asm_5587
-	push af
-	ld hl, OBJECT_04
-	add hl, de
-	bit 7, [hl]
-	jr z, .asm_55a1
-	ld hl, OBJECT_00
-	add hl, de
-	ld a, [hl]
-	and a
-	jr z, .asm_55a1
-	push bc
-	xor a
-	ld bc, ObjectStruct2 - ObjectStruct1
-	call ByteFill
-	pop bc
-
-.asm_55a1
-	ld hl, ObjectStruct2 - ObjectStruct1
-	add hl, de
-	ld d, h
-	ld e, l
-	pop af
-	dec a
-	jr nz, .asm_5587
-	ret
-; 55ac
-
-Function55ac: ; 55ac
-	call Function1a13
-	ret nc
-	ld d, h
-	ld e, l
-	callba Function8286
-	ret
-; 55b9
-
-Function55b9: ; 55b9
-	ld hl, wc2f0
-	ld [hl], $ff
-	inc hl
-	ld [hl], $ff
-	inc hl
-	ld a, [de]
-	inc de
-	ld [hli], a
-	ld a, [de]
-	inc de
-	ld [hli], a
-	ld a, [de]
-	ld [hli], a
-	ld a, [$ffaf]
-	ld [hli], a
-	push hl
-	ld hl, OBJECT_MAP_X
-	add hl, bc
-	ld d, [hl]
-	ld hl, OBJECT_MAP_Y
-	add hl, bc
-	ld e, [hl]
-	pop hl
-	ld [hl], d
-	inc hl
-	ld [hl], e
-	inc hl
-	ld [hl], $ff
-	ret
-; 55e0
-
-Function55e0:: ; 55e0
-	ld a, [VramState]
-	bit 0, a
-	ret z
-	ld bc, ObjectStructs
-	xor a
-.asm_55ea
-	ld [$ffaf], a
-	call Function1af1
-	jr z, .asm_55f4
-	call Function565c
-
-.asm_55f4
-	ld hl, ObjectStruct2 - ObjectStruct1
-	add hl, bc
-	ld b, h
-	ld c, l
-	ld a, [$ffaf]
-	inc a
-	cp $d
-	jr nz, .asm_55ea
-	ret
-; 5602
-
-Function5602: ; 5602
-	call Function5645
-	ld a, $0
-	call Function5629
-	ld a, [wd459]
-	bit 7, a
-	jr z, .asm_5619
-	ld a, [$ffe0]
-	and a
-	jr z, .asm_5619
-	call Function5629
-
-.asm_5619
-	call Function5920
-	ret
-; 561d
-
-Function561d: ; 561d
-	call Function5645
-	ld a, $0
-	call Function5629
-	call Function5920
-	ret
-; 5629
-
-Function5629: ; 5629
-	cp $10
-	ret nc
-	call GetMapObject
-	ld hl, $0000
-	add hl, bc
-	ld a, [hl]
-	cp $ff
-	ret z
-	cp $d
-	ret nc
-	call Function1ae5
-	call Function1af1
-	ret z
-	call Function5673
-	ret
-; 5645
-
-Function5645: ; 5645
-	xor a
-	ld bc, ObjectStructs
-.asm_5649
-	ld [$ffaf], a
-	call Function5680
-	ld hl, ObjectStruct2 - ObjectStruct1
-	add hl, bc
-	ld b, h
-	ld c, l
-	ld a, [$ffaf]
-	inc a
-	cp $d
-	jr nz, .asm_5649
-	ret
-; 565c
-
-Function565c: ; 565c
-	push bc
-	call Function56cd
-	pop bc
-	jr c, Function5680
-	call Function56a3
-	jr c, Function5680
-	call Function5688
-	callba Function4440
-	xor a
-	ret
-; 5673
-
-Function5673: ; 5673
-	call Function56a3
-	jr c, Function5680
-	callba Function4440
-	xor a
-	ret
-; 5680
-
-Function5680: ; 5680
-	ld hl, OBJECT_FACING
-	add hl, bc
-	ld [hl], $ff
-	scf
-	ret
-; 5688
-
-Function5688: ; 5688
-	push bc
-	ld hl, OBJECT_MAP_X
-	add hl, bc
-	ld d, [hl]
-	ld hl, OBJECT_MAP_Y
-	add hl, bc
-	ld e, [hl]
-	call Function2a3c
-	pop bc
-	ld hl, OBJECT_STANDING_TILE
-	add hl, bc
-	ld [hl], a
-	callba Function463f
-	ret
-; 56a3
-
-Function56a3: ; 56a3
-	ld hl, OBJECT_MAP_X
-	add hl, bc
-	ld d, [hl]
-	ld hl, OBJECT_MAP_Y
-	add hl, bc
-	ld e, [hl]
-	inc d
-	inc e
-	ld a, [XCoord]
-	cp d
-	jr z, .asm_56bc
-	jr nc, .asm_56cb
-	add $b
-	cp d
-	jr c, .asm_56cb
-
-.asm_56bc
-	ld a, [YCoord]
-	cp e
-	jr z, .asm_56c9
-	jr nc, .asm_56cb
-	add $a
-	cp e
-	jr c, .asm_56cb
-
-.asm_56c9
-	xor a
-	ret
-
-.asm_56cb
-	scf
-	ret
-; 56cd
-
-Function56cd: ; 56cd
-	ld a, [wd14c]
-	ld d, a
-	ld hl, OBJECT_SPRITE_X_OFFSET
-	add hl, bc
-	ld a, [hl]
-	ld hl, OBJECT_SPRITE_X
-	add hl, bc
-	add [hl]
-	add d
-	cp $f0
-	jr nc, .asm_56e5
-	cp $a0
-	jp nc, .asm_5768
-
-.asm_56e5
-	and $7
-	ld d, $2
-	cp $4
-	jr c, .asm_56ef
-	ld d, $3
-
-.asm_56ef
-	ld a, [hl]
-	srl a
-	srl a
-	srl a
-	cp $14
-	jr c, .asm_56fc
-	sub $20
-
-.asm_56fc
-	ld [$ffbd], a
-	ld a, [wd14d]
-	ld e, a
-	ld hl, OBJECT_SPRITE_Y_OFFSET
-	add hl, bc
-	ld a, [hl]
-	ld hl, OBJECT_SPRITE_Y
-	add hl, bc
-	add [hl]
-	add e
-	cp $f0
-	jr nc, .asm_5715
-	cp $90
-	jr nc, .asm_5768
-
-.asm_5715
-	and $7
-	ld e, $2
-	cp $4
-	jr c, .asm_571f
-	ld e, $3
-
-.asm_571f
-	ld a, [hl]
-	srl a
-	srl a
-	srl a
-	cp $12
-	jr c, .asm_572c
-	sub $20
-
-.asm_572c
-	ld [$ffbe], a
-	ld hl, OBJECT_PALETTE
-	add hl, bc
-	bit 7, [hl]
-	jr z, .asm_573e
-	ld a, d
-	add $2
-	ld d, a
-	ld a, e
-	add $2
-	ld e, a
-
-.asm_573e
-	ld a, d
-	ld [$ffbf], a
-.asm_5741
-	ld a, [$ffbf]
-	ld d, a
-	ld a, [$ffbe]
-	add e
-	dec a
-	cp $12
-	jr nc, .asm_5763
-	ld b, a
-.asm_574d
-	ld a, [$ffbd]
-	add d
-	dec a
-	cp $14
-	jr nc, .asm_5760
-	ld c, a
-	push bc
-	call GetTileCoord
-	pop bc
-	ld a, [hl]
-	cp $60
-	jr nc, .asm_5768
-
-.asm_5760
-	dec d
-	jr nz, .asm_574d
-
-.asm_5763
-	dec e
-	jr nz, .asm_5741
-	and a
-	ret
-
-.asm_5768
-	scf
-	ret
-; 576a
-
-Function576a:: ; 576a
-	call Function5771
-	call Function5781
-	ret
-; 5771
-
-Function5771: ; 5771
-	xor a
-	ld [wd14e], a
-	ld [wd14f], a
-	ld [wd150], a
-	ld a, $ff
-	ld [wd151], a
-	ret
-; 5781
-
-Function5781: ; 5781
-	ld bc, ObjectStructs
-	xor a
-.asm_5785
-	ld [$ffaf], a
-	call Function1af1
-	jr z, .asm_578f
-	call Function437b
-
-.asm_578f
-	ld hl, ObjectStruct2 - ObjectStruct1
-	add hl, bc
-	ld b, h
-	ld c, l
-	ld a, [$ffaf]
-	inc a
-	cp $d
-	jr nz, .asm_5785
-	ret
-; 579d
-
-Function579d: ; 579d
-	ld a, $3e
-	ld [wc2de], a
-	ld [wc2df], a
-	xor a
-	ld [wd04e], a
-	ld [wd4e2], a
-	call Function57bc
-	callba Function149c6
-	call c, Function57d9
-	call Function57ca
-	ret
-; 57bc
-
-Function57bc: ; 57bc
-	ld hl, wd45b
-	bit 7, [hl]
-	jr nz, .asm_57c4
-	ret
-
-.asm_57c4
-	ld a, $0
-	ld [PlayerAction], a
-	ret
-; 57ca
-
-Function57ca: ; 57ca
-	ld hl, wd45b
-	bit 5, [hl]
-	ret z
-	ld a, [wd45b]
-	and $3
-	add a
-	add a
-	jr Function57db
-; 57d9
-
-Function57d9: ; 57d9
-	ld a, $0
-	; fallthrough
-; 57db
-
-Function57db: ; 57db
-	ld bc, PlayerStruct
-	call Function1af8
-	ret
-; 57e2
-
-Function57e2: ; 57e2
-	ld a, d
-	and $80
-	ret z
-	ld bc, $0000 ; debug?
-	ld hl, OBJECT_08
-	add hl, bc
-	ld a, [hl]
-	or d
-	ld [hl], a
-	ld a, d
-	swap a
-	and $7
-	ld d, a
-	ld bc, PlayerStruct
-	ld hl, OBJECT_PALETTE
-	add hl, bc
-	ld a, [hl]
-	and $f8
-	or d
-	ld [hl], a
-	ret
-; 5803
-
-Function5803:: ; 5803
-	push bc
-	ld a, b
-	call Function5815
-	pop bc
-	ret c
-	ld a, c
-	call Function582c
-	callba Function848a
-	ret
-; 5815
-
-Function5815: ; 5815
-	call Function18de
-	ret c
-	ld a, [$ffb0]
-	ld [wd4cd], a
-	ret
-; 581f
-
-Function581f:: ; 581f
-	call Function5826
-	call Function5847
-	ret
-; 5826
-
-Function5826: ; 5826
-	ld a, $ff
-	ld [wd4cd], a
-	ret
-; 582c
-
-Function582c: ; 582c
-	push af
-	call Function5847
-	pop af
-	call Function18de
-	ret c
-	ld hl, OBJECT_03
-	add hl, bc
-	ld [hl], $13
-	ld hl, OBJECT_09
-	add hl, bc
-	ld [hl], $0
-	ld a, [$ffb0]
-	ld [wd4ce], a
-	ret
-; 5847
-
-Function5847: ; 5847
-	ld a, [wd4ce]
-	cp $ff
-	ret z
-	call Function1ae5
-	callba Function58e3
-	ld a, $ff
-	ld [wd4ce], a
-	ret
-; 585c
-
-Function585c:: ; 585c
-	ld a, c
-	call Function18de
-	ret c
-	push bc
-	call Function587a
-	pop bc
-	ld hl, OBJECT_FLAGS
-	add hl, bc
-	res 5, [hl]
-	xor a
-	ret
-; 586e
-
-Function586e: ; 586e
-	call Function18de
-	ret c
-	ld hl, OBJECT_FLAGS
-	add hl, bc
-	set 5, [hl]
-	xor a
-	ret
-; 587a
-
-Function587a: ; 587a
-	ld bc, ObjectStructs
-	xor a
-.asm_587e
-	push af
-	call Function1af1
-	jr z, .asm_588a
-	ld hl, OBJECT_FLAGS
-	add hl, bc
-	set 5, [hl]
-
-.asm_588a
-	ld hl, ObjectStruct2 - ObjectStruct1
-	add hl, bc
-	ld b, h
-	ld c, l
-	pop af
-	inc a
-	cp $d
-	jr nz, .asm_587e
-	ret
-; 5897
-
-Function5897:: ; 5897
-	ld a, [wd4cd]
-	cp $ff
-	ret z
-	push bc
-	call Function1ae5
-	ld hl, OBJECT_01
-	add hl, bc
-	ld a, [hl]
-	pop bc
-	cp c
-	ret nz
-	ld a, [wd4ce]
-	cp $ff
-	ret z
-	call Function1ae5
-	ld hl, OBJECT_FLAGS
-	add hl, bc
-	res 5, [hl]
-	ret
-; 58b9
-
-Function58b9:: ; 58b9
-	push bc
-	ld bc, ObjectStructs
-	xor a
-.asm_58be
-	push af
-	call Function1af1
-	jr z, .asm_58ca
-	ld hl, OBJECT_FLAGS
-	add hl, bc
-	res 5, [hl]
-
-.asm_58ca
-	ld hl, ObjectStruct2 - ObjectStruct1
-	add hl, bc
-	ld b, h
-	ld c, l
-	pop af
-	inc a
-	cp $d
-	jr nz, .asm_58be
-	pop bc
-	ret
-; 58d8
-
-Function58d8: ; 58d8
-	call Function18de
-	ret c
-	ld hl, OBJECT_FLAGS
-	add hl, bc
-	res 5, [hl]
-	ret
-; 58e3
-
-Function58e3: ; 58e3
-	ld hl, OBJECT_01
-	add hl, bc
-	ld a, [hl]
-	cp $ff
-	jp z, Function5903
-	push bc
-	call GetMapObject
-	ld hl, $0004
-	add hl, bc
-	ld a, [hl]
-	pop bc
-	ld hl, OBJECT_03
-	add hl, bc
-	ld [hl], a
-	ld hl, OBJECT_09
-	add hl, bc
-	ld [hl], $0
-	ret
-; 5903
-
-Function5903: ; 5903
-	call GetSpriteDirection
-	rrca
-	rrca
-	ld e, a
-	ld d, 0
-	ld hl, .data_591c
-	add hl, de
-	ld a, [hl]
-	ld hl, OBJECT_03
-	add hl, bc
-	ld [hl], a
-	ld hl, OBJECT_09
-	add hl, bc
-	ld [hl], $0
-	ret
-
-.data_591c
-	db 6, 7, 8, 9
-; 5920
-
-Function5920:: ; 5920
-	ld a, [VramState]
-	bit 0, a
-	ret z
-	xor a
-	ld [$ffbd], a
-	ld a, [hOAMUpdate]
-	push af
-	ld a, $1
-	ld [hOAMUpdate], a
-	call Function5991
-	call Function593a
-	pop af
-	ld [hOAMUpdate], a
-	ret
-; 593a
-
-Function593a: ; 593a
-	ld a, [VramState]
-	bit 1, a
-	ld b, $a0
-	jr z, .asm_5945
-	ld b, $70
-
-.asm_5945
-	ld a, [$ffbd]
-	cp b
-	ret nc
-	ld l, a
-	ld h, $c4
-	ld de, OBJECT_04
-	ld a, b
-	ld c, $a0
-.asm_5952
-	ld [hl], c
-	add hl, de
-	cp l
-	jr nz, .asm_5952
-	ret
-; 5958
-
-Function5958: ; 5958
-	push hl
-	push de
-	push bc
-	ld a, [wd14c]
-	ld d, a
-	ld a, [wd14d]
-	ld e, a
-	ld bc, ObjectStructs
-	ld a, $d
-
-.asm_5968
-	push af
-	call Function1af1
-	jr z, .asm_597c
-
-	ld hl, OBJECT_SPRITE_X
-	add hl, bc
-	ld a, [hl]
-	add d
-	ld [hl], a
-
-	ld hl, OBJECT_SPRITE_Y
-	add hl, bc
-	ld a, [hl]
-	add e
-	ld [hl], a
-
-.asm_597c
-	ld hl, ObjectStruct2 - ObjectStruct1
-	add hl, bc
-	ld b, h
-	ld c, l
-	pop af
-	dec a
-	jr nz, .asm_5968
-
-	xor a
-	ld [wd14c], a
-	ld [wd14d], a
-	pop bc
-	pop de
-	pop hl
-	ret
-; 5991
-
-Function5991: ; 5991
-	call Function59a4
-	ld c, $30
-	call Function59f3
-	ld c, $20
-	call Function59f3
-	ld c, $10
-	call Function59f3
-	ret
-; 59a4
-
-Function59a4: ; 59a4
-	xor a
-	ld hl, wc2eb
-	ld bc, 13
-	call ByteFill
-
-	ld d, 0
-	ld bc, ObjectStructs
-	ld hl, wc2eb
-.loop
-	push hl
-	call Function1af1
-	jr z, .skip
-
-	ld hl, OBJECT_FACING
-	add hl, bc
-	ld a, [hl]
-	cp -1
-	jr z, .skip
-
-; Define the sprite priority.
-	ld e, $10
-	ld hl, OBJECT_FLAGS
-	add hl, bc
-	bit 0, [hl]
-	jr nz, .add
-	ld e, $20
-	bit 1, [hl]
-	jr z, .add
-	ld e, $30
-	jr .add
-
-.skip
-	ld hl, ObjectStruct2 - ObjectStruct1
-	add hl, bc
-	ld b, h
-	ld c, l
-	pop hl
-	jr .next
-
-.add
-	ld hl, ObjectStruct2 - ObjectStruct1
-	add hl, bc
-	ld b, h
-	ld c, l
-	pop hl
-	ld a, d
-	or e
-	ld [hli], a
-
-.next
-	inc d
-	ld a, d
-	cp $d
-	jr nz, .loop
-	ret
-; 59f3
-
-Function59f3: ; 59f3
-	ld hl, wc2eb
-.next
-	ld a, [hli]
-	ld d, a
-	and $f0
-	ret z
-	cp c
-	jr nz, .next
-
-	push bc
-	push hl
-	ld a, d
-	and $f
-	call Function5ac2
-	call Function5a0d
-	pop hl
-	pop bc
-	jr .next
-; 5a0d
-
-Function5a0d: ; 5a0d
-	ld hl, OBJECT_SPRITE
-	add hl, bc
-	ld a, [hl]
-	and $7f
-	ld [$ffc1], a
-
-	xor a
-	bit 7, [hl]
-	jr nz, .asm_5a1d
-	or 8
-.asm_5a1d
-
-	ld hl, OBJECT_FLAGS
-	add hl, bc
-	ld e, [hl]
-	bit 7, e
-	jr z, .asm_5a28
-	or $80
-.asm_5a28
-
-	bit 4, e
-	jr z, .asm_5a2e
-	or $10
-.asm_5a2e
-
-	ld hl, OBJECT_PALETTE
-	add hl, bc
-	ld d, a
-	ld a, [hl]
-	and 7
-	or d
-	ld d, a
-
-	xor a
-	bit 3, e
-	jr z, .asm_5a3f
-	or $80
-.asm_5a3f
-	ld [$ffc2], a
-
-	ld hl, OBJECT_SPRITE_X
-	add hl, bc
-	ld a, [hl]
-
-	ld hl, OBJECT_SPRITE_X_OFFSET
-	add hl, bc
-	add [hl]
-
-	add 8
-
-	ld e, a
-	ld a, [wd14c]
-	add e
-	ld [$ffbf], a
-
-	ld hl, OBJECT_SPRITE_Y
-	add hl, bc
-	ld a, [hl]
-
-	ld hl, OBJECT_SPRITE_Y_OFFSET
-	add hl, bc
-	add [hl]
-
-	add 12
-
-	ld e, a
-	ld a, [wd14d]
-	add e
-	ld [$ffc0], a
-
-	ld hl, OBJECT_FACING
-	add hl, bc
-	ld a, [hl]
-	cp -1
-	jp z, .done
-	cp NUM_FACINGS
-	jp nc, .done
-
-	ld l, a
-	ld h, 0
-	add hl, hl
-	ld bc, Facings
-	add hl, bc
-	ld a, [hli]
-	ld h, [hl]
-	ld l, a
-
-	ld a, [$ffbd]
-	ld c, a
-	ld b, Sprites / $100
-	ld a, [hli]
-	ld [$ffbe], a
-	add c
-	cp SpritesEnd % $100
-	jr nc, .full
-
-.addsprite
-	ld a, [$ffc0]
-	add [hl]
-	inc hl
-
-	ld [bc], a
-	inc c
-
-	ld a, [$ffbf]
-	add [hl]
-	inc hl
-
-	ld [bc], a
-	inc c
-
-	ld e, [hl]
-	inc hl
-
-	ld a, [$ffc1]
-	bit 2, e
-	jr z, .asm_5aa3
-	xor a
-.asm_5aa3
-	add [hl]
-	inc hl
-
-	ld [bc], a
-	inc c
-
-	ld a, e
-	bit 1, a
-	jr z, .asm_5aaf
-	ld a, [$ffc2]
-	or e
-.asm_5aaf
-	and $f0
-	or d
-	ld [bc], a
-	inc c
-
-	ld a, [$ffbe]
-	dec a
-	ld [$ffbe], a
-	jr nz, .addsprite
-
-	ld a, c
-	ld [$ffbd], a
-
-.done
-	xor a
-	ret
-
-.full
-	scf
-	ret
-; 5ac2
-
-Function5ac2: ; 5ac2
-	ld c, a
-	ld b, 0
-	ld hl, .Addresses
-	add hl, bc
-	add hl, bc
-	ld c, [hl]
-	inc hl
-	ld b, [hl]
-	ret
-; 5ace
-
-.Addresses ; 5ace
-	dw PlayerStruct
-	dw ObjectStruct1
-	dw ObjectStruct2
-	dw ObjectStruct3
-	dw ObjectStruct4
-	dw ObjectStruct5
-	dw ObjectStruct6
-	dw ObjectStruct7
-	dw ObjectStruct8
-	dw ObjectStruct9
-	dw ObjectStruct10
-	dw ObjectStruct11
-	dw ObjectStruct12
-; 5ae8
+INCLUDE "engine/map_objects.asm"
 
 
 Function5ae8: ; 5ae8