# Conflicts:
#	audio/engine.asm
#	constants/gfx_constants.asm
#	constants/map_data_constants.asm
#	constants/pokemon_data_constants.asm
#	constants/sprite_constants.asm
#	constants/wram_constants.asm
#	data/maps/data.asm
#	engine/battle/ai/scoring.asm
#	engine/battle/core.asm
#	engine/battle/effect_commands.asm
#	engine/battle/misc.asm
#	engine/battle_anims/getpokeballwobble.asm
#	engine/breeding.asm
#	engine/buy_sell_toss.asm
#	engine/decorations.asm
#	engine/events/battle_tower/battle_tower.asm
#	engine/events/battle_tower/rules.asm
#	engine/events/buena.asm
#	engine/events/bug_contest/contest_2.asm
#	engine/events/daycare.asm
#	engine/events/dratini.asm
#	engine/events/halloffame.asm
#	engine/events/happiness_egg.asm
#	engine/events/kurt.asm
#	engine/events/lucky_number.asm
#	engine/events/magnet_train.asm
#	engine/events/overworld.asm
#	engine/events/pokerus/pokerus.asm
#	engine/events/print_unown.asm
#	engine/events/print_unown_2.asm
#	engine/events/unown_walls.asm
#	engine/item_effects.asm
#	engine/link.asm
#	engine/mon_menu.asm
#	engine/player_object.asm
#	engine/routines/playslowcry.asm
#	engine/scripting.asm
#	engine/search.asm
#	engine/search2.asm
#	engine/specials.asm
#	engine/start_menu.asm
#	engine/timeset.asm
#	home/battle_vars.asm
#	home/map.asm
#	maps/GoldenrodUndergroundSwitchRoomEntrances.asm
#	maps/IlexForest.asm
#	maps/KrissHouse2F.asm
#	maps/Route39Barn.asm
#	mobile/mobile_12_2.asm
#	mobile/mobile_40.asm
#	mobile/mobile_5f.asm
#	wram.asm
This commit is contained in:
Rangi
2018-02-03 18:21:53 -05:00
367 changed files with 8920 additions and 8922 deletions

View File

@@ -5,12 +5,12 @@ SECTION "Events", ROMX
OverworldLoop:: ; 966b0
xor a
ld [MapStatus], a
ld [wMapStatus], a
.loop
ld a, [MapStatus]
ld a, [wMapStatus]
ld hl, .jumps
rst JumpTable
ld a, [MapStatus]
ld a, [wMapStatus]
cp 3 ; done
jr nz, .loop
.done
@@ -25,101 +25,101 @@ OverworldLoop:: ; 966b0
DisableEvents: ; 966cb
xor a
ld [ScriptFlags3], a
ld [wScriptFlags3], a
ret
; 966d0
EnableEvents:: ; 966d0
ld a, $ff
ld [ScriptFlags3], a
ld [wScriptFlags3], a
ret
; 966d6
CheckBit5_ScriptFlags3: ; 966d6
ld hl, ScriptFlags3
ld hl, wScriptFlags3
bit 5, [hl]
ret
; 966dc
DisableWarpsConnxns: ; 966dc
ld hl, ScriptFlags3
ld hl, wScriptFlags3
res 2, [hl]
ret
; 966e2
DisableCoordEvents: ; 966e2
ld hl, ScriptFlags3
ld hl, wScriptFlags3
res 1, [hl]
ret
; 966e8
DisableStepCount: ; 966e8
ld hl, ScriptFlags3
ld hl, wScriptFlags3
res 0, [hl]
ret
; 966ee
DisableWildEncounters: ; 966ee
ld hl, ScriptFlags3
ld hl, wScriptFlags3
res 4, [hl]
ret
; 966f4
EnableWarpsConnxns: ; 966f4
ld hl, ScriptFlags3
ld hl, wScriptFlags3
set 2, [hl]
ret
; 966fa
EnableCoordEvents: ; 966fa
ld hl, ScriptFlags3
ld hl, wScriptFlags3
set 1, [hl]
ret
; 96700
EnableStepCount: ; 96700
ld hl, ScriptFlags3
ld hl, wScriptFlags3
set 0, [hl]
ret
; 96706
EnableWildEncounters: ; 96706
ld hl, ScriptFlags3
ld hl, wScriptFlags3
set 4, [hl]
ret
; 9670c
CheckWarpConnxnScriptFlag: ; 9670c
ld hl, ScriptFlags3
ld hl, wScriptFlags3
bit 2, [hl]
ret
; 96712
CheckCoordEventScriptFlag: ; 96712
ld hl, ScriptFlags3
ld hl, wScriptFlags3
bit 1, [hl]
ret
; 96718
CheckStepCountScriptFlag: ; 96718
ld hl, ScriptFlags3
ld hl, wScriptFlags3
bit 0, [hl]
ret
; 9671e
CheckWildEncountersScriptFlag: ; 9671e
ld hl, ScriptFlags3
ld hl, wScriptFlags3
bit 4, [hl]
ret
; 96724
StartMap: ; 96724
xor a
ld [ScriptVar], a
ld [wScriptVar], a
xor a
ld [ScriptRunning], a
ld hl, MapStatus
ld bc, wMapStatusEnd - MapStatus
ld [wScriptRunning], a
ld hl, wMapStatus
ld bc, wMapStatusEnd - wMapStatus
call ByteFill
farcall InitCallReceiveDelay
call ClearJoypad
@@ -141,13 +141,13 @@ EnterMap: ; 9673e
cp MAPSETUP_RELOADMAP
jr nz, .dontresetpoison
xor a
ld [PoisonStepCount], a
ld [wPoisonStepCount], a
.dontresetpoison
xor a ; end map entry
ld [hMapEntryMethod], a
ld a, 2 ; HandleMap
ld [MapStatus], a
ld [wMapStatus], a
ret
; 9676d
@@ -164,7 +164,7 @@ HandleMap: ; 96773
call MapEvents
; Not immediately entering a connected map will cause problems.
ld a, [MapStatus]
ld a, [wMapStatus]
cp 2 ; HandleMap
ret nz
@@ -176,7 +176,7 @@ HandleMap: ; 96773
; 96795
MapEvents: ; 96795
ld a, [MapEventStatus]
ld a, [wMapEventStatus]
ld hl, .jumps
rst JumpTable
ret
@@ -203,12 +203,12 @@ MaxOverworldDelay: ; 967af
ResetOverworldDelay: ; 967b0
ld a, [MaxOverworldDelay]
ld [OverworldDelay], a
ld [wOverworldDelay], a
ret
; 967b7
NextOverworldFrame: ; 967b7
ld a, [OverworldDelay]
ld a, [wOverworldDelay]
and a
ret z
ld c, a
@@ -217,7 +217,7 @@ NextOverworldFrame: ; 967b7
; 967c1
HandleMapTimeAndJoypad: ; 967c1
ld a, [MapEventStatus]
ld a, [wMapEventStatus]
cp 1 ; no events
ret z
@@ -252,12 +252,12 @@ CheckPlayerState: ; 967f4
call EnableEvents
.events
ld a, 0 ; events
ld [MapEventStatus], a
ld [wMapEventStatus], a
ret
.noevents
ld a, 1 ; no events
ld [MapEventStatus], a
ld [wMapEventStatus], a
ret
; 96812
@@ -272,7 +272,7 @@ _CheckObjectEnteringVisibleRange: ; 96812
PlayerEvents: ; 9681f
xor a
; If there's already a player event, don't interrupt it.
ld a, [ScriptRunning]
ld a, [wScriptRunning]
and a
ret nz
@@ -304,9 +304,9 @@ PlayerEvents: ; 9681f
farcall EnableScriptMode
pop af
ld [ScriptRunning], a
ld [wScriptRunning], a
call DoPlayerEvent
ld a, [ScriptRunning]
ld a, [wScriptRunning]
cp PLAYEREVENT_CONNECTION
jr z, .ok2
cp PLAYEREVENT_JOYCHANGEFACING
@@ -379,7 +379,7 @@ CheckTileEvent: ; 96874
ret
.warp_tile
ld a, [PlayerStandingTile]
ld a, [wPlayerStandingTile]
call CheckPitTile
jr nz, .not_pit
ld a, PLAYEREVENT_FALL
@@ -463,13 +463,13 @@ endr
call GetMapScriptsBank
call CallScript
ld hl, ScriptFlags
ld hl, wScriptFlags
res 3, [hl]
farcall EnableScriptMode
farcall ScriptEvents
ld hl, ScriptFlags
ld hl, wScriptFlags
bit 3, [hl]
jr z, .nope
@@ -647,7 +647,7 @@ TryObjectEvent: ; 969b5
ld h, [hl]
ld l, a
call GetMapScriptsBank
ld de, EngineBuffer1
ld de, wEngineBuffer1
ld bc, 2
call FarCopyBytes
ld a, PLAYEREVENT_ITEMBALL
@@ -689,7 +689,7 @@ TryBGEvent: ; 96a38
ret
.is_bg_event:
ld a, [EngineBuffer3]
ld a, [wEngineBuffer3]
ld hl, .bg_events
rst JumpTable
ret
@@ -720,14 +720,14 @@ TryBGEvent: ; 96a38
jr .checkdir
.checkdir
ld a, [PlayerDirection]
ld a, [wPlayerDirection]
and %1100
cp b
jp nz, .dontread
.read
call PlayTalkObject
ld hl, EngineBuffer4
ld hl, wEngineBuffer4
ld a, [hli]
ld h, [hl]
ld l, a
@@ -741,7 +741,7 @@ TryBGEvent: ; 96a38
jp nz, .dontread
call PlayTalkObject
call GetMapScriptsBank
ld de, EngineBuffer1
ld de, wEngineBuffer1
ld bc, 3
call FarCopyBytes
ld a, BANK(HiddenItemScript)
@@ -754,7 +754,7 @@ TryBGEvent: ; 96a38
call CheckBGEventFlag
jr nz, .dontread
call GetMapScriptsBank
ld de, EngineBuffer1
ld de, wEngineBuffer1
ld bc, 3
call FarCopyBytes
jr .dontread
@@ -787,7 +787,7 @@ TryBGEvent: ; 96a38
; 96ad8
CheckBGEventFlag: ; 96ad8
ld hl, EngineBuffer4
ld hl, wEngineBuffer4
ld a, [hli]
ld h, [hl]
ld l, a
@@ -943,9 +943,9 @@ CountStep: ; 96b79
jr c, .doscript
; Count the step for poison and total steps
ld hl, PoisonStepCount
ld hl, wPoisonStepCount
inc [hl]
ld hl, StepCount
ld hl, wStepCount
inc [hl]
; Every 256 steps, increase the happiness of all your Pokemon.
jr nz, .skip_happiness
@@ -956,7 +956,7 @@ CountStep: ; 96b79
; Every 256 steps, offset from the happiness incrementor by 128 steps,
; decrease the hatch counter of all your eggs until you reach the first
; one that is ready to hatch.
ld a, [StepCount]
ld a, [wStepCount]
cp $80
jr nz, .skip_egg
@@ -968,7 +968,7 @@ CountStep: ; 96b79
farcall DayCareStep
; Every four steps, deal damage to all Poisoned Pokemon
ld hl, PoisonStepCount
ld hl, wPoisonStepCount
ld a, [hl]
cp 4
jr c, .skip_poison
@@ -1019,7 +1019,7 @@ DoRepelStep: ; 96bd7
; 96beb
DoPlayerEvent: ; 96beb
ld a, [ScriptRunning]
ld a, [wScriptRunning]
and a
ret z
@@ -1036,11 +1036,11 @@ DoPlayerEvent: ; 96beb
add hl, bc
add hl, bc
ld a, [hli]
ld [ScriptBank], a
ld [wScriptBank], a
ld a, [hli]
ld [ScriptPos], a
ld [wScriptPos], a
ld a, [hl]
ld [ScriptPos + 1], a
ld [wScriptPos + 1], a
ret
; 96c0c