diff options
| author | IIMarckus <iimarckus@gmail.com> | 2013-05-12 17:10:29 -0600 |
|---|---|---|
| committer | IIMarckus <iimarckus@gmail.com> | 2013-05-12 17:10:29 -0600 |
| commit | 5419d34a214a78f07dec94e255e9d43768ab50d5 (patch) | |
| tree | a5f213c42c0e9096eb28a373774503da29cb461f | |
| parent | 5ac569e5f3692123a8df29153fa5b3d81f620159 (diff) | |
Add Oak's speech.
| -rw-r--r-- | main.asm | 91 |
1 files changed, 82 insertions, 9 deletions
@@ -1241,9 +1241,15 @@ SpeechTextBox: ; 103e ; 1048 -INCBIN "baserom.gbc", $1048, $1065 - $1048 - +INCBIN "baserom.gbc", $1048, $1057 - $1048 +PrintText: ; 0x1057 + call $106c + push hl + ld hl, $c5b9 + ld bc, $0312 + call ClearBox + pop hl PrintTextBoxText: ; 1065 ld bc, $c5b9 ; TileMap(1,14) call $13e5 ; PrintText @@ -1407,7 +1413,7 @@ Char5D: ld a, [InLinkBattle] and a jr nz, .linkbattle - ld a, [$d233] + ld a, [TrainerClass] cp $9 jr z, .asm_1248 ; 0x1227 $1f cp $2a @@ -4583,7 +4589,74 @@ INCBIN "baserom.gbc", $3e32, $3fb5 - $3e32 SECTION "bank1",DATA,BANK[$1] -INCBIN "baserom.gbc", $4000, $6045 - $4000 +INCBIN "baserom.gbc", $4000, $5f99 - $4000 + +OakSpeech: ; 0x5f99 + ld a, $24 + ld hl, $4672 + rst $8 + call $04dd + call ClearTileMap + ld de, $002b + call StartMusic + call $04a3 + call $04b6 + xor a + ld [CurPartySpecies], a + ld a, POKEMON_PROF + ld [TrainerClass], a + call $619c + ld b, $1c + call GetSGBLayout + call $616a + ld hl, OakText1 + call PrintText + call $04b6 + call ClearTileMap + ld a, $c2 + ld [$cf60], a + ld [CurPartySpecies], a + call $3856 + ld hl, $c4f6 + call $3786 + xor a + ld [$d123], a + ld [$d124], a + ld b, $1c + call $3340 + call $6182 + ld hl, OakText2 + call PrintText + ld hl, OakText4 + call PrintText + call $04b6 + call ClearTileMap + xor a + ld [CurPartySpecies], a + ld a, POKEMON_PROF + ld [TrainerClass], a + call $619c + ld b, $1c + call $3340 + call $616a + ld hl, OakText5 + call PrintText + call $04b6 + call ClearTileMap + xor a + ld [CurPartySpecies], a + ld a, $22 + ld hl, $4874 + rst $8 + ld b, $1c + call $3340 + call $616a + ld hl, OakText6 + call PrintText + call $6074 + ld hl, OakText7 + call PrintText + ret OakText1: ; 0x6045 TX_FAR _OakText1 @@ -5374,7 +5447,7 @@ SpecialsPointers: ; 0xc029 dbw $00, $0d91 dbw $00, $31f3 dbw $00, $0485 - dbw $00, $0fc8 + dbw BANK(ClearTileMap), ClearTileMap dbw $00, $1ad2 dbw $00, $0e4a dbw $03, $4230 @@ -10050,7 +10123,7 @@ StatsScreenInit: ; 4dc8a push bc push hl call $31f3 - call $0fc8 + call ClearTileMap call $1ad2 ld a, $3e ld hl, $753e @@ -10058,7 +10131,7 @@ StatsScreenInit: ; 4dc8a pop hl call JpHl call $31f3 - call $0fc8 + call ClearTileMap pop bc ; restore old values ld a, b @@ -17042,7 +17115,7 @@ Function117b14: Function117b28: ld hl, MobileStadiumEntryText - call $1057 + call PrintText jp Function117cdd Function117b31: @@ -17202,7 +17275,7 @@ Function117c4a: ld hl, $4061 rst FarCall ld hl, MobileStadiumSuccessText - call $1057 + call PrintText ld a, [rSVBK] push af ld a, $5 |