mirror of
https://github.com/thornAvery/kep-hack.git
synced 2025-09-16 18:30:50 +12:00

(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 -
261 lines
5.4 KiB
NASM
261 lines
5.4 KiB
NASM
VictoryRoad2F_Script:
|
|
ld hl, wCurrentMapScriptFlags
|
|
bit 6, [hl]
|
|
res 6, [hl]
|
|
call nz, VictoryRoad2Script_517c4
|
|
ld hl, wCurrentMapScriptFlags
|
|
bit 5, [hl]
|
|
res 5, [hl]
|
|
call nz, VictoryRoad2Script_517c9
|
|
call EnableAutoTextBoxDrawing
|
|
ld hl, VictoryRoad2TrainerHeaders
|
|
ld de, VictoryRoad2F_ScriptPointers
|
|
ld a, [wVictoryRoad2FCurScript]
|
|
call ExecuteCurMapScriptInTable
|
|
ld [wVictoryRoad2FCurScript], a
|
|
ret
|
|
|
|
VictoryRoad2Script_517c4:
|
|
ResetEvent EVENT_VICTORY_ROAD_1_BOULDER_ON_SWITCH
|
|
VictoryRoad2Script_517c9:
|
|
CheckEvent EVENT_VICTORY_ROAD_2_BOULDER_ON_SWITCH1
|
|
jr z, .asm_517da
|
|
push af
|
|
ld a, $15
|
|
lb bc, 4, 3
|
|
call VictoryRoad2Script_517e2
|
|
pop af
|
|
.asm_517da
|
|
bit 7, a
|
|
ret z
|
|
ld a, $1d
|
|
lb bc, 7, 11
|
|
VictoryRoad2Script_517e2:
|
|
ld [wNewTileBlockID], a
|
|
predef ReplaceTileBlock
|
|
ret
|
|
|
|
VictoryRoad2F_ScriptPointers:
|
|
dw VictoryRoad2Script0
|
|
dw DisplayEnemyTrainerTextAndStartBattle
|
|
dw EndTrainerBattle
|
|
|
|
VictoryRoad2Script0:
|
|
ld hl, CoordsData_51816
|
|
call CheckBoulderCoords
|
|
jp nc, CheckFightingMapTrainers
|
|
EventFlagAddress hl, EVENT_VICTORY_ROAD_2_BOULDER_ON_SWITCH1
|
|
ld a, [wCoordIndex]
|
|
cp $2
|
|
jr z, .asm_5180b
|
|
CheckEventReuseHL EVENT_VICTORY_ROAD_2_BOULDER_ON_SWITCH1
|
|
SetEventReuseHL EVENT_VICTORY_ROAD_2_BOULDER_ON_SWITCH1
|
|
ret nz
|
|
jr .asm_51810
|
|
.asm_5180b
|
|
CheckEventAfterBranchReuseHL EVENT_VICTORY_ROAD_2_BOULDER_ON_SWITCH2, EVENT_VICTORY_ROAD_2_BOULDER_ON_SWITCH1
|
|
SetEventReuseHL EVENT_VICTORY_ROAD_2_BOULDER_ON_SWITCH2
|
|
ret nz
|
|
.asm_51810
|
|
ld hl, wCurrentMapScriptFlags
|
|
set 5, [hl]
|
|
ret
|
|
|
|
CoordsData_51816:
|
|
dbmapcoord 1, 16
|
|
dbmapcoord 9, 16
|
|
db -1 ; end
|
|
|
|
VictoryRoad2F_TextPointers:
|
|
dw VictoryRoad2Text1
|
|
dw VictoryRoad2Text2
|
|
dw VictoryRoad2Text3
|
|
dw VictoryRoad2Text4
|
|
dw VictoryRoad2Text5
|
|
dw PickUpItemText
|
|
dw PickUpItemText
|
|
dw PickUpItemText
|
|
dw PickUpItemText
|
|
dw PickUpItemText
|
|
dw BoulderText
|
|
dw BoulderText
|
|
dw BoulderText
|
|
dw DoubleEdgeGuy
|
|
|
|
VictoryRoad2TrainerHeaders:
|
|
def_trainers
|
|
VictoryRoad2TrainerHeader0:
|
|
trainer EVENT_BEAT_VICTORY_ROAD_2_TRAINER_0, 4, VictoryRoad2BattleText1, VictoryRoad2EndBattleText1, VictoryRoad2AfterBattleText1
|
|
VictoryRoad2TrainerHeader1:
|
|
trainer EVENT_BEAT_VICTORY_ROAD_2_TRAINER_1, 3, VictoryRoad2BattleText2, VictoryRoad2EndBattleText2, VictoryRoad2AfterBattleText2
|
|
VictoryRoad2TrainerHeader2:
|
|
trainer EVENT_BEAT_VICTORY_ROAD_2_TRAINER_2, 3, VictoryRoad2BattleText3, VictoryRoad2EndBattleText3, VictoryRoad2AfterBattleText3
|
|
VictoryRoad2TrainerHeader3:
|
|
trainer EVENT_BEAT_VICTORY_ROAD_2_TRAINER_3, 1, VictoryRoad2BattleText4, VictoryRoad2EndBattleText4, VictoryRoad2AfterBattleText4
|
|
VictoryRoad2TrainerHeader4:
|
|
trainer EVENT_BEAT_VICTORY_ROAD_2_TRAINER_4, 3, VictoryRoad2BattleText5, VictoryRoad2EndBattleText5, VictoryRoad2AfterBattleText5
|
|
db -1 ; end
|
|
|
|
VictoryRoad2Text1:
|
|
text_asm
|
|
ld hl, VictoryRoad2TrainerHeader0
|
|
call TalkToTrainer
|
|
jp TextScriptEnd
|
|
|
|
VictoryRoad2Text2:
|
|
text_asm
|
|
ld hl, VictoryRoad2TrainerHeader1
|
|
call TalkToTrainer
|
|
jp TextScriptEnd
|
|
|
|
VictoryRoad2Text3:
|
|
text_asm
|
|
ld hl, VictoryRoad2TrainerHeader2
|
|
call TalkToTrainer
|
|
jp TextScriptEnd
|
|
|
|
VictoryRoad2Text4:
|
|
text_asm
|
|
ld hl, VictoryRoad2TrainerHeader3
|
|
call TalkToTrainer
|
|
jp TextScriptEnd
|
|
|
|
VictoryRoad2Text5:
|
|
text_asm
|
|
ld hl, VictoryRoad2TrainerHeader4
|
|
call TalkToTrainer
|
|
jp TextScriptEnd
|
|
|
|
VictoryRoad2BattleText1:
|
|
text_far _VictoryRoad2BattleText1
|
|
text_end
|
|
|
|
VictoryRoad2EndBattleText1:
|
|
text_far _VictoryRoad2EndBattleText1
|
|
text_end
|
|
|
|
VictoryRoad2AfterBattleText1:
|
|
text_far _VictoryRoad2AfterBattleText1
|
|
text_end
|
|
|
|
VictoryRoad2BattleText2:
|
|
text_far _VictoryRoad2BattleText2
|
|
text_end
|
|
|
|
VictoryRoad2EndBattleText2:
|
|
text_far _VictoryRoad2EndBattleText2
|
|
text_end
|
|
|
|
VictoryRoad2AfterBattleText2:
|
|
text_far _VictoryRoad2AfterBattleText2
|
|
text_end
|
|
|
|
VictoryRoad2BattleText3:
|
|
text_far _VictoryRoad2BattleText3
|
|
text_end
|
|
|
|
VictoryRoad2EndBattleText3:
|
|
text_far _VictoryRoad2EndBattleText3
|
|
text_end
|
|
|
|
VictoryRoad2AfterBattleText3:
|
|
text_far _VictoryRoad2AfterBattleText3
|
|
text_end
|
|
|
|
VictoryRoad2BattleText4:
|
|
text_far _VictoryRoad2BattleText4
|
|
text_end
|
|
|
|
VictoryRoad2EndBattleText4:
|
|
text_far _VictoryRoad2EndBattleText4
|
|
text_end
|
|
|
|
VictoryRoad2AfterBattleText4:
|
|
text_far _VictoryRoad2AfterBattleText4
|
|
text_end
|
|
|
|
VictoryRoad2BattleText5:
|
|
text_far _VictoryRoad2BattleText5
|
|
text_end
|
|
|
|
VictoryRoad2EndBattleText5:
|
|
text_far _VictoryRoad2EndBattleText5
|
|
text_end
|
|
|
|
VictoryRoad2AfterBattleText5:
|
|
text_far _VictoryRoad2AfterBattleText5
|
|
text_end
|
|
|
|
; FireRed NPC
|
|
DoubleEdgeGuy:
|
|
text_asm
|
|
CheckEvent EVENT_GOT_TM10
|
|
jr nz, .got_item
|
|
ld hl, TM10PreReceiveText
|
|
call PrintText
|
|
|
|
call YesNoChoice
|
|
ld a, [wCurrentMenuItem]
|
|
and a
|
|
jr nz, .refused
|
|
|
|
lb bc, TM_DOUBLE_EDGE, 1
|
|
call GiveItem
|
|
jr nc, .bag_full
|
|
ld hl, ReceivedTM10Text
|
|
call PrintText
|
|
SetEvent EVENT_GOT_TM10
|
|
jr .done
|
|
.refused
|
|
ld hl, TM10Refused
|
|
call PrintText
|
|
jr .done
|
|
.bag_full
|
|
ld hl, DoubleEdgeNoRoomText
|
|
call PrintText
|
|
jr .done
|
|
.got_item
|
|
ld hl, TM10ExplanationText
|
|
call PrintText
|
|
.done
|
|
jp TextScriptEnd
|
|
|
|
TM10PreReceiveText:
|
|
text "You should be"
|
|
line "proud of your-"
|
|
cont "self, having"
|
|
cont "battled your way"
|
|
cont "through VICTORY"
|
|
cont "ROAD so bravely."
|
|
|
|
para "In recognition of"
|
|
line "your feat, I can"
|
|
cont "teach your #-"
|
|
cont "MON DOUBLE-EDGE."
|
|
prompt
|
|
|
|
ReceivedTM10Text:
|
|
text_far _ReceivedTM10Text
|
|
sound_get_item_1
|
|
text_end
|
|
|
|
TM10ExplanationText:
|
|
text "Keep that drive"
|
|
line "going for the"
|
|
cont "#MON LEAGUE!"
|
|
|
|
para "Take a run at"
|
|
line "them and knock"
|
|
cont "em out!"
|
|
done
|
|
|
|
TM10Refused:
|
|
text "I'll teach your"
|
|
line "#MON at any"
|
|
cont "time."
|
|
done
|
|
|
|
DoubleEdgeNoRoomText:
|
|
text_far _TMNPCNoRoomText
|
|
text_end
|