summaryrefslogtreecommitdiff
path: root/engine/movement_pattern.asm
diff options
context:
space:
mode:
authorentrpntr <entrpntr@gmail.com>2020-04-26 20:45:59 -0400
committerentrpntr <entrpntr@gmail.com>2020-04-26 22:15:31 -0400
commitd53f3afe500ad9e92f18a7e6de77982928a6061f (patch)
tree9fd2697a741c82a98104b1c23437907f061be034 /engine/movement_pattern.asm
parent0b33dabae2d43591a964774154f8bec5bf7194b1 (diff)
Clean up some overworld code.
Diffstat (limited to 'engine/movement_pattern.asm')
-rwxr-xr-xengine/movement_pattern.asm651
1 files changed, 0 insertions, 651 deletions
diff --git a/engine/movement_pattern.asm b/engine/movement_pattern.asm
deleted file mode 100755
index 29d09229..00000000
--- a/engine/movement_pattern.asm
+++ /dev/null
@@ -1,651 +0,0 @@
-RestoreDefaultMovement:
- ld hl, $1
- add hl, bc
- ld a, [hl]
- cp $ff
- jr z, .asm_4756
- push bc
- call GetMapObject
- ld hl, $4
- add hl, bc
- ld a, [hl]
- pop bc
- ret
-
-.asm_4756
- ld a, $6
- ret
-
-ClearObjectMovementByteIndex:
- ld hl, $1b
- add hl, bc
- ld [hl], $0
- ret
-
-IncrementObjectMovementByteIndex:
- ld hl, $1b
- add hl, bc
- inc [hl]
- ret
-
-DecrementObjectMovementByteIndex:
- ld hl, $1b
- add hl, bc
- dec [hl]
- ret
-
-MovementAnonymousJumptable:
- ld hl, $1b
- add hl, bc
- ld a, [hl]
- pop hl
- rst JumpTable
- ret
-
-ClearObjectStructField28:
- ld hl, $1c
- add hl, bc
- ld [hl], $0
- ret
-
-IncrementObjectStructField28:
- ld hl, $1c
- add hl, bc
- inc [hl]
- ret
-
-Object28AnonymousJumptable:
- ld hl, $1c
- add hl, bc
- ld a, [hl]
- pop hl
- rst JumpTable
- ret
-
-GetValueObjectStructField28:
- ld hl, $1c
- add hl, bc
- ld a, [hl]
- ret
-
-SetValueObjectStructField28:
- ld hl, $1c
- add hl, bc
- ld [hl], a
- ret
-
-ObjectMovementReset: ; 4795 (1:4795)
- ld hl, $10
- add hl, bc
- ld d, [hl]
- ld hl, $11
- add hl, bc
- ld e, [hl]
- push bc
- call GetCoordTile
- pop bc
- ld hl, $e
- add hl, bc
- ld [hl], a
- call CopyNextCoordsTileToStandingCoordsTile
- call EndSpriteMovement
- ld hl, $9
- add hl, bc
- ld [hl], $1
- ret
-
-MapObjectMovementPattern: ; 47b6 (1:47b6)
- call ClearObjectStructField28
- call GetSpriteMovementFunction
- ld a, [hl]
- ld hl, .Pointers
- rst JumpTable
- ret
-
-.Pointers:
- dw Function47fa
- dw Function47fb
- dw Function4805
- dw Function4811
- dw Function481b
- dw Function482a
- dw Function4842
- dw Function4855
- dw Function485b
- dw Function4861
- dw Function4867
- dw Function486a
- dw Function486d
- dw Function4870
- dw Function4876
- dw Function4879
- dw Function487f
- dw Function4885
- dw Function48d8
- dw Function49be
- dw Function49fa
- dw Function4931
- dw Function4947
- dw Function4a95
- dw Function4966
- dw Function495d
- dw Function4a1f
- dw Function4a62
-
-Function47fa:
- ret
-
-Function47fb: ; 47fb (1:47fb)
- call Random
- ldh a, [hRandom]
- and $1
- jp Function4ac9
-
-Function4805: ; 4805 (1:4805)
- call Random
- ldh a, [hRandom]
- and $1
- or $2
- jp Function4ac9
-
-Function4811: ; 4811 (1:4811)
- call Random
- ldh a, [hRandom]
- and $3
- jp Function4ac9
-
-Function481b: ; 481b (1:481b)
- call Random
- ldh a, [hRandom]
- and $c
- ld hl, $8
- add hl, bc
- ld [hl], a
- jp Function4af6
-
-Function482a: ; 482a (1:482a)
- ld hl, $8
- add hl, bc
- ld a, [hl]
- and $c
- ld d, a
- call Random
- ldh a, [hRandom]
- and $c
- cp d
- jr nz, .asm_483e
- xor $c
-.asm_483e
- ld [hl], a
- jp Function4aff
-
-Function4842: ; 4842 (1:4842)
- call Function4603
- call EndSpriteMovement
- ld hl, $b
- add hl, bc
- ld [hl], $1
- ld hl, $9
- add hl, bc
- ld [hl], $5
- ret
-
-Function4855: ; 4855 (1:4855)
- ld hl, $4fa8
- jp Function4fe9
-
-Function485b: ; 485b (1:485b)
- ld hl, $4fbd
- jp Function4fe9
-
-Function4861: ; 4861 (1:4861)
- ld hl, $4fce
- jp Function4fe9
-
-Function4867: ; 4867 (1:4867)
- jp Function4fdf
-
-Function486a: ; 486a (1:486a)
- jp Function4fdf
-
-Function486d: ; 486d (1:486d)
- jp Function4fdf
-
-Function4870: ; 4870 (1:4870)
- ld hl, $4fa8
- jp Function4fe9
-
-Function4876: ; 4876 (1:4876)
- jp Function4fdf
-
-Function4879: ; 4879 (1:4879)
- ld hl, $5485
- jp Function4fe9
-
-Function487f: ; 487f (1:487f)
- ld hl, $4fb6
- jp Function4fe9
-
-Function4885: ; 4885 (1:4885)
- call MovementAnonymousJumptable
- dw .asm_488c
- dw .asm_48d1
-
-.asm_488c
- ld hl, $e
- add hl, bc
- ld a, [hl]
- call CheckPitTile
- jr z, .asm_48ce
- ld hl, $5
- add hl, bc
- bit 2, [hl]
- res 2, [hl]
- jr z, .asm_48c7
- ld hl, $20
- add hl, bc
- ld a, [hl]
- and $3
- or $0
- call InitStep
- call CheckNPCMovementPermissions
- jr c, .asm_48c4
- ld de, $1b
- call PlaySFX
- call Function54d7
- call UpdateGrassPriority
- ld hl, $9
- add hl, bc
- ld [hl], $f
- ret
-
-.asm_48c4
- call Function4603
-.asm_48c7
- ld hl, $7
- add hl, bc
- ld [hl], $ff
- ret
-
-.asm_48ce
- call IncrementObjectMovementByteIndex
-.asm_48d1
- ld hl, $7
- add hl, bc
- ld [hl], $ff
- ret
-
-Function48d8: ; 48d8 (1:48d8)
- ld hl, $10
- add hl, bc
- ld d, [hl]
- ld hl, $11
- add hl, bc
- ld e, [hl]
- ld hl, $20
- add hl, bc
- ld a, [hl]
- push bc
- call GetObjectStruct
- ld hl, $7
- add hl, bc
- ld a, [hl]
- cp $ff
- jr z, .asm_4923
- ld hl, $12
- add hl, bc
- ld a, [hl]
- cp d
- jr z, .asm_4906
- jr c, .asm_4902
- ld a, $3
- jr .asm_4916
-
-.asm_4902
- ld a, $2
- jr .asm_4916
-
-.asm_4906
- ld hl, $13
- add hl, bc
- ld a, [hl]
- cp e
- jr z, .asm_4923
- jr c, .asm_4914
- ld a, $0
- jr .asm_4916
-
-.asm_4914
- ld a, $1
-.asm_4916
- ld d, a
- ld hl, $7
- add hl, bc
- ld a, [hl]
- and $c
- or d
- pop bc
- jp Function53b1
-
-.asm_4923
- pop bc
- ld hl, $7
- add hl, bc
- ld [hl], $ff
- ld hl, $b
- add hl, bc
- ld [hl], $1
- ret
-
-Function4931: ; 4931 (1:4931)
- call EndSpriteMovement
- ld hl, $7
- add hl, bc
- ld [hl], $ff
- ld hl, $b
- add hl, bc
- ld [hl], $9
- ld hl, $9
- add hl, bc
- ld [hl], $4
- ret
-
-Function4947: ; 4947 (1:4947)
- call EndSpriteMovement
- ld hl, $7
- add hl, bc
- ld [hl], $ff
- ld hl, $b
- add hl, bc
- ld [hl], $a
- ld hl, $9
- add hl, bc
- ld [hl], $4
- ret
-
-Function495d: ; 495d (1:495d)
- call MovementAnonymousJumptable
- dw Function496f
- dw Function4975
- dw Function4991
-
-Function4966: ; 4966 (1:4966)
- call MovementAnonymousJumptable
- dw Function496f
- dw Function4975
- dw Function499d
-
-Function496f:
- call EndSpriteMovement
- call IncrementObjectMovementByteIndex
-Function4975:
- ld hl, $b
- add hl, bc
- ld [hl], $1
- ld hl, $20
- add hl, bc
- ld a, [hl]
- ld a, $10
- ld hl, $a
- add hl, bc
- ld [hl], a
- ld hl, $9
- add hl, bc
- ld [hl], $3
- call IncrementObjectMovementByteIndex
- ret
-
-Function4991:
- ld de, .data
- call Function49a9
- jr Function495d
-
-.data
- db OW_RIGHT, OW_LEFT, OW_DOWN, OW_UP
-
-Function499d:
- ld de, .data
- call Function49a9
- jr Function4966
-
-.data
- db OW_LEFT, OW_RIGHT, OW_UP, OW_DOWN
-
-Function49a9: ; 49a9 (1:49a9)
- ld hl, $8
- 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 DecrementObjectMovementByteIndex
- ret
-
-Function49be: ; 49be (1:49be)
- call Function4a81
- ld hl, $b
- add hl, bc
- ld [hl], $7
- ld hl, $a
- add hl, de
- ld a, [hl]
- inc a
- add a
- add $0
- ld hl, $a
- add hl, bc
- ld [hl], a
- ld hl, $7
- add hl, de
- ld a, [hl]
- and $3
- ld d, $e
- cp $0
- jr z, .asm_49e8
- cp $1
- jr z, .asm_49e8
- ld d, $c
-.asm_49e8
- ld hl, $1a
- add hl, bc
- ld [hl], d
- ld hl, $19
- add hl, bc
- ld [hl], $0
- ld hl, $9
- add hl, bc
- ld [hl], $13
- ret
-
-Function49fa: ; 49fa (1:49fa)
- call EndSpriteMovement
- call Function4a81
- ld hl, $b
- add hl, bc
- ld [hl], $8
- ld hl, $a
- add hl, bc
- ld [hl], $0
- ld hl, $1a
- add hl, bc
- ld [hl], $f0
- ld hl, $19
- add hl, bc
- ld [hl], $0
- ld hl, $9
- add hl, bc
- ld [hl], $13
- ret
-
-Function4a1f: ; 4a1f (1:4a1f)
- call EndSpriteMovement
- call Function4a81
- ld hl, $b
- add hl, bc
- ld [hl], $e
- ld hl, $a
- add hl, de
- ld a, [hl]
- inc a
- add a
- ld hl, $a
- add hl, bc
- ld [hl], a
- ld hl, $7
- add hl, de
- ld a, [hl]
- and $3
- ld e, a
- ld d, $0
- ld hl, .data
- add hl, de
- add hl, de
- ld d, [hl]
- inc hl
- ld e, [hl]
- ld hl, $19
- add hl, bc
- ld [hl], d
- ld hl, $1a
- add hl, bc
- ld [hl], e
- ld hl, $9
- add hl, bc
- ld [hl], $13
- ret
-
-.data
- ; x, y
- db 0, -4
- db 0, 8
- db 6, 2
- db -6, 2
-
-Function4a62: ; 4a62 (1:4a62)
- call EndSpriteMovement
- call Function4a81
- ld hl, $b
- add hl, bc
- ld [hl], $f
- ld hl, $a
- add hl, de
- ld a, [hl]
- add $ff
- ld hl, $a
- add hl, bc
- ld [hl], a
- ld hl, $9
- add hl, bc
- ld [hl], $13
- ret
-
-Function4a81: ; 4a81 (1:4a81)
- ld hl, $20
- add hl, bc
- ld a, [hl]
- push bc
- call GetObjectStruct
- ld d, b
- ld e, c
- pop bc
- ld hl, $1d
- add hl, bc
- ld [hl], e
- inc hl
- ld [hl], d
- ret
-
-Function4a95: ; 4a95 (1:4a95)
- call EndSpriteMovement
- ld hl, $b
- add hl, bc
- ld [hl], $0
- ld hl, $20
- add hl, bc
- ld a, [hl]
- call Function4ab7
- ld hl, $a
- add hl, bc
- ld [hl], e
- ld hl, $1e
- add hl, bc
- ld [hl], a
- ld hl, $9
- add hl, bc
- ld [hl], $15
- ret
-
-Function4ab7: ; 4ab7 (1:4ab7)
- ld d, a
- and $3f
- ld e, a
- ld a, d
- rlca
- rlca
- and $3
- ld d, a
- inc d
- ld a, $1
-.asm_4ac4
- dec d
- ret z
- add a
- jr .asm_4ac4
-
-Function4ac9: ; 4ac9 (1:4ac9)
- call InitStep
- call CheckNPCMovementPermissions
- jr c, .asm_4af0
- call UpdateGrassPriority
- ld hl, $b
- add hl, bc
- ld [hl], $2
- ld hl, wCenteredObject
- ldh a, [hConnectionStripLength]
- cp [hl]
- jr z, .asm_4ae9
- ld hl, $9
- add hl, bc
- ld [hl], $7
- ret
-
-.asm_4ae9
- ld hl, $9
- add hl, bc
- ld [hl], $6
- ret
-
-.asm_4af0
- call EndSpriteMovement
- call Function4603
-Function4af6: ; 4af6 (1:4af6)
- call Random
- ldh a, [hRandom]
- and $7f
- jr asm_4b06
-
-Function4aff: ; 4aff (1:4aff)
- call Random
- ldh a, [hRandomAdd]
- and $1f
-asm_4b06:
- ld hl, $a
- add hl, bc
- ld [hl], a
- ld hl, $7
- add hl, bc
- ld [hl], $ff
- ld hl, $b
- add hl, bc
- ld [hl], $1
- ld hl, $9
- add hl, bc
- ld [hl], $3
- ret