Add congrats when called for.

src/grading.asm

@@ -28,7 +28,7 @@ wGradePoints:          ds 1
 wInternalGrade:        ds 1
 wDisplayedGrade::      ds 1
 wEffectTimer::         ds 1
-wRankingDisqualified:  ds 1
+wRankingDisqualified:: ds 1
 wDecayCounter:         ds 1
 wGradeGauge:           ds 1
 wSMult:                ds 1

src/res/gameplay_big_data.inc

@@ -67,6 +67,18 @@ sBigKill::
     db "          "
     db " QUIT [B] "
 
+sBigYouAreGM::
+    db " YOU  ARE "
+    db "          "
+    db " GRAND    "
+    db "          "
+    db " MASTER!  "
+    db "          "
+    db "          "
+    db " RETRY[A] "
+    db "          "
+    db " QUIT [B] "
+
 sBigPieceXOffsets::    ; How to draw each piece. X-offsets of the sprites.
     db 0, 8, 16, 24 ; I
     db 0, 8, 8, 16  ; Z

src/res/gameplay_data.inc

@@ -67,6 +67,18 @@ sKill::
     db "          "
     db " QUIT [B] "
 
+sYouAreGM::
+    db " YOU  ARE "
+    db "          "
+    db " GRAND    "
+    db "          "
+    db " MASTER!  "
+    db "          "
+    db "          "
+    db " RETRY[A] "
+    db "          "
+    db " QUIT [B] "
+
 sPieceXOffsets::    ; How to draw each piece. X-offsets of the sprites.
     db 0, 8, 16, 24 ; I
     db 0, 8, 8, 16  ; Z

src/state_gameplay.asm

@@ -404,10 +404,38 @@ GamePlayEventLoopHandlerB::
 
 
 .preGameOverMode
+    ; Is it just a regular game over?
     ld a, [wKillScreenActive]
     cp a, $FF
     jr nz, .regular
 
+    ; GM congratulations?
+    ld a, [wDisplayedGrade]
+    cp a, GRADE_GM
+    jr z, .gm
+
+    ; Condescend if we're not NONE grade.
+    cp a, GRADE_NONE
+    jr nz, .condescend
+
+    ; And if we're DQeq.
+    ld a, [wRankingDisqualified]
+    cp a, $FF
+    jr z, .condescend
+
+.gm
+    call FieldInit
+    ld de, sYouAreGM
+    ld hl, wField+(5*10)
+    ld bc, 100
+    call UnsafeMemCopy
+
+    ld a, MODE_GAME_OVER
+    ldh [hMode], a
+
+    jp .gameOverMode
+
+.condescend
     call FieldInit
     ld de, sKill
     ld hl, wField+(5*10)
@@ -1037,10 +1065,38 @@ GamePlayBigEventLoopHandlerB:
 
 
 .preGameOverMode
+    ; Is it just a regular game over?
     ld a, [wKillScreenActive]
     cp a, $FF
     jr nz, .regular
 
+    ; GM congratulations?
+    ld a, [wDisplayedGrade]
+    cp a, GRADE_GM
+    jr z, .gm
+
+    ; Condescend if we're not NONE grade.
+    cp a, GRADE_NONE
+    jr nz, .condescend
+
+    ; And if we're DQeq.
+    ld a, [wRankingDisqualified]
+    cp a, $FF
+    jr z, .condescend
+
+.gm
+    call BigFieldInit
+    ld de, sBigYouAreGM
+    ld hl, wWideBlittedField+(3*10)
+    ld bc, 100
+    call UnsafeMemCopy
+
+    ld a, MODE_GAME_OVER
+    ldh [hMode], a
+
+    jp .gameOverMode
+
+.condescend
     call BigFieldInit
     ld de, sBigKill
     ld hl, wWideBlittedField+(3*10)