pokecrystal/home/battle.asm

281 lines
4.2 KiB
NASM
Raw Normal View History

GetPartyParamLocation::
; Get the location of parameter a from wCurPartyMon in hl
push bc
ld hl, wPartyMons
ld c, a
ld b, 0
add hl, bc
ld a, [wCurPartyMon]
call GetPartyLocation
pop bc
ret
GetPartyLocation::
; Add the length of a PartyMon struct to hl a times.
ld bc, PARTYMON_STRUCT_LENGTH
jp AddNTimes
GetDexNumber:: ; unreferenced
; Probably used in gen 1 to convert index number to dex number
; Not required in gen 2 because index number == dex number
push hl
ld a, b
dec a
ld b, 0
add hl, bc
ld hl, BaseData + BASE_DEX_NO
ld bc, BASE_DATA_SIZE
call AddNTimes
ld a, BANK(BaseData)
call GetFarHalfword
ld b, l
ld c, h
pop hl
ret
2018-06-24 14:09:41 +00:00
UserPartyAttr::
push af
ldh a, [hBattleTurn]
and a
jr nz, .ot
pop af
jr BattlePartyAttr
.ot
pop af
jr OTPartyAttr
2018-06-24 14:09:41 +00:00
OpponentPartyAttr::
push af
ldh a, [hBattleTurn]
and a
jr z, .ot
pop af
jr BattlePartyAttr
.ot
pop af
jr OTPartyAttr
2018-06-24 14:09:41 +00:00
BattlePartyAttr::
2020-02-26 13:41:12 +00:00
; Get attribute a from the party struct of the active battle mon.
push bc
ld c, a
ld b, 0
2018-01-23 22:39:09 +00:00
ld hl, wPartyMons
add hl, bc
2018-01-23 22:39:09 +00:00
ld a, [wCurBattleMon]
call GetPartyLocation
pop bc
ret
2018-06-24 14:09:41 +00:00
OTPartyAttr::
; Get attribute a from the party struct of the active enemy mon.
push bc
ld c, a
ld b, 0
2018-01-23 22:39:09 +00:00
ld hl, wOTPartyMon1Species
add hl, bc
2018-01-23 22:39:09 +00:00
ld a, [wCurOTMon]
call GetPartyLocation
pop bc
ret
2018-06-24 14:09:41 +00:00
ResetDamage::
xor a
2018-01-23 22:39:09 +00:00
ld [wCurDamage], a
ld [wCurDamage + 1], a
ret
2018-06-24 14:09:41 +00:00
SetPlayerTurn::
xor a
ldh [hBattleTurn], a
ret
2018-06-24 14:09:41 +00:00
SetEnemyTurn::
ld a, 1
ldh [hBattleTurn], a
ret
2018-06-24 14:09:41 +00:00
UpdateOpponentInParty::
ldh a, [hBattleTurn]
and a
jr z, UpdateEnemyMonInParty
jr UpdateBattleMonInParty
2018-06-24 14:09:41 +00:00
UpdateUserInParty::
ldh a, [hBattleTurn]
and a
jr z, UpdateBattleMonInParty
jr UpdateEnemyMonInParty
2018-06-24 14:09:41 +00:00
UpdateBattleMonInParty::
; Update level, status, current HP
2018-01-23 22:39:09 +00:00
ld a, [wCurBattleMon]
2018-06-24 14:09:41 +00:00
UpdateBattleMon::
2018-01-23 22:39:09 +00:00
ld hl, wPartyMon1Level
call GetPartyLocation
ld d, h
ld e, l
2018-01-23 22:39:09 +00:00
ld hl, wBattleMonLevel
ld bc, wBattleMonMaxHP - wBattleMonLevel
jp CopyBytes
2018-06-24 14:09:41 +00:00
UpdateEnemyMonInParty::
; Update level, status, current HP
; No wildmons.
ld a, [wBattleMode]
dec a
ret z
2018-01-23 22:39:09 +00:00
ld a, [wCurOTMon]
ld hl, wOTPartyMon1Level
call GetPartyLocation
ld d, h
ld e, l
2018-01-23 22:39:09 +00:00
ld hl, wEnemyMonLevel
ld bc, wEnemyMonMaxHP - wEnemyMonLevel
jp CopyBytes
2018-06-24 14:09:41 +00:00
RefreshBattleHuds::
call UpdateBattleHuds
ld c, 3
call DelayFrames
jp WaitBGMap
2018-06-24 14:09:41 +00:00
UpdateBattleHuds::
2017-12-24 17:47:30 +00:00
farcall UpdatePlayerHUD
farcall UpdateEnemyHUD
ret
INCLUDE "home/battle_vars.asm"
2018-06-24 14:09:41 +00:00
FarCopyRadioText::
inc hl
ldh a, [hROMBank]
push af
ld a, [hli]
ld e, a
ld a, [hli]
ld d, a
ld a, [hli]
ldh [hROMBank], a
ld [MBC3RomBank], a
ld a, e
ld l, a
ld a, d
ld h, a
ld de, wRadioText
ld bc, 2 * SCREEN_WIDTH
call CopyBytes
pop af
ldh [hROMBank], a
ld [MBC3RomBank], a
ret
2018-06-24 14:09:41 +00:00
MobileTextBorder::
; For mobile link battles only.
ld a, [wLinkMode]
cp LINK_MOBILE
ret c
; Draw a cell phone icon at the
; top right corner of the border.
hlcoord 19, 12
2018-06-25 16:24:18 +00:00
ld [hl], $5e ; top
hlcoord 19, 13
2018-06-25 16:24:18 +00:00
ld [hl], $5f ; bottom
ret
2019-04-08 12:15:10 +00:00
BattleTextbox::
; Open a textbox and print text at hl.
push hl
2019-04-08 12:15:10 +00:00
call SpeechTextbox
call MobileTextBorder
call UpdateSprites
2015-11-25 15:26:30 +00:00
call ApplyTilemap
pop hl
2019-04-08 12:15:10 +00:00
call PrintTextboxText
ret
2019-04-08 12:15:10 +00:00
StdBattleTextbox::
; Open a textbox and print battle text at 20:hl.
ldh a, [hROMBank]
push af
ld a, BANK(BattleText)
rst Bankswitch
2019-04-08 12:15:10 +00:00
call BattleTextbox
pop af
rst Bankswitch
ret
2015-11-09 21:41:09 +00:00
2018-06-24 14:09:41 +00:00
GetBattleAnimPointer::
2015-11-09 21:41:09 +00:00
ld a, BANK(BattleAnimations)
rst Bankswitch
ld a, [hli]
2018-01-23 22:39:09 +00:00
ld [wBattleAnimAddress], a
2015-11-09 21:41:09 +00:00
ld a, [hl]
2018-01-23 22:39:09 +00:00
ld [wBattleAnimAddress + 1], a
2015-11-09 21:41:09 +00:00
; ClearBattleAnims is the only function that calls this...
ld a, BANK(ClearBattleAnims)
2015-11-09 21:41:09 +00:00
rst Bankswitch
ret
2018-06-24 14:09:41 +00:00
GetBattleAnimByte::
2015-11-09 21:41:09 +00:00
push hl
push de
2018-01-23 22:39:09 +00:00
ld hl, wBattleAnimAddress
2015-11-09 21:41:09 +00:00
ld e, [hl]
inc hl
ld d, [hl]
ld a, BANK(BattleAnimations)
rst Bankswitch
ld a, [de]
2018-01-23 22:39:09 +00:00
ld [wBattleAnimByte], a
2015-11-09 21:41:09 +00:00
inc de
ld a, BANK(BattleAnimCommands)
rst Bankswitch
ld [hl], d
dec hl
ld [hl], e
pop de
pop hl
2018-01-23 22:39:09 +00:00
ld a, [wBattleAnimByte]
2015-11-09 21:41:09 +00:00
ret
Small home/ reorganization Time to move everything out of home.asm: - InexplicablyEmptyFunction was moved to home/map.asm - The wDebugFlags functions and xor_a brothers were moved to home/flag.asm because they're all flag-related. - ret_2f3e was moved into home/region.asm - The register alias sisters were moved to a new file called home/call_regs.asm - IsInArray and SkipNames were joined by AddNTimes from home/math.asm into home/array.asm, as they're all used to index arrays. - CallPointerAt was moved into home/print_text.asm because given the contents of that file it doesn't feel very out of place (that file isn't very aptly named...) - CountSetBits was moved into home/pokedex_flags.asm because it's unique use is counting the amount of seen/caught mon in the podedex. GetWeekday was pulled into this by proximity. Other changes were also made: - PushLYOverrides was moved from home/sprite_anims.asm to home/battle.asm, because it's almost exclusively used for battle animations, with the lone exception being the Magnet Train. - home/copy.asm was renamed to home/gfx.asm, as it's all gfx-related - home/copy2.asm was renamed to home/copy.asm, now it's the only file called copy. - SetHPPal and GetHPPal were moved from home/hp_pals.asm to home/tilemap.asm, as they're attrmap related, like many functions in that file are. - home/rtc.asm was renamed to home/time_palettes.asm, as it had very little to do with the RTC at all, all RTC functions being in home/time.asm - home/handshake.asm was renamed to home/printer.asm. - home/mon_data_2.asm was renamed to home/mon_party.asm.
2020-02-21 22:48:51 +00:00
PushLYOverrides::
ldh a, [hLCDCPointer]
and a
ret z
ld a, LOW(wLYOverridesBackup)
ld [wRequested2bppSource], a
ld a, HIGH(wLYOverridesBackup)
ld [wRequested2bppSource + 1], a
ld a, LOW(wLYOverrides)
ld [wRequested2bppDest], a
ld a, HIGH(wLYOverrides)
ld [wRequested2bppDest + 1], a
ld a, (wLYOverridesEnd - wLYOverrides) / LEN_2BPP_TILE
ld [wRequested2bppSize], a
Small home/ reorganization Time to move everything out of home.asm: - InexplicablyEmptyFunction was moved to home/map.asm - The wDebugFlags functions and xor_a brothers were moved to home/flag.asm because they're all flag-related. - ret_2f3e was moved into home/region.asm - The register alias sisters were moved to a new file called home/call_regs.asm - IsInArray and SkipNames were joined by AddNTimes from home/math.asm into home/array.asm, as they're all used to index arrays. - CallPointerAt was moved into home/print_text.asm because given the contents of that file it doesn't feel very out of place (that file isn't very aptly named...) - CountSetBits was moved into home/pokedex_flags.asm because it's unique use is counting the amount of seen/caught mon in the podedex. GetWeekday was pulled into this by proximity. Other changes were also made: - PushLYOverrides was moved from home/sprite_anims.asm to home/battle.asm, because it's almost exclusively used for battle animations, with the lone exception being the Magnet Train. - home/copy.asm was renamed to home/gfx.asm, as it's all gfx-related - home/copy2.asm was renamed to home/copy.asm, now it's the only file called copy. - SetHPPal and GetHPPal were moved from home/hp_pals.asm to home/tilemap.asm, as they're attrmap related, like many functions in that file are. - home/rtc.asm was renamed to home/time_palettes.asm, as it had very little to do with the RTC at all, all RTC functions being in home/time.asm - home/handshake.asm was renamed to home/printer.asm. - home/mon_data_2.asm was renamed to home/mon_party.asm.
2020-02-21 22:48:51 +00:00
ret