diff options
Diffstat (limited to 'engine')
| -rwxr-xr-x | engine/pokegear.asm | 2 | ||||
| -rwxr-xr-x | engine/pokepic.asm | 49 |
2 files changed, 50 insertions, 1 deletions
diff --git a/engine/pokegear.asm b/engine/pokegear.asm index 5379734e6..44127fafc 100755 --- a/engine/pokegear.asm +++ b/engine/pokegear.asm @@ -1523,7 +1523,7 @@ RadioChannels: dbw 72, .LetsAllSing dbw 78, .PokeFluteRadio dbw 80, .EvolutionRadio - db $ff + db -1 .PkmnTalkAndPokedexShow ; Pokédex Show in the morning diff --git a/engine/pokepic.asm b/engine/pokepic.asm new file mode 100755 index 000000000..2530ae4c9 --- /dev/null +++ b/engine/pokepic.asm @@ -0,0 +1,49 @@ +Pokepic:: ; 244e3 + ld hl, PokepicMenuDataHeader + call CopyMenuDataHeader + call MenuBox + call UpdateSprites + call ApplyTilemap + ld b, SCGB_POKEPIC + call GetSGBLayout + xor a + ld [hBGMapMode], a + ld a, [CurPartySpecies] + ld [CurSpecies], a + call GetBaseData + ld de, VTiles1 + predef GetFrontpic + ld a, [wMenuBorderTopCoord] + inc a + ld b, a + ld a, [wMenuBorderLeftCoord] + inc a + ld c, a + call Coord2Tile + ld a, $80 + ld [hGraphicStartTile], a + lb bc, 7, 7 + predef PlaceGraphic + call WaitBGMap + ret + +ClosePokepic:: ; 24528 + ld hl, PokepicMenuDataHeader + call CopyMenuDataHeader + call ClearMenuBoxInterior + call WaitBGMap + call GetMemSGBLayout + xor a + ld [hBGMapMode], a + call OverworldTextModeSwitch + call ApplyTilemap + call UpdateSprites + call LoadStandardFont + ret + +PokepicMenuDataHeader: ; 0x24547 + db $40 ; flags + db 04, 06 ; start coords + db 13, 14 ; end coords + dw NULL + db 1 ; default option |