pokered/scripts/VermilionOldRodHouse.asm

VermilionOldRodHouse_Script:
	jp EnableAutoTextBoxDrawing

VermilionOldRodHouse_TextPointers:
	dw VermilionHouse2Text1

VermilionHouse2Text1:
	text_asm
	ld a, [wd728]
	bit 3, a ; got old rod?
	jr nz, .got_item
	ld hl, VermilionHouse2Text_560b1
	call PrintText
	call YesNoChoice
	ld a, [wCurrentMenuItem]
	and a
	jr nz, .refused
	lb bc, OLD_ROD, 1
	call GiveItem
	jr nc, .bag_full
	ld hl, wd728
	set 3, [hl] ; got old rod
	ld hl, VermilionHouse2Text_560b6
	jr .done
.bag_full
	ld hl, VermilionHouse2Text_560ca
	jr .done
.refused
	ld hl, VermilionHouse2Text_560c0
	jr .done
.got_item
	ld hl, VermilionHouse2Text_560c5
.done
	call PrintText
	jp TextScriptEnd

VermilionHouse2Text_560b1:
	text_far _VermilionHouse2Text_560b1
	text_end

VermilionHouse2Text_560b6:
	text_far _VermilionHouse2Text_560b6
	sound_get_item_1
	text_far _VermilionHouse2Text_560bb
	text_end

VermilionHouse2Text_560c0:
	text_far _VermilionHouse2Text_560c0
	text_end

VermilionHouse2Text_560c5:
	text_far _VermilionHouse2Text_560c5
	text_end

VermilionHouse2Text_560ca:
	text_far _VermilionHouse2Text_560ca
	text_end
Rename map files, labels, and constants to be consistent and work with Polished Map 2019-01-01 20:06:23 +00:00			`VermilionOldRodHouse_Script:`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`jp EnableAutoTextBoxDrawing`

Rename map files, labels, and constants to be consistent and work with Polished Map 2019-01-01 20:06:23 +00:00			`VermilionOldRodHouse_TextPointers:`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`dw VermilionHouse2Text1`

remove address comments 2016-06-12 00:24:04 +00:00			`VermilionHouse2Text1:`
Port pokecrystal's formatting of text commands and special characters 2020-07-04 21:09:35 +00:00			`text_asm`
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, [wd728]`
Revise some map scripts, mostly for getting items 2020-07-16 15:19:05 +00:00			`bit 3, a ; got old rod?`
			`jr nz, .got_item`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`ld hl, VermilionHouse2Text_560b1`
			`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`
Revise some map scripts, mostly for getting items 2020-07-16 15:19:05 +00:00			`jr nz, .refused`
Use more lb and other clean up 2015-08-05 21:20:29 +00:00			`lb bc, OLD_ROD, 1`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`call GiveItem`
Revise some map scripts, mostly for getting items 2020-07-16 15:19:05 +00:00			`jr nc, .bag_full`
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 hl, wd728`
Revise some map scripts, mostly for getting items 2020-07-16 15:19:05 +00:00			`set 3, [hl] ; got old rod`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`ld hl, VermilionHouse2Text_560b6`
Revise some map scripts, mostly for getting items 2020-07-16 15:19:05 +00:00			`jr .done`
			`.bag_full`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`ld hl, VermilionHouse2Text_560ca`
Revise some map scripts, mostly for getting items 2020-07-16 15:19:05 +00:00			`jr .done`
			`.refused`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`ld hl, VermilionHouse2Text_560c0`
Revise some map scripts, mostly for getting items 2020-07-16 15:19:05 +00:00			`jr .done`
			`.got_item`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`ld hl, VermilionHouse2Text_560c5`
Revise some map scripts, mostly for getting items 2020-07-16 15:19:05 +00:00			`.done`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00			`call PrintText`
			`jp TextScriptEnd`

remove address comments 2016-06-12 00:24:04 +00:00			`VermilionHouse2Text_560b1:`
Port pokecrystal's formatting of text commands and special characters 2020-07-04 21:09:35 +00:00			`text_far _VermilionHouse2Text_560b1`
			`text_end`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00
remove address comments 2016-06-12 00:24:04 +00:00			`VermilionHouse2Text_560b6:`
Port pokecrystal's formatting of text commands and special characters 2020-07-04 21:09:35 +00:00			`text_far _VermilionHouse2Text_560b6`
			`sound_get_item_1`
			`text_far _VermilionHouse2Text_560bb`
			`text_end`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00
remove address comments 2016-06-12 00:24:04 +00:00			`VermilionHouse2Text_560c0:`
Port pokecrystal's formatting of text commands and special characters 2020-07-04 21:09:35 +00:00			`text_far _VermilionHouse2Text_560c0`
			`text_end`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00
remove address comments 2016-06-12 00:24:04 +00:00			`VermilionHouse2Text_560c5:`
Port pokecrystal's formatting of text commands and special characters 2020-07-04 21:09:35 +00:00			`text_far _VermilionHouse2Text_560c5`
			`text_end`
$U-Fish-PC\Daniel$ Pull map scripts out of main.asm 2014-05-18 18:19:10 +00:00
remove address comments 2016-06-12 00:24:04 +00:00			`VermilionHouse2Text_560ca:`
Port pokecrystal's formatting of text commands and special characters 2020-07-04 21:09:35 +00:00			`text_far _VermilionHouse2Text_560ca`
			`text_end`