script special for pokerus check

This commit is contained in:
yenatch 2013-01-14 01:40:00 -05:00
parent 80e760544d
commit 23511b8416
1 changed files with 23 additions and 2 deletions

View File

@ -2771,7 +2771,7 @@ SpecialsPointers: ; 0xc029
dbw $01,$7305 dbw $01,$7305
dbw $01,$737e dbw $01,$737e
dbw $01,$73f7 dbw $01,$73f7
dbw $03,$4419 dbw BANK(SpecialCheckPokerus),SpecialCheckPokerus
dbw $09,$4b25 dbw $09,$4b25
dbw $09,$4b4e dbw $09,$4b4e
dbw $09,$4ae8 dbw $09,$4ae8
@ -2863,7 +2863,28 @@ SpecialsPointers: ; 0xc029
dbw $24,$4a88 dbw $24,$4a88
dbw $03,$4224 dbw $03,$4224
INCBIN "baserom.gbc",$c224,$c43d - $c224 INCBIN "baserom.gbc",$c224,$c3e2 - $c224
ScriptReturnCarry: ; c3e2
jr c, .carry
xor a
ld [ScriptVar], a
ret
.carry
ld a, 1
ld [ScriptVar], a
ret
; c3ef
INCBIN "baserom.gbc",$c3ef,$c419 - $c3ef
SpecialCheckPokerus: ; c419
; Check if a monster in your party has Pokerus
callba CheckPokerus
jp ScriptReturnCarry
; c422
INCBIN "baserom.gbc",$c422,$c43d - $c422
SpecialSnorlaxAwake: ; 0xc43d SpecialSnorlaxAwake: ; 0xc43d
; Check if the Poké Flute channel is playing, and if the player is standing ; Check if the Poké Flute channel is playing, and if the player is standing