pokehacks/pokecrystal-board
0
0
Fork 0
mirror of https://gitlab.com/xCrystal/pokecrystal-board.git synced 2024-11-16 11:27:33 -08:00
Code Issues Packages Projects Releases Wiki Activity

Define NUM_FLYPOINTS

Browse Source
This commit is contained in:
Rangi 2020-07-21 11:48:39 -04:00
parent fc99117d88
commit a9941e28cc
3 changed files with 13 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
constants/map_data_constants.asm
View File

@ -128,5 +128,6 @@ KANTO_FLYPOINT EQU const_value
const FLY_FUCHSIA
const FLY_CINNABAR
const FLY_INDIGO
NUM_FLYPOINTS EQU const_value
MAX_OUTDOOR_SPRITES EQU 23 ; see engine/overworld/overworld.asm

2
data/maps/flypoints.asm
View File

@ -27,4 +27,4 @@ Flypoints:
db LANDMARK_FUCHSIA_CITY, SPAWN_FUCHSIA
db LANDMARK_CINNABAR_ISLAND, SPAWN_CINNABAR
db LANDMARK_INDIGO_PLATEAU, SPAWN_INDIGO
db -1
db -1 ; end

22
engine/pokegear/pokegear.asm
View File

@ -65,7 +65,7 @@ PokeGear:
ldh [hBGMapAddress], a
ld a, HIGH(vBGMap0)
ldh [hBGMapAddress + 1], a
ld a, $90
ld a, SCREEN_HEIGHT_PX
ldh [hWY], a
call ExitPokegearRadio_HandleMusic
ret
@ -269,7 +269,7 @@ InitPokegearTilemap:
ld a, HIGH(vBGMap0)
ldh [hBGMapAddress + 1], a
call .UpdateBGMap
ld a, $90
ld a, SCREEN_HEIGHT_PX
jr .finish
.kanto_0
@ -2077,7 +2077,7 @@ _FlyMap:
pop af
ldh [hInMenu], a
call ClearBGPalettes
ld a, $90
ld a, SCREEN_HEIGHT_PX
ldh [hWY], a
xor a ; LOW(vBGMap0)
ldh [hBGMapAddress], a
@ -2420,10 +2420,10 @@ Pokedex_GetArea:
.left
ldh a, [hWY]
cp $90
cp SCREEN_HEIGHT_PX
ret z
call ClearSprites
ld a, $90
ld a, SCREEN_HEIGHT_PX
ldh [hWY], a
xor a ; JOHTO_REGION
call .GetAndPlaceNest
@ -2872,7 +2872,7 @@ Function92311:
pop af
ldh [hInMenu], a
call ClearBGPalettes
ld a, $90
ld a, SCREEN_HEIGHT_PX
ldh [hWY], a
xor a ; LOW(vBGMap0)
ldh [hBGMapAddress], a
@ -2895,7 +2895,7 @@ Function92311:
.down_right
ld hl, wTownMapPlayerIconLandmark
ld a, [hl]
cp FLY_INDIGO
cp NUM_FLYPOINTS - 1
jr c, .okay_dr
ld [hl], -1
.okay_dr
@ -2907,7 +2907,7 @@ Function92311:
ld a, [hl]
and a
jr nz, .okay_ul
ld [hl], FLY_INDIGO + 1
ld [hl], NUM_FLYPOINTS
.okay_ul
dec [hl]
.continue
@ -2916,13 +2916,13 @@ Function92311:
jr c, .johto
call FillKantoMap
xor a
ld b, $9c
ld b, HIGH(vBGMap1)
jr .finish
.johto
call FillJohtoMap
ld a, $90
ld b, $98
ld a, SCREEN_HEIGHT_PX
ld b, HIGH(vBGMap0)
.finish
ldh [hWY], a
ld a, b