mirror of
https://github.com/thornAvery/kep-hack.git
synced 2025-11-15 01:26:40 +13:00
Add some more Pokémon Tower battle stuff.
hg-commit-id: 4510da2e0fc3
This commit is contained in:
parent
ee3c63737d
commit
b273050dc6
34
pokered.asm
34
pokered.asm
|
|
@ -1089,7 +1089,18 @@ TechnicalPrefix:
|
||||||
HiddenPrefix:
|
HiddenPrefix:
|
||||||
db "HM"
|
db "HM"
|
||||||
|
|
||||||
INCBIN "baserom.gbc",$3040,$3541 - $3040
|
INCBIN "baserom.gbc",$3040,$3493 - $3040
|
||||||
|
|
||||||
|
Function3493: ; 3493
|
||||||
|
; XXX what does this do
|
||||||
|
; related to Pokémon Tower and ghosts
|
||||||
|
ld a,$1C
|
||||||
|
call Predef
|
||||||
|
ld a,b
|
||||||
|
and a
|
||||||
|
ret
|
||||||
|
|
||||||
|
INCBIN "baserom.gbc",$349B,$3541 - $349B
|
||||||
|
|
||||||
Function3541: ; 3541
|
Function3541: ; 3541
|
||||||
; XXX what do these three functions do
|
; XXX what do these three functions do
|
||||||
|
|
@ -10235,7 +10246,24 @@ GetOutText:
|
||||||
TX_FAR _GetOutText
|
TX_FAR _GetOutText
|
||||||
db "@"
|
db "@"
|
||||||
|
|
||||||
INCBIN "baserom.gbc",$3D83A,$3E474 - $3D83A
|
Function583A: ; 583A
|
||||||
|
ld a,[W_ISINBATTLE]
|
||||||
|
dec a
|
||||||
|
ret nz
|
||||||
|
ld a,[W_CURMAP]
|
||||||
|
cp a,$8E ; Lavender Town
|
||||||
|
jr c,.next\@
|
||||||
|
cp a,$95 ; Pokémon Tower
|
||||||
|
jr nc,.next\@
|
||||||
|
ld b,SILPH_SCOPE
|
||||||
|
call Function3493
|
||||||
|
ret z
|
||||||
|
.next\@
|
||||||
|
ld a,1
|
||||||
|
and a
|
||||||
|
ret
|
||||||
|
|
||||||
|
INCBIN "baserom.gbc",$3D854,$3E474 - $3D854
|
||||||
|
|
||||||
TypeEffects: ; 6474
|
TypeEffects: ; 6474
|
||||||
; format: attacking type, defending type, damage multiplier
|
; format: attacking type, defending type, damage multiplier
|
||||||
|
|
@ -12185,7 +12213,7 @@ PredefPointers: ; 7E79
|
||||||
dbw $03,$4754
|
dbw $03,$4754
|
||||||
dbw $0E,$6F5B
|
dbw $0E,$6F5B
|
||||||
dbw $01,$6E43
|
dbw $01,$6E43
|
||||||
dbw $03,$78A5
|
dbw $03,$78A5; 1C, used in Pokémon Tower
|
||||||
dbw $03,$3EB5
|
dbw $03,$3EB5
|
||||||
dbw $03,$3E2E
|
dbw $03,$3E2E
|
||||||
dbw $12,$40EB
|
dbw $12,$40EB
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue