pokered/scripts/namerater.asm

NameRaterScript: ; 1da12 (7:5a12)
	jp EnableAutoTextBoxDrawing

NameRaterScript_1da15: ; 1da15 (7:5a15)
	call PrintText
	call YesNoChoice
	ld a, [wCurrentMenuItem]
	and a
	ret

NameRaterScript_1da20: ; 1da20 (7:5a20)
	ld hl, wPartyMonOT
	ld bc, $000b
	ld a, [wWhichPokemon]
	call AddNTimes
	ld de, wPlayerName
	ld c, $b
	call .asm_1da47
	jr c, .asm_1da52
	ld hl, wPartyMon1OTID
	ld bc, $002c
	ld a, [wWhichPokemon]
	call AddNTimes
	ld de, wPlayerID
	ld c, $2
.asm_1da47
	ld a, [de]
	cp [hl]
	jr nz, .asm_1da52
	inc hl
	inc de
	dec c
	jr nz, .asm_1da47
	and a
	ret
.asm_1da52
	scf
	ret

NameRaterTextPointers: ; 1da54 (7:5a54)
	dw NameRaterText1

NameRaterText1: ; 1da56 (7:5a56)
	TX_ASM
	call SaveScreenTilesToBuffer2
	ld hl, NameRaterText_1dab3
	call NameRaterScript_1da15
	jr nz, .asm_1daae
	ld hl, NameRaterText_1dab8
	call PrintText
	xor a
	ld [wd07d], a
	ld [wUpdateSpritesEnabled], a
	ld [wMenuItemToSwap], a
	call DisplayPartyMenu
	push af
	call GBPalWhiteOutWithDelay3
	call RestoreScreenTilesAndReloadTilePatterns
	call LoadGBPal
	pop af
	jr c, .asm_1daae
	call GetPartyMonName2
	call NameRaterScript_1da20
	ld hl, NameRaterText_1dad1
	jr c, .asm_1daa8
	ld hl, NameRaterText_1dabd
	call NameRaterScript_1da15
	jr nz, .asm_1daae
	ld hl, NameRaterText_1dac2
	call PrintText
	callba Func_655c
	jr c, .asm_1daae
	ld hl, NameRaterText_1dac7
.asm_1daa8
	call PrintText
	jp TextScriptEnd
.asm_1daae
	ld hl, NameRaterText_1dacc
	jr .asm_1daa8

NameRaterText_1dab3: ; 1dab3 (7:5ab3)
	TX_FAR _NameRaterText_1dab3
	db "@"

NameRaterText_1dab8: ; 1dab8 (7:5ab8)
	TX_FAR _NameRaterText_1dab8
	db "@"

NameRaterText_1dabd: ; 1dabd (7:5abd)
	TX_FAR _NameRaterText_1dabd
	db "@"

NameRaterText_1dac2: ; 1dac2 (7:5ac2)
	TX_FAR _NameRaterText_1dac2
	db "@"

NameRaterText_1dac7: ; 1dac7 (7:5ac7)
	TX_FAR _NameRaterText_1dac7
	db "@"

NameRaterText_1dacc: ; 1dacc (7:5acc)
	TX_FAR _NameRaterText_1dacc
	db "@"

NameRaterText_1dad1: ; 1dad1 (7:5ad1)
	TX_FAR _NameRaterText_1dad1
	db "@"
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`NameRaterScript: ; 1da12 (7:5a12)`
			`jp EnableAutoTextBoxDrawing`

			`NameRaterScript_1da15: ; 1da15 (7:5a15)`
			`call PrintText`
			`call YesNoChoice`
Remove most static wram addresses. Use labels instead. For unknown addresses, use "w<address>". Label overleads are still an issue. 2014-05-26 21:04:56 +00:00			`ld a, [wCurrentMenuItem]`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`and a`
			`ret`

			`NameRaterScript_1da20: ; 1da20 (7:5a20)`
Use monster struct macros in wram. Rename related labels for consistency. 2014-06-14 11:12:40 +00:00			`ld hl, wPartyMonOT`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`ld bc, $000b`
			`ld a, [wWhichPokemon]`
			`call AddNTimes`
Use monster struct macros in wram. Rename related labels for consistency. 2014-06-14 11:12:40 +00:00			`ld de, wPlayerName`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`ld c, $b`
			`call .asm_1da47`
$U-Daniel-PC\Daniel$ Rename/organize part 2 of 4 rename functions, clean up address/wram comments, other misc only broken up so that all changes are viewable on github 2015-07-03 19:38:12 +00:00			`jr c, .asm_1da52`
Use monster struct macros in wram. Rename related labels for consistency. 2014-06-14 11:12:40 +00:00			`ld hl, wPartyMon1OTID`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`ld bc, $002c`
			`ld a, [wWhichPokemon]`
			`call AddNTimes`
Remove most static wram addresses. Use labels instead. For unknown addresses, use "w<address>". Label overleads are still an issue. 2014-05-26 21:04:56 +00:00			`ld de, wPlayerID`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`ld c, $2`
			`.asm_1da47`
			`ld a, [de]`
			`cp [hl]`
$U-Daniel-PC\Daniel$ Rename/organize part 2 of 4 rename functions, clean up address/wram comments, other misc only broken up so that all changes are viewable on github 2015-07-03 19:38:12 +00:00			`jr nz, .asm_1da52`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`inc hl`
			`inc de`
			`dec c`
$U-Daniel-PC\Daniel$ Rename/organize part 2 of 4 rename functions, clean up address/wram comments, other misc only broken up so that all changes are viewable on github 2015-07-03 19:38:12 +00:00			`jr nz, .asm_1da47`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`and a`
			`ret`
			`.asm_1da52`
			`scf`
			`ret`

			`NameRaterTextPointers: ; 1da54 (7:5a54)`
			`dw NameRaterText1`

			`NameRaterText1: ; 1da56 (7:5a56)`
$U-Daniel-PC\Daniel$ TX_ASM 2015-07-03 19:58:50 +00:00			`TX_ASM`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`call SaveScreenTilesToBuffer2`
			`ld hl, NameRaterText_1dab3`
			`call NameRaterScript_1da15`
$U-Daniel-PC\Daniel$ Rename/organize part 2 of 4 rename functions, clean up address/wram comments, other misc only broken up so that all changes are viewable on github 2015-07-03 19:38:12 +00:00			`jr nz, .asm_1daae`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`ld hl, NameRaterText_1dab8`
			`call PrintText`
			`xor a`
Remove most static wram addresses. Use labels instead. For unknown addresses, use "w<address>". Label overleads are still an issue. 2014-05-26 21:04:56 +00:00			`ld [wd07d], a`
Commented more sprite and map code 2014-09-13 07:50:56 +00:00			`ld [wUpdateSpritesEnabled], a`
Labelled many functions/variables 2014-08-09 05:39:13 +00:00			`ld [wMenuItemToSwap], a`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`call DisplayPartyMenu`
			`push af`
			`call GBPalWhiteOutWithDelay3`
Labelled and commented mostly sprite-related things 2014-09-10 03:55:19 +00:00			`call RestoreScreenTilesAndReloadTilePatterns`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`call LoadGBPal`
			`pop af`
$U-Daniel-PC\Daniel$ Rename/organize part 2 of 4 rename functions, clean up address/wram comments, other misc only broken up so that all changes are viewable on github 2015-07-03 19:38:12 +00:00			`jr c, .asm_1daae`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`call GetPartyMonName2`
			`call NameRaterScript_1da20`
			`ld hl, NameRaterText_1dad1`
$U-Daniel-PC\Daniel$ Rename/organize part 2 of 4 rename functions, clean up address/wram comments, other misc only broken up so that all changes are viewable on github 2015-07-03 19:38:12 +00:00			`jr c, .asm_1daa8`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`ld hl, NameRaterText_1dabd`
			`call NameRaterScript_1da15`
$U-Daniel-PC\Daniel$ Rename/organize part 2 of 4 rename functions, clean up address/wram comments, other misc only broken up so that all changes are viewable on github 2015-07-03 19:38:12 +00:00			`jr nz, .asm_1daae`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`ld hl, NameRaterText_1dac2`
			`call PrintText`
$U-Fish-PC\Daniel$ Merge branch 'master' of https://github.com/huderlem/pokered into pull-data Conflicts: main.asm text.asm text/maps/route_22.asm 2014-05-19 14:38:20 +00:00			`callba Func_655c`
$U-Daniel-PC\Daniel$ Rename/organize part 2 of 4 rename functions, clean up address/wram comments, other misc only broken up so that all changes are viewable on github 2015-07-03 19:38:12 +00:00			`jr c, .asm_1daae`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`ld hl, NameRaterText_1dac7`
			`.asm_1daa8`
			`call PrintText`
			`jp TextScriptEnd`
			`.asm_1daae`
			`ld hl, NameRaterText_1dacc`
$U-Daniel-PC\Daniel$ Rename/organize part 2 of 4 rename functions, clean up address/wram comments, other misc only broken up so that all changes are viewable on github 2015-07-03 19:38:12 +00:00			`jr .asm_1daa8`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00
			`NameRaterText_1dab3: ; 1dab3 (7:5ab3)`
			`TX_FAR _NameRaterText_1dab3`
			`db "@"`

			`NameRaterText_1dab8: ; 1dab8 (7:5ab8)`
			`TX_FAR _NameRaterText_1dab8`
			`db "@"`

			`NameRaterText_1dabd: ; 1dabd (7:5abd)`
			`TX_FAR _NameRaterText_1dabd`
			`db "@"`

			`NameRaterText_1dac2: ; 1dac2 (7:5ac2)`
			`TX_FAR _NameRaterText_1dac2`
			`db "@"`

			`NameRaterText_1dac7: ; 1dac7 (7:5ac7)`
			`TX_FAR _NameRaterText_1dac7`
			`db "@"`

			`NameRaterText_1dacc: ; 1dacc (7:5acc)`
			`TX_FAR _NameRaterText_1dacc`
			`db "@"`

			`NameRaterText_1dad1: ; 1dad1 (7:5ad1)`
			`TX_FAR _NameRaterText_1dad1`
			`db "@"`