summaryrefslogtreecommitdiff
path: root/engine/overworld/movement.asm
diff options
context:
space:
mode:
Diffstat (limited to 'engine/overworld/movement.asm')
-rwxr-xr-xengine/overworld/movement.asm776
1 files changed, 776 insertions, 0 deletions
diff --git a/engine/overworld/movement.asm b/engine/overworld/movement.asm
new file mode 100755
index 00000000..74e44cd3
--- /dev/null
+++ b/engine/overworld/movement.asm
@@ -0,0 +1,776 @@
+GetMovementByte:
+ ld hl, wMovementDataPointerBank
+ call GetMovementByte_
+ ret
+
+Function4fbd:
+ ld hl, $1b
+ add hl, bc
+ ld e, [hl]
+ inc [hl]
+ ld d, $0
+ ld hl, wMovementPerson
+ ld a, [hli]
+ ld h, [hl]
+ ld l, a
+ add hl, de
+ ld a, [hl]
+ ret
+
+Function4fce:
+ ld hl, $1b
+ add hl, bc
+ ld e, [hl]
+ inc [hl]
+ ld d, $0
+ ld hl, wce8f
+ ld a, [hli]
+ ld h, [hl]
+ ld l, a
+ add hl, de
+ ld a, [hl]
+ ret
+
+Function4fdf: ; 4fdf (1:4fdf)
+ ld hl, GetMovementPerson
+ jp Function4fe9
+
+GetMovementPerson
+ ld a, [wMovementPerson]
+ ret
+
+Function4fe9: ; 4fe9 (1:4fe9)
+ call Function4ffd
+.asm_4fec
+ xor a
+ ld [wce93], a
+ call Function5006
+ call Function5013
+ ld a, [wce93]
+ and a
+ jr nz, .asm_4fec
+ ret
+
+Function4ffd: ; 4ffd (1:4ffd)
+ ld a, l
+ ld [wce94], a
+ ld a, h
+ ld [wce95], a
+ ret
+
+Function5006: ; 5006 (1:5006)
+ ld hl, wce94
+ ld a, [hli]
+ ld h, [hl]
+ ld l, a
+ jp hl
+
+Function500d: ; 500d (1:500d)
+ ld a, $1
+ ld [wce93], a
+ ret
+
+Function5013: ; 5013 (1:5013)
+ push af
+ call Function5457
+ pop af
+ ld hl, MovementPointers
+ rst JumpTable
+ ret
+
+MovementPointers: ; 501d
+ dw Function527d
+ dw Function5281
+ dw Function5285
+ dw Function5289
+ dw Function538f
+ dw Function5393
+ dw Function5397
+ dw Function539b
+ dw Function529f
+ dw Function52a4
+ dw Function52a9
+ dw Function52ae
+ dw Function52b3
+ dw Function52b8
+ dw Function52bd
+ dw Function52c2
+ dw Function52c7
+ dw Function52cc
+ dw Function52d1
+ dw Function52d6
+ dw Function5317
+ dw Function531c
+ dw Function5321
+ dw Function5326
+ dw Function532b
+ dw Function5330
+ dw Function5335
+ dw Function533a
+ dw Function533f
+ dw Function5344
+ dw Function5349
+ dw Function534e
+ dw Function52db
+ dw Function52e0
+ dw Function52e5
+ dw Function52ea
+ dw Function52ef
+ dw Function52f4
+ dw Function52f9
+ dw Function52fe
+ dw Function5303
+ dw Function5308
+ dw Function530d
+ dw Function5312
+ dw Function5353
+ dw Function5358
+ dw Function535d
+ dw Function5362
+ dw Function5367
+ dw Function536c
+ dw Function5371
+ dw Function5376
+ dw Function537b
+ dw Function5380
+ dw Function5385
+ dw Function538a
+ dw Function5232
+ dw Function523b
+ dw Function5244
+ dw Function524d
+ dw Function5256
+ dw Function525f
+ dw Function51c1
+ dw Function51c5
+ dw Function51c9
+ dw Function51cd
+ dw Function51d1
+ dw Function51d5
+ dw Function51d9
+ dw Function51dd
+ dw Function51e1
+ dw Function5160
+ dw Function517a
+ dw Function519c
+ dw Function5157
+ dw Function51af
+ dw Function50cf
+ dw Function50d6
+ dw Function50dd
+ dw Function50e4
+ dw Function51fe
+ dw Function5128
+ dw Function514a
+ dw Function5268
+ dw Function526e
+ dw Function5274
+ dw Function5218
+ dw Function5135
+ dw Function5109
+
+Function50cf: ; 50cf (1:50cf)
+ ld hl, $9
+ add hl, bc
+ ld [hl], $c
+ ret
+
+Function50d6: ; 50d6 (1:50d6)
+ ld hl, $9
+ add hl, bc
+ ld [hl], $d
+ ret
+
+Function50dd: ; 50dd (1:50dd)
+ ld hl, $9
+ add hl, bc
+ ld [hl], $e
+ ret
+
+Function50e4: ; 50e4 (1:50e4)
+ call GetSpriteDirection
+ rlca
+ rlca
+ ld hl, $c
+ add hl, bc
+ ld [hl], a
+ ld hl, $b
+ add hl, bc
+ ld [hl], $4
+ call Function5006
+ ld hl, $a
+ add hl, bc
+ ld [hl], a
+ ld hl, $9
+ add hl, bc
+ ld [hl], $3
+ ld hl, $7
+ add hl, bc
+ ld [hl], $ff
+ ret
+
+Function5109: ; 5109 (1:5109)
+ call GetSpriteDirection
+ rlca
+ rlca
+ ld hl, $c
+ add hl, bc
+ ld [hl], a
+ call Function5006
+ ld hl, $a
+ add hl, bc
+ ld [hl], a
+ ld hl, $7
+ add hl, bc
+ ld [hl], $ff
+ ld hl, $9
+ add hl, bc
+ ld [hl], $12
+ ret
+
+Function5128: ; 5128 (1:5128)
+ ld hl, $b
+ add hl, bc
+ ld [hl], $6
+ ld hl, $9
+ add hl, bc
+ ld [hl], $10
+ ret
+
+Function5135: ; 5135 (1:5135)
+ call Function5006
+ ld hl, $a
+ add hl, bc
+ ld [hl], a
+ ld hl, $b
+ add hl, bc
+ ld [hl], $1
+ ld hl, $9
+ add hl, bc
+ ld [hl], $11
+ ret
+
+Function514a: ; 514a (1:514a)
+ ld hl, $b
+ add hl, bc
+ ld [hl], $6
+ ld hl, $9
+ add hl, bc
+ ld [hl], $1
+ ret
+
+Function5157: ; 5157 (1:5157)
+ ld hl, $1b
+ add hl, bc
+ ld [hl], $0
+ jp Function500d
+
+Function5160: ; 5160 (1:5160)
+ call RestoreDefaultMovement
+ ld hl, $3
+ add hl, bc
+ ld [hl], a
+ ld hl, $1b
+ add hl, bc
+ ld [hl], $0
+ ld hl, wVramState
+ res 7, [hl]
+ ld hl, $9
+ add hl, bc
+ ld [hl], $1
+ ret
+
+Function517a: ; 517a (1:517a)
+ call RestoreDefaultMovement
+ ld hl, $3
+ add hl, bc
+ ld [hl], a
+ ld hl, $1b
+ add hl, bc
+ ld [hl], $0
+ call Function5006
+ ld hl, $a
+ add hl, bc
+ ld [hl], a
+ ld hl, $9
+ add hl, bc
+ ld [hl], $3
+ ld hl, wVramState
+ res 7, [hl]
+ ret
+
+Function519c: ; 519c (1:519c)
+ call DeleteMapObject
+ ld hl, wObjectFollow_Leader
+ ld a, [hMapObjectIndexBuffer]
+ cp [hl]
+ jr nz, .asm_51a9
+ ld [hl], $ff
+.asm_51a9
+ ld hl, wVramState
+ res 7, [hl]
+ ret
+
+Function51af: ; 51af (1:51af)
+ ld hl, $b
+ add hl, bc
+ ld [hl], $1
+ ld hl, $9
+ add hl, bc
+ ld [hl], $4
+ ld hl, wVramState
+ res 7, [hl]
+ ret
+
+Function51c1: ; 51c1 (1:51c1)
+ ld a, $1
+ jr asm_51e6
+
+Function51c5: ; 51c5 (1:51c5)
+ ld a, $2
+ jr asm_51e6
+
+Function51c9: ; 51c9 (1:51c9)
+ ld a, $3
+ jr asm_51e6
+
+Function51cd: ; 51cd (1:51cd)
+ ld a, $4
+ jr asm_51e6
+
+Function51d1: ; 51d1 (1:51d1)
+ ld a, $5
+ jr asm_51e6
+
+Function51d5: ; 51d5 (1:51d5)
+ ld a, $6
+ jr asm_51e6
+
+Function51d9: ; 51d9 (1:51d9)
+ ld a, $7
+ jr asm_51e6
+
+Function51dd: ; 51dd (1:51dd)
+ ld a, $8
+ jr asm_51e6
+
+Function51e1: ; 51e1 (1:51e1)
+ call Function5006
+ jr asm_51e6
+
+asm_51e6
+ ld hl, $a
+ add hl, bc
+ ld [hl], a
+ ld hl, $9
+ add hl, bc
+ ld [hl], $3
+ ld hl, $b
+ add hl, bc
+ ld [hl], $1
+ ld hl, $7
+ add hl, bc
+ ld [hl], $ff
+ ret
+
+Function51fe: ; 51fe (1:51fe)
+ ld a, $1
+ ld hl, $a
+ add hl, bc
+ ld [hl], a
+ ld hl, $9
+ add hl, bc
+ ld [hl], $b
+ ld hl, $b
+ add hl, bc
+ ld [hl], $3
+ ld hl, $7
+ add hl, bc
+ ld [hl], $ff
+ ret
+
+Function5218: ; 5218 (1:5218)
+ ld a, $18
+ ld hl, $a
+ add hl, bc
+ ld [hl], a
+ ld hl, $9
+ add hl, bc
+ ld [hl], $3
+ ld hl, $b
+ add hl, bc
+ ld [hl], $b
+ ld hl, $7
+ add hl, bc
+ ld [hl], $ff
+ ret
+
+Function5232: ; 5232 (1:5232)
+ ld hl, $4
+ add hl, bc
+ res 3, [hl]
+ jp Function500d
+
+Function523b: ; 523b (1:523b)
+ ld hl, $4
+ add hl, bc
+ set 3, [hl]
+ jp Function500d
+
+Function5244: ; 5244 (1:5244)
+ ld hl, $4
+ add hl, bc
+ res 2, [hl]
+ jp Function500d
+
+Function524d: ; 524d (1:524d)
+ ld hl, $4
+ add hl, bc
+ set 2, [hl]
+ jp Function500d
+
+Function5256: ; 5256 (1:5256)
+ ld hl, $4
+ add hl, bc
+ res 0, [hl]
+ jp Function500d
+
+Function525f: ; 525f (1:525f)
+ ld hl, $4
+ add hl, bc
+ set 0, [hl]
+ jp Function500d
+
+Function5268: ; 5268 (1:5268)
+ call Function5518
+ jp Function500d
+
+Function526e: ; 526e (1:526e)
+ call Function54e6
+ jp Function500d
+
+Function5274: ; 5274 (1:5274)
+ call Function5006
+ call Function5504
+ jp Function500d
+
+Function527d: ; 527d (1:527d)
+ ld a, $0
+ jr asm_528d
+
+Function5281: ; 5281 (1:5281)
+ ld a, $4
+ jr asm_528d
+
+Function5285: ; 5285 (1:5285)
+ ld a, $8
+ jr asm_528d
+
+Function5289: ; 5289 (1:5289)
+ ld a, $c
+ jr asm_528d
+
+asm_528d
+ ld hl, $8
+ add hl, bc
+ ld [hl], a
+ ld hl, $b
+ add hl, bc
+ ld [hl], $1
+ ld hl, $7
+ add hl, bc
+ ld [hl], $ff
+ ret
+
+Function529f: ; 529f (1:529f)
+ ld a, $0
+ jp Function53b1
+
+Function52a4: ; 52a4 (1:52a4)
+ ld a, $1
+ jp Function53b1
+
+Function52a9: ; 52a9 (1:52a9)
+ ld a, $2
+ jp Function53b1
+
+Function52ae: ; 52ae (1:52ae)
+ ld a, $3
+ jp Function53b1
+
+Function52b3: ; 52b3 (1:52b3)
+ ld a, $4
+ jp Function53b1
+
+Function52b8: ; 52b8 (1:52b8)
+ ld a, $5
+ jp Function53b1
+
+Function52bd: ; 52bd (1:52bd)
+ ld a, $6
+ jp Function53b1
+
+Function52c2: ; 52c2 (1:52c2)
+ ld a, $7
+ jp Function53b1
+
+Function52c7: ; 52c7 (1:52c7)
+ ld a, $8
+ jp Function53b1
+
+Function52cc: ; 52cc (1:52cc)
+ ld a, $9
+ jp Function53b1
+
+Function52d1: ; 52d1 (1:52d1)
+ ld a, $a
+ jp Function53b1
+
+Function52d6: ; 52d6 (1:52d6)
+ ld a, $b
+ jp Function53b1
+
+Function52db: ; 52db (1:52db)
+ ld a, $0
+ jp Function53e5
+
+Function52e0: ; 52e0 (1:52e0)
+ ld a, $1
+ jp Function53e5
+
+Function52e5: ; 52e5 (1:52e5)
+ ld a, $2
+ jp Function53e5
+
+Function52ea: ; 52ea (1:52ea)
+ ld a, $3
+ jp Function53e5
+
+Function52ef: ; 52ef (1:52ef)
+ ld a, $4
+ jp Function53e5
+
+Function52f4: ; 52f4 (1:52f4)
+ ld a, $5
+ jp Function53e5
+
+Function52f9: ; 52f9 (1:52f9)
+ ld a, $6
+ jp Function53e5
+
+Function52fe: ; 52fe (1:52fe)
+ ld a, $7
+ jp Function53e5
+
+Function5303: ; 5303 (1:5303)
+ ld a, $8
+ jp Function53e5
+
+Function5308: ; 5308 (1:5308)
+ ld a, $9
+ jp Function53e5
+
+Function530d: ; 530d (1:530d)
+ ld a, $a
+ jp Function53e5
+
+Function5312: ; 5312 (1:5312)
+ ld a, $b
+ jp Function53e5
+
+Function5317: ; 5317 (1:5317)
+ ld a, $0
+ jp Function5407
+
+Function531c: ; 531c (1:531c)
+ ld a, $1
+ jp Function5407
+
+Function5321: ; 5321 (1:5321)
+ ld a, $2
+ jp Function5407
+
+Function5326: ; 5326 (1:5326)
+ ld a, $3
+ jp Function5407
+
+Function532b: ; 532b (1:532b)
+ ld a, $4
+ jp Function5407
+
+Function5330: ; 5330 (1:5330)
+ ld a, $5
+ jp Function5407
+
+Function5335: ; 5335 (1:5335)
+ ld a, $6
+ jp Function5407
+
+Function533a: ; 533a (1:533a)
+ ld a, $7
+ jp Function5407
+
+Function533f: ; 533f (1:533f)
+ ld a, $8
+ jp Function5407
+
+Function5344: ; 5344 (1:5344)
+ ld a, $9
+ jp Function5407
+
+Function5349: ; 5349 (1:5349)
+ ld a, $a
+ jp Function5407
+
+Function534e: ; 534e (1:534e)
+ ld a, $b
+ jp Function5407
+
+Function5353: ; 5353 (1:5353)
+ ld a, $0
+ jp Function5429
+
+Function5358: ; 5358 (1:5358)
+ ld a, $1
+ jp Function5429
+
+Function535d: ; 535d (1:535d)
+ ld a, $2
+ jp Function5429
+
+Function5362: ; 5362 (1:5362)
+ ld a, $3
+ jp Function5429
+
+Function5367: ; 5367 (1:5367)
+ ld a, $4
+ jp Function5429
+
+Function536c: ; 536c (1:536c)
+ ld a, $5
+ jp Function5429
+
+Function5371: ; 5371 (1:5371)
+ ld a, $6
+ jp Function5429
+
+Function5376: ; 5376 (1:5376)
+ ld a, $7
+ jp Function5429
+
+Function537b: ; 537b (1:537b)
+ ld a, $8
+ jp Function5429
+
+Function5380: ; 5380 (1:5380)
+ ld a, $9
+ jp Function5429
+
+Function5385: ; 5385 (1:5385)
+ ld a, $a
+ jp Function5429
+
+Function538a: ; 538a (1:538a)
+ ld a, $b
+ jp Function5429
+
+Function538f: ; 538f (1:538f)
+ ld a, $0
+ jr asm_539f
+
+Function5393: ; 5393 (1:5393)
+ ld a, $4
+ jr asm_539f
+
+Function5397: ; 5397 (1:5397)
+ ld a, $8
+ jr asm_539f
+
+Function539b: ; 539b (1:539b)
+ ld a, $c
+ jr asm_539f
+
+asm_539f
+ ld hl, $1d
+ add hl, bc
+ ld [hl], a
+ ld hl, $b
+ add hl, bc
+ ld [hl], $2
+ ld hl, $9
+ add hl, bc
+ ld [hl], $a
+ ret
+
+Function53b1: ; 53b1 (1:53b1)
+ call InitStep
+ call UpdateGrassPriority
+ ld hl, $b
+ add hl, bc
+ ld [hl], $2
+ ld hl, $e
+ add hl, bc
+ ld a, [hl]
+ call CheckSuperTallGrassTile
+ jr z, .asm_53cc
+ call CheckGrassTile
+ jr c, .asm_53cf
+.asm_53cc
+ call Function54f5
+.asm_53cf
+ ld hl, wCenteredObject
+ ld a, [hConnectionStripLength]
+ cp [hl]
+ jr z, .asm_53de
+ ld hl, $9
+ add hl, bc
+ ld [hl], $2
+ ret
+
+.asm_53de
+ ld hl, $9
+ add hl, bc
+ ld [hl], $6
+ ret
+
+Function53e5: ; 53e5 (1:53e5)
+ call InitStep
+ call UpdateGrassPriority
+ ld hl, $b
+ add hl, bc
+ ld [hl], $4
+ ld hl, wCenteredObject
+ ld a, [hMapObjectIndexBuffer]
+ cp [hl]
+ jr z, .asm_5400
+ ld hl, $9
+ add hl, bc
+ ld [hl], $2
+ ret
+
+.asm_5400
+ ld hl, $9
+ add hl, bc
+ ld [hl], $6
+ ret
+
+Function5407: ; 5407 (1:5407)
+ call InitStep
+ call UpdateGrassPriority
+ ld hl, $b
+ add hl, bc
+ ld [hl], $1
+ ld hl, wCenteredObject
+ ld a, [hConnectionStripLength]
+ cp [hl]
+ jr z, .asm_5422
+ ld hl, $9
+ add hl, bc
+ ld [hl], $2
+ ret
+
+.asm_5422
+ ld hl, $9
+ add hl, bc
+ ld [hl], $6
+ ret
generated by cgit v1.2.3 (git 2.25.1) at 2025-06-27 07:53:11 +0000