Merge branch 'mistress' into renewables

This commit is contained in:
Thorn Avery 2024-01-14 09:41:22 +11:00
commit 65e94896d1
19 changed files with 90 additions and 65 deletions

View file

@ -262,7 +262,6 @@ and more!
Known Bugs Known Bugs
==== ====
- Occasionally, saving and reloading in a building will cause the border tile to completely change, in some cases letting you walk out of bounds.
- Trying to Surf from the overworld on Cycling Road has an invisible textbox stopping you, but just pressing A again lets you regain control. - Trying to Surf from the overworld on Cycling Road has an invisible textbox stopping you, but just pressing A again lets you regain control.
- Jumping from a specific tile off a ledge in Cerulean City causes you to land on a fence. This is being kept in, because it's funny. - Jumping from a specific tile off a ledge in Cerulean City causes you to land on a fence. This is being kept in, because it's funny.

View file

@ -20,7 +20,7 @@ TradeMons:
db SANDSLASH, SANDSLASH_A, TRADE_DIALOGSET_REGION, "SANDSLASH@@" ; Celadon db SANDSLASH, SANDSLASH_A, TRADE_DIALOGSET_REGION, "SANDSLASH@@" ; Celadon
db RAICHU, RAICHU_A, TRADE_DIALOGSET_REGION, "RAICHU@@@@@" ; Saffron db RAICHU, RAICHU_A, TRADE_DIALOGSET_REGION, "RAICHU@@@@@" ; Saffron
db MAROWAK, MAROWAK_A, TRADE_DIALOGSET_REGION, "MAROWAK@@@@" ; Fuschia db MAROWAK, MAROWAK_A, TRADE_DIALOGSET_REGION, "MAROWAK@@@@" ; Fuschia
db MUK, MUK_A, TRADE_DIALOGSET_REGION, "MUK-A@@@@@@" ; Cinnabar db MUK, MUK_A, TRADE_DIALOGSET_REGION, "MUK@@@@@@@@" ; Cinnabar
db EXEGGUTOR, EXEGGUTOR_A, TRADE_DIALOGSET_REGION, "EXEGGUTOR@@" ; Indigo db EXEGGUTOR, EXEGGUTOR_A, TRADE_DIALOGSET_REGION, "EXEGGUTOR@@" ; Indigo
db TAUROS, TAUROS_P, TRADE_DIALOGSET_TAUROSC, "TAUROS@@@@@" ; S.S. Anne begins here db TAUROS, TAUROS_P, TRADE_DIALOGSET_TAUROSC, "TAUROS@@@@@" ; S.S. Anne begins here
db TAUROS, TAUROS_PA, TRADE_DIALOGSET_TAUROSA, "TAUROS@@@@@" db TAUROS, TAUROS_PA, TRADE_DIALOGSET_TAUROSA, "TAUROS@@@@@"

View file

@ -67,7 +67,7 @@ InternalMapEntries:
internal_map MT_MOON_B2F, 6, 2, MountMoonName internal_map MT_MOON_B2F, 6, 2, MountMoonName
internal_map CERULEAN_MART, 10, 2, CeruleanCityName internal_map CERULEAN_MART, 10, 2, CeruleanCityName
internal_map MT_MOON_POKECENTER, 5, 2, Route4Name internal_map MT_MOON_POKECENTER, 5, 2, Route4Name
internal_map VIRIDIAN_PRE_GYM, 10, 2, ViridianCityName internal_map VIRIDIAN_PRE_GYM, 2, 8, ViridianCityName
internal_map DAYCARE, 10, 4, Route5Name internal_map DAYCARE, 10, 4, Route5Name
internal_map UNDERGROUND_PATH_ROUTE_6, 10, 8, Route6Name internal_map UNDERGROUND_PATH_ROUTE_6, 10, 8, Route6Name
internal_map CELESTE_HILL, 7, 9, CelesteHillName internal_map CELESTE_HILL, 7, 9, CelesteHillName

View file

@ -1861,8 +1861,8 @@ AnimationWavyScreen:
ld c, $ff ld c, $ff
ld hl, WavyScreenLineOffsets ld hl, WavyScreenLineOffsets
.loop .loop
; ld a, [hl] ; this fixes the wavy screen, but causes a bank overflow ld a, [hl] ; this fixes the wavy screen, but causes a bank overflow
; ldh [hSCX], a ldh [hSCX], a
push hl push hl
.innerLoop .innerLoop
call WavyScreen_SetSCX call WavyScreen_SetSCX
@ -1879,7 +1879,7 @@ AnimationWavyScreen:
dec c dec c
jr nz, .loop jr nz, .loop
xor a xor a
; ldh [hSCX], a ; also fixing the wavy screen ldh [hSCX], a ; also fixing the wavy screen
ldh [hWY], a ldh [hWY], a
call SaveScreenTilesToBuffer2 call SaveScreenTilesToBuffer2
call ClearScreen call ClearScreen

View file

@ -142,8 +142,21 @@ HideObject:
ld c, a ld c, a
ld b, FLAG_SET ld b, FLAG_SET
call MissableObjectFlagAction ; set "removed" flag call MissableObjectFlagAction ; set "removed" flag
call VerifyObjectState
jr z, HideObject
jp UpdateSprites jp UpdateSprites
;returns z flag set if shown and z flag cleared if hidden
VerifyObjectState:
ld hl, wMissableObjectFlags
ld a, [wMissableObjectIndex]
ld c, a
ld b, FLAG_TEST
call MissableObjectFlagAction
ld a, c
and a
ret
MissableObjectFlagAction: MissableObjectFlagAction:
; identical to FlagAction ; identical to FlagAction

View file

@ -2087,7 +2087,12 @@ LoadMapHeader::
ld [wCurMapTileset], a ld [wCurMapTileset], a
ldh [hPreviousTileset], a ldh [hPreviousTileset], a
bit 7, b bit 7, b
ret nz
;replace the conditional return with a nop in order to always load the map header data...
;...even when selecting CONTINUE from the main menu
; ret nz
nop
ld hl, MapHeaderPointers ld hl, MapHeaderPointers
ld a, [wCurMap] ld a, [wCurMap]
sla a sla a

View file

@ -1 +1 @@
..............}vvvvvvvvvvvv}Qvvvvvvvvv}vvvvvvvvvvvvvvv45vvvvvvvv+67,vvvv8-%88vvNvvvvv vvvvR}vvvv vvv}N}vvv>vv}}}}Q}}}}}}QN ..............}vvvvvvvvvvvv}Qvvvvvvvvv}vvvvvv3vvvvvvvvv45vvvvvvvv+67,vvvv8-%88vvNvvvvv vvvvR}vvvv vvv}N}vvv>vv}}}}Q}}}}}}QN

View file

@ -820,13 +820,12 @@ BattleTentLetsGo:
done done
BattleTentWon: BattleTentWon:
text "Wow! You finally" text "Congratulations!"
line "did it!"
para "You beat" para "You beat"
line "@" line "@"
text_decimal wBTStreakCnt, 1, 3 text_decimal wBTStreakCnt, 1, 3
text " oppenont(s)!" text " opponent(s)!"
prompt prompt
BattleTentLost: BattleTentLost:

View file

@ -11,7 +11,8 @@ BrunswickTrail_ScriptPointers:
dw CheckFightingMapTrainers dw CheckFightingMapTrainers
dw DisplayEnemyTrainerTextAndStartBattle dw DisplayEnemyTrainerTextAndStartBattle
dw EndTrainerBattle dw EndTrainerBattle
dw HideCactus
BrunswickTrail_TextPointers: BrunswickTrail_TextPointers:
dw FakeTreeEvent dw FakeTreeEvent
dw BrunswickTrainer1 dw BrunswickTrainer1
@ -139,7 +140,13 @@ FakeTreeEvent:
ld hl, CactusTrainerHeader ld hl, CactusTrainerHeader
call TalkToTrainer call TalkToTrainer
jp TextScriptEnd ; I have tried a lot of things and it's not disappearing AAA
;let's try a separate map script as a backup in case cactormous does not disappear like other static wild pokemon.
ld a, 3
ld [wBrunswickTrailCurScript], a
ld [wCurMapScript], a
; jp TextScriptEnd ; I have tried a lot of things and it's not disappearing AAA
;.NoCut ;.NoCut
; ld hl, FakeTreeNoCut ; Why do you have to be this way? I scream, for I do not know. ; ld hl, FakeTreeNoCut ; Why do you have to be this way? I scream, for I do not know.
; call PrintText ; call PrintText
@ -154,6 +161,19 @@ CactusBattleText:
call PlayCry call PlayCry
call WaitForSoundToFinish call WaitForSoundToFinish
jp TextScriptEnd jp TextScriptEnd
HideCactus:
;this runs after the cactormous battle to make sure it gets hidden
ld a, HS_CACTUS
ld [wMissableObjectIndex], a
predef HideObject
call UpdateSprites
call Delay3
xor a
ld [wBrunswickTrailCurScript], a
ld [wCurMapScript], a
ret
GZapFound: GZapFound:
text_asm text_asm

View file

@ -309,8 +309,8 @@ SilphCo7TrainerHeader3:
SilphCo7Text1: SilphCo7Text1:
; lapras guy ; lapras guy
text_asm text_asm
ld a, [wd72e] ld a, [wd72c]
bit 0, a ; got lapras? bit 2, a
jr z, .givelapras jr z, .givelapras
CheckEvent EVENT_BEAT_SILPH_CO_GIOVANNI CheckEvent EVENT_BEAT_SILPH_CO_GIOVANNI
jr nz, .savedsilph jr nz, .savedsilph
@ -329,8 +329,8 @@ SilphCo7Text1:
call EnableAutoTextBoxDrawing call EnableAutoTextBoxDrawing
ld hl, .HeresYourLaprasText ld hl, .HeresYourLaprasText
call PrintText call PrintText
ld hl, wd72e ld hl, wd72c
set 0, [hl] set 2, [hl]
jr .done jr .done
.savedsilph .savedsilph
ld hl, .LaprasGuySavedText ld hl, .LaprasGuySavedText

View file

@ -3,9 +3,6 @@ _CeruleanHouse2Text_74e77::
line "are owned only by" line "are owned only by"
cont "skilled trainers." cont "skilled trainers."
para "I see you have"
line "at least one."
para "Those BADGEs have" para "Those BADGEs have"
line "amazing secrets!" line "amazing secrets!"
prompt prompt
@ -34,15 +31,9 @@ _CeruleanHouse2Text_74e96::
prompt prompt
_CeruleanHouse2Text_74e9b:: _CeruleanHouse2Text_74e9b::
text "#MON up to L30" text "It lets you use"
line "will obey you." line "CUT outside of"
cont "battle."
para "Any higher, they"
line "become unruly!"
para "It also lets you"
line "use CUT outside"
cont "of battle."
prompt prompt
_CeruleanHouse2Text_74ea0:: _CeruleanHouse2Text_74ea0::
@ -56,15 +47,9 @@ _CeruleanHouse2Text_74ea0::
prompt prompt
_CeruleanHouse2Text_74ea5:: _CeruleanHouse2Text_74ea5::
text "#MON up to L50" text "It lets you use"
line "will obey you." line "STRENGTH outside"
cont "of battle."
para "Any higher, they"
line "become unruly!"
para "It also lets you"
line "use STRENGTH out-"
cont "side of battle."
prompt prompt
_CeruleanHouse2Text_74eaa:: _CeruleanHouse2Text_74eaa::
@ -78,11 +63,14 @@ _CeruleanHouse2Text_74eaa::
prompt prompt
_CeruleanHouse2Text_74eaf:: _CeruleanHouse2Text_74eaf::
text "#MON up to L70" text "Hmm... I can't"
line "will obey you." line "remember."
para "Any higher, they" para "Should you beat"
line "become unruly!" line "SABRINA's tough"
cont "PSYCHIC #MON,"
cont "she may tell"
cont "you."
prompt prompt
_CeruleanHouse2Text_74eb4:: _CeruleanHouse2Text_74eb4::
@ -92,6 +80,7 @@ _CeruleanHouse2Text_74eb4::
prompt prompt
_CeruleanHouse2Text_74eb9:: _CeruleanHouse2Text_74eb9::
text "All #MON will" text "You'll be able to"
line "obey you!" line "challenge the"
cont "#MON LEAGUE!"
prompt prompt

View file

@ -38,7 +38,7 @@ _CitrineCityCavern::
_CitrineCityDirections:: _CitrineCityDirections::
text "NORTH WEST:" text "NORTH WEST:"
line "BATTLE TOWER" line "BATTLE TENT"
para "NORTH EAST:" para "NORTH EAST:"
line "CELESTE HILL" line "CELESTE HILL"

View file

@ -4,7 +4,7 @@ _DayCareAllRightThenText::
text_end text_end
_DayCareComeAgainText:: _DayCareComeAgainText::
text "come again." text "Come again."
done done
_DayCareNoRoomForMonText:: _DayCareNoRoomForMonText::

View file

@ -75,8 +75,8 @@ _SilphGauntlet2FAfterBattleText4::
para "I could never have" para "I could never have"
line "expected to see" line "expected to see"
cont "#MON like yours," cont "#MON like"
cont "though!" cont "yours, though!"
done done
_SilphGauntlet2FBattleText5:: _SilphGauntlet2FBattleText5::
@ -121,4 +121,4 @@ _SilphGauntlet2FAfterBattleText6::
line "and you will" line "and you will"
cont "surely succeed." cont "surely succeed."
done done

View file

@ -95,7 +95,7 @@ _SilphGauntlet3FAfterBattleText5::
line "here stinks!" line "here stinks!"
para "Where's all the" para "Where's all the"
cont "rock 'n' roll?!" line "rock 'n' roll?!"
done done
_SilphGauntlet3FBattleText6:: _SilphGauntlet3FBattleText6::
@ -117,4 +117,4 @@ _SilphGauntlet3FAfterBattleText6::
cont "fishing gear?!" cont "fishing gear?!"
done done

View file

@ -87,7 +87,7 @@ _SilphGauntlet5FAfterBattleText5::
text "Huh? Yeah! We" text "Huh? Yeah! We"
line "used our whips!" line "used our whips!"
para "...hey, what's" para "...Hey, what's"
line "with that stare?" line "with that stare?"
done done
@ -134,4 +134,4 @@ _SilphGauntlet5FAfterBattleText7::
line "classic for a" line "classic for a"
cont "reason..." cont "reason..."
done done

View file

@ -13,7 +13,7 @@ _ChiefMonologue::
prompt prompt
_ChiefMonologueMasterBallNotUsed:: _ChiefMonologueMasterBallNotUsed::
text "You're looking for" text "You're looking"
line "for the ultimate" line "for the ultimate"
cont "#MON, aren't" cont "#MON, aren't"
cont "you?" cont "you?"
@ -38,7 +38,7 @@ _ChiefMonologueMasterBallNotUsed::
done done
_ChiefMonologueMasterBallUsed:: _ChiefMonologueMasterBallUsed::
text "You're looking for" text "You're looking"
line "for the ultimate" line "for the ultimate"
cont "#MON, aren't" cont "#MON, aren't"
cont "you?" cont "you?"
@ -52,7 +52,7 @@ _ChiefMonologueMasterBallUsed::
cont "our company is" cont "our company is"
cont "going under!" cont "going under!"
para "...what? You used" para "...What? You used"
line "the MASTER BALL?!" line "the MASTER BALL?!"
para "You stupid child!" para "You stupid child!"
@ -93,8 +93,8 @@ _ChiefMonologueMasterBallNotCollected::
done done
_ChiefDefeatedText:: _ChiefDefeatedText::
text "No! I..." text "No!"
line "I..." line "I... I..."
prompt prompt
_ChiefVictoryText:: _ChiefVictoryText::
@ -144,7 +144,7 @@ _ChiefAltAfterBattleText::
line "be as powerful as" line "be as powerful as"
cont "I want, but what" cont "I want, but what"
cont "I do with that" cont "I do with that"
cont "power...is very" cont "power... is very"
cont "important." cont "important."
para "I still have much" para "I still have much"

View file

@ -36,7 +36,7 @@ _BeforeReceivedBottleCapText::
para "I won't give up!" para "I won't give up!"
line "I'll train with" line "I'll train with"
cont "my POKEMON until" cont "my #MON until"
cont "we're the best" cont "we're the best"
cont "there is!" cont "there is!"

View file

@ -42,7 +42,7 @@ _DexRatingText_Own50To64::
done done
_DexRatingText_Own65To79:: _DexRatingText_Own65To79::
text "Ho! This is geting" text "This is getting"
line "even better!" line "even better!"
done done
@ -53,8 +53,8 @@ _DexRatingText_Own80To99::
done done
_DexRatingText_Own100To114:: _DexRatingText_Own100To114::
text "You finally got at" text "You've finally got"
line "least 100 species!" line "over 100 species!"
cont "Great job!" cont "Great job!"
done done
@ -90,8 +90,8 @@ _DexRatingText_Own180To199::
done done
_DexRatingText_Own200To214:: _DexRatingText_Own200To214::
text "You finally got at" text "You finally passed"
line "least 200 species!" line "200 species!"
cont "I can't believe" cont "I can't believe"
cont "how good you are!" cont "how good you are!"
done done