mirror of
https://gitlab.com/xCrystal/pokecrystal-board.git
synced 2024-11-16 11:27:33 -08:00
Merge pull request #623 from mid-kid/patch-1
Create some battle tower SRAM labels
This commit is contained in:
Rangi
GitHub
commit
5cdf4f9ae0
@ -1133,28 +1133,28 @@ UnknownText_0x1c5962::
|
||||
line "you're ready."
|
||||
done
|
||||
|
||||
UnknownText_0x1c5983::
|
||||
_NeedAtLeastThreeMonText::
|
||||
text "You need at least"
|
||||
line "three #MON."
|
||||
|
||||
para ""
|
||||
done
|
||||
|
||||
UnknownText_0x1c59a3::
|
||||
_EggDoesNotQualifyText::
|
||||
text "Sorry, an EGG"
|
||||
line "doesn't qualify."
|
||||
|
||||
para ""
|
||||
done
|
||||
|
||||
Text_OnlyThreeMonMayBeEntered::
|
||||
_OnlyThreeMonMayBeEnteredText::
|
||||
text "Only three #MON"
|
||||
line "may be entered."
|
||||
|
||||
para ""
|
||||
done
|
||||
|
||||
Text_TheMonMustAllBeDifferentKinds::
|
||||
_TheMonMustAllBeDifferentKindsText::
|
||||
text "The @"
|
||||
text_ram wStringBuffer2
|
||||
text " #MON"
|
||||
@ -1164,7 +1164,7 @@ Text_TheMonMustAllBeDifferentKinds::
|
||||
para ""
|
||||
done
|
||||
|
||||
Text_TheMonMustNotHoldTheSameItems::
|
||||
_TheMonMustNotHoldTheSameItemsText::
|
||||
text "The @"
|
||||
text_ram wStringBuffer2
|
||||
text " #MON"
|
||||
@ -1174,7 +1174,7 @@ Text_TheMonMustNotHoldTheSameItems::
|
||||
para ""
|
||||
done
|
||||
|
||||
Text_YouCantTakeAnEgg::
|
||||
_YouCantTakeAnEggText::
|
||||
text "You can't take an"
|
||||
line "EGG!"
|
||||
|
||||
|
||||
@ -152,7 +152,7 @@ BattleAnimRestoreHuds:
|
||||
|
||||
ldh a, [rSVBK]
|
||||
push af
|
||||
ld a, BANK(wCurBattleMon) ; alternatively: BANK(wTempMon), BANK(wPartyMon1), several others
|
||||
ld a, BANK(wCurBattleMon) ; aka BANK(wTempMon) and BANK(wPartyMon1) and several others
|
||||
ldh [rSVBK], a
|
||||
|
||||
ld hl, UpdateBattleHuds
|
||||
|
||||
@ -12,33 +12,33 @@ Function1700ba:
|
||||
Function1700c4:
|
||||
ldh a, [rSVBK]
|
||||
push af
|
||||
ld a, $3
|
||||
ld a, BANK(w3_d202TrainerData) ; aka BANK(w3_dffc) and BANK(w3_d202Name)
|
||||
ldh [rSVBK], a
|
||||
|
||||
call Function17042c
|
||||
|
||||
ld a, $5
|
||||
ld a, BANK(s5_be45) ; aka BANK(s5_be46) and BANK(s5_aa41) and BANK(s5_aa5d)
|
||||
call GetSRAMBank
|
||||
ld a, $1
|
||||
ld [$be45], a
|
||||
ld a, 1
|
||||
ld [s5_be45], a
|
||||
xor a
|
||||
ld [$be46], a
|
||||
ld [s5_be46], a
|
||||
ld hl, w3_dffc
|
||||
ld de, $aa41
|
||||
ld de, s5_aa41
|
||||
ld bc, 4
|
||||
call CopyBytes
|
||||
ld hl, w3_d202Name
|
||||
ld de, $aa8e
|
||||
ld de, s5_aa8e
|
||||
ld bc, 7 * $cc ; length of battle tower struct from japanese games?
|
||||
call CopyBytes
|
||||
ld hl, $aa5d ; some sort of count
|
||||
ld hl, s5_aa5d ; some sort of count
|
||||
ld a, [hl]
|
||||
inc [hl]
|
||||
inc hl
|
||||
sla a
|
||||
sla a
|
||||
ld e, a
|
||||
ld d, $0
|
||||
ld d, 0
|
||||
add hl, de
|
||||
ld e, l
|
||||
ld d, h
|
||||
@ -57,11 +57,11 @@ Function170114:
|
||||
ret
|
||||
|
||||
.Function170121:
|
||||
ld a, $5
|
||||
ld a, BANK(s5_a948)
|
||||
call GetSRAMBank
|
||||
ld hl, $a948
|
||||
ld hl, s5_a948
|
||||
ld de, wc608
|
||||
ld bc, $f6 ; 246
|
||||
ld bc, 246
|
||||
call CopyBytes
|
||||
call CloseSRAM
|
||||
call Function170c8b
|
||||
@ -69,10 +69,10 @@ Function170114:
|
||||
|
||||
Function170139:
|
||||
; Convert the 4-digit decimal number at 5:aa41 into binary
|
||||
ld a, $5
|
||||
ld a, BANK(s5_aa41)
|
||||
call GetSRAMBank
|
||||
ld de, $aa41
|
||||
ld h, $0
|
||||
ld de, s5_aa41
|
||||
ld h, 0
|
||||
ld l, h
|
||||
ld bc, 1000
|
||||
call .DecToBin
|
||||
@ -82,7 +82,7 @@ Function170139:
|
||||
call .DecToBin
|
||||
ld a, [de]
|
||||
ld c, a
|
||||
ld b, $0
|
||||
ld b, 0
|
||||
add hl, bc
|
||||
call CloseSRAM
|
||||
; Store that number in wc608
|
||||
@ -145,20 +145,22 @@ Function170139:
|
||||
pop af
|
||||
dec a
|
||||
jr nz, .CopyLoop
|
||||
ld a, $4
|
||||
|
||||
ld a, BANK(s4_a013)
|
||||
call GetSRAMBank
|
||||
ld hl, $a013
|
||||
ld bc, $24
|
||||
ld hl, s4_a013
|
||||
ld bc, 36
|
||||
call CopyBytes
|
||||
call CloseSRAM
|
||||
ld a, $5
|
||||
|
||||
ld a, BANK(s5_a894) ; aka BANK(s5_a948)
|
||||
call GetSRAMBank
|
||||
ld hl, $a894
|
||||
ld hl, s5_a894
|
||||
ld bc, NAME_LENGTH_JAPANESE
|
||||
call CopyBytes
|
||||
ld hl, wc608
|
||||
ld de, $a948
|
||||
ld bc, $f6
|
||||
ld de, s5_a948
|
||||
ld bc, 246
|
||||
call CopyBytes
|
||||
call CloseSRAM
|
||||
ret
|
||||
@ -176,7 +178,7 @@ Function170139:
|
||||
ret
|
||||
|
||||
BattleTowerBattle:
|
||||
xor a
|
||||
xor a ; FALSE
|
||||
ld [wBattleTowerBattleEnded], a
|
||||
call _BattleTowerBattle
|
||||
ret
|
||||
@ -197,7 +199,7 @@ _BattleTowerBattle:
|
||||
call .do_dw
|
||||
call DelayFrame
|
||||
ld a, [wBattleTowerBattleEnded]
|
||||
cp $1
|
||||
cp TRUE
|
||||
jr nz, .loop
|
||||
ret
|
||||
|
||||
@ -225,7 +227,7 @@ RunBattleTowerTrainer:
|
||||
|
||||
ld a, [wInBattleTowerBattle]
|
||||
push af
|
||||
or $1
|
||||
or 1
|
||||
ld [wInBattleTowerBattle], a
|
||||
|
||||
xor a
|
||||
@ -260,7 +262,7 @@ RunBattleTowerTrainer:
|
||||
ld [wInBattleTowerBattle], a
|
||||
pop af
|
||||
ld [wOptions], a
|
||||
ld a, $1
|
||||
ld a, TRUE
|
||||
ld [wBattleTowerBattleEnded], a
|
||||
ret
|
||||
|
||||
@ -407,9 +409,9 @@ endr
|
||||
.valid
|
||||
ld [wCurSpecies], a
|
||||
call GetBaseData
|
||||
ld a, $5
|
||||
ld a, BANK(s5_b2fb)
|
||||
call GetSRAMBank
|
||||
ld a, [$b2fb] ; s5_b2fb ; max level?
|
||||
ld a, [s5_b2fb] ; s5_b2fb ; max level?
|
||||
call CloseSRAM
|
||||
ld e, a
|
||||
ld hl, MON_LEVEL
|
||||
@ -640,17 +642,17 @@ Function1704e1:
|
||||
dw .Jumptable_2
|
||||
|
||||
.Jumptable_0:
|
||||
ld a, $5
|
||||
ld a, BANK(s5_a89c)
|
||||
call GetSRAMBank
|
||||
|
||||
ld hl, $a89c
|
||||
ld hl, s5_a89c
|
||||
ld de, wStringBuffer3
|
||||
ld bc, $16
|
||||
ld bc, 22
|
||||
call CopyBytes
|
||||
|
||||
ld hl, $a8b2
|
||||
ld hl, s5_a8b2
|
||||
ld de, wc608
|
||||
ld bc, $0096
|
||||
ld bc, 150
|
||||
call CopyBytes
|
||||
|
||||
call CloseSRAM
|
||||
@ -879,41 +881,41 @@ BattleTowerAction:
|
||||
jp hl
|
||||
|
||||
.dw
|
||||
dw BattleTowerAction_CheckExplanationRead ; 0x00
|
||||
dw BattleTowerAction_SetExplanationRead ; 0x01
|
||||
dw BattleTowerAction_GetChallengeState ; 0x02
|
||||
dw BattleTowerAction_SetByteToQuickSaveChallenge ; 0x03
|
||||
dw BattleTowerAction_SetByteToCancelChallenge ; 0x04
|
||||
dw Function1707ac ; 0x05
|
||||
dw Function1707f4 ; 0x06
|
||||
dw SaveBattleTowerLevelGroup ; 0x07
|
||||
dw LoadBattleTowerLevelGroup ; 0x08
|
||||
dw BattleTower_CheckSaveFileExistsAndIsYours ; 0x09
|
||||
dw Function1708b1 ; 0x0a
|
||||
dw CheckMobileEventIndex ; 0x0b
|
||||
dw Function1708c8 ; 0x0c
|
||||
dw Function1708f0 ; 0x0d
|
||||
dw BattleTowerAction_EggTicket ; 0x0e
|
||||
dw Function1709aa ; 0x0f
|
||||
dw Function1709bb ; 0x10
|
||||
dw Function170a9c ; 0x11
|
||||
dw Function170aa0 ; 0x12
|
||||
dw Function170aaf ; 0x13
|
||||
dw Function170abe ; 0x14
|
||||
dw Function170ad7 ; 0x15
|
||||
dw Function170807 ; 0x16
|
||||
dw Function17081d ; 0x17
|
||||
dw BattleTowerAction_LevelCheck ; 0x18
|
||||
dw BattleTowerAction_UbersCheck ; 0x19
|
||||
dw ResetBattleTowerTrainersSRAM ; 0x1a
|
||||
dw BattleTower_GiveReward ; 0x1b
|
||||
dw Function17071b ; 0x1c
|
||||
dw Function170729 ; 0x1d
|
||||
dw BattleTower_RandomlyChooseReward ; 0x1e
|
||||
dw BattleTower_SaveOptions ; 0x1f
|
||||
dw BattleTowerAction_CheckExplanationRead
|
||||
dw BattleTowerAction_SetExplanationRead
|
||||
dw BattleTowerAction_GetChallengeState
|
||||
dw BattleTowerAction_SetByteToQuickSaveChallenge
|
||||
dw BattleTowerAction_SetByteToCancelChallenge
|
||||
dw Function1707ac
|
||||
dw Function1707f4
|
||||
dw SaveBattleTowerLevelGroup
|
||||
dw LoadBattleTowerLevelGroup
|
||||
dw BattleTower_CheckSaveFileExistsAndIsYours
|
||||
dw Function1708b1
|
||||
dw CheckMobileEventIndex
|
||||
dw Function1708c8
|
||||
dw Function1708f0
|
||||
dw BattleTowerAction_EggTicket
|
||||
dw Function1709aa
|
||||
dw Function1709bb
|
||||
dw Function170a9c
|
||||
dw Function170aa0
|
||||
dw Function170aaf
|
||||
dw Function170abe
|
||||
dw Function170ad7
|
||||
dw Function170807
|
||||
dw Function17081d
|
||||
dw BattleTowerAction_LevelCheck
|
||||
dw BattleTowerAction_UbersCheck
|
||||
dw ResetBattleTowerTrainersSRAM
|
||||
dw BattleTower_GiveReward
|
||||
dw Function17071b
|
||||
dw Function170729
|
||||
dw BattleTower_RandomlyChooseReward
|
||||
dw BattleTower_SaveOptions
|
||||
|
||||
; Reset the save memory for BattleTower-Trainers (Counter and all 7 TrainerBytes)
|
||||
ResetBattleTowerTrainersSRAM: ; BattleTowerAction $1a
|
||||
ResetBattleTowerTrainersSRAM:
|
||||
ld a, BANK(sBTTrainers)
|
||||
call GetSRAMBank
|
||||
|
||||
@ -929,7 +931,7 @@ ResetBattleTowerTrainersSRAM: ; BattleTowerAction $1a
|
||||
|
||||
ret
|
||||
|
||||
BattleTower_GiveReward: ; BattleTowerAction $1b
|
||||
BattleTower_GiveReward:
|
||||
ld a, BANK(sBattleTowerReward)
|
||||
call GetSRAMBank
|
||||
|
||||
@ -958,7 +960,7 @@ BattleTower_GiveReward: ; BattleTowerAction $1b
|
||||
ld [wScriptVar], a
|
||||
ret
|
||||
|
||||
Function17071b: ; BattleTowerAction $1c
|
||||
Function17071b:
|
||||
ld a, BANK(sBattleTowerChallengeState)
|
||||
call GetSRAMBank
|
||||
ld a, BATTLETOWER_WON_CHALLENGE
|
||||
@ -966,7 +968,7 @@ Function17071b: ; BattleTowerAction $1c
|
||||
call CloseSRAM
|
||||
ret
|
||||
|
||||
Function170729: ; BattleTowerAction $1d
|
||||
Function170729:
|
||||
ld a, BANK(sBattleTowerChallengeState)
|
||||
call GetSRAMBank
|
||||
ld a, BATTLETOWER_RECEIVED_REWARD
|
||||
@ -974,11 +976,11 @@ Function170729: ; BattleTowerAction $1d
|
||||
call CloseSRAM
|
||||
ret
|
||||
|
||||
BattleTower_SaveOptions: ; BattleTowerAction $1f
|
||||
BattleTower_SaveOptions:
|
||||
farcall SaveOptions
|
||||
ret
|
||||
|
||||
BattleTower_RandomlyChooseReward: ; BattleTowerAction $1e
|
||||
BattleTower_RandomlyChooseReward:
|
||||
; Generate a random stat boosting item.
|
||||
.loop
|
||||
call Random
|
||||
@ -999,7 +1001,7 @@ BattleTower_RandomlyChooseReward: ; BattleTowerAction $1e
|
||||
call CloseSRAM
|
||||
ret
|
||||
|
||||
BattleTowerAction_CheckExplanationRead: ; BattleTowerAction $00
|
||||
BattleTowerAction_CheckExplanationRead:
|
||||
call BattleTower_CheckSaveFileExistsAndIsYours
|
||||
ld a, [wScriptVar]
|
||||
and a
|
||||
@ -1008,12 +1010,12 @@ BattleTowerAction_CheckExplanationRead: ; BattleTowerAction $00
|
||||
ld a, BANK(sBattleTowerSaveFileFlags)
|
||||
call GetSRAMBank
|
||||
ld a, [sBattleTowerSaveFileFlags]
|
||||
and $2
|
||||
and 2
|
||||
ld [wScriptVar], a
|
||||
call CloseSRAM
|
||||
ret
|
||||
|
||||
BattleTowerAction_GetChallengeState: ; BattleTowerAction $02
|
||||
BattleTowerAction_GetChallengeState:
|
||||
ld hl, sBattleTowerChallengeState
|
||||
ld a, BANK(sBattleTowerChallengeState)
|
||||
call GetSRAMBank
|
||||
@ -1022,20 +1024,20 @@ BattleTowerAction_GetChallengeState: ; BattleTowerAction $02
|
||||
call CloseSRAM
|
||||
ret
|
||||
|
||||
BattleTowerAction_SetExplanationRead: ; BattleTowerAction $01
|
||||
BattleTowerAction_SetExplanationRead:
|
||||
ld a, BANK(sBattleTowerSaveFileFlags)
|
||||
call GetSRAMBank
|
||||
ld a, [sBattleTowerSaveFileFlags]
|
||||
or $2
|
||||
or 2
|
||||
ld [sBattleTowerSaveFileFlags], a
|
||||
call CloseSRAM
|
||||
ret
|
||||
|
||||
BattleTowerAction_SetByteToQuickSaveChallenge: ; BattleTowerAction $03
|
||||
BattleTowerAction_SetByteToQuickSaveChallenge:
|
||||
ld c, BATTLETOWER_SAVED_AND_LEFT
|
||||
jr asm_17079f
|
||||
|
||||
BattleTowerAction_SetByteToCancelChallenge: ; BattleTowerAction $04
|
||||
BattleTowerAction_SetByteToCancelChallenge:
|
||||
ld c, BATTLETOWER_NO_CHALLENGE
|
||||
asm_17079f:
|
||||
ld a, BANK(sBattleTowerChallengeState)
|
||||
@ -1045,31 +1047,31 @@ asm_17079f:
|
||||
call CloseSRAM
|
||||
ret
|
||||
|
||||
Function1707ac: ; BattleTowerAction $05
|
||||
ld a, $5
|
||||
Function1707ac:
|
||||
ld a, BANK(s5_aa8c) ; aka BANK(s5_be46)
|
||||
call GetSRAMBank
|
||||
ld a, [$aa8c]
|
||||
ld a, [s5_aa8c]
|
||||
ld b, a
|
||||
ld a, [$be46]
|
||||
ld a, [s5_be46]
|
||||
ld [wScriptVar], a
|
||||
call CloseSRAM
|
||||
and a
|
||||
ret z
|
||||
ld a, b
|
||||
cp $2
|
||||
cp 2
|
||||
jr nc, .asm_1707ef
|
||||
push bc
|
||||
call UpdateTime
|
||||
pop bc
|
||||
ld a, $5
|
||||
ld a, BANK(s5_aa8c)
|
||||
call GetSRAMBank
|
||||
ld a, [$aa8b]
|
||||
ld a, [s5_aa8b]
|
||||
call CloseSRAM
|
||||
ld c, a
|
||||
ld a, [wCurDay]
|
||||
sub c
|
||||
jr c, .asm_1707e5
|
||||
cp $8
|
||||
cp 8
|
||||
jr nc, .asm_1707ef
|
||||
ld a, b
|
||||
and a
|
||||
@ -1080,44 +1082,44 @@ Function1707ac: ; BattleTowerAction $05
|
||||
ld a, $8c
|
||||
sub c
|
||||
add [hl]
|
||||
cp $8
|
||||
cp 8
|
||||
ret c
|
||||
.asm_1707ef
|
||||
ld a, $8
|
||||
ld a, 8
|
||||
ld [wScriptVar], a
|
||||
|
||||
Function1707f4: ; BattleTowerAction $06
|
||||
ld a, $5
|
||||
Function1707f4:
|
||||
ld a, BANK(s5_be46) ; aka BANK(s5_aa8b) and BANK(s5_aa8c)
|
||||
call GetSRAMBank
|
||||
xor a
|
||||
ld [$be46], a
|
||||
ld [$aa8b], a
|
||||
ld [$aa8c], a
|
||||
ld [s5_be46], a
|
||||
ld [s5_aa8b], a
|
||||
ld [s5_aa8c], a
|
||||
call CloseSRAM
|
||||
ret
|
||||
|
||||
Function170807: ; BattleTowerAction $16
|
||||
Function170807:
|
||||
call UpdateTime
|
||||
ld a, $5
|
||||
ld a, BANK(s5_b2f9) ; aka BANK(s5_b2fa)
|
||||
call GetSRAMBank
|
||||
ld a, [wCurDay]
|
||||
ld [$b2f9], a
|
||||
ld [s5_b2f9], a
|
||||
xor a
|
||||
ld [$b2fa], a
|
||||
ld [s5_b2fa], a
|
||||
call CloseSRAM
|
||||
ret
|
||||
|
||||
Function17081d: ; BattleTowerAction $17
|
||||
Function17081d:
|
||||
xor a
|
||||
ld [wScriptVar], a
|
||||
ld a, $5
|
||||
ld a, BANK(s5_b2f9) ; aka BANK(s5_b2fa)
|
||||
call GetSRAMBank
|
||||
ld a, [$b2f9]
|
||||
ld a, [s5_b2f9]
|
||||
ld c, a
|
||||
ld a, [$b2fa]
|
||||
ld a, [s5_b2fa]
|
||||
ld b, a
|
||||
call CloseSRAM
|
||||
cp $2
|
||||
cp 2
|
||||
jr nc, .asm_170853
|
||||
push bc
|
||||
call UpdateTime
|
||||
@ -1125,7 +1127,7 @@ Function17081d: ; BattleTowerAction $17
|
||||
ld a, [wCurDay]
|
||||
sub c
|
||||
jr c, .asm_170849
|
||||
cp $b
|
||||
cp 11
|
||||
jr nc, .asm_170853
|
||||
ld a, b
|
||||
and a
|
||||
@ -1137,25 +1139,25 @@ Function17081d: ; BattleTowerAction $17
|
||||
ld a, 140
|
||||
sub c
|
||||
add [hl]
|
||||
cp $b
|
||||
cp 11
|
||||
ret c
|
||||
.asm_170853
|
||||
ld a, $1
|
||||
ld a, 1
|
||||
ld [wScriptVar], a
|
||||
ld a, $5
|
||||
ld a, BANK(s5_b2f9) ; aka BANK(s5_b2fa)
|
||||
call GetSRAMBank
|
||||
xor a
|
||||
ld [$b2f9], a
|
||||
ld [$b2fa], a
|
||||
ld [s5_b2f9], a
|
||||
ld [s5_b2fa], a
|
||||
call CloseSRAM
|
||||
ret
|
||||
|
||||
SaveBattleTowerLevelGroup: ; BattleTowerAction $07
|
||||
SaveBattleTowerLevelGroup:
|
||||
ld a, BANK(sBTChoiceOfLevelGroup)
|
||||
call GetSRAMBank
|
||||
ldh a, [rSVBK]
|
||||
push af
|
||||
ld a, $3
|
||||
ld a, BANK(wBTChoiceOfLvlGroup)
|
||||
ldh [rSVBK], a
|
||||
ld a, [wBTChoiceOfLvlGroup]
|
||||
ld [sBTChoiceOfLevelGroup], a
|
||||
@ -1164,12 +1166,12 @@ SaveBattleTowerLevelGroup: ; BattleTowerAction $07
|
||||
call CloseSRAM
|
||||
ret
|
||||
|
||||
LoadBattleTowerLevelGroup: ; BattleTowerAction $08 ; Load level group choice
|
||||
LoadBattleTowerLevelGroup: ; Load level group choice
|
||||
ld a, BANK(sBTChoiceOfLevelGroup)
|
||||
call GetSRAMBank
|
||||
ldh a, [rSVBK]
|
||||
push af
|
||||
ld a, $3
|
||||
ld a, BANK(wBTChoiceOfLvlGroup)
|
||||
ldh [rSVBK], a
|
||||
ld a, [sBTChoiceOfLevelGroup]
|
||||
ld [wBTChoiceOfLvlGroup], a
|
||||
@ -1178,17 +1180,17 @@ LoadBattleTowerLevelGroup: ; BattleTowerAction $08 ; Load level group choice
|
||||
call CloseSRAM
|
||||
ret
|
||||
|
||||
BattleTower_CheckSaveFileExistsAndIsYours: ; BattleTowerAction $09
|
||||
BattleTower_CheckSaveFileExistsAndIsYours:
|
||||
ld a, [wSaveFileExists]
|
||||
and a
|
||||
jr z, .nope
|
||||
farcall CompareLoadedAndSavedPlayerID
|
||||
jr z, .yes
|
||||
xor a
|
||||
xor a ; FALSE
|
||||
jr .nope
|
||||
|
||||
.yes
|
||||
ld a, $1
|
||||
ld a, TRUE
|
||||
|
||||
.nope
|
||||
ld [wScriptVar], a
|
||||
@ -1210,32 +1212,32 @@ CheckMobileEventIndex: ; BattleTowerAction $0b something to do with GS Ball
|
||||
|
||||
Function1708c8: ; BattleTowerAction $0c
|
||||
call UpdateTime
|
||||
ld a, $5
|
||||
ld a, BANK(s5_aa8b) ; aka BANK(s5_aa8c) and BANK(s5_aa5d) and BANK(s5_aa48) and BANK(s5_aa47)
|
||||
call GetSRAMBank
|
||||
ld a, [wCurDay]
|
||||
ld [$aa8b], a
|
||||
ld [s5_aa8b], a
|
||||
xor a
|
||||
ld [$aa8c], a
|
||||
ld a, [$aa5d]
|
||||
cp $2
|
||||
ld [s5_aa8c], a
|
||||
ld a, [s5_aa5d]
|
||||
cp 2
|
||||
jr nc, .asm_1708ec
|
||||
ld a, [wCurDay]
|
||||
ld [$aa48], a
|
||||
ld a, $1
|
||||
ld [$aa47], a
|
||||
ld [s5_aa48], a
|
||||
ld a, 1
|
||||
ld [s5_aa47], a
|
||||
.asm_1708ec
|
||||
call CloseSRAM
|
||||
ret
|
||||
|
||||
Function1708f0: ; BattleTowerAction $0d
|
||||
xor a
|
||||
xor a ; FALSE
|
||||
ld [wScriptVar], a
|
||||
call UpdateTime
|
||||
ld a, $5
|
||||
ld a, BANK(s5_aa48) ; aka BANK(s5_aa47)
|
||||
call GetSRAMBank
|
||||
ld a, [$aa48]
|
||||
ld a, [s5_aa48]
|
||||
ld c, a
|
||||
ld a, [$aa47]
|
||||
ld a, [s5_aa47]
|
||||
call CloseSRAM
|
||||
and a
|
||||
ret z
|
||||
@ -1243,30 +1245,30 @@ Function1708f0: ; BattleTowerAction $0d
|
||||
ld a, c
|
||||
cp [hl]
|
||||
jr nz, Function170923
|
||||
ld a, $5
|
||||
ld a, BANK(s5_aa5d)
|
||||
call GetSRAMBank
|
||||
ld a, [$aa5d]
|
||||
ld a, [s5_aa5d]
|
||||
call CloseSRAM
|
||||
cp $5
|
||||
cp 5
|
||||
ret c
|
||||
ld a, $1
|
||||
ld a, TRUE
|
||||
ld [wScriptVar], a
|
||||
ret
|
||||
|
||||
Function170923:
|
||||
ld a, $5
|
||||
ld a, BANK(s5_aa48) ; aka BANK(s5_aa47) and BANK(s5_aa5d)
|
||||
call GetSRAMBank
|
||||
xor a
|
||||
ld [$aa48], a
|
||||
ld [$aa47], a
|
||||
ld hl, $aa5d
|
||||
ld bc, $0011
|
||||
ld [s5_aa48], a
|
||||
ld [s5_aa47], a
|
||||
ld hl, s5_aa5d
|
||||
ld bc, MOBILE_LOGIN_PASSWORD_LENGTH
|
||||
call ByteFill
|
||||
call CloseSRAM
|
||||
ret
|
||||
|
||||
BattleTowerAction_EggTicket: ; BattleTowerAction $0e
|
||||
xor a
|
||||
xor a ; FALSE
|
||||
ld [wScriptVar], a
|
||||
ld a, EGG_TICKET
|
||||
ld [wCurItem], a
|
||||
@ -1319,7 +1321,7 @@ endr
|
||||
ld [wCurItemQuantity], a
|
||||
ld hl, wNumItems
|
||||
call TossItem
|
||||
ld a, $1
|
||||
ld a, TRUE
|
||||
ld [wScriptVar], a
|
||||
ret
|
||||
|
||||
@ -1347,11 +1349,11 @@ Function1709aa: ; BattleTowerAction $0f
|
||||
ret
|
||||
|
||||
Function1709bb: ; BattleTowerAction $10
|
||||
xor a
|
||||
xor a ; FALSE
|
||||
ld [wScriptVar], a
|
||||
ld a, $5
|
||||
ld a, BANK(s5_a800)
|
||||
call GetSRAMBank
|
||||
ld a, [$a800]
|
||||
ld a, [s5_a800]
|
||||
call CloseSRAM
|
||||
cp 6
|
||||
jr nc, .invalid
|
||||
@ -1366,10 +1368,10 @@ Function1709bb: ; BattleTowerAction $10
|
||||
jp hl
|
||||
|
||||
.invalid
|
||||
ld a, $5
|
||||
ld a, BANK(s5_a800)
|
||||
call GetSRAMBank
|
||||
xor a
|
||||
ld [$a800], a
|
||||
ld [s5_a800], a
|
||||
call CloseSRAM
|
||||
ret
|
||||
|
||||
@ -1382,46 +1384,46 @@ Function1709bb: ; BattleTowerAction $10
|
||||
dw .Action5
|
||||
|
||||
.DoAction1:
|
||||
ld a, $5
|
||||
ld a, BANK(s5_a800)
|
||||
call GetSRAMBank
|
||||
ld a, $1
|
||||
ld [$a800], a
|
||||
ld a, 1
|
||||
ld [s5_a800], a
|
||||
call CloseSRAM
|
||||
|
||||
.NoAction:
|
||||
ret
|
||||
|
||||
.Action4:
|
||||
ld a, $5
|
||||
ld a, BANK(s5_b023) ; aka BANK(s5_a825) and BANK(s5_a826)
|
||||
call GetSRAMBank
|
||||
ld hl, $b023
|
||||
ld hl, s5_b023
|
||||
ld de, wc608
|
||||
ld bc, $0069
|
||||
ld bc, 105
|
||||
call CopyBytes
|
||||
ld a, [$a825]
|
||||
ld a, [s5_a825]
|
||||
ld [wcd30], a
|
||||
ld a, [$a826]
|
||||
ld a, [s5_a826]
|
||||
ld [wcd31], a
|
||||
call CloseSRAM
|
||||
farcall Function11b6b4
|
||||
farcall Function17d0f3
|
||||
ld a, $1
|
||||
ld a, TRUE
|
||||
ld [wScriptVar], a
|
||||
ret
|
||||
|
||||
.Action5:
|
||||
ld a, $0
|
||||
ld a, 0 ; ???
|
||||
call GetSRAMBank
|
||||
ld hl, wRTC
|
||||
ld de, wc608
|
||||
ld bc, $0004
|
||||
ld bc, 4
|
||||
call CopyBytes
|
||||
call CloseSRAM
|
||||
ld a, $5
|
||||
ld a, BANK(s5_b08c)
|
||||
call GetSRAMBank
|
||||
ld hl, $b08c
|
||||
ld hl, s5_b08c
|
||||
ld de, wc608
|
||||
ld c, $4
|
||||
ld c, 4
|
||||
.compare_loop
|
||||
ld a, [de]
|
||||
inc de
|
||||
@ -1444,16 +1446,16 @@ Function1709bb: ; BattleTowerAction $10
|
||||
ret nz
|
||||
|
||||
.no_scene
|
||||
ld a, $1
|
||||
ld a, TRUE
|
||||
ld [wScriptVar], a
|
||||
ret
|
||||
|
||||
.different
|
||||
call CloseSRAM
|
||||
ld a, $5
|
||||
ld a, BANK(s5_a800)
|
||||
call GetSRAMBank
|
||||
xor a
|
||||
ld [$a800], a
|
||||
ld [s5_a800], a
|
||||
call CloseSRAM
|
||||
ld [wScriptVar], a
|
||||
ld a, [wMapGroup]
|
||||
@ -1470,29 +1472,29 @@ Function1709bb: ; BattleTowerAction $10
|
||||
.no_scene_2
|
||||
ret
|
||||
|
||||
Function170a9c: ; BattleTowerAction $11
|
||||
Function170a9c:
|
||||
ld c, FALSE
|
||||
jr asm_170aa2
|
||||
|
||||
Function170aa0: ; BattleTowerAction $12
|
||||
Function170aa0:
|
||||
ld c, TRUE
|
||||
asm_170aa2:
|
||||
ld a, $5
|
||||
ld a, BANK(s5_aa8d)
|
||||
call GetSRAMBank
|
||||
ld a, c
|
||||
ld [$aa8d], a
|
||||
ld [s5_aa8d], a
|
||||
call CloseSRAM
|
||||
ret
|
||||
|
||||
Function170aaf: ; BattleTowerAction $13
|
||||
ld a, $5
|
||||
Function170aaf:
|
||||
ld a, BANK(s5_aa8d)
|
||||
call GetSRAMBank
|
||||
ld a, [$aa8d]
|
||||
ld a, [s5_aa8d]
|
||||
ld [wScriptVar], a
|
||||
call CloseSRAM
|
||||
ret
|
||||
|
||||
Function170abe: ; BattleTowerAction $14
|
||||
Function170abe:
|
||||
call BattleTower_CheckSaveFileExistsAndIsYours
|
||||
ld a, [wScriptVar]
|
||||
and a
|
||||
@ -1501,24 +1503,24 @@ Function170abe: ; BattleTowerAction $14
|
||||
ld a, BANK(sBattleTowerSaveFileFlags)
|
||||
call GetSRAMBank
|
||||
ld a, [sBattleTowerSaveFileFlags]
|
||||
and $1
|
||||
and 1
|
||||
ld [wScriptVar], a
|
||||
call CloseSRAM
|
||||
ret
|
||||
|
||||
Function170ad7: ; BattleTowerAction $15
|
||||
Function170ad7:
|
||||
ld a, BANK(sBattleTowerSaveFileFlags)
|
||||
call GetSRAMBank
|
||||
ld a, [sBattleTowerSaveFileFlags]
|
||||
or $1
|
||||
or 1
|
||||
ld [sBattleTowerSaveFileFlags], a
|
||||
call CloseSRAM
|
||||
ret
|
||||
|
||||
BattleTowerAction_LevelCheck: ; BattleTowerAction $18
|
||||
ld a, $5
|
||||
BattleTowerAction_LevelCheck:
|
||||
ld a, BANK(s5_b2fb)
|
||||
call GetSRAMBank
|
||||
ld a, [$b2fb]
|
||||
ld a, [s5_b2fb]
|
||||
call CloseSRAM
|
||||
ld c, 10
|
||||
call SimpleDivide
|
||||
@ -1526,19 +1528,19 @@ BattleTowerAction_LevelCheck: ; BattleTowerAction $18
|
||||
ld [wcd4f], a
|
||||
xor a
|
||||
ld [wScriptVar], a
|
||||
farcall BattleTower_LevelCheck ; level check
|
||||
farcall BattleTower_LevelCheck
|
||||
ret nc
|
||||
ld a, $5
|
||||
ld a, BANK(s5_b2fb)
|
||||
call GetSRAMBank
|
||||
ld a, [$b2fb]
|
||||
ld a, [s5_b2fb]
|
||||
call CloseSRAM
|
||||
ld [wScriptVar], a
|
||||
ret
|
||||
|
||||
BattleTowerAction_UbersCheck: ; BattleTowerAction $19
|
||||
ld a, $5
|
||||
BattleTowerAction_UbersCheck:
|
||||
ld a, BANK(s5_b2fb)
|
||||
call GetSRAMBank
|
||||
ld a, [$b2fb]
|
||||
ld a, [s5_b2fb]
|
||||
call CloseSRAM
|
||||
ld c, 10
|
||||
call SimpleDivide
|
||||
@ -1548,9 +1550,9 @@ BattleTowerAction_UbersCheck: ; BattleTowerAction $19
|
||||
ld [wScriptVar], a
|
||||
farcall BattleTower_UbersCheck
|
||||
ret nc
|
||||
ld a, $5
|
||||
ld a, BANK(s5_b2fb)
|
||||
call GetSRAMBank
|
||||
ld a, [$b2fb]
|
||||
ld a, [s5_b2fb]
|
||||
call CloseSRAM
|
||||
ld [wScriptVar], a
|
||||
ret
|
||||
@ -1559,13 +1561,13 @@ LoadOpponentTrainerAndPokemonWithOTSprite:
|
||||
farcall Function_LoadOpponentTrainerAndPokemons
|
||||
ldh a, [rSVBK]
|
||||
push af
|
||||
ld a, $3
|
||||
ld a, BANK(wBT_OTTrainerClass)
|
||||
ldh [rSVBK], a
|
||||
ld hl, wBT_OTTrainerClass
|
||||
ld a, [hl]
|
||||
dec a
|
||||
ld c, a
|
||||
ld b, $0
|
||||
ld b, 0
|
||||
pop af
|
||||
ldh [rSVBK], a
|
||||
ld hl, BTTrainerClassSprites
|
||||
@ -1606,13 +1608,13 @@ DummySpecial_170bd2:
|
||||
|
||||
CheckForBattleTowerRules:
|
||||
farcall _CheckForBattleTowerRules
|
||||
jr c, .asm_170bde
|
||||
jr c, .ready
|
||||
xor a ; FALSE
|
||||
jr .asm_170be0
|
||||
jr .end
|
||||
|
||||
.asm_170bde
|
||||
.ready
|
||||
ld a, TRUE
|
||||
|
||||
.asm_170be0
|
||||
.end
|
||||
ld [wScriptVar], a
|
||||
ret
|
||||
|
||||
@ -17,8 +17,8 @@ CheckForMobileBattleRules:
|
||||
|
||||
.TextPointers:
|
||||
dw .ExcuseMeText
|
||||
dw JumpText_NeedAtLeastThreeMon
|
||||
dw JumpText_EggDoesNotQualify
|
||||
dw NeedAtLeastThreeMonText
|
||||
dw EggDoesNotQualifyText
|
||||
|
||||
.ExcuseMeText:
|
||||
; Excuse me!
|
||||
@ -50,10 +50,10 @@ _CheckForBattleTowerRules:
|
||||
|
||||
.TextPointers:
|
||||
dw JumpText_ExcuseMeYoureNotReady
|
||||
dw JumpText_OnlyThreeMonMayBeEntered
|
||||
dw JumpText_TheMonMustAllBeDifferentKinds
|
||||
dw JumpText_TheMonMustNotHoldTheSameItems
|
||||
dw JumpText_YouCantTakeAnEgg
|
||||
dw OnlyThreeMonMayBeEnteredText
|
||||
dw TheMonMustAllBeDifferentKindsText
|
||||
dw TheMonMustNotHoldTheSameItemsText
|
||||
dw YouCantTakeAnEggText
|
||||
|
||||
JumpText_ExcuseMeYoureNotReady:
|
||||
; Excuse me. You're not ready.
|
||||
@ -70,34 +70,34 @@ BattleTower_PleaseReturnWhenReady:
|
||||
text_far UnknownText_0x1c5962
|
||||
text_end
|
||||
|
||||
JumpText_NeedAtLeastThreeMon:
|
||||
NeedAtLeastThreeMonText:
|
||||
; You need at least three #MON.
|
||||
text_far UnknownText_0x1c5983
|
||||
text_far _NeedAtLeastThreeMonText
|
||||
text_end
|
||||
|
||||
JumpText_EggDoesNotQualify:
|
||||
EggDoesNotQualifyText:
|
||||
; Sorry, an EGG doesn't qualify.
|
||||
text_far UnknownText_0x1c59a3
|
||||
text_far _EggDoesNotQualifyText
|
||||
text_end
|
||||
|
||||
JumpText_OnlyThreeMonMayBeEntered:
|
||||
OnlyThreeMonMayBeEnteredText:
|
||||
; Only three #MON may be entered.
|
||||
text_far Text_OnlyThreeMonMayBeEntered
|
||||
text_far _OnlyThreeMonMayBeEnteredText
|
||||
text_end
|
||||
|
||||
JumpText_TheMonMustAllBeDifferentKinds:
|
||||
TheMonMustAllBeDifferentKindsText:
|
||||
; The @ #MON must all be different kinds.
|
||||
text_far Text_TheMonMustAllBeDifferentKinds
|
||||
text_far _TheMonMustAllBeDifferentKindsText
|
||||
text_end
|
||||
|
||||
JumpText_TheMonMustNotHoldTheSameItems:
|
||||
TheMonMustNotHoldTheSameItemsText:
|
||||
; The @ #MON must not hold the same items.
|
||||
text_far Text_TheMonMustNotHoldTheSameItems
|
||||
text_far _TheMonMustNotHoldTheSameItemsText
|
||||
text_end
|
||||
|
||||
JumpText_YouCantTakeAnEgg:
|
||||
YouCantTakeAnEggText:
|
||||
; You can't take an EGG!
|
||||
text_far Text_YouCantTakeAnEgg
|
||||
text_far _YouCantTakeAnEggText
|
||||
text_end
|
||||
|
||||
BattleTower_ExecuteJumptable:
|
||||
@ -161,7 +161,7 @@ BattleTower_ExecuteJumptable:
|
||||
call z, .PrintFirstText
|
||||
pop bc
|
||||
call .PrintNthText
|
||||
ld b, $1
|
||||
ld b, 1
|
||||
pop de
|
||||
ret
|
||||
|
||||
@ -178,7 +178,7 @@ BattleTower_ExecuteJumptable:
|
||||
call .GetTextPointers
|
||||
inc hl
|
||||
inc hl
|
||||
ld b, $0
|
||||
ld b, 0
|
||||
add hl, bc
|
||||
add hl, bc
|
||||
call .LoadTextPointer
|
||||
@ -194,7 +194,7 @@ BattleTower_CheckPartyLengthIs3:
|
||||
BattleTower_CheckPartyHasThreeMonsThatAreNotEggs:
|
||||
ld hl, wPartyCount
|
||||
ld a, [hli]
|
||||
ld b, $0
|
||||
ld b, 0
|
||||
ld c, a
|
||||
.loop
|
||||
ld a, [hli]
|
||||
|
||||
@ -361,7 +361,9 @@ SRAM $02
|
||||
"Boxes 1-7"
|
||||
SRAM $03
|
||||
"Boxes 8-14"
|
||||
SRAM $04
|
||||
"SRAM Mobile 1"
|
||||
SRAM $05
|
||||
"SRAM Mobile"
|
||||
"SRAM Mobile 2"
|
||||
HRAM
|
||||
"HRAM"
|
||||
|
||||
70
sram.asm
70
sram.asm
@ -239,8 +239,13 @@ sBox12:: box sBox12
|
||||
sBox13:: box sBox13
|
||||
sBox14:: box sBox14
|
||||
|
||||
SECTION "SRAM Mobile 1", SRAM
|
||||
|
||||
SECTION "SRAM Mobile", SRAM, BANK [5]
|
||||
ds $13
|
||||
|
||||
s4_a013:: ds 36 ; a013
|
||||
|
||||
SECTION "SRAM Mobile 2", SRAM
|
||||
|
||||
ds 1 ; former location for sMobileEventIndex, moved to 1:BE3C in English
|
||||
|
||||
@ -292,9 +297,64 @@ sTrainerRankingsEnd:: ; a083
|
||||
|
||||
ds 1 ; Former location for sMobileEventIndexBackup, moved to 1:BE44 in English
|
||||
|
||||
sTrainerRankingsBackup:: ds sTrainerRankingsEnd - sTrainerRankings
|
||||
sTrainerRankingsBackup:: ds sTrainerRankingsEnd - sTrainerRankings ; a084
|
||||
|
||||
ds $945
|
||||
; aa4b
|
||||
ds $6fa
|
||||
|
||||
sMobileLoginPassword:: ds MOBILE_LOGIN_PASSWORD_LENGTH
|
||||
s5_a800:: db ; a800
|
||||
|
||||
ds $24
|
||||
|
||||
s5_a825:: db ; a825
|
||||
s5_a826:: db ; a826
|
||||
|
||||
ds $6d
|
||||
|
||||
s5_a894:: ds NAME_LENGTH_JAPANESE ; a894
|
||||
|
||||
ds $2
|
||||
|
||||
s5_a89c:: ds 22 ; a89c
|
||||
s5_a8b2:: ds 150 ; a8b2
|
||||
|
||||
s5_a948:: ds 246 ; a948
|
||||
|
||||
ds $3
|
||||
|
||||
s5_aa41:: ds 4 ; aa41
|
||||
|
||||
ds $2
|
||||
|
||||
s5_aa47:: db ; aa47
|
||||
s5_aa48:: db ; aa48
|
||||
|
||||
ds $2
|
||||
|
||||
sMobileLoginPassword:: ds MOBILE_LOGIN_PASSWORD_LENGTH ; aa4b
|
||||
|
||||
ds $1
|
||||
|
||||
s5_aa5d:: ds MOBILE_LOGIN_PASSWORD_LENGTH ; aa5d
|
||||
|
||||
ds $1d
|
||||
|
||||
s5_aa8b:: db ; aa8b
|
||||
s5_aa8c:: db ; aa8c
|
||||
s5_aa8d:: db ; aa8d
|
||||
s5_aa8e:: ds 7 * $cc ; aa8e
|
||||
|
||||
ds $1
|
||||
|
||||
s5_b023:: ds 105 ; b023
|
||||
s5_b08c:: ds 4 ; b08c
|
||||
|
||||
ds $269
|
||||
|
||||
s5_b2f9:: db ; b2f9
|
||||
s5_b2fa:: db ; b2fa
|
||||
s5_b2fb:: db ; b2fb
|
||||
|
||||
ds $b49
|
||||
|
||||
s5_be45:: db ; be45
|
||||
s5_be46:: db ; be46
|
||||
|
||||
Loading…
Reference in New Issue
Block a user