Rooba
/
pokecrystal
mirror of https://github.com/pret/pokecrystal.git
1
1
Fork 0
Code Issues Packages Projects Releases Wiki Activity
pokecrystal/engine/events/pokerus/check_pokerus.asm

26 lines
454 B
NASM
Raw Normal View History

Remove all address comments
2018-06-24 14:09:41 +00:00
_CheckPokerus:
Remove all code from main.asm (some labeled INCBINs, like out-of-context graphics, are still present) engine/routines/ stores isolated out-of-context routines as individual files. It might be preferable later to append them to their related engine/ files in unique little SECTIONs, relying on the linkerscript to place them appropriately; or some other organization method. In the meantime, they're now easily findable apart from main.asm's other content.
2017-12-25 00:35:35 +00:00
; Return carry if a monster in your party has Pokerus
; Get number of monsters to iterate over
Prefix wram labels with w, part 2.
2018-01-23 22:39:09 +00:00
ld a, [wPartyCount]
Remove all code from main.asm (some labeled INCBINs, like out-of-context graphics, are still present) engine/routines/ stores isolated out-of-context routines as individual files. It might be preferable later to append them to their related engine/ files in unique little SECTIONs, relying on the linkerscript to place them appropriately; or some other organization method. In the meantime, they're now easily findable apart from main.asm's other content.
2017-12-25 00:35:35 +00:00
and a
jr z, .NoPokerus
ld b, a
; Check each monster in the party for Pokerus
Prefix wram labels with w, part 2.
2018-01-23 22:39:09 +00:00
ld hl, wPartyMon1PokerusStatus
Remove all code from main.asm (some labeled INCBINs, like out-of-context graphics, are still present) engine/routines/ stores isolated out-of-context routines as individual files. It might be preferable later to append them to their related engine/ files in unique little SECTIONs, relying on the linkerscript to place them appropriately; or some other organization method. In the meantime, they're now easily findable apart from main.asm's other content.
2017-12-25 00:35:35 +00:00
ld de, PARTYMON_STRUCT_LENGTH
.Check:
ld a, [hl]
and $0f ; only the bottom nybble is used
jr nz, .HasPokerus
; Next PartyMon
add hl, de
dec b
jr nz, .Check
.NoPokerus:
and a
ret
.HasPokerus:
scf
ret