ref: b5a7e7de3e6b75e95967edd28b9c2af5959cd136
dir: /engine/overworld/variables.asm/
_GetVarAction:: ld a, c cp NUM_VARS jr c, .valid xor a .valid ld c, a ld b, 0 ld hl, VarActionTable add hl, bc add hl, bc add hl, bc ld e, [hl] inc hl ld d, [hl] inc hl ld b, [hl] ld a, b and RETVAR_EXECUTE jr nz, .call_de ld a, b and RETVAR_ADDR_DE ret nz ld a, [de] jr LoadStringBuffer2 .call_de call _de_ ret LoadStringBuffer2: ld de, wStringBuffer2 ld [de], a ret INCLUDE "data/overworld/variables.asm" Var_CountCaughtMons: ; Caught mons. ld hl, wPokedexCaught ld b, wEndPokedexCaught - wPokedexCaught call CountSetBits ld a, [wNumSetBits] jp LoadStringBuffer2 Var_CountSeenMons: ; Seen mons. ld hl, wPokedexSeen ld b, wEndPokedexSeen - wPokedexSeen call CountSetBits ld a, [wNumSetBits] jp LoadStringBuffer2 Var_CountBadges: ; Number of owned badges. ld hl, wBadges ld b, 2 call CountSetBits ld a, [wNumSetBits] jp LoadStringBuffer2 Var_PlayerFacing: ; The direction the player is facing. ld a, [wPlayerDirection] and $c rrca rrca jp LoadStringBuffer2 Var_DayOfWeek: ; The day of the week. call GetWeekday jp LoadStringBuffer2 Var_UnownCaught: ; Number of unique Unown caught. call .count_unown ld a, b jp LoadStringBuffer2 .count_unown: ld hl, wUnownDex ld b, 0 .loop ld a, [hli] and a ret z inc b ld a, b cp NUM_UNOWN jr c, .loop ret Var_BoxFreeSpace: ; Remaining slots in the current box. ld a, BANK(sBoxCount) call OpenSRAM ld hl, sBoxCount ld a, MONS_PER_BOX sub [hl] ld b, a call CloseSRAM ld a, b jp LoadStringBuffer2 Var_BattleResult: ; Outcome of the last battle. ld a, [wBattleResult] and $ff ^ BATTLERESULT_BITMASK jp LoadStringBuffer2