thorn/kep-hack
1
0
Fork 0
mirror of https://github.com/thornAvery/kep-hack.git synced 2025-09-17 02:40:50 +12:00
Code Issues Actions Packages Projects Releases Wiki Activity

add some useful text macros

Browse source 
hg-commit-id: ee1364b43984
This commit is contained in:
IIMarckus 2010-10-29 20:59:46 -06:00
parent 67922daa1a
commit 31aa2d80d1
1 changed files with 25 additions and 11 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

36
pokered.asm
View file

@ -3,6 +3,17 @@ RGB: MACRO
dw (\3 << 10 | \2 << 5 | \1) dw (\3 << 10 | \2 << 5 | \1)
ENDM ENDM
; text macros
TX_FAR: MACRO
db $17
dw \1
db BANK(\1)
ENDM
TX_NULL: MACRO
db $50
ENDM
; wram locations ; wram locations
W_OPPONENTSTATUS EQU $CFE9 ; active opponent's status condition W_OPPONENTSTATUS EQU $CFE9 ; active opponent's status condition
; bit 0 slp ; bit 0 slp
@ -3823,7 +3834,7 @@ Function674B: ; 674B
ld bc,4 ld bc,4
call CopyData call CopyData
ld hl,BattleWithdrawText ld hl,AIBattleWithdrawText
call PrintText call PrintText
ld a,1 ld a,1
ld [$D11D],a ld [$D11D],a
@ -3838,11 +3849,9 @@ Function674B: ; 674B
scf scf
ret ret
BattleWithdrawText: AIBattleWithdrawText:
db $17 TX_FAR _AIBattleWithdrawText
dw $40BE TX_NULL
db $22
db $50
AIUseFullHeal: AIUseFullHeal:
call $669B call $669B
@ -3966,10 +3975,8 @@ AIPrintItemUse_:
jp PrintText jp PrintText
AIBattleUseItemText: AIBattleUseItemText:
db $17 TX_FAR _AIBattleUseItemText
dw $40D5 TX_NULL
db $22
db $50
INCBIN "baserom.gbc",$3A849,$3C000 - $3A849 INCBIN "baserom.gbc",$3A849,$3C000 - $3A849
@ -4532,7 +4539,14 @@ SECTION "bank21",DATA,BANK[$21]
INCBIN "baserom.gbc",$84000,$4000 INCBIN "baserom.gbc",$84000,$4000
SECTION "bank22",DATA,BANK[$22] SECTION "bank22",DATA,BANK[$22]
INCBIN "baserom.gbc",$88000,$4000 INCBIN "baserom.gbc",$88000,$BE
_AIBattleWithdrawText:
INCBIN "baserom.gbc",$880BE,$17
_AIBattleUseItemText:
INCBIN "baserom.gbc",$880D5,$1A
INCBIN "baserom.gbc",$880EF,$2C0A
SECTION "bank23",DATA,BANK[$23] SECTION "bank23",DATA,BANK[$23]
INCBIN "baserom.gbc",$8C000,$4000 INCBIN "baserom.gbc",$8C000,$4000