pokecrystal-board/home/pokedex_flags.asm

SetSeenAndCaughtMon:: ; 3380
	push af
	ld c, a
	ld hl, PokedexCaught
	ld b, SET_FLAG
	call PokedexFlagAction
	pop af
	; fallthrough
; 338b

SetSeenMon:: ; 338b
	ld c, a
	ld hl, PokedexSeen
	ld b, SET_FLAG
	jr PokedexFlagAction
; 3393

CheckCaughtMon:: ; 3393
	ld c, a
	ld hl, PokedexCaught
	ld b, CHECK_FLAG
	jr PokedexFlagAction
; 339b

CheckSeenMon:: ; 339b
	ld c, a
	ld hl, PokedexSeen
	ld b, CHECK_FLAG
	; fallthrough
; 33a1

PokedexFlagAction:: ; 33a1
	ld d, 0
	predef FlagPredef
	ld a, c
	and a
	ret
; 33ab
Use :: to export labels between objects. This fixes the build. 2014-02-01 17:26:39 -08:00			`SetSeenAndCaughtMon:: ; 3380`
split pokedex flag handling into home/pokedex_flags.asm 2013-09-18 18:54:31 -07:00			`push af`
			`ld c, a`
			`ld hl, PokedexCaught`
			`ld b, SET_FLAG`
			`call PokedexFlagAction`
			`pop af`
			`; fallthrough`
			`; 338b`

Use :: to export labels between objects. This fixes the build. 2014-02-01 17:26:39 -08:00			`SetSeenMon:: ; 338b`
split pokedex flag handling into home/pokedex_flags.asm 2013-09-18 18:54:31 -07:00			`ld c, a`
			`ld hl, PokedexSeen`
			`ld b, SET_FLAG`
			`jr PokedexFlagAction`
			`; 3393`

Use :: to export labels between objects. This fixes the build. 2014-02-01 17:26:39 -08:00			`CheckCaughtMon:: ; 3393`
split pokedex flag handling into home/pokedex_flags.asm 2013-09-18 18:54:31 -07:00			`ld c, a`
			`ld hl, PokedexCaught`
			`ld b, CHECK_FLAG`
			`jr PokedexFlagAction`
			`; 339b`

Use :: to export labels between objects. This fixes the build. 2014-02-01 17:26:39 -08:00			`CheckSeenMon:: ; 339b`
split pokedex flag handling into home/pokedex_flags.asm 2013-09-18 18:54:31 -07:00			`ld c, a`
			`ld hl, PokedexSeen`
			`ld b, CHECK_FLAG`
			`; fallthrough`
			`; 33a1`

Use :: to export labels between objects. This fixes the build. 2014-02-01 17:26:39 -08:00			`PokedexFlagAction:: ; 33a1`
split pokedex flag handling into home/pokedex_flags.asm 2013-09-18 18:54:31 -07:00			`ld d, 0`
Use a predef macro that takes labels instead of juggling constants. Besides making predefs convenient, naming a predef no longer requires adding or renaming a predef constant. This also lets predefs be rearranged at will. 2014-06-16 11:20:01 -07:00			`predef FlagPredef`
split pokedex flag handling into home/pokedex_flags.asm 2013-09-18 18:54:31 -07:00			`ld a, c`
			`and a`
			`ret`
			`; 33ab`