summaryrefslogtreecommitdiff
path: root/engine/oak_speech2.asm
diff options
context:
space:
mode:
Diffstat (limited to 'engine/oak_speech2.asm')
-rwxr-xr-xengine/oak_speech2.asm52
1 files changed, 26 insertions, 26 deletions
diff --git a/engine/oak_speech2.asm b/engine/oak_speech2.asm
index 34d98fd7..d8043484 100755
--- a/engine/oak_speech2.asm
+++ b/engine/oak_speech2.asm
@@ -1,17 +1,17 @@
LoadDefaultNamesPlayer: ; 695d (1:695d)
call Func_6a12
- ld de, DefaultNamesPlayer ; $6aa8
+ ld de, DefaultNamesPlayer
call DisplayIntroNameTextBox
- ld a, [wCurrentMenuItem] ; wCurrentMenuItem
+ ld a, [wCurrentMenuItem]
and a
jr z, .asm_697a
- ld hl, DefaultNamesPlayerList ; $6af2
+ ld hl, DefaultNamesPlayerList
call Func_6ad6
- ld de, wPlayerName ; wd158
+ ld de, wPlayerName
call Func_69ec
jr .asm_6999
.asm_697a
- ld hl, wPlayerName ; wd158
+ ld hl, wPlayerName
xor a
ld [wd07d], a
call DisplayNamingScreen
@@ -20,7 +20,7 @@ LoadDefaultNamesPlayer: ; 695d (1:695d)
jr z, .asm_697a
call ClearScreen
call Delay3
- ld de, RedPicFront ; $6ede
+ ld de, RedPicFront
ld b, BANK(RedPicFront)
call IntroPredef3B
.asm_6999
@@ -32,19 +32,19 @@ YourNameIsText: ; 699f (1:699f)
db "@"
LoadDefaultNamesRival: ; 69a4 (1:69a4)
- call Func_6a12 ; 0x69a4 call 0x6a12
+ call Func_6a12
ld de, DefaultNamesRival
call DisplayIntroNameTextBox
- ld a, [wCurrentMenuItem] ; wCurrentMenuItem
+ ld a, [wCurrentMenuItem]
and a
jr z, .asm_69c1
ld hl, DefaultNamesRivalList
call Func_6ad6
- ld de, W_RIVALNAME ; wd34a
+ ld de, W_RIVALNAME
call Func_69ec
jr .asm_69e1
.asm_69c1
- ld hl, W_RIVALNAME ; wd34a
+ ld hl, W_RIVALNAME
ld a, $1
ld [wd07d], a
call DisplayNamingScreen
@@ -53,7 +53,7 @@ LoadDefaultNamesRival: ; 69a4 (1:69a4)
jr z, .asm_69c1
call ClearScreen
call Delay3
- ld de, Rival1Pic ; $6049
+ ld de, Rival1Pic
ld b, $13
call IntroPredef3B
.asm_69e1
@@ -69,7 +69,7 @@ Func_69ec: ; 69ec (1:69ec)
ld hl, wTileMap
ld bc, $c0b
call ClearScreenArea
- ld c, $a
+ ld c, 10
call DelayFrames
pop de
ld hl, wcd6d
@@ -91,9 +91,9 @@ asm_6a19: ; 6a19 (1:6a19)
push bc
ld [$ff8d], a
ld a, d
- ld [H_DOWNARROWBLINKCNT1], a ; $ff8b
+ ld [H_DOWNARROWBLINKCNT1], a
ld a, e
- ld [H_DOWNARROWBLINKCNT2], a ; $ff8c
+ ld [H_DOWNARROWBLINKCNT2], a
ld c, a
ld a, [$ff8d]
and a
@@ -105,7 +105,7 @@ asm_6a19: ; 6a19 (1:6a19)
ld e, l
.asm_6a2f
xor a
- ld [H_AUTOBGTRANSFERENABLED], a ; $ffba
+ ld [H_AUTOBGTRANSFERENABLED], a
ld a, [$ff8d]
and a
jr nz, .asm_6a3c
@@ -128,9 +128,9 @@ asm_6a19: ; 6a19 (1:6a19)
ld [hl], a
.asm_6a4a
ld a, $1
- ld [H_AUTOBGTRANSFERENABLED], a ; $ffba
+ ld [H_AUTOBGTRANSFERENABLED], a
call Delay3
- ld a, [H_DOWNARROWBLINKCNT2] ; $ff8c
+ ld a, [H_DOWNARROWBLINKCNT2]
ld c, a
ld h, d
ld l, e
@@ -144,9 +144,9 @@ asm_6a19: ; 6a19 (1:6a19)
.asm_6a5f
ld d, h
ld e, l
- ld a, [H_DOWNARROWBLINKCNT1] ; $ff8b
+ ld a, [H_DOWNARROWBLINKCNT1]
dec a
- ld [H_DOWNARROWBLINKCNT1], a ; $ff8b
+ ld [H_DOWNARROWBLINKCNT1], a
jr nz, .asm_6a2f
pop bc
pop de
@@ -160,22 +160,22 @@ DisplayIntroNameTextBox: ; 6a6c (1:6a6c)
ld c, $9
call TextBoxBorder
hlCoord 3, 0
- ld de, .namestring ; $6aa3
+ ld de, .namestring
call PlaceString
pop de
hlCoord 2, 2
call PlaceString
call UpdateSprites
xor a
- ld [wCurrentMenuItem], a ; wCurrentMenuItem
- ld [wLastMenuItem], a ; wLastMenuItem
+ ld [wCurrentMenuItem], a
+ ld [wLastMenuItem], a
inc a
- ld [wTopMenuItemX], a ; wTopMenuItemX
- ld [wMenuWatchedKeys], a ; wMenuWatchedKeys
+ ld [wTopMenuItemX], a
+ ld [wMenuWatchedKeys], a
inc a
- ld [wTopMenuItemY], a ; wTopMenuItemY
+ ld [wTopMenuItemY], a
inc a
- ld [wMaxMenuItem], a ; wMaxMenuItem
+ ld [wMaxMenuItem], a
jp HandleMenuInput
.namestring ; 6aa3 (1:6aa3)