diff options
author | IIMarckus <iimarckus@gmail.com> | 2011-04-09 23:30:24 -0600 |
---|---|---|
committer | IIMarckus <iimarckus@gmail.com> | 2011-04-09 23:30:24 -0600 |
commit | 71e161da53f92e1de194986a79e5a8dafdb343b1 (patch) | |
tree | aa790699ce64bfc5c60ae840a7881a03007b30dc | |
parent | 3426db1c09ba576dd67b0db9f4bdd7f02c8823f4 (diff) |
Use human-readable names instead of memory addresses.
hg-commit-id: da67afc569e2
-rw-r--r-- | constants.asm | 5 | ||||
-rw-r--r-- | pokered.asm | 22 |
2 files changed, 16 insertions, 11 deletions
diff --git a/constants.asm b/constants.asm index d3411563..8058eb31 100644 --- a/constants.asm +++ b/constants.asm @@ -101,6 +101,11 @@ W_ENEMYMON5MOVE3 EQU $D95E W_ENEMYMON6MOVE3 EQU $D98A +; hardware registers, from the pandocs http://nocash.emubase.de/pandocs.htm +rBGP EQU $FF47 +rOBP0 EQU $FF48 +rOBP1 EQU $FF49 + ; pokemon name constants RHYDON EQU $01 diff --git a/pokered.asm b/pokered.asm index 050ed768..4135c99f 100644 --- a/pokered.asm +++ b/pokered.asm @@ -423,11 +423,11 @@ LoadGBPal: ; 20BA dec h .jr0\@ ld a,[hli] - ld [$ff47],a + ld [rBGP],a ld a,[hli] - ld [$ff48],a + ld [rOBP0],a ld a,[hli] - ld [$ff49],a + ld [rOBP1],a ret GBFadeOut1: ; 20D1 @@ -441,11 +441,11 @@ GBFadeOut2: ; 20D8 GBFadeOutCommon: ld a,[hli] - ld [$ff47],a + ld [rBGP],a ld a,[hli] - ld [$ff48],a + ld [rOBP0],a ld a,[hli] - ld [$ff49],a + ld [rOBP1],a ld c,8 call DelayFrames dec b @@ -463,11 +463,11 @@ GBFadeIn2: ; 20F6 GBFadeInCommon: ld a,[hld] - ld [$ff49],a + ld [rOBP1],a ld a,[hld] - ld [$ff48],a + ld [rOBP0],a ld a,[hld] - ld [$ff47],a + ld [rBGP],a ld c,8 call DelayFrames dec b @@ -892,7 +892,7 @@ FadeInIntroPic: ld b,6 .next\@ ld a,[hli] - ld [$FF47],a + ld [rBGP],a ld c,10 call DelayFrames dec b @@ -913,7 +913,7 @@ MovePicLeft: call DelayFrame ld a,$E4 - ld [$FF47],a + ld [rBGP],a .next\@ call DelayFrame ld a,[$FF4B] |