summaryrefslogtreecommitdiff
path: root/engine/pokemon/stats_screen.asm
diff options
context:
space:
mode:
Diffstat (limited to 'engine/pokemon/stats_screen.asm')
-rw-r--r--engine/pokemon/stats_screen.asm48
1 files changed, 48 insertions, 0 deletions
diff --git a/engine/pokemon/stats_screen.asm b/engine/pokemon/stats_screen.asm
index e7fc4f8b2..97121aa3d 100644
--- a/engine/pokemon/stats_screen.asm
+++ b/engine/pokemon/stats_screen.asm
@@ -185,6 +185,10 @@ EggStatsJoypad:
.check
bit A_BUTTON_F, a
jr nz, .quit
+if DEF(_DEBUG)
+ cp START
+ jr z, .hatch
+endc
and D_DOWN | D_UP | A_BUTTON | B_BUTTON
jp StatsScreen_JoypadAction
@@ -193,6 +197,39 @@ EggStatsJoypad:
call StatsScreen_SetJumptableIndex
ret
+if DEF(_DEBUG)
+.hatch
+ ld a, [wMonType]
+ or a
+ jr nz, .skip
+ push bc
+ push de
+ push hl
+ ld a, [wCurPartyMon]
+ ld bc, PARTYMON_STRUCT_LENGTH
+ ld hl, wPartyMon1Happiness
+ call AddNTimes
+ ld [hl], 1
+ ld a, 1
+ ld [wTempMonHappiness], a
+ ld a, 127
+ ld [wStepCount], a
+ ld de, .HatchSoonString
+ hlcoord 8, 17
+ call PlaceString
+ ld hl, wcf64
+ set 5, [hl]
+ pop hl
+ pop de
+ pop bc
+.skip
+ xor a
+ jp StatsScreen_JoypadAction
+
+.HatchSoonString:
+ db "▶HATCH SOON!@"
+endc
+
StatsScreen_LoadPage:
call StatsScreen_LoadGFX
ld hl, wcf64
@@ -970,6 +1007,17 @@ EggStatsScreen:
ld de, FiveQMarkString
hlcoord 11, 5
call PlaceString
+if DEF(_DEBUG)
+ ld de, .PushStartString
+ hlcoord 8, 17
+ call PlaceString
+ jr .placed_push_start
+
+.PushStartString:
+ db "▶PUSH START.@"
+
+.placed_push_start
+endc
ld a, [wTempMonHappiness] ; egg status
ld de, EggSoonString
cp $6