Local labels starting with capital letters are now decorated with a trailing colon; remove trailing whitespace; globally correct line endings to UNIX style

This commit is contained in:
pikalaxalt
2016-04-10 14:42:14 -04:00
parent 46ead9b849
commit bf73772a56
537 changed files with 4562 additions and 4562 deletions

View File

@@ -2,7 +2,7 @@ _AnimateHPBar: ; d627
call .IsMaximumMoreThan48Pixels
jr c, .MoreThan48Pixels
call .ComputePixels
.ShortAnimLoop
.ShortAnimLoop:
push bc
push hl
call ShortAnim_UpdateVariables
@@ -19,9 +19,9 @@ _AnimateHPBar: ; d627
jr nc, .ShortAnimLoop
ret
.MoreThan48Pixels
.MoreThan48Pixels:
call .ComputePixels
.LongAnimLoop
.LongAnimLoop:
push bc
push hl
call LongAnim_UpdateVariables

View File

@@ -42,7 +42,7 @@ _DepositPKMN: ; e2391 (38:6391)
jp [hl]
.Jumptable: ; e23df (38:63df)
dw .Init
dw .HandleJoypad
dw .WhatsUp
@@ -151,7 +151,7 @@ endr
jp [hl]
BillsPCDepositJumptable: ; e24a1 (38:64a1)
dw BillsPCDepositFuncDeposit ; Deposit Pokemon
dw BillsPCDepositFuncStats ; Pokemon Stats
dw BillsPCDepositFuncRelease ; Release Pokemon
@@ -310,7 +310,7 @@ _WithdrawPKMN: ; e2583 (38:6583)
jp [hl]
.Jumptable: ; e25d2 (38:65d2)
dw .Init
dw .Joypad
dw .PrepSubmenu
@@ -437,7 +437,7 @@ endr
ld [wBillsPC_CursorPosition], a
ld [wBillsPC_ScrollPosition], a
ret
.FailedWithdraw
.FailedWithdraw:
ld de, PCString_WhatsUp
call BillsPC_PlaceString
ret
@@ -483,7 +483,7 @@ endr
ld [wBillsPC_ScrollPosition], a
pop af
ret
.FailedRelease
.FailedRelease:
ld de, PCString_WhatsUp
call BillsPC_PlaceString
pop af
@@ -562,7 +562,7 @@ _MovePKMNWithoutMail: ; e2759
; e27ac
.Jumptable: ; e27ac
dw .Init
dw .Joypad
dw .PrepSubmenu
@@ -1664,21 +1664,21 @@ BillsPC_CheckMail_PreventBlackout: ; e2f18 (38:6f18)
ld a, [wBillsPC_MonHasMail]
and a
jr nz, .HasMail
.Okay
.Okay:
and a
ret
.HasMail
.HasMail:
ld de, PCString_RemoveMail
jr .NotOkay
.AllOthersFainted
.AllOthersFainted:
ld de, PCString_NoMoreUsablePKMN
jr .NotOkay
.ItsYourLastPokemon
.ItsYourLastPokemon:
ld de, PCString_ItsYourLastPKMN
.NotOkay
.NotOkay:
call BillsPC_PlaceString
ld de, SFX_WRONG
call WaitPlaySFX
@@ -1918,7 +1918,7 @@ TryWithdrawPokemon: ; e30fa (38:70fa)
and a
ret
.PartyFull
.PartyFull:
ld de, PCString_PartyFull
call BillsPC_PlaceString
ld de, SFX_WRONG
@@ -2033,7 +2033,7 @@ endr
; e3245
.Jumptable: ; e3245
dw .BoxToBox
dw .PartyToBox
dw .BoxToParty
@@ -2519,7 +2519,7 @@ BillsPC_ChangeBoxSubmenu: ; e36f9 (38:76f9)
and a
ret
.Print
.Print:
call GetBoxCount
and a
jr z, .EmptyBox
@@ -2533,12 +2533,12 @@ BillsPC_ChangeBoxSubmenu: ; e36f9 (38:76f9)
and a
ret
.EmptyBox
.EmptyBox:
call BillsPC_PlaceEmptyBoxString_SFX
and a
ret
.Switch
.Switch:
ld a, [MenuSelection]
dec a
ld e, a
@@ -2548,7 +2548,7 @@ BillsPC_ChangeBoxSubmenu: ; e36f9 (38:76f9)
callba ChangeBoxSaveGame
ret
.Name
.Name:
ld b, $4 ; box
ld de, wd002
callba NamingScreen

View File

@@ -166,11 +166,11 @@ CheckBreedmonCompatibility: ; 16e1d
cp c
jr z, .Compatible
.Incompatible
.Incompatible:
and a
ret
.Compatible
.Compatible:
scf
ret
; 16f3e

View File

@@ -50,7 +50,7 @@ _CardFlip: ; e00ee (38:40ee)
ld [wCardFlipCursorX], a
ld de, MUSIC_GAME_CORNER
call PlayMusic
.MasterLoop
.MasterLoop:
ld a, [wJumptableIndex]
bit 7, a
jr nz, .leavethegame
@@ -81,7 +81,7 @@ endr
; e01a0 (38:41a0)
.Jumptable: ; e01a0
dw .AskPlayWithThree
dw .DeductCoins
dw .ChooseACard
@@ -107,7 +107,7 @@ endr
call .Increment
ret
.SaidNo
.SaidNo:
ld a, 7
ld [wJumptableIndex], a
ret
@@ -311,7 +311,7 @@ endr
call .Increment
ret
.Continue
.Continue:
ld a, [wCardFlipNumCardsPlayed]
inc a
ld [wCardFlipNumCardsPlayed], a
@@ -325,10 +325,10 @@ endr
call PrintText
jr .LoopAround
.KeepTheCurrentDeck
.KeepTheCurrentDeck:
call CardFlip_BlankDiscardedCardSlot
.LoopAround
.LoopAround:
ld a, 1
ld [wJumptableIndex], a
ret
@@ -401,7 +401,7 @@ GetCoordsOfChosenCard: ; e03ac
bcpixel 2, 3
jr .done
.BottomCard
.BottomCard:
hlcoord 2, 6
bcpixel 8, 3
@@ -659,7 +659,7 @@ CardFlip_BlankDiscardedCardSlot: ; e0534
; e0553
.Jumptable: ; e0553
dw .Level1
dw .Level2
dw .Level3
@@ -848,7 +848,7 @@ CardFlip_CheckWinCondition: ; e0637
; e0643
.Jumptable: ; e0643
dw .Impossible
dw .Impossible
dw .PikaJiggly

View File

@@ -36,11 +36,11 @@ CheckShininess:
cp SHINY_SPC_VAL
jr nz, .NotShiny
.Shiny
.Shiny:
scf
ret
.NotShiny
.NotShiny:
and a
ret
@@ -70,11 +70,11 @@ CheckContestMon:
cp 10
jr c, .Bad
.Good
.Good:
scf
ret
.Bad
.Bad:
and a
ret
@@ -155,13 +155,13 @@ Function8b07:
ld [hCGBPalUpdate], a
ret
.BGPal
.BGPal:
RGB 31, 31, 31
RGB 18, 23, 31
RGB 15, 20, 31
RGB 00, 00, 00
.OBPal
.OBPal:
RGB 31, 31, 31
RGB 31, 31, 12
RGB 08, 16, 28
@@ -337,11 +337,11 @@ ApplyHPBarPals:
jr z, .PartyMenu
ret
.Enemy
.Enemy:
ld de, BGPals + 2 palettes + 2
jr .okay
.Player
.Player:
ld de, BGPals + 3 palettes + 2
.okay
@@ -358,7 +358,7 @@ ApplyHPBarPals:
ld [hCGBPalUpdate], a
ret
.PartyMenu
.PartyMenu:
ld e, c
inc e
hlcoord 11, 1, AttrMap
@@ -665,7 +665,7 @@ ApplyAttrMap:
ld [hBGMapMode], a
ret
.UpdateVBank1
.UpdateVBank1:
hlcoord 0, 0, AttrMap
debgcoord 0, 0
ld b, SCREEN_HEIGHT
@@ -998,7 +998,7 @@ Function9890::
ld [rSVBK], a
ret
.LoadWhitePals
.LoadWhitePals:
ld c, 4 * 16
.loop
ld a, $7fff % $100
@@ -1960,7 +1960,7 @@ endr
call FarCopyWRAM
ret
.TilesetColorsPointers
.TilesetColorsPointers:
dw .OutdoorColors ; unused
dw .OutdoorColors ; TOWN
dw .OutdoorColors ; ROUTE
@@ -1971,25 +1971,25 @@ endr
dw .DungeonColors ; DUNGEON
; Valid indices: $00 - $29
.OutdoorColors
.OutdoorColors:
db $00, $01, $02, $28, $04, $05, $06, $07 ; morn
db $08, $09, $0a, $28, $0c, $0d, $0e, $0f ; day
db $10, $11, $12, $29, $14, $15, $16, $17 ; nite
db $18, $19, $1a, $1b, $1c, $1d, $1e, $1f ; dark
.IndoorColors
.IndoorColors:
db $20, $21, $22, $23, $24, $25, $26, $07 ; morn
db $20, $21, $22, $23, $24, $25, $26, $07 ; day
db $10, $11, $12, $13, $14, $15, $16, $07 ; nite
db $18, $19, $1a, $1b, $1c, $1d, $1e, $07 ; dark
.DungeonColors
.DungeonColors:
db $00, $01, $02, $03, $04, $05, $06, $07 ; morn
db $08, $09, $0a, $0b, $0c, $0d, $0e, $0f ; day
db $10, $11, $12, $13, $14, $15, $16, $17 ; nite
db $18, $19, $1a, $1b, $1c, $1d, $1e, $1f ; dark
.Perm5Colors
.Perm5Colors:
db $00, $01, $02, $03, $04, $05, $06, $07 ; morn
db $08, $09, $0a, $0b, $0c, $0d, $0e, $0f ; day
db $10, $11, $12, $13, $14, $15, $16, $17 ; nite

View File

@@ -269,7 +269,7 @@ endr
.Jumptable: ; 109937 (42:5937)
dw ParseCredits
dw Credits_Next
dw Credits_Next
@@ -350,17 +350,17 @@ ParseCredits: ; 1099aa
ld hl, wJumptableIndex
bit 7, [hl]
jp nz, .done
; Wait until the timer has run out to parse the next command.
ld hl, CreditsTimer
ld a, [hl]
and a
jr z, .parse
; One tick has passed.
dec [hl]
jp .done
.parse
; First, let's clear the current text display,
; starting from line 5.
@@ -370,12 +370,12 @@ ParseCredits: ; 1099aa
ld bc, 20 * 12
ld a, " "
call ByteFill
; Then read the script.
.loop
call .get
; Commands:
cp CREDITS_END
jp z, .end
@@ -391,9 +391,9 @@ ParseCredits: ; 1099aa
jr z, .wait2
cp CREDITS_THEEND
jr z, .theend
; If it's not a command, it's a string identifier.
push af
ld e, a
ld d, 0
@@ -405,27 +405,27 @@ endr
ld d, [hl]
ld e, a
pop af
; Strings spanning multiple lines have special cases.
cp COPYRIGHT
jr z, .copyright
cp STAFF
jr c, .staff
; The rest start from line 6.
hlcoord 0, 6
jr .print
.copyright
hlcoord 2, 6
jr .print
.staff
hlcoord 0, 6
.print
; Print strings spaced every two lines.
call .get
@@ -433,12 +433,12 @@ endr
call AddNTimes
call PlaceString
jr .loop
.theend
; Display "The End" graphic.
call Credits_TheEnd
jr .loop
.scene
; Update the scene number and corresponding palette.
call .get
@@ -448,13 +448,13 @@ endr
call GetCreditsPalette
call SetPalettes ; update hw pal registers
jr .loop
.clear
; Clear the banner.
ld a, $ff
ld [wCreditsBorderFrame], a ; frame
jr .loop
.music
; Play the credits music.
ld de, MUSIC_CREDITS
@@ -465,26 +465,26 @@ endr
pop de
call PlayMusic
jp .loop
.wait2
; Wait for some amount of ticks.
call .get
ld [CreditsTimer], a
jr .done
.wait
; Wait for some amount of ticks, and do something else.
call .get
ld [CreditsTimer], a
xor a
ld [hBGMapThird], a
ld a, 1
ld [hBGMapMode], a
.done
jp Credits_Next
.end
; Stop execution.
ld hl, wJumptableIndex
@@ -507,7 +507,7 @@ endr
ld d, a
ld hl, CreditsScript
add hl, de
inc de
ld a, e
ld [CreditsPos], a
@@ -614,14 +614,14 @@ endr
GetCreditsPalette: ; 109b2c
call .GetPalAddress
push hl
ld a, 0
call .UpdatePals
pop hl
ret
.GetPalAddress
.GetPalAddress:
; Each set of palette data is 24 bytes long.
ld a, [wCreditsBorderMon] ; scene
and 3
@@ -635,10 +635,10 @@ GetCreditsPalette: ; 109b2c
add hl, de ; * 3
add hl, de
ret
.UpdatePals
.UpdatePals:
; Update the first three colors in both palette buffers.
push af
push hl
add UnknBGPals % $100
@@ -648,7 +648,7 @@ GetCreditsPalette: ; 109b2c
ld d, a
ld bc, 24
call CopyBytes
pop hl
pop af
add BGPals % $100

View File

@@ -154,7 +154,7 @@ PlaceGameFreakPresents_1: ; e468d
inc [hl]
ret
.PlaceGameFreak
.PlaceGameFreak:
ld [hl], 0
ld hl, .GAME_FREAK
decoord 5, 10
@@ -166,7 +166,7 @@ PlaceGameFreakPresents_1: ; e468d
ret
; e46af
.GAME_FREAK
.GAME_FREAK:
; G A M E _ F R E A K
db 0, 1, 2, 3, 13, 4, 5, 3, 1, 6
.end
@@ -396,7 +396,7 @@ CrystalIntro: ; e48ac
call DelayFrame
jp .loop
.ShutOffMusic
.ShutOffMusic:
ld de, MUSIC_NONE
call PlayMusic
@@ -547,7 +547,7 @@ IntroScene2: ; e49d6 (39:49d6)
ld de, SFX_INTRO_UNOWN_1
call PlaySFX
pop af
.DontPlaySound
.DontPlaySound:
ld [wcf65], a
xor a
call CrystalIntro_UnownFade
@@ -686,27 +686,27 @@ IntroScene6: ; e4af7 (39:4af7)
jr z, .FirstUnown
jr .NoUnown
.FirstUnown
.FirstUnown:
push af
depixel 7, 15
call CrystalIntro_InitUnownAnim
ld de, SFX_INTRO_UNOWN_2
call PlaySFX
pop af
.NoUnown
.NoUnown:
ld [wcf65], a
xor a
call CrystalIntro_UnownFade
ret
.SecondUnown
.SecondUnown:
push af
depixel 14, 6
call CrystalIntro_InitUnownAnim
ld de, SFX_INTRO_UNOWN_1
call PlaySFX
pop af
.StopUnown
.StopUnown:
ld [wcf65], a
ld a, $1
call CrystalIntro_UnownFade
@@ -1347,7 +1347,7 @@ IntroScene20: ; e5019 (39:5019)
ld [hSCY], a
ret
.AppearUnown
.AppearUnown:
sub $18
ld c, a
and $3
@@ -1952,7 +1952,7 @@ Intro_Scene16_AnimateSuicune: ; e5441 (39:5441)
jr z, .PrepareForSuicuneSwap
ret
.PrepareForSuicuneSwap
.PrepareForSuicuneSwap:
xor a
ld [hBGMapMode], a
ret

View File

@@ -6,7 +6,7 @@ _DummyGame: ; e1e5b (38:5e5b)
jr nc, .loop
ret
.LoadGFXAndPals
.LoadGFXAndPals:
call DisableLCD
ld b, SCGB_08
call GetSGBLayout
@@ -42,7 +42,7 @@ _DummyGame: ; e1e5b (38:5e5b)
call DmgToCgbObjPal0
ret
.JumptableLoop
.JumptableLoop:
ld a, [wJumptableIndex]
bit 7, a
jr nz, .quit
@@ -56,10 +56,10 @@ _DummyGame: ; e1e5b (38:5e5b)
scf
ret
.ExecuteJumptable
.ExecuteJumptable:
jumptable .Jumptable, wJumptableIndex
.Jumptable
.Jumptable:
dw .RestartGame
dw .ResetBoard
dw .InitBoardTilemapAndCursorObject
@@ -70,13 +70,13 @@ _DummyGame: ; e1e5b (38:5e5b)
dw .RevealAll
dw .AskPlayAgain
.RestartGame
.RestartGame:
call DummyGame_InitStrings
ld hl, wJumptableIndex
inc [hl]
ret
.ResetBoard
.ResetBoard:
call ret_e00ed
jr nc, .proceed
ld hl, wJumptableIndex
@@ -95,7 +95,7 @@ rept 4
endr
ld [hl], a
ld [wDummyGameNumCardsMatched], a
.InitBoardTilemapAndCursorObject
.InitBoardTilemapAndCursorObject:
ld hl, wDummyGameCounter
ld a, [hl]
cp 45
@@ -117,7 +117,7 @@ endr
inc [hl]
ret
.CheckTriesRemaining
.CheckTriesRemaining:
ld a, [wDummyGameNumberTriesRemaining]
hlcoord 17, 0
add "0"
@@ -136,7 +136,7 @@ endr
ld [wcf64], a
ld hl, wJumptableIndex
inc [hl]
.PickCard1
.PickCard1:
ld a, [wcf64]
and a
ret z
@@ -160,7 +160,7 @@ endr
inc [hl]
ret
.PickCard2
.PickCard2:
ld a, [wcf64]
and a
ret z
@@ -185,7 +185,7 @@ endr
ld [wDummyGameCounter], a
ld hl, wJumptableIndex
inc [hl]
.DelayPickAgain
.DelayPickAgain:
ld hl, wDummyGameCounter
ld a, [hl]
and a
@@ -193,19 +193,19 @@ endr
dec [hl]
ret
.PickAgain
.PickAgain:
call DummyGame_CheckMatch
ld a, $3
ld [wJumptableIndex], a
ret
.RevealAll
.RevealAll:
ld a, [hJoypadPressed]
and A_BUTTON
ret z
xor a
ld [wDummyGameCounter], a
.RevelationLoop
.RevelationLoop:
ld hl, wDummyGameCounter
ld a, [hl]
cp 45
@@ -231,7 +231,7 @@ endr
call WaitPressAorB_BlinkCursor
ld hl, wJumptableIndex
inc [hl]
.AskPlayAgain
.AskPlayAgain:
call ret_e00ed
jr nc, .restart
ld hl, wJumptableIndex
@@ -310,7 +310,7 @@ DummyGame_CheckMatch: ; e2010
call PrintText
ret
.VictoryText
.VictoryText:
start_asm
push bc
hlcoord 2, 13

View File

@@ -456,7 +456,7 @@ DoMapTrigger: ; 968ec
rept 4
add hl, de
endr
call GetMapScriptHeaderBank
call GetFarHalfword
call GetMapScriptHeaderBank
@@ -541,11 +541,11 @@ OWPlayerInput: ; 96974
call CheckMenuOW
jr c, .Action
.NoAction
.NoAction:
xor a
ret
.Action
.Action:
push af
callba Function80422
pop af
@@ -581,7 +581,7 @@ TryObjectEvent: ; 969b5
xor a
ret
.IsObject
.IsObject:
call PlayTalkObject
ld a, [hObjectStructIndexBuffer]
call GetObjectStruct
@@ -687,7 +687,7 @@ TryReadSign: ; 96a38
xor a
ret
.IsSign
.IsSign:
ld a, [EngineBuffer3]
ld hl, .signs
rst JumpTable
@@ -887,11 +887,11 @@ CheckMenuOW: ; 96b30
scf
ret
.NoMenu
.NoMenu:
xor a
ret
.Select
.Select:
call PlayTalkObject
ld a, BANK(SelectMenuScript)
ld hl, SelectMenuScript
@@ -918,11 +918,11 @@ SelectMenuCallback: ; 96b66
end
; 96b72
.Script ; 96b72
.Script: ; 96b72
ptjump wQueuedScriptBank
; 96b75
.Asm ; 96b75
.Asm: ; 96b75
ptcallasm wQueuedScriptBank
end
; 96b79

View File

@@ -191,13 +191,13 @@ ChooseWildEncounter_BugContest:: ; 97d31
ld hl, ContestMons
ld de, 4
.CheckMon
.CheckMon:
sub [hl]
jr c, .GotMon
add hl, de
jr .CheckMon
.GotMon
.GotMon:
inc hl
; Species
@@ -218,7 +218,7 @@ ChooseWildEncounter_BugContest:: ; 97d31
ld a, d
jr .GotLevel
.RandomLevel
.RandomLevel:
; Get a random level between the min and max.
ld c, a
inc c
@@ -227,7 +227,7 @@ ChooseWildEncounter_BugContest:: ; 97d31
call SimpleDivide
add d
.GotLevel
.GotLevel:
ld [CurPartyLevel], a
xor a
@@ -330,7 +330,7 @@ DoBikeStep:: ; 97db3
scf
ret
.NoCall
.NoCall:
xor a
ret
; 97df9

View File

@@ -336,7 +336,7 @@ endr
; XXX
pop hl
.ReturnToMap
.ReturnToMap:
pop de
pop bc
pop hl
@@ -514,17 +514,17 @@ FillMoves: ; 424e1
ld a, [hli]
ld h, [hl]
ld l, a
.GoToAttacks
.GoToAttacks:
ld a, [hli]
and a
jr nz, .GoToAttacks
jr .GetLevel
.NextMove
.NextMove:
pop de
.GetMove
.GetMove:
inc hl
.GetLevel
.GetLevel:
ld a, [hli]
and a
jp z, .done
@@ -539,10 +539,10 @@ FillMoves: ; 424e1
cp b
jr nc, .GetMove
.CheckMove
.CheckMove:
push de
ld c, NUM_MOVES
.CheckRepeat
.CheckRepeat:
ld a, [de]
inc de
cp [hl]
@@ -552,7 +552,7 @@ FillMoves: ; 424e1
pop de
push de
ld c, NUM_MOVES
.CheckSlot
.CheckSlot:
ld a, [de]
and a
jr z, .LearnMove
@@ -576,10 +576,10 @@ FillMoves: ; 424e1
call ShiftMoves
pop de
.ShiftedMove
.ShiftedMove:
pop hl
.LearnMove
.LearnMove:
ld a, [hl]
ld [de], a
ld a, [Buffer1]

View File

@@ -30,7 +30,7 @@ PrintDayOfWeek: ; 5b05
ret
; 5b1c
.Days ; 5b1c
.Days: ; 5b1c
db "SUN@"
db "MON@"
db "TUES@"
@@ -40,7 +40,7 @@ PrintDayOfWeek: ; 5b05
db "SATUR@"
; 5b40
.Day ; 5b40
.Day: ; 5b40
db "DAY@"
; 5b44
@@ -270,7 +270,7 @@ SetDefaultBoxNames: ; 5ca6
jr c, .loop
ret
.Box
.Box:
db "BOX@"
; 5cd3
@@ -285,7 +285,7 @@ InitializeMagikarpHouse: ; 5cd3
ret
; 5ce3
.Ralph ; 5ce3
.Ralph: ; 5ce3
db "RALPH@"
; 5ce9
@@ -305,15 +305,15 @@ InitializeNPCNames: ; 5ce9
ld hl, .Green
ld de, GreensName
.Copy
.Copy:
ld bc, NAME_LENGTH
call CopyBytes
ret
.Rival db "???@"
.Red db "RED@"
.Green db "GREEN@"
.Mom db "MOM@"
.Rival: db "???@"
.Red: db "RED@"
.Green: db "GREEN@"
.Mom: db "MOM@"
; 5d23
InitializeWorld: ; 5d23
@@ -365,13 +365,13 @@ Continue: ; 5d65
call CloseWindow
jr .FailToLoad
.Check1Pass
.Check1Pass:
call Continue_CheckRTC_RestartClock
jr nc, .Check2Pass
call CloseWindow
jr .FailToLoad
.Check2Pass
.Check2Pass:
ld a, $8
ld [MusicFade], a
ld a, MUSIC_NONE % $100
@@ -394,10 +394,10 @@ Continue: ; 5d65
ld [hMapEntryMethod], a
jp FinishContinueFunction
.FailToLoad
.FailToLoad:
ret
.SpawnAfterE4
.SpawnAfterE4:
ld a, SPAWN_NEW_BARK
ld [DefaultSpawnpoint], a
call PostCreditsSpawn
@@ -460,7 +460,7 @@ ConfirmContinue: ; 5e34
scf
ret
.PressA
.PressA:
ret
; 5e48
@@ -496,7 +496,7 @@ FinishContinueFunction: ; 5e5d
jr z, .AfterRed
jp Reset
.AfterRed
.AfterRed:
call SpawnAfterRed
jr .loop
; 5e85
@@ -609,7 +609,7 @@ Continue_DisplayBadgesDexPlayerName: ; 5f1c
pop hl
ret
.Player
.Player:
db "<PLAYER>@"
; 5f40
@@ -794,7 +794,7 @@ NamePlayer: ; 0x6074
callba MovePlayerPicLeft
ret
.NewName
.NewName:
ld b, 1
ld de, PlayerName
callba NamingScreen
@@ -819,13 +819,13 @@ NamePlayer: ; 0x6074
bit 0, a
jr z, .Male
ld de, .Kris
.Male
.Male:
call InitName
ret
.Chris
.Chris:
db "CHRIS@@@@@@"
.Kris
.Kris:
db "KRIS@@@@@@@"
; 60e9
@@ -1127,7 +1127,7 @@ TitleScreenScene: ; 62a3
dw TitleScreenEnd
; 62b7
.NextScene ; Unreferenced
.NextScene: ; Unreferenced
ld hl, wJumptableIndex
inc [hl]
ret

View File

@@ -50,17 +50,17 @@ _TossItem:: ; d20d
rst JumpTable
ret
.Pockets
.Pockets:
dw .Item
dw .KeyItem
dw .Ball
dw .TMHM
.Ball ; d228
.Ball: ; d228
ld hl, NumBalls
jp RemoveItemFromPocket
.TMHM ; d22e
.TMHM: ; d22e
ld h, d
ld l, e
ld a, [CurItem]
@@ -68,12 +68,12 @@ _TossItem:: ; d20d
call GetTMHMNumber
jp TossTMHM
.KeyItem ; d23a
.KeyItem: ; d23a
ld h, d
ld l, e
jp TossKeyItem
.Item ; d23f
.Item: ; d23f
ld h, d
ld l, e
@@ -92,17 +92,17 @@ _CheckItem:: ; d244
rst JumpTable
ret
.Pockets
.Pockets:
dw .Item
dw .KeyItem
dw .Ball
dw .TMHM
.Ball ; d25f
.Ball: ; d25f
ld hl, NumBalls
jp CheckTheItem
.TMHM ; d265
.TMHM: ; d265
ld h, d
ld l, e
ld a, [CurItem]
@@ -110,12 +110,12 @@ _CheckItem:: ; d244
call GetTMHMNumber
jp CheckTMHM
.KeyItem ; d271
.KeyItem: ; d271
ld h, d
ld l, e
jp CheckKeyItems
.Item ; d276
.Item: ; d276
ld h, d
ld l, e

View File

@@ -243,7 +243,7 @@ Text_1_2_and_Poof: ; 6684
ld hl, .PoofForgot
ret
.PoofForgot
.PoofForgot:
; Poof! <MON> forgot <MOVE>. And…
text_jump UnknownText_0x1c574e
db "@"

View File

@@ -204,7 +204,7 @@ Gen2ToGen2LinkComms: ; 28177
ld a, $81
ld [rSC], a
.Player1
.Player1:
ld de, MUSIC_NONE
call PlayMusic
ld c, 3
@@ -1127,7 +1127,7 @@ TimeCapsule_ReplaceTeruSama: ; 28771
pop hl
ret
.TimeCapsuleAlt ; 28785
.TimeCapsuleAlt: ; 28785
; Pokémon traded from RBY do not have held items, so GSC usually interprets the
; catch rate as an item. However, if the catch rate appears in this table, the
; item associated with the table entry is used instead.

View File

@@ -322,7 +322,7 @@ _KrisMailBoxMenu: ; 0x447a0
jp MenuTextBoxBackup
; 0x447b4
.EmptyMailboxText ; 0x447b4
.EmptyMailboxText: ; 0x447b4
text_jump _EmptyMailboxText
db "@"
@@ -431,13 +431,13 @@ MailboxPC: ; 0x44806
ret
; 0x44861
.JumpTable
.JumpTable:
dw .ReadMail
dw .PutInPack
dw .AttachMail
dw .Cancel
.ReadMail ; 0x44869
.ReadMail: ; 0x44869
call FadeToMenu
ld a, [MenuSelection]
dec a
@@ -446,7 +446,7 @@ MailboxPC: ; 0x44806
jp CloseSubmenu
; 0x44877
.PutInPack ; 0x44877
.PutInPack: ; 0x44877
ld hl, .MessageLostText
call MenuTextBox
call YesNoBox
@@ -472,15 +472,15 @@ MailboxPC: ; 0x44806
jp MenuTextBoxBackup
; 0x448ac
.PutAwayText ; 0x448ac
.PutAwayText: ; 0x448ac
text_jump ClearedMailPutAwayText
db "@"
.PackFullText ; 0x448b1
.PackFullText: ; 0x448b1
text_jump MailPackFullText
db "@"
.MessageLostText ; 0x448b6
.MessageLostText: ; 0x448b6
text_jump MailMessageLostText
db "@"
@@ -497,7 +497,7 @@ MailboxPC: ; 0x44806
jp CloseSRAM
; 0x448d2
.AttachMail ; 0x448d2
.AttachMail: ; 0x448d2
call FadeToMenu
xor a
ld [PartyMenuActionText], a
@@ -542,19 +542,19 @@ MailboxPC: ; 0x44806
jp CloseSubmenu
; 0x4493c
.HoldingMailText ; 0x4493c
.HoldingMailText: ; 0x4493c
text_jump MailAlreadyHoldingItemText
db "@"
.EggText ; 0x44941
.EggText: ; 0x44941
text_jump MailEggText
db "@"
.MailMovedText ; 0x44946
.MailMovedText: ; 0x44946
text_jump MailMovedFromBoxText
db "@"
.Cancel
.Cancel:
ret
.TopMenuDataHeader: ; 0x4494c
@@ -564,7 +564,7 @@ MailboxPC: ; 0x44806
dw .TopMenuData2
db 1 ; default option
.TopMenuData2
.TopMenuData2:
db %00010000 ; flags
db 4, 0 ; rows/columns?
db 1 ; horizontal spacing?
@@ -580,7 +580,7 @@ MailboxPC: ; 0x44806
dw .SubMenuData2
db 1 ; default option
.SubMenuData2
.SubMenuData2:
db %10000000 ; flags
db 4 ; items
db "READ MAIL@"

View File

@@ -54,7 +54,7 @@ MainMenu: ; 49cdc
db "MOBILE STUDIUM@"
.Jumptable: ; 0x49d60
dw MainMenu_Continue
dw MainMenu_NewGame
dw MainMenu_Options
@@ -250,7 +250,7 @@ MainMenu_PrintCurrentTimeAndDay: ; 49e09
call TextBox
ret
.TimeFail
.TimeFail:
call SpeechTextBox
ret
; 49e3d
@@ -291,11 +291,11 @@ MainMenu_PrintCurrentTimeAndDay: ; 49e09
ret
; 49e7f
.TimeNotSet ; 49e7f
.TimeNotSet: ; 49e7f
db "TIME NOT SET@"
; 49e8c
.UnusedText ; 49e8c
.UnusedText: ; 49e8c
; Clock time unknown
text_jump UnknownText_0x1c5182
db "@"
@@ -317,7 +317,7 @@ MainMenu_PrintCurrentTimeAndDay: ; 49e09
ret
; 49ea8
.Days
.Days:
db "SUN@"
db "MON@"
db "TUES@"
@@ -325,7 +325,7 @@ MainMenu_PrintCurrentTimeAndDay: ; 49e09
db "THURS@"
db "FRI@"
db "SATUR@"
.Day
.Day:
db "DAY@"
; 49ed0

View File

@@ -191,7 +191,7 @@ Function453f: ; 453f
ret
; 456a
.Directions ; 456a
.Directions: ; 456a
db OW_DOWN, OW_RIGHT, OW_UP, OW_LEFT
; 456e

File diff suppressed because it is too large Load Diff

View File

@@ -143,7 +143,7 @@ GetMart: ; 15b31
ld de, DefaultMart
ret
.IsAMart
.IsAMart:
ld hl, Marts
rept 2
add hl, de
@@ -165,7 +165,7 @@ StandardMart: ; 15b47
jr nz, .loop
ret
.MartFunctions
.MartFunctions:
dw .HowMayIHelpYou
dw .TopMenu
dw .Buy
@@ -241,7 +241,7 @@ FarReadMart: ; 15bbb
ld h, [hl]
ld l, a
ld de, CurMart
.CopyMart
.CopyMart:
ld a, [MartPointerBank]
call GetFarByte
ld [de], a
@@ -251,7 +251,7 @@ FarReadMart: ; 15bbb
jr nz, .CopyMart
ld hl, wMartItem1BCD
ld de, CurMart + 1
.ReadMartItem
.ReadMartItem:
ld a, [de]
inc de
cp -1
@@ -299,7 +299,7 @@ GetMartPrice: ; 15bf0
ret
; 15c1a
.CharToNybble ; 15c1a
.CharToNybble: ; 15c1a
ld a, [de]
inc de
cp " "
@@ -427,7 +427,7 @@ endr
ret
; 15cb0
.MartTextFunctionPointers ; 15cb0
.MartTextFunctionPointers: ; 15cb0
dwb .StandardMartPointers, 0
dwb .HerbShopPointers, 0
dwb .BargainShopPointers, 1
@@ -592,7 +592,7 @@ endr
and a
ret
.SoldOut
.SoldOut:
ld a, MARTTEXT_SOLD_OUT
call LoadBuyMenuText
call JoyWaitAorB

Some files were not shown because too many files have changed in this diff Show More