thorn/kep-hack
1
0
Fork 0
mirror of https://github.com/thornAvery/kep-hack.git synced 2026-02-07 16:15:23 +13:00
Code Issues Projects Releases Packages Wiki Activity Actions

Rename map files, labels, and constants to be consistent and work with Polished Map

Browse source
This commit is contained in:
Rangi 2019-01-01 15:06:23 -05:00
parent 90430e6dee
commit c779602459
1398 changed files with 6631 additions and 6166 deletions
Download patch file Download diff file Expand all files Collapse all files

175
scripts/PowerPlant.asm Executable file
View file

@ -0,0 +1,175 @@
PowerPlant_Script:
call EnableAutoTextBoxDrawing
ld hl, Voltorb0TrainerHeader
ld de, PowerPlant_ScriptPointers
ld a, [wPowerPlantCurScript]
call ExecuteCurMapScriptInTable
ld [wPowerPlantCurScript], a
ret
PowerPlant_ScriptPointers
dw CheckFightingMapTrainers
dw DisplayEnemyTrainerTextAndStartBattle
dw EndTrainerBattle
PowerPlant_TextPointers:
dw Voltorb0Text
dw Voltorb1Text
dw Voltorb2Text
dw Voltorb3Text
dw Voltorb4Text
dw Voltorb5Text
dw Voltorb6Text
dw Voltorb7Text
dw ZapdosText
dw PickUpItemText
dw PickUpItemText
dw PickUpItemText
dw PickUpItemText
dw PickUpItemText
Voltorb0TrainerHeader:
dbEventFlagBit EVENT_BEAT_POWER_PLANT_VOLTORB_0
db 0 ; view range
dwEventFlagAddress EVENT_BEAT_POWER_PLANT_VOLTORB_0
dw VoltorbBattleText ; TextBeforeBattle
dw VoltorbBattleText ; TextAfterBattle
dw VoltorbBattleText ; TextEndBattle
dw VoltorbBattleText ; TextEndBattle
Voltorb1TrainerHeader:
dbEventFlagBit EVENT_BEAT_POWER_PLANT_VOLTORB_1
db 0 ; view range
dwEventFlagAddress EVENT_BEAT_POWER_PLANT_VOLTORB_1
dw VoltorbBattleText ; TextBeforeBattle
dw VoltorbBattleText ; TextAfterBattle
dw VoltorbBattleText ; TextEndBattle
dw VoltorbBattleText ; TextEndBattle
Voltorb2TrainerHeader:
dbEventFlagBit EVENT_BEAT_POWER_PLANT_VOLTORB_2
db 0 ; view range
dwEventFlagAddress EVENT_BEAT_POWER_PLANT_VOLTORB_2
dw VoltorbBattleText ; TextBeforeBattle
dw VoltorbBattleText ; TextAfterBattle
dw VoltorbBattleText ; TextEndBattle
dw VoltorbBattleText ; TextEndBattle
Voltorb3TrainerHeader:
dbEventFlagBit EVENT_BEAT_POWER_PLANT_VOLTORB_3
db 0 ; view range
dwEventFlagAddress EVENT_BEAT_POWER_PLANT_VOLTORB_3
dw VoltorbBattleText ; TextBeforeBattle
dw VoltorbBattleText ; TextAfterBattle
dw VoltorbBattleText ; TextEndBattle
dw VoltorbBattleText ; TextEndBattle
Voltorb4TrainerHeader:
dbEventFlagBit EVENT_BEAT_POWER_PLANT_VOLTORB_4
db 0 ; view range
dwEventFlagAddress EVENT_BEAT_POWER_PLANT_VOLTORB_4
dw VoltorbBattleText ; TextBeforeBattle
dw VoltorbBattleText ; TextAfterBattle
dw VoltorbBattleText ; TextEndBattle
dw VoltorbBattleText ; TextEndBattle
Voltorb5TrainerHeader:
dbEventFlagBit EVENT_BEAT_POWER_PLANT_VOLTORB_5
db 0 ; view range
dwEventFlagAddress EVENT_BEAT_POWER_PLANT_VOLTORB_5
dw VoltorbBattleText ; TextBeforeBattle
dw VoltorbBattleText ; TextAfterBattle
dw VoltorbBattleText ; TextEndBattle
dw VoltorbBattleText ; TextEndBattle
Voltorb6TrainerHeader:
dbEventFlagBit EVENT_BEAT_POWER_PLANT_VOLTORB_6
db 0 ; view range
dwEventFlagAddress EVENT_BEAT_POWER_PLANT_VOLTORB_6
dw VoltorbBattleText ; TextBeforeBattle
dw VoltorbBattleText ; TextAfterBattle
dw VoltorbBattleText ; TextEndBattle
dw VoltorbBattleText ; TextEndBattle
Voltorb7TrainerHeader:
dbEventFlagBit EVENT_BEAT_POWER_PLANT_VOLTORB_7, 1
db 0 ; view range
dwEventFlagAddress EVENT_BEAT_POWER_PLANT_VOLTORB_7, 1
dw VoltorbBattleText ; TextBeforeBattle
dw VoltorbBattleText ; TextAfterBattle
dw VoltorbBattleText ; TextEndBattle
dw VoltorbBattleText ; TextEndBattle
ZapdosTrainerHeader:
dbEventFlagBit EVENT_BEAT_ZAPDOS, 1
db 0 ; view range
dwEventFlagAddress EVENT_BEAT_ZAPDOS, 1
dw ZapdosBattleText ; TextBeforeBattle
dw ZapdosBattleText ; TextAfterBattle
dw ZapdosBattleText ; TextEndBattle
dw ZapdosBattleText ; TextEndBattle
db $ff
InitVoltorbBattle:
call TalkToTrainer
ld a, [wCurMapScript]
ld [wPowerPlantCurScript], a
jp TextScriptEnd
Voltorb0Text:
TX_ASM
ld hl, Voltorb0TrainerHeader
jr InitVoltorbBattle
Voltorb1Text:
TX_ASM
ld hl, Voltorb1TrainerHeader
jr InitVoltorbBattle
Voltorb2Text:
TX_ASM
ld hl, Voltorb2TrainerHeader
jr InitVoltorbBattle
Voltorb3Text:
TX_ASM
ld hl, Voltorb3TrainerHeader
jr InitVoltorbBattle
Voltorb4Text:
TX_ASM
ld hl, Voltorb4TrainerHeader
jr InitVoltorbBattle
Voltorb5Text:
TX_ASM
ld hl, Voltorb5TrainerHeader
jr InitVoltorbBattle
Voltorb6Text:
TX_ASM
ld hl, Voltorb6TrainerHeader
jr InitVoltorbBattle
Voltorb7Text:
TX_ASM
ld hl, Voltorb7TrainerHeader
jr InitVoltorbBattle
ZapdosText:
TX_ASM
ld hl, ZapdosTrainerHeader
jr InitVoltorbBattle
VoltorbBattleText:
TX_FAR _VoltorbBattleText
db "@"
ZapdosBattleText:
TX_FAR _ZapdosBattleText
TX_ASM
ld a, ZAPDOS
call PlayCry
call WaitForSoundToFinish
jp TextScriptEnd