Rooba
/
pokecrystal
mirror of https://github.com/pret/pokecrystal.git
1
1
Fork 0
Code Issues Packages Projects Releases Wiki Activity

No space between labels and bodies

This commit is contained in:
Rangi 2018-06-25 12:24:18 -04:00
parent 5693cc49cf
commit 1caa50a647
37 changed files with 11 additions and 113 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
audio/music_pointers.asm
View File

@ -2,7 +2,6 @@
Music: Music:
; entries correspond to MUSIC_* constants ; entries correspond to MUSIC_* constants
dba Music_Nothing dba Music_Nothing
dba Music_TitleScreen dba Music_TitleScreen
dba Music_Route1 dba Music_Route1
@ -96,9 +95,7 @@ Music:
dba Music_LakeOfRageRocketRadio dba Music_LakeOfRageRocketRadio
dba Music_Printer dba Music_Printer
dba Music_PostCredits dba Music_PostCredits
; new to Crystal
; Crystal adds the following songs:
dba Music_Clair dba Music_Clair
dba Music_MobileAdapterMenu dba Music_MobileAdapterMenu
dba Music_MobileAdapter dba Music_MobileAdapter

5
audio/sfx_pointers.asm
View File

@ -1,6 +1,5 @@
SFX: SFX:
; entries correspond to SFX_* constants ; entries correspond to SFX_* constants
dba Sfx_DexFanfare5079 dba Sfx_DexFanfare5079
dba Sfx_Item dba Sfx_Item
dba Sfx_CaughtMon dba Sfx_CaughtMon
@ -191,9 +190,7 @@ SFX:
dba Sfx_2Boops dba Sfx_2Boops
dba Sfx_GlassTing dba Sfx_GlassTing
dba Sfx_GlassTing2 dba Sfx_GlassTing2
; new to Crystal
; Crystal adds the following SFX:
dba Sfx_IntroUnown1 dba Sfx_IntroUnown1
dba Sfx_IntroUnown2 dba Sfx_IntroUnown2
dba Sfx_IntroUnown3 dba Sfx_IntroUnown3

12
engine/battle/ai/scoring.asm
View File

@ -594,7 +594,6 @@ AI_Smart_DreamEater:
ret ret
AI_Smart_EvasionUp: AI_Smart_EvasionUp:
; Dismiss this move if enemy's evasion can't raise anymore. ; Dismiss this move if enemy's evasion can't raise anymore.
ld a, [wEnemyEvaLevel] ld a, [wEnemyEvaLevel]
cp $d cp $d
@ -725,7 +724,6 @@ AI_Smart_AlwaysHit:
ret ret
AI_Smart_MirrorMove: AI_Smart_MirrorMove:
; If the player did not use any move last turn... ; If the player did not use any move last turn...
ld a, [wLastPlayerCounterMove] ld a, [wLastPlayerCounterMove]
and a and a
@ -767,7 +765,6 @@ AI_Smart_MirrorMove:
ret ret
AI_Smart_AccuracyDown: AI_Smart_AccuracyDown:
; If player's HP is full... ; If player's HP is full...
call AICheckPlayerMaxHP call AICheckPlayerMaxHP
jr nc, .asm_389a0 jr nc, .asm_389a0
@ -872,7 +869,6 @@ AI_Smart_AccuracyDown:
ret ret
AI_Smart_ResetStats: AI_Smart_ResetStats:
; 85% chance to encourage this move if any of enemy's stat levels is lower than -2. ; 85% chance to encourage this move if any of enemy's stat levels is lower than -2.
push hl push hl
ld hl, wEnemyAtkLevel ld hl, wEnemyAtkLevel
@ -1090,7 +1086,6 @@ AI_Smart_Unused2B:
ret ret
AI_Smart_Confuse: AI_Smart_Confuse:
; 90% chance to discourage this move if player's HP is between 25% and 50%. ; 90% chance to discourage this move if player's HP is between 25% and 50%.
call AICheckPlayerHalfHP call AICheckPlayerHalfHP
ret c ret c
@ -1107,7 +1102,6 @@ AI_Smart_Confuse:
ret ret
AI_Smart_SpDefenseUp2: AI_Smart_SpDefenseUp2:
; Discourage this move if enemy's HP is lower than 50%. ; Discourage this move if enemy's HP is lower than 50%.
call AICheckEnemyHalfHP call AICheckEnemyHalfHP
jr nc, .asm_38b10 jr nc, .asm_38b10
@ -1167,7 +1161,6 @@ AI_Smart_SuperFang:
ret ret
AI_Smart_Paralyze: AI_Smart_Paralyze:
; 50% chance to discourage this move if player's HP is below 25%. ; 50% chance to discourage this move if player's HP is below 25%.
call AICheckPlayerQuarterHP call AICheckPlayerQuarterHP
jr nc, .asm_38b3a jr nc, .asm_38b3a
@ -2025,7 +2018,6 @@ AI_Smart_PerishSong:
ret ret
AI_Smart_Sandstorm: AI_Smart_Sandstorm:
; Greatly discourage this move if the player is immune to Sandstorm damage. ; Greatly discourage this move if the player is immune to Sandstorm damage.
ld a, [wBattleMonType1] ld a, [wBattleMonType1]
push hl push hl
@ -2207,7 +2199,6 @@ AI_Smart_Safeguard:
AI_Smart_Magnitude: AI_Smart_Magnitude:
AI_Smart_Earthquake: AI_Smart_Earthquake:
; Greatly encourage this move if the player is underground and the enemy is faster. ; Greatly encourage this move if the player is underground and the enemy is faster.
ld a, [wLastPlayerCounterMove] ld a, [wLastPlayerCounterMove]
cp DIG cp DIG
@ -2330,7 +2321,6 @@ AI_Smart_HiddenPower:
ret ret
AI_Smart_RainDance: AI_Smart_RainDance:
; Greatly discourage this move if it would favour the player type-wise. ; Greatly discourage this move if it would favour the player type-wise.
; Particularly, if the player is a Water-type. ; Particularly, if the player is a Water-type.
ld a, [wBattleMonType1] ld a, [wBattleMonType1]
@ -2352,7 +2342,6 @@ AI_Smart_RainDance:
INCLUDE "data/battle/ai/rain_dance_moves.asm" INCLUDE "data/battle/ai/rain_dance_moves.asm"
AI_Smart_SunnyDay: AI_Smart_SunnyDay:
; Greatly discourage this move if it would favour the player type-wise. ; Greatly discourage this move if it would favour the player type-wise.
; Particularly, if the player is a Fire-type. ; Particularly, if the player is a Fire-type.
ld a, [wBattleMonType1] ld a, [wBattleMonType1]
@ -2566,7 +2555,6 @@ AI_Smart_MirrorCoat:
AI_Smart_Twister: AI_Smart_Twister:
AI_Smart_Gust: AI_Smart_Gust:
; Greatly encourage this move if the player is flying and the enemy is faster. ; Greatly encourage this move if the player is flying and the enemy is faster.
ld a, [wLastPlayerCounterMove] ld a, [wLastPlayerCounterMove]
cp FLY cp FLY

3
engine/battle/ai/switch.asm
View File

@ -435,8 +435,9 @@ FindAliveEnemyMonsWithASuperEffectiveMove:
and c and c
ld c, a ld c, a
FindEnemyMonsWithASuperEffectiveMove: ; fallthrough
FindEnemyMonsWithASuperEffectiveMove:
ld a, -1 ld a, -1
ld [wEnemyAISwitchScore], a ld [wEnemyAISwitchScore], a
ld hl, wOTPartyMon1Moves ld hl, wOTPartyMon1Moves

1
engine/battle/core.asm
View File

@ -6036,7 +6036,6 @@ LoadEnemyMon:
jp .Happiness jp .Happiness
.InitDVs: .InitDVs:
; Trainer DVs ; Trainer DVs
; All trainers have preset DVs, determined by class ; All trainers have preset DVs, determined by class

12
engine/battle/effect_commands.asm
View File

@ -68,7 +68,6 @@ DoMove:
ld [wBattleScriptBufferAddress + 1], a ld [wBattleScriptBufferAddress + 1], a
.ReadMoveEffectCommand: .ReadMoveEffectCommand:
; ld a, [wBattleScriptBufferAddress++] ; ld a, [wBattleScriptBufferAddress++]
ld a, [wBattleScriptBufferAddress] ld a, [wBattleScriptBufferAddress]
ld l, a ld l, a
@ -136,7 +135,6 @@ BattleCommand_CheckTurn:
jp nz, CheckEnemyTurn jp nz, CheckEnemyTurn
CheckPlayerTurn: CheckPlayerTurn:
ld hl, wPlayerSubStatus4 ld hl, wPlayerSubStatus4
bit SUBSTATUS_RECHARGE, [hl] bit SUBSTATUS_RECHARGE, [hl]
jr z, .no_recharge jr z, .no_recharge
@ -366,7 +364,6 @@ OpponentCantMove:
jp BattleCommand_SwitchTurn jp BattleCommand_SwitchTurn
CheckEnemyTurn: CheckEnemyTurn:
ld hl, wEnemySubStatus4 ld hl, wEnemySubStatus4
bit SUBSTATUS_RECHARGE, [hl] bit SUBSTATUS_RECHARGE, [hl]
jr z, .no_recharge jr z, .no_recharge
@ -589,7 +586,6 @@ EndTurn:
jp ResetDamage jp ResetDamage
MoveDisabled: MoveDisabled:
; Make sure any charged moves fail ; Make sure any charged moves fail
ld a, BATTLE_VARS_SUBSTATUS3 ld a, BATTLE_VARS_SUBSTATUS3
call GetBattleVarAddr call GetBattleVarAddr
@ -604,7 +600,6 @@ MoveDisabled:
jp StdBattleTextBox jp StdBattleTextBox
HitConfusion: HitConfusion:
ld hl, HurtItselfText ld hl, HurtItselfText
call StdBattleTextBox call StdBattleTextBox
@ -811,7 +806,6 @@ BattleCommand_CheckObedience:
jp .EndDisobedience jp .EndDisobedience
.UseInstead: .UseInstead:
; Can't use another move if the monster only has one! ; Can't use another move if the monster only has one!
ld a, [wBattleMonMoves + 1] ld a, [wBattleMonMoves + 1]
and a and a
@ -919,7 +913,6 @@ BattleCommand_CheckObedience:
jp EndMoveEffect jp EndMoveEffect
IgnoreSleepOnly: IgnoreSleepOnly:
ld a, BATTLE_VARS_MOVE_ANIM ld a, BATTLE_VARS_MOVE_ANIM
call GetBattleVar call GetBattleVar
@ -952,7 +945,6 @@ BattleCommand_UsedMoveText:
ret ret
CheckUserIsCharging: CheckUserIsCharging:
ld a, [hBattleTurn] ld a, [hBattleTurn]
and a and a
ld a, [wPlayerCharging] ; player ld a, [wPlayerCharging] ; player
@ -1775,7 +1767,6 @@ BattleCommand_CheckHit:
ret ret
.StatModifiers: .StatModifiers:
ld a, [hBattleTurn] ld a, [hBattleTurn]
and a and a
@ -3066,8 +3057,8 @@ BattleCommand_DamageCalc:
ld [hDivisor], a ld [hDivisor], a
ld b, 4 ld b, 4
call Divide call Divide
.DoneItem:
.DoneItem:
; Critical hits ; Critical hits
call .CriticalMultiplier call .CriticalMultiplier
@ -3583,7 +3574,6 @@ DoSubstituteDamage:
jp ResetDamage jp ResetDamage
UpdateMoveData: UpdateMoveData:
ld a, BATTLE_VARS_MOVE_ANIM ld a, BATTLE_VARS_MOVE_ANIM
call GetBattleVarAddr call GetBattleVarAddr
ld d, h ld d, h

1
engine/battle/misc.asm
View File

@ -50,7 +50,6 @@ GetPlayerBackpicCoords:
ret ret
DoWeatherModifiers: DoWeatherModifiers:
ld de, WeatherTypeModifiers ld de, WeatherTypeModifiers
ld a, [wBattleWeather] ld a, [wBattleWeather]
ld b, a ld b, a

1
engine/battle/move_effects/baton_pass.asm
View File

@ -45,7 +45,6 @@ BattleCommand_BatonPass:
ret ret
.Enemy: .Enemy:
; Wildmons don't have anything to switch to ; Wildmons don't have anything to switch to
ld a, [wBattleMode] ld a, [wBattleMode]
dec a ; WILDMON dec a ; WILDMON

1
engine/battle/move_effects/fury_cutter.asm
View File

@ -39,7 +39,6 @@ BattleCommand_FuryCutter:
ret ret
ResetFuryCutterCount: ResetFuryCutterCount:
push hl push hl
ld hl, wPlayerFuryCutterCount ld hl, wPlayerFuryCutterCount

1
engine/battle/move_effects/protect.asm
View File

@ -13,7 +13,6 @@ BattleCommand_Protect:
jp StdBattleTextBox jp StdBattleTextBox
ProtectChance: ProtectChance:
ld de, wPlayerProtectCount ld de, wPlayerProtectCount
ld a, [hBattleTurn] ld a, [hBattleTurn]
and a and a

13
engine/battle_anims/anim_commands.asm
View File

@ -1,7 +1,6 @@
; Battle animation command interpreter. ; Battle animation command interpreter.
PlayBattleAnim: PlayBattleAnim:
ld a, [rSVBK] ld a, [rSVBK]
push af push af
@ -15,7 +14,6 @@ PlayBattleAnim:
ret ret
_PlayBattleAnim: _PlayBattleAnim:
ld c, 6 ld c, 6
.wait .wait
call BattleAnimDelayFrame call BattleAnimDelayFrame
@ -53,7 +51,6 @@ _PlayBattleAnim:
ret ret
BattleAnimRunScript: BattleAnimRunScript:
ld a, [wFXAnimID + 1] ld a, [wFXAnimID + 1]
and a and a
jr nz, .hi_byte jr nz, .hi_byte
@ -97,7 +94,6 @@ BattleAnimRunScript:
ret ret
RunBattleAnimScript: RunBattleAnimScript:
call ClearBattleAnims call ClearBattleAnims
.playframe .playframe
@ -139,7 +135,6 @@ RunBattleAnimScript:
ret ret
BattleAnimClearHud: BattleAnimClearHud:
call BattleAnimDelayFrame call BattleAnimDelayFrame
call WaitTop call WaitTop
call ClearActorHud call ClearActorHud
@ -152,7 +147,6 @@ BattleAnimClearHud:
ret ret
BattleAnimRestoreHuds: BattleAnimRestoreHuds:
call BattleAnimDelayFrame call BattleAnimDelayFrame
call WaitTop call WaitTop
@ -177,7 +171,6 @@ BattleAnimRestoreHuds:
ret ret
BattleAnimRequestPals: BattleAnimRequestPals:
ld a, [hCGB] ld a, [hCGB]
and a and a
ret z ret z
@ -207,7 +200,6 @@ BattleAnimDelayFrame:
ret ret
ClearActorHud: ClearActorHud:
ld a, [hBattleTurn] ld a, [hBattleTurn]
and a and a
jr z, .player jr z, .player
@ -241,7 +233,6 @@ Unreferenced_Functioncc220:
ret ret
BattleAnim_ClearCGB_OAMFlags: BattleAnim_ClearCGB_OAMFlags:
ld a, [wBattleAnimFlags] ld a, [wBattleAnimFlags]
bit 3, a bit 3, a
jr z, .delete jr z, .delete
@ -777,7 +768,6 @@ BattleAnimCmd_SetObj:
ret ret
BattleAnimCmd_EnemyFeetObj: BattleAnimCmd_EnemyFeetObj:
ld hl, wBattleAnimTileDict ld hl, wBattleAnimTileDict
.loop .loop
ld a, [hl] ld a, [hl]
@ -832,7 +822,6 @@ BattleAnimCmd_EnemyFeetObj:
ret ret
BattleAnimCmd_PlayerHeadObj: BattleAnimCmd_PlayerHeadObj:
ld hl, wBattleAnimTileDict ld hl, wBattleAnimTileDict
.loop .loop
ld a, [hl] ld a, [hl]
@ -931,7 +920,6 @@ BattleAnimCmd_Transform:
ret ret
BattleAnimCmd_UpdateActorPic: BattleAnimCmd_UpdateActorPic:
ld de, vTiles0 tile $00 ld de, vTiles0 tile $00
ld a, [hBattleTurn] ld a, [hBattleTurn]
and a and a
@ -951,7 +939,6 @@ BattleAnimCmd_UpdateActorPic:
ret ret
BattleAnimCmd_RaiseSub: BattleAnimCmd_RaiseSub:
ld a, [rSVBK] ld a, [rSVBK]
push af push af
ld a, 1 ; unnecessary bankswitch? ld a, 1 ; unnecessary bankswitch?

1
engine/events/shuckle.asm
View File

@ -1,7 +1,6 @@
MANIA_OT_ID EQU 00518 MANIA_OT_ID EQU 00518
GiveShuckle: GiveShuckle:
; Adding to the party. ; Adding to the party.
xor a xor a
ld [wMonType], a ld [wMonType], a

1
engine/events/treemons.asm
View File

@ -27,7 +27,6 @@ TreeMonEncounter:
ret ret
RockMonEncounter: RockMonEncounter:
xor a xor a
ld [wTempWildMonSpecies], a ld [wTempWildMonSpecies], a
ld [wCurPartyLevel], a ld [wCurPartyLevel], a

1
engine/games/unown_puzzle.asm
View File

@ -731,7 +731,6 @@ ConvertLoadedPuzzlePieces:
ret ret
.EnlargedTiles: .EnlargedTiles:
x = 0 x = 0
rept 16 rept 16
db ((x & %1000) * %11000) + ((x & %0100) * %1100) + ((x & %0010) * %110) + ((x & %0001) * %11) db ((x & %1000) * %11000) + ((x & %0100) * %1100) + ((x & %0010) * %110) + ((x & %0001) * %11)

4
engine/items/item_effects.asm
View File

@ -484,8 +484,8 @@ PokeBallEffect:
ld de, wEnemyMonPP ld de, wEnemyMonPP
ld bc, NUM_MOVES ld bc, NUM_MOVES
call CopyBytes call CopyBytes
.Transformed:
.Transformed:
ld a, [wEnemyMonSpecies] ld a, [wEnemyMonSpecies]
ld [wWildMon], a ld [wWildMon], a
ld [wCurPartySpecies], a ld [wCurPartySpecies], a
@ -560,8 +560,8 @@ PokeBallEffect:
ld a, FRIEND_BALL_HAPPINESS ld a, FRIEND_BALL_HAPPINESS
ld [hl], a ld [hl], a
.SkipPartyMonFriendBall:
.SkipPartyMonFriendBall:
ld hl, Text_AskNicknameNewlyCaughtMon ld hl, Text_AskNicknameNewlyCaughtMon
call PrintText call PrintText

1
engine/math/math.asm
View File

@ -1,5 +1,4 @@
_Multiply:: _Multiply::
; hMultiplier is one byte. ; hMultiplier is one byte.
ld a, 8 ld a, 8
ld b, a ld b, a

7
engine/menus/intro_menu.asm
View File

@ -94,7 +94,6 @@ ResetWRAM:
ret ret
_ResetWRAM: _ResetWRAM:
ld hl, wVirtualOAM ld hl, wVirtualOAM
ld bc, wOptions - wVirtualOAM ld bc, wOptions - wVirtualOAM
xor a xor a
@ -801,7 +800,6 @@ StorePlayerName:
ret ret
ShrinkPlayer: ShrinkPlayer:
ld a, [hROMBank] ld a, [hROMBank]
push af push af
@ -911,7 +909,6 @@ ShrinkFrame:
ret ret
Intro_PlacePlayerSprite: Intro_PlacePlayerSprite:
farcall GetPlayerIcon farcall GetPlayerIcon
ld c, $c ld c, $c
ld hl, vTiles0 ld hl, vTiles0
@ -1067,7 +1064,6 @@ TitleScreenScene:
ret ret
TitleScreenEntrance: TitleScreenEntrance:
; Animate the logo: ; Animate the logo:
; Move each line by 4 pixels until our count hits 0. ; Move each line by 4 pixels until our count hits 0.
ld a, [hSCX] ld a, [hSCX]
@ -1115,7 +1111,6 @@ TitleScreenEntrance:
ret ret
TitleScreenTimer: TitleScreenTimer:
; Next scene ; Next scene
ld hl, wJumptableIndex ld hl, wJumptableIndex
inc [hl] inc [hl]
@ -1129,7 +1124,6 @@ TitleScreenTimer:
ret ret
TitleScreenMain: TitleScreenMain:
; Run the timer down. ; Run the timer down.
ld hl, wTitleScreenTimer ld hl, wTitleScreenTimer
ld e, [hl] ld e, [hl]
@ -1230,7 +1224,6 @@ TitleScreenMain:
ret ret
TitleScreenEnd: TitleScreenEnd:
; Wait until the music is done fading. ; Wait until the music is done fading.
ld hl, wTitleScreenTimer ld hl, wTitleScreenTimer

13
engine/menus/start_menu.asm
View File

@ -11,7 +11,6 @@
const STARTMENUITEM_QUIT ; 8 const STARTMENUITEM_QUIT ; 8
StartMenu:: StartMenu::
call ClearWindowData call ClearWindowData
ld de, SFX_MENU ld de, SFX_MENU
@ -24,8 +23,8 @@ StartMenu::
ld hl, .MenuHeader ld hl, .MenuHeader
jr z, .GotMenuData jr z, .GotMenuData
ld hl, .ContestMenuHeader ld hl, .ContestMenuHeader
.GotMenuData:
.GotMenuData:
call LoadMenuHeader call LoadMenuHeader
call .SetUpMenuItems call .SetUpMenuItems
ld a, [wBattleMenuCursorBuffer] ld a, [wBattleMenuCursorBuffer]
@ -459,7 +458,6 @@ StartMenu_Status:
ret ret
StartMenu_Pokedex: StartMenu_Pokedex:
ld a, [wPartyCount] ld a, [wPartyCount]
and a and a
jr z, .asm_12949 jr z, .asm_12949
@ -473,7 +471,6 @@ StartMenu_Pokedex:
ret ret
StartMenu_Pokegear: StartMenu_Pokegear:
call FadeToMenu call FadeToMenu
farcall PokeGear farcall PokeGear
call CloseSubmenu call CloseSubmenu
@ -481,7 +478,6 @@ StartMenu_Pokegear:
ret ret
StartMenu_Pack: StartMenu_Pack:
call FadeToMenu call FadeToMenu
farcall Pack farcall Pack
ld a, [wPackUsedItem] ld a, [wPackUsedItem]
@ -497,7 +493,6 @@ StartMenu_Pack:
ret ret
StartMenu_Pokemon: StartMenu_Pokemon:
ld a, [wPartyCount] ld a, [wPartyCount]
and a and a
jr z, .return jr z, .return
@ -700,7 +695,6 @@ PokemonActionSubmenu:
dbw MONMENUITEM_MAIL, MonMailAction dbw MONMENUITEM_MAIL, MonMailAction
SwitchPartyMons: SwitchPartyMons:
; Don't try if there's nothing to switch! ; Don't try if there's nothing to switch!
ld a, [wPartyCount] ld a, [wPartyCount]
cp 2 cp 2
@ -751,7 +745,6 @@ SwitchPartyMons:
ret ret
GiveTakePartyMonItem: GiveTakePartyMonItem:
; Eggs can't hold items! ; Eggs can't hold items!
ld a, [wCurPartySpecies] ld a, [wCurPartySpecies]
cp EGG cp EGG
@ -791,7 +784,6 @@ GiveTakePartyMonItem:
ret ret
.GiveItem: .GiveItem:
farcall DepositSellInitPackBuffers farcall DepositSellInitPackBuffers
.loop .loop
@ -822,7 +814,6 @@ GiveTakePartyMonItem:
ret ret
TryGiveItemToPartymon: TryGiveItemToPartymon:
call SpeechTextBox call SpeechTextBox
call PartyMonItemName call PartyMonItemName
call GetPartyItemLocation call GetPartyItemLocation
@ -885,7 +876,6 @@ TryGiveItemToPartymon:
ret ret
GivePartyItem: GivePartyItem:
call GetPartyItemLocation call GetPartyItemLocation
ld a, [wCurItem] ld a, [wCurItem]
ld [hl], a ld [hl], a
@ -898,7 +888,6 @@ GivePartyItem:
ret ret
TakePartyItem: TakePartyItem:
call SpeechTextBox call SpeechTextBox
call GetPartyItemLocation call GetPartyItemLocation
ld a, [hl] ld a, [hl]

3
engine/movie/gbc_only.asm
View File

@ -1,5 +1,4 @@
GBCOnlyScreen: GBCOnlyScreen:
ld a, [hCGB] ld a, [hCGB]
and a and a
ret nz ret nz
@ -39,7 +38,6 @@ GBCOnlyScreen:
jr .loop jr .loop
DrawGBCOnlyScreen: DrawGBCOnlyScreen:
call DrawGBCOnlyBorder call DrawGBCOnlyBorder
; Pokemon ; Pokemon
@ -63,7 +61,6 @@ DrawGBCOnlyScreen:
ret ret
DrawGBCOnlyBorder: DrawGBCOnlyBorder:
hlcoord 0, 0 hlcoord 0, 0
ld [hl], 0 ; top-left ld [hl], 0 ; top-left

1
engine/movie/title.asm
View File

@ -1,5 +1,4 @@
_TitleScreen: _TitleScreen:
call ClearBGPalettes call ClearBGPalettes
call ClearSprites call ClearSprites
call ClearTileMap call ClearTileMap

1
engine/movie/unused_title.asm
View File

@ -1,5 +1,4 @@
UnusedTitleScreen: UnusedTitleScreen:
call ClearBGPalettes call ClearBGPalettes
call ClearTileMap call ClearTileMap
call DisableLCD call DisableLCD

1
engine/overworld/events.asm
View File

@ -485,7 +485,6 @@ CheckTimeEvents:
ret ret
OWPlayerInput: OWPlayerInput:
call PlayerMovement call PlayerMovement
ret c ret c
and a and a

2
engine/overworld/npc_movement.asm
View File

@ -1,5 +1,4 @@
CanObjectMoveInDirection: CanObjectMoveInDirection:
ld hl, OBJECT_PALETTE ld hl, OBJECT_PALETTE
add hl, bc add hl, bc
bit SWIMMING_F, [hl] bit SWIMMING_F, [hl]
@ -216,7 +215,6 @@ Function6fa1:
ret ret
CheckFacingObject:: CheckFacingObject::
call GetFacingTileCoord call GetFacingTileCoord
; Double the distance for counter tiles. ; Double the distance for counter tiles.

5
engine/overworld/player_movement.asm
View File

@ -256,7 +256,6 @@ DoPlayerMovement::
ret ret
.TryStep: .TryStep:
; Surfing actually calls .TrySurf directly instead of passing through here. ; Surfing actually calls .TrySurf directly instead of passing through here.
ld a, [wPlayerState] ld a, [wPlayerState]
cp PLAYER_SURF cp PLAYER_SURF
@ -321,7 +320,6 @@ DoPlayerMovement::
ret ret
.TrySurf: .TrySurf:
call .CheckSurfPerms call .CheckSurfPerms
ld [wd040], a ld [wd040], a
jr c, .surf_bump jr c, .surf_bump
@ -395,7 +393,6 @@ DoPlayerMovement::
db FACE_UP | FACE_LEFT ; COLL_HOP_UP_LEFT db FACE_UP | FACE_LEFT ; COLL_HOP_UP_LEFT
.CheckWarp: .CheckWarp:
; Bug: Since no case is made for STANDING here, it will check ; Bug: Since no case is made for STANDING here, it will check
; [.edgewarps + $ff]. This resolves to $3e at $8035a. ; [.edgewarps + $ff]. This resolves to $3e at $8035a.
; This causes wd041 to be nonzero when standing on tile $3e, ; This causes wd041 to be nonzero when standing on tile $3e,
@ -657,7 +654,6 @@ DoPlayerMovement::
ret ret
.CheckStrengthBoulder: .CheckStrengthBoulder:
ld hl, wBikeFlags ld hl, wBikeFlags
bit BIKEFLAGS_STRENGTH_ACTIVE_F, [hl] bit BIKEFLAGS_STRENGTH_ACTIVE_F, [hl]
jr z, .not_boulder jr z, .not_boulder
@ -779,7 +775,6 @@ DoPlayerMovement::
ret ret
.BumpSound: .BumpSound:
call CheckSFX call CheckSFX
ret c ret c
ld de, SFX_BUMP ld de, SFX_BUMP

3
engine/overworld/select_menu.asm
View File

@ -1,5 +1,4 @@
SelectMenu:: SelectMenu::
call CheckRegisteredItem call CheckRegisteredItem
jr c, .NotRegistered jr c, .NotRegistered
jp UseRegisteredItem jp UseRegisteredItem
@ -17,7 +16,6 @@ ItemMayBeRegisteredText:
db "@" db "@"
CheckRegisteredItem: CheckRegisteredItem:
ld a, [wWhichRegisteredItem] ld a, [wWhichRegisteredItem]
and a and a
jr z, .NoRegisteredItem jr z, .NoRegisteredItem
@ -110,7 +108,6 @@ CheckRegisteredItem:
ret ret
UseRegisteredItem: UseRegisteredItem:
farcall CheckItemMenu farcall CheckItemMenu
ld a, [wItemAttributeParamBuffer] ld a, [wItemAttributeParamBuffer]
ld hl, .SwitchTo ld hl, .SwitchTo

1
engine/pokedex/pokedex.asm
View File

@ -19,7 +19,6 @@ POKEDEX_SCX EQU 5
GLOBAL POKEDEX_SCX GLOBAL POKEDEX_SCX
Pokedex: Pokedex:
ld a, [hWX] ld a, [hWX]
ld l, a ld l, a
ld a, [hWY] ld a, [hWY]

1
engine/pokemon/mon_stats.asm
View File

@ -170,7 +170,6 @@ GetGender:
call AddNTimes call AddNTimes
.DVs: .DVs:
; sBoxMon data is read directly from SRAM. ; sBoxMon data is read directly from SRAM.
ld a, [wMonType] ld a, [wMonType]
cp BOXMON cp BOXMON

1
home.asm
View File

@ -2,6 +2,7 @@ INCLUDE "constants.asm"
SECTION "NULL", ROM0 SECTION "NULL", ROM0
NULL:: NULL::
INCLUDE "home/rst.asm" INCLUDE "home/rst.asm"

2
home/audio.asm
View File

@ -1,7 +1,6 @@
; Audio interfaces. ; Audio interfaces.
MapSetup_Sound_Off:: MapSetup_Sound_Off::
push hl push hl
push de push de
push bc push bc
@ -26,7 +25,6 @@ MapSetup_Sound_Off::
ret ret
UpdateSound:: UpdateSound::
push hl push hl
push de push de
push bc push bc

10
home/battle.asm
View File

@ -142,10 +142,6 @@ FarCopyRadioText::
ret ret
MobileTextBorder:: MobileTextBorder::
CELL_PHONE_TOP EQU $5e
CELL_PHONE_BOTTOM EQU $5f
; For mobile link battles only. ; For mobile link battles only.
ld a, [wLinkMode] ld a, [wLinkMode]
cp LINK_MOBILE cp LINK_MOBILE
@ -154,9 +150,9 @@ CELL_PHONE_BOTTOM EQU $5f
; Draw a cell phone icon at the ; Draw a cell phone icon at the
; top right corner of the border. ; top right corner of the border.
hlcoord 19, 12 hlcoord 19, 12
ld [hl], CELL_PHONE_TOP ld [hl], $5e ; top
hlcoord 19, 13 hlcoord 19, 13
ld [hl], CELL_PHONE_BOTTOM ld [hl], $5f ; bottom
ret ret
BattleTextBox:: BattleTextBox::
@ -186,7 +182,6 @@ StdBattleTextBox::
ret ret
GetBattleAnimPointer:: GetBattleAnimPointer::
ld a, BANK(BattleAnimations) ld a, BANK(BattleAnimations)
rst Bankswitch rst Bankswitch
@ -201,7 +196,6 @@ GetBattleAnimPointer::
ret ret
GetBattleAnimByte:: GetBattleAnimByte::
push hl push hl
push de push de

1
home/game_time.asm
View File

@ -9,7 +9,6 @@ ResetGameTime::
ret ret
GameTimer:: GameTimer::
nop nop
ld a, [rSVBK] ld a, [rSVBK]

1
home/init.asm
View File

@ -33,7 +33,6 @@ _Start::
ld [hSystemBooted], a ld [hSystemBooted], a
Init:: Init::
di di
xor a xor a

3
home/map.asm
View File

@ -757,7 +757,6 @@ ChangeMap::
ret ret
FillMapConnections:: FillMapConnections::
; North ; North
ld a, [wNorthConnectedMapGroup] ld a, [wNorthConnectedMapGroup]
cp $ff cp $ff
@ -855,7 +854,6 @@ FillMapConnections::
FillNorthConnectionStrip:: FillNorthConnectionStrip::
FillSouthConnectionStrip:: FillSouthConnectionStrip::
ld c, 3 ld c, 3
.y .y
push de push de
@ -890,7 +888,6 @@ FillSouthConnectionStrip::
FillWestConnectionStrip:: FillWestConnectionStrip::
FillEastConnectionStrip:: FillEastConnectionStrip::
.loop .loop
ld a, [wMapWidth] ld a, [wMapWidth]
add 6 add 6

1
home/palettes.asm
View File

@ -18,7 +18,6 @@ UpdateCGBPals::
ret z ret z
ForceUpdateCGBPals:: ForceUpdateCGBPals::
ld a, [rSVBK] ld a, [rSVBK]
push af push af
ld a, BANK(wBGPals2) ld a, BANK(wBGPals2)

1
home/text.asm
View File

@ -52,7 +52,6 @@ TextBox::
jr TextBoxPalette jr TextBoxPalette
TextBoxBorder:: TextBoxBorder::
; Top ; Top
push hl push hl
ld a, "┌" ld a, "┌"

2
home/trainers.asm
View File

@ -20,7 +20,6 @@ CheckTrainerBattle::
.loop .loop
; Start a battle if the object: ; Start a battle if the object:
push af push af
push de push de
@ -128,7 +127,6 @@ LoadTrainer_continue::
ret ret
FacingPlayerDistance_bc:: FacingPlayerDistance_bc::
push de push de
call FacingPlayerDistance call FacingPlayerDistance
ld b, d ld b, d

1
home/video.asm
View File

@ -356,7 +356,6 @@ Serve2bppRequest::
jr _Serve2bppRequest jr _Serve2bppRequest
Serve2bppRequest_VBlank:: Serve2bppRequest_VBlank::
ld a, [wRequested2bpp] ld a, [wRequested2bpp]
and a and a
ret z ret z