shithub: pokered

Download patch

ref: 674b4dcc4aabde8b5556c0ed32383c32b11a4f0e
parent: b8dfee511453d322051f21bddc74c79307f23007
author: IIMarckus <iimarckus@gmail.com>
date: Tue Jun 7 19:55:55 EDT 2016

Remove the Beach House option.

--- a/constants/map_constants.asm
+++ b/constants/map_constants.asm
@@ -248,6 +248,3 @@
 	const LORELEIS_ROOM              ; $F5
 	const BRUNOS_ROOM                ; $F6
 	const AGATHAS_ROOM               ; $F7
-IF DEF(_OPTION_BEACH_HOUSE)
-	const BEACH_HOUSE                ; $F8
-ENDC
--- a/constants/map_dimensions.asm
+++ b/constants/map_dimensions.asm
@@ -891,8 +891,3 @@
 ; Agatha_h map_id=247
 AGATHAS_ROOM_HEIGHT EQU $06
 AGATHAS_ROOM_WIDTH  EQU $05
-
-IF DEF(_OPTION_BEACH_HOUSE)
-BEACH_HOUSE_HEIGHT EQU 4
-BEACH_HOUSE_WIDTH  EQU 7
-ENDC
--- a/constants/tilesets.asm
+++ b/constants/tilesets.asm
@@ -24,6 +24,3 @@
 	const CLUB         ; 21
 	const FACILITY     ; 22
 	const PLATEAU      ; 23
-IF DEF(_OPTION_BEACH_HOUSE)
-	const BEACH_HOUSE_TILESET ; 24
-ENDC
--- a/data/collision.asm
+++ b/data/collision.asm
@@ -22,6 +22,3 @@
 Club_Coll::         INCBIN  "gfx/tilesets/club.tilecoll"
 Facility_Coll::     INCBIN  "gfx/tilesets/facility.tilecoll"
 Plateau_Coll::      INCBIN  "gfx/tilesets/plateau.tilecoll"
-IF DEF(_OPTION_BEACH_HOUSE)
-BeachHouse_Coll::   INCBIN  "gfx/tilesets/beachhouse.tilecoll"
-ENDC
--- a/data/mapHeaders/beach_house.asm
+++ /dev/null
@@ -1,7 +1,0 @@
-BeachHouse_h:
-
-	db BEACH_HOUSE_TILESET
-	db BEACH_HOUSE_HEIGHT, BEACH_HOUSE_WIDTH ; dimensions (y, x)
-	dw BeachHouseBlockdata,BeachHouseTextPointers,BeachHouseScript ; blocks, texts, scripts
-	db 0 ; connections
-	dw BeachHouseObjects ; objects
--- a/data/mapObjects/beach_house.asm
+++ /dev/null
@@ -1,20 +1,0 @@
-BeachHouseObjects: ; 0xf23a4
-	db $a ; border block
-
-	db 2 ; warps
-	db 7,2,0,$ff
-	db 7,3,0,$ff
-
-	db 4 ; signs
-	db 0,3,3
-	db 0,7,4
-	db 0,$b,5
-	db 1,$d,6
-
-	db 2 ; objects
-	object SPRITE_FISHER, 2, 3, STAY, DOWN, 1 ; surfin' dude
-	object $3d, 5, 3, WALK, $01, 2 ; pikachu
-
-	; warp-to
-	EVENT_DISP BEACH_HOUSE_WIDTH,7,2
-	EVENT_DISP BEACH_HOUSE_WIDTH,7,3
--- a/data/mapObjects/route19.asm
+++ b/data/mapObjects/route19.asm
@@ -1,36 +1,18 @@
 Route19Object: ; 0x54e9a (size=87)
 	db $43 ; border block
 
-	IF DEF(_OPTION_BEACH_HOUSE)
-		db $1 ; warps
-		db $9, $5, $0, BEACH_HOUSE
-	ELSE
-		db $0 ; warps
-	ENDC
+	db $0 ; warps
 
 	db $1 ; signs
-IF DEF(_OPTION_BEACH_HOUSE)
-	db $b,$b,$b
-ELSE
 	db $9, $b, $b ; Route19Text11
-ENDC
 
 	db $a ; objects
-IF DEF(_OPTION_BEACH_HOUSE)
-	object SPRITE_BLACK_HAIR_BOY_1, $9, $7, STAY, RIGHT, 1, OPP_SWIMMER, 2
-	object SPRITE_BLACK_HAIR_BOY_1, $c, $9, STAY, LEFT, 2, OPP_SWIMMER, 3
-ELSE
 	object SPRITE_BLACK_HAIR_BOY_1, $8, $7, STAY, LEFT, 1, OPP_SWIMMER, 2
 	object SPRITE_BLACK_HAIR_BOY_1, $d, $7, STAY, LEFT, 2, OPP_SWIMMER, 3
-ENDC
 	object SPRITE_SWIMMER, $d, $19, STAY, LEFT, $3, OPP_SWIMMER, $4
 	object SPRITE_SWIMMER, $4, $1b, STAY, RIGHT, $4, OPP_SWIMMER, $5
 	object SPRITE_SWIMMER, $10, $1f, STAY, UP, $5, OPP_SWIMMER, $6
-IF DEF(_OPTION_BEACH_HOUSE)
-	object SPRITE_SWIMMER, $9, $d, STAY, DOWN, $6, OPP_SWIMMER, $7
-ELSE
 	object SPRITE_SWIMMER, $9, $b, STAY, DOWN, $6, OPP_SWIMMER, $7
-ENDC
 	object SPRITE_SWIMMER, $8, $2b, STAY, LEFT, $7, OPP_BEAUTY, $c
 	object SPRITE_SWIMMER, $b, $2b, STAY, RIGHT, $8, OPP_BEAUTY, $d
 	object SPRITE_SWIMMER, $9, $2a, STAY, UP, $9, OPP_SWIMMER, $8
@@ -37,6 +19,3 @@
 	object SPRITE_SWIMMER, $a, $2c, STAY, DOWN, $a, OPP_BEAUTY, $e
 
 	; warp-to
-	IF DEF(_OPTION_BEACH_HOUSE)
-		EVENT_DISP ROUTE_19_WIDTH, $9, $5 ; BEACH_HOUSE
-	ENDC
--- a/data/map_header_banks.asm
+++ b/data/map_header_banks.asm
@@ -248,6 +248,3 @@
 	db BANK(Lorelei_h)
 	db BANK(Bruno_h)
 	db BANK(Agatha_h)
-IF DEF(_OPTION_BEACH_HOUSE)
-	db BANK(BeachHouse_h)
-ENDC
--- a/data/map_header_pointers.asm
+++ b/data/map_header_pointers.asm
@@ -248,6 +248,3 @@
 	dw Lorelei_h
 	dw Bruno_h
 	dw Agatha_h ;247
-IF DEF(_OPTION_BEACH_HOUSE)
-	dw BeachHouse_h
-ENDC
--- a/data/map_songs.asm
+++ b/data/map_songs.asm
@@ -247,6 +247,3 @@
 	db MUSIC_GYM, BANK(Music_Gym) ; Lorelei
 	db MUSIC_DUNGEON1, BANK(Music_Dungeon1) ; Bruno
 	db MUSIC_POKEMON_TOWER, BANK(Music_PokemonTower) ; Agatha
-IF DEF(_OPTION_BEACH_HOUSE)
-	db MUSIC_ROUTES3, BANK(Music_Routes3) ; BeachHouse
-ENDC
--- a/data/tileset_headers.asm
+++ b/data/tileset_headers.asm
@@ -23,6 +23,3 @@
 	tileset Club_Block,        Club_GFX,        Club_Coll,        $07,$17,$FF, $FF, INDOOR
 	tileset Facility_Block,    Facility_GFX,    Facility_Coll,    $12,$FF,$FF, $FF, CAVE
 	tileset Plateau_Block,     Plateau_GFX,     Plateau_Coll,     $FF,$FF,$FF, $45, CAVE
-IF DEF(_OPTION_BEACH_HOUSE)
-	tileset BeachHouse_Block,  BeachHouse_GFX,  BeachHouse_Coll,  $FF,$FF,$FF, $FF, INDOOR
-ENDC
--- a/data/wild_mons.asm
+++ b/data/wild_mons.asm
@@ -247,9 +247,6 @@
 	dw NoMons
 	dw NoMons
 	dw NoMons
-	IF DEF(_OPTION_BEACH_HOUSE)
-		dw NoMons
-	ENDC
 	dw $FFFF
 
 ; wild pokemon data is divided into two parts.
binary files a/gfx/blocksets/beachhouse.bst /dev/null differ
binary files a/gfx/tilesets/beachhouse.png /dev/null differ
--- a/gfx/tilesets/beachhouse.tilecoll
+++ /dev/null
@@ -1,1 +1,0 @@
-
\ No newline at end of file
--- a/main.asm
+++ b/main.asm
@@ -5120,12 +5120,6 @@
 INCLUDE "scripts/billshouse.asm"
 INCLUDE "data/mapObjects/billshouse.asm"
 BillsHouseBlocks: INCBIN "maps/billshouse.blk"
-IF DEF(_OPTION_BEACH_HOUSE)
-INCLUDE "data/mapHeaders/beach_house.asm"
-INCLUDE "scripts/beach_house.asm"
-BeachHouseBlockdata: INCBIN "maps/beach_house.blk"
-INCLUDE "data/mapObjects/beach_house.asm"
-ENDC
 
 INCLUDE "engine/menu/oaks_pc.asm"
 
@@ -6042,11 +6036,7 @@
 
 INCLUDE "data/mapHeaders/route19.asm"
 INCLUDE "data/mapObjects/route19.asm"
-IF DEF(_OPTION_BEACH_HOUSE)
-Route19Blocks: INCBIN "maps/route19-yellow.blk"
-ELSE
 Route19Blocks: INCBIN "maps/route19.blk"
-ENDC
 
 INCLUDE "data/mapHeaders/route21.asm"
 INCLUDE "data/mapObjects/route21.asm"
@@ -6714,13 +6704,3 @@
 INCLUDE "engine/overworld/elevator.asm"
 
 INCLUDE "engine/items/tm_prices.asm"
-
-IF DEF(_OPTION_BEACH_HOUSE)
-SECTION "bank3C",ROMX[$4314],BANK[$3C]
-
-BeachHouse_GFX:
-	INCBIN "gfx/tilesets/beachhouse.2bpp"
-
-BeachHouse_Block:
-	INCBIN "gfx/blocksets/beachhouse.bst"
-ENDC
--- a/maps/beach_house.blk
+++ /dev/null
@@ -1,1 +1,0 @@
-		






\ No newline at end of file
--- a/scripts/beach_house.asm
+++ /dev/null
@@ -1,195 +1,0 @@
-BeachHouseScript:
-	call $3c29
-	ret
-
-BeachHouseTextPointers:
-	dw SurfinDudeText
-	dw BeachHousePikachuText
-	dw BeachHouseSign1Text
-	dw BeachHouseSign2Text
-	dw BeachHouseSign3Text
-	dw BeachHouseSign4Text
-
-SurfinDudeText:
-	TX_ASM
-	ld a,[$d471]
-	bit 6,a
-	jr nz,.next
-	ld hl,.SurfinDudeText4
-	call PrintText
-	jr .done
-.next
-	ld hl,$d492
-	bit 0,[hl]
-	set 0,[hl]
-	jr nz,.next2
-	ld hl,.SurfinDudeText1
-	jr .next3
-.next2
-	ld hl,.SurfinDudeText3
-.next3
-	call PrintText
-	call YesNoChoice
-	ld a,[wCurrentMenuItem]
-	and a
-	jr nz,.xf226b
-	ld a,1
-	ld [$cc3c],a
-	ld b,$3e
-	ld hl,$4000
-	call $3e84
-	ld hl,$d492
-	set 1,[hl]
-	jr .done
-.xf226b
-	ld hl,.SurfinDudeText2
-	call PrintText
-.done
-	jp TextScriptEnd
-
-.SurfinDudeText1
-	TX_FAR _SurfinDudeText1
-	db "@"
-.SurfinDudeText2
-	TX_FAR _SurfinDudeText2
-	db "@"
-.SurfinDudeText3
-	TX_FAR _SurfinDudeText3
-	db "@"
-.SurfinDudeText4
-	TX_FAR _SurfinDudeText4
-	db "@"
-
-BeachHousePikachuText:
-	TX_ASM
-	ld hl,.BeachHousePikachuText
-	call PrintText
-	ld a,PIKACHU
-	call PlayCry
-	call WaitForSoundToFinish
-	jp TextScriptEnd
-
-.BeachHousePikachuText
-	TX_FAR _BeachHousePikachuText
-	db "@"
-
-BeachHouseSign1Text:
-	TX_ASM
-	ld hl,.BeachHouseSign1Text2
-	ld a,[$d471]
-	bit 6,a
-	jr z,.next
-	ld hl,.BeachHouseSign1Text1
-.next
-	call PrintText
-	jp TextScriptEnd
-
-.BeachHouseSign1Text1
-	TX_FAR _BeachHouseSign1Text1
-	db "@"
-.BeachHouseSign1Text2
-	TX_FAR _BeachHouseSign1Text2
-	db "@"
-
-BeachHouseSign2Text:
-	TX_ASM
-	ld hl,.BeachHouseSign2Text2
-	ld a,[$d471]
-	bit 6,a
-	jr z,.next
-	ld hl,.BeachHouseSign2Text1
-.next
-	call PrintText
-	jp TextScriptEnd
-
-.BeachHouseSign2Text1
-	TX_FAR _BeachHouseSign2Text1
-	db "@"
-.BeachHouseSign2Text2
-	TX_FAR _BeachHouseSign2Text2
-	db "@"
-
-BeachHouseSign3Text:
-	TX_ASM
-	ld hl,.BeachHouseSign3Text2
-	ld a,[$d471]
-	bit 6,a
-	jr z,.next
-	ld hl,.BeachHouseSign3Text1
-.next
-	call PrintText
-	jp TextScriptEnd
-
-.BeachHouseSign3Text1
-	TX_FAR _BeachHouseSign3Text1
-	db "@"
-.BeachHouseSign3Text2
-	TX_FAR _BeachHouseSign3Text2
-	db "@"
-
-BeachHouseSign4Text:
-	TX_ASM
-	ld a,1
-	ld [$cc3c],a
-	ld a,[$d471]
-	bit 6,a
-	jr z,.xf2369
-
-	ld hl,$d492
-	bit 1,[hl]
-	jr z,.next2
-	ld a,0
-	ld [$cc3c],a
-.next2
-	ld hl,.BeachHousePrinterText2
-	call PrintText
-	ld a,[$d492]
-	bit 1,a
-	jr z,.xf236f
-
-	ld a,1
-	ld [$cc3c],a
-	ld hl,.BeachHousePrinterText3
-	call PrintText
-	call YesNoChoice
-	ld a,[wCurrentMenuItem]
-	and a
-	jp z,$63d0 ; 0xf23d0
-	call $36ec
-	ld hl,$d72f
-	set 6,[hl]
-	xor a
-	ld [$cfca],a
-	ld hl,$510a
-	ld b,$3a
-	call $3e84
-	call $3852
-	ld hl,$d72f
-	res 6,[hl]
-	call $3dd8
-	call $2f83
-	call $3dc2
-	call $36f8
-	call $3ddb
-	call $3de0
-	ld a,1
-	ld [$cfca],a
-	jr .xf236f
-.xf2369
-	ld hl,.BeachHousePrinterText1
-	call PrintText
-.xf236f
-	jp TextScriptEnd
-
-.BeachHousePrinterText1
-	TX_FAR _BeachHousePrinterText1
-	db $d,"@"
-.BeachHousePrinterText2
-	TX_FAR _BeachHousePrinterText2
-	db $d,"@"
-.BeachHousePrinterText3
-	TX_FAR _BeachHousePrinterText3
-	db "@"
-.xf2383
-	TX_FAR _BeachHousePrinterText4
-	db "@"
--- a/text.asm
+++ b/text.asm
@@ -1969,9 +1969,6 @@
 INCLUDE "text/maps/route_16_house.asm"
 INCLUDE "text/maps/route_18_gate.asm"
 INCLUDE "text/maps/route_18_gate_upstairs.asm"
-IF DEF(_OPTION_BEACH_HOUSE)
-INCLUDE "text/maps/beach_house.asm"
-ENDC
 INCLUDE "text/maps/pokemon_league_gate.asm"
 INCLUDE "text/maps/victory_road_2f.asm"
 INCLUDE "text/maps/bills_house.asm"
--- a/text/maps/beach_house.asm
+++ /dev/null
@@ -1,103 +1,0 @@
-_SurfinDudeText1::
-	text "Whoa!"
-
-	para "Your PIKACHU knows"
-	line "how to SURF! So,"
-	cont "I'm not alone..."
-
-	para "Great! You earned"
-	line "the right to SURF"
-	cont "with the DUDE!"
-
-	para "Give it a go?"
-	done
-
-_SurfinDudeText2::
-	text "Come SURF anytime,"
-	line "my friend!"
-	done
-
-_SurfinDudeText3::
-	text "Wanna go SURF?"
-	done
-
-_SurfinDudeText4::
-	text "Dogs and burgers"
-	line "on special today!"
-	done
-
-_BeachHousePikachuText::
-	text "PIKACHU: Pikaa."
-	done
-
-_BeachHouseSign1Text1::
-	text "SURFIN' DUDE's"
-	line "scribbles..."
-
-	para "When I shoot the"
-	line "tube, the tunes"
-	cont "hit the groove!"
-	done
-
-_BeachHouseSign1Text2::
-	text "30 years of waves!"
-	line "SURFIN' DUDE"
-	done
-
-_BeachHouseSign2Text1::
-	text "SURFING TIP 1!"
-
-	para "After flips, line"
-	line "the board up with"
-	cont "a wave for a cool"
-	cont "effect!"
-	done
-
-_BeachHouseSign2Text2::
-	text "SUMMER BEACH HOUSE"
-	line "#MON welcome!"
-	done
-
-_BeachHouseSign3Text1::
-	text "SURFING TIP 2!"
-
-	para "Pulling flips in"
-	line "a jump is totally"
-	cont "rad!"
-	done
-
-_BeachHouseSign3Text2::
-	text "The sea unites"
-	line "all in surfdom!"
-	done
-
-_BeachHousePrinterText1::
-	text "It's some sort of"
-	line "a machine...@@"
-
-_BeachHousePrinterText2::
-	text "SUMMER BEACH HOUSE"
-	line "PRINTER, it says.@@"
-
-_BeachHousePrinterText3::
-	text "The Hi.Score is"
-	line "shown."
-
-	para "PRINT it out?"
-	done
-
-_BeachHousePrinterText4::
-	text "SUMMER BEACH HOUSE"
-	line "PRINTER, it says."
-
-	para "The Hi.Score is"
-	line "shown."
-
-	para "PRINT it out?"
-	done
-
-_BeachHousePrinterText5::
-	text "PRINT completed.@@"
-
-_BeachHousePrinterText6::
-	text "PRINT error!@@"