ref: 99df5f0fd79f063ee4c7ec364eadd175a3d83c42
dir: /engine/menu/diploma.asm/
DisplayDiploma: ; 566e2 (15:66e2) call SaveScreenTilesToBuffer2 call GBPalWhiteOutWithDelay3 call ClearScreen xor a ld [wUpdateSpritesEnabled], a ld hl, wd730 set 6, [hl] call DisableLCD ld hl, CircleTile ld de, vChars2 + $700 ld bc, $0010 ld a, BANK(CircleTile) call FarCopyData2 ld hl, wTileMap ld bc, $1012 predef Diploma_TextBoxBorder ld hl, DiplomaTextPointersAndCoords ld c, $5 .asm_56715 push bc ld a, [hli] ld e, a ld a, [hli] ld d, a ld a, [hli] push hl ld h, [hl] ld l, a call PlaceString pop hl inc hl pop bc dec c jr nz, .asm_56715 hlCoord 10, 4 ld de, wPlayerName call PlaceString callba Func_44dd ld hl, wOAMBuffer + $01 ld bc, $8028 .asm_5673e ld a, [hl] add $21 ld [hli], a inc hl ld a, b ld [hli], a inc hl dec c jr nz, .asm_5673e call EnableLCD callba LoadTrainerInfoTextBoxTiles ld b, $8 call GoPAL_SET call Delay3 call GBPalNormal ld a, $90 ld [$ff48], a call WaitForTextScrollButtonPress ld hl, wd730 res 6, [hl] call GBPalWhiteOutWithDelay3 call RestoreScreenTilesAndReloadTilePatterns call Delay3 jp GBPalNormal Func_56777: ; 56777 (15:6777) ld hl, wPlayerName ld bc, $ff00 .asm_5677d ld a, [hli] cp $50 ret z dec c jr .asm_5677d DiplomaTextPointersAndCoords: ; 56784 (15:6784) dw DiplomaText dw wTileMap + $2d dw DiplomaPlayer dw wTileMap + $53 dw DiplomaEmptyText dw wTileMap + $5f dw DiplomaCongrats dw wTileMap + $7a dw DiplomaGameFreak dw wTileMap + $149 DiplomaText: db $70,"Diploma",$70,"@" DiplomaPlayer: db "Player@" DiplomaEmptyText: db "@" DiplomaCongrats: db "Congrats! This" next "diploma certifies" next "that you have" next "completed your" next "#DEX.@" DiplomaGameFreak: db "GAME FREAK@"