summaryrefslogtreecommitdiff
path: root/engine/events/pokepic.asm
diff options
context:
space:
mode:
Diffstat (limited to 'engine/events/pokepic.asm')
-rw-r--r--engine/events/pokepic.asm48
1 files changed, 48 insertions, 0 deletions
diff --git a/engine/events/pokepic.asm b/engine/events/pokepic.asm
new file mode 100644
index 00000000..523c5df5
--- /dev/null
+++ b/engine/events/pokepic.asm
@@ -0,0 +1,48 @@
+Pokepic::
+ ld hl, PokepicMenuHeader
+ call CopyMenuHeader
+ call MenuBox
+ call UpdateSprites
+ call ApplyTilemap
+ ld b, SCGB_POKEPIC
+ call GetSGBLayout
+ xor a
+ ldh [hBGMapMode], a
+ ld a, [wCurPartySpecies]
+ ld [wCurSpecies], a
+ call GetBaseData
+ ld de, vTiles1
+ predef GetMonFrontpic
+ ld a, [wMenuBorderTopCoord]
+ inc a
+ ld b, a
+ ld a, [wMenuBorderLeftCoord]
+ inc a
+ ld c, a
+ call Coord2Tile
+ ld a, $80
+ ldh [hGraphicStartTile], a
+ lb bc, 7, 7
+ predef PlaceGraphic
+ call WaitBGMap
+ ret
+
+ClosePokepic::
+ ld hl, PokepicMenuHeader
+ call CopyMenuHeader
+ call ClearMenuBoxInterior
+ call WaitBGMap
+ call GetMemSGBLayout
+ xor a
+ ldh [hBGMapMode], a
+ call OverworldTextModeSwitch
+ call ApplyTilemap
+ call UpdateSprites
+ call LoadStandardFont
+ ret
+
+PokepicMenuHeader:
+ db MENU_BACKUP_TILES ; flags
+ menu_coords 6, 4, 14, 13
+ dw NULL
+ db 1 ; default option