kep-hack/scripts/CeladonUniversityPokecenter.asm
Martha Schilling 7742104bbb Bug Fixes and stuff!
(kinda just clearing my commits list while I'm working on 1.3 still.)

- Lance's Room is no longer listed as a dungeon map

- Changed the layout of Cinnabar Volcano YET AGAIN, making it a little more visually appealing. If you get softlocked here, I will just sigh disapprovingly.

- Various moveset fixes:
     - Arcanine-H gets EQ and Fissure now
     - Raichu-A loses Counter
     - Raticate-A gets TBolt and Thunder
     - Swapped Bullet Punch and Iron Head around in Scizor's learnset
     - Umbreon gets Psychic
     - WigWug both now get Ice Beam and Blizzard
     - Seel and Dewgong get Water Gun by level up
     - Swapped inconsistent moveset levels for Omanyte and Omastar
     - Eevee gets Quick Attack earlier

- Fixed a typo in Slowbro-G's dex entry

- Changed the Tauros Combat Breed trader's text to remove a moveset inaccuracy

- Changed Misty's AI to now use X Specials instead of Potions

- Gave Chief's teams a slightly updated moveset

- Fixed an issue where Steel just...didn't resist Rock? How did I miss this?????

- Made Sandshrew more common in Mt Moon B2F

- Changed the Marowaks on Silph Gauntlet 4F to Guardias

- Fixed issues where receiving a Gym badge wouldn't play the correct sound in most situations

- Increased the level of the Salesman's Cubone gift from 17 to 23

- Decreased the levels of the Fossil gifts from 44 to 35

- More text fixes

-
2024-01-26 23:20:54 +00:00

95 lines
1.8 KiB
NASM

CeladonUniversityPokecenter_Script:
call Serial_TryEstablishingExternallyClockedConnection
jp EnableAutoTextBoxDrawing
CeladonUniversityPokecenter_TextPointers:
dw CeladonUniversityHealNurseText
dw CeladonUniversityPokecenterText2
dw CuboneSalesmanText
dw CeladonUniversityPokecenterText8
dw CeladonUniversityTradeNurseText
dw CeladonUniversityChansey
CeladonUniversityTradeNurseText:
script_cable_club_receptionist
CeladonUniversityHealNurseText:
script_pokecenter_nurse
CeladonUniversityPokecenterText2:
text_far _CeladonUniversityPokecenterText4
text_end
CuboneSalesmanText:
text_asm
CheckEvent EVENT_BOUGHT_CUBONE, 1
jp c, .alreadyBoughtCubone
ld hl, .Text1
call PrintText
ld a, MONEY_BOX
ld [wTextBoxID], a
call DisplayTextBoxID
call YesNoChoice
ld a, [wCurrentMenuItem]
and a
jp nz, .choseNo
ldh [hMoney], a
ldh [hMoney + 2], a
ld a, $5
ldh [hMoney + 1], a
call HasEnoughMoney
jr nc, .enoughMoney
ld hl, .NoMoneyText
jr .printText
.enoughMoney
lb bc, CUBONE, 23
call GivePokemon
jr nc, .done
xor a
ld [wPriceTemp], a
ld [wPriceTemp + 2], a
ld a, $5
ld [wPriceTemp + 1], a
ld hl, wPriceTemp + 2
ld de, wPlayerMoney + 2
ld c, $3
predef SubBCDPredef
ld a, MONEY_BOX
ld [wTextBoxID], a
call DisplayTextBoxID
SetEvent EVENT_BOUGHT_CUBONE
jr .done
.choseNo
ld hl, .RefuseText
jr .printText
.alreadyBoughtCubone
ld hl, .Text2
.printText
call PrintText
.done
jp TextScriptEnd
.Text1
text_far _CuboneSalesmanText1
text_end
.RefuseText
text_far _CuboneSalesmanNoText
text_end
.NoMoneyText
text_far _CuboneSalesmanNoMoneyText
text_end
.Text2
text_far _CuboneSalesmanText2
text_end
CeladonUniversityPokecenterText8::
text_far _CeladonUniversityPokecenterText8
text_end
CeladonUniversityChansey:
text_asm
callfar PokecenterChanseyText
jp TextScriptEnd