summaryrefslogtreecommitdiff
path: root/scripts/namerater.asm
diff options
context:
space:
mode:
Diffstat (limited to 'scripts/namerater.asm')
-rwxr-xr-xscripts/namerater.asm54
1 files changed, 27 insertions, 27 deletions
diff --git a/scripts/namerater.asm b/scripts/namerater.asm
index c9e3bfb4..160948ac 100755
--- a/scripts/namerater.asm
+++ b/scripts/namerater.asm
@@ -1,24 +1,24 @@
-NameRaterScript: ; 1da12 (7:5a12)
+NameRaterScript:
jp EnableAutoTextBoxDrawing
-NameRaterScript_1da15: ; 1da15 (7:5a15)
+NameRaterScript_1da15:
call PrintText
call YesNoChoice
ld a, [wCurrentMenuItem]
and a
ret
-NameRaterScript_1da20: ; 1da20 (7:5a20)
+NameRaterScript_1da20:
ld hl, wPartyMonOT
- ld bc, $000b
+ ld bc, NAME_LENGTH
ld a, [wWhichPokemon]
call AddNTimes
ld de, wPlayerName
- ld c, $b
+ ld c, NAME_LENGTH
call .asm_1da47
- jr c, .asm_1da52 ; 0x1da34 $1c
+ jr c, .asm_1da52
ld hl, wPartyMon1OTID
- ld bc, $002c
+ ld bc, wPartyMon2 - wPartyMon1
ld a, [wWhichPokemon]
call AddNTimes
ld de, wPlayerID
@@ -26,30 +26,30 @@ NameRaterScript_1da20: ; 1da20 (7:5a20)
.asm_1da47
ld a, [de]
cp [hl]
- jr nz, .asm_1da52 ; 0x1da49 $7
+ jr nz, .asm_1da52
inc hl
inc de
dec c
- jr nz, .asm_1da47 ; 0x1da4e $f7
+ jr nz, .asm_1da47
and a
ret
.asm_1da52
scf
ret
-NameRaterTextPointers: ; 1da54 (7:5a54)
+NameRaterTextPointers:
dw NameRaterText1
-NameRaterText1: ; 1da56 (7:5a56)
- db $8
+NameRaterText1:
+ TX_ASM
call SaveScreenTilesToBuffer2
ld hl, NameRaterText_1dab3
call NameRaterScript_1da15
- jr nz, .asm_1daae ; 0x1da60 $4c
+ jr nz, .asm_1daae
ld hl, NameRaterText_1dab8
call PrintText
xor a
- ld [wd07d], a
+ ld [wPartyMenuTypeOrMessageID], a
ld [wUpdateSpritesEnabled], a
ld [wMenuItemToSwap], a
call DisplayPartyMenu
@@ -58,50 +58,50 @@ NameRaterText1: ; 1da56 (7:5a56)
call RestoreScreenTilesAndReloadTilePatterns
call LoadGBPal
pop af
- jr c, .asm_1daae ; 0x1da80 $2c
+ jr c, .asm_1daae
call GetPartyMonName2
call NameRaterScript_1da20
ld hl, NameRaterText_1dad1
- jr c, .asm_1daa8 ; 0x1da8b $1b
+ jr c, .asm_1daa8
ld hl, NameRaterText_1dabd
call NameRaterScript_1da15
- jr nz, .asm_1daae ; 0x1da93 $19
+ jr nz, .asm_1daae
ld hl, NameRaterText_1dac2
call PrintText
- callba Func_655c
- jr c, .asm_1daae ; 0x1daa3 $9
+ callba DisplayNameRaterScreen
+ jr c, .asm_1daae
ld hl, NameRaterText_1dac7
.asm_1daa8
call PrintText
jp TextScriptEnd
.asm_1daae
ld hl, NameRaterText_1dacc
- jr .asm_1daa8 ; 0x1dab1 $f5
+ jr .asm_1daa8
-NameRaterText_1dab3: ; 1dab3 (7:5ab3)
+NameRaterText_1dab3:
TX_FAR _NameRaterText_1dab3
db "@"
-NameRaterText_1dab8: ; 1dab8 (7:5ab8)
+NameRaterText_1dab8:
TX_FAR _NameRaterText_1dab8
db "@"
-NameRaterText_1dabd: ; 1dabd (7:5abd)
+NameRaterText_1dabd:
TX_FAR _NameRaterText_1dabd
db "@"
-NameRaterText_1dac2: ; 1dac2 (7:5ac2)
+NameRaterText_1dac2:
TX_FAR _NameRaterText_1dac2
db "@"
-NameRaterText_1dac7: ; 1dac7 (7:5ac7)
+NameRaterText_1dac7:
TX_FAR _NameRaterText_1dac7
db "@"
-NameRaterText_1dacc: ; 1dacc (7:5acc)
+NameRaterText_1dacc:
TX_FAR _NameRaterText_1dacc
db "@"
-NameRaterText_1dad1: ; 1dad1 (7:5ad1)
+NameRaterText_1dad1:
TX_FAR _NameRaterText_1dad1
db "@"