Renamed some unused specials

This commit is contained in:
PikalaxALT
2015-10-01 16:55:24 -04:00
parent ebfa8e2639
commit c50b49bd62
5 changed files with 106 additions and 104 deletions

View File

@@ -382,7 +382,7 @@ CheckTileEvent: ; 96874
call CheckBit4_ScriptFlags3
jr z, .ok
call Function97cc0
call RockSmashEncounter
ret c
jr .ok
@@ -582,7 +582,7 @@ CheckAPressOW: ; 96999
ret c
call TryReadSign
ret c
call Function97c5f
call CheckFacingTileEvent
ret c
xor a
ret

View File

@@ -44,7 +44,7 @@ Function97c4f:: ; 97c4f
ret
; 97c5f
Function97c5f:: ; 97c5f
CheckFacingTileEvent:: ; 97c5f
call GetFacingTileCoord
ld [EngineBuffer1], a
ld c, a
@@ -95,41 +95,41 @@ Function97c5f:: ; 97c5f
; 97cc0
Function97cc0:: ; 97cc0
RockSmashEncounter:: ; 97cc0
; Rock Smash encounter
call Function968c7
jr c, .asm_97ce2
call Function97cfd
jr nc, .asm_97ce2
jr c, .nope
call CanUseSweetScent
jr nc, .nope
ld hl, StatusFlags2
bit 2, [hl]
jr nz, .asm_97cdb
jr nz, .bug_contest
callba TryWildEncounter
jr nz, .asm_97ce2
jr .asm_97ce6
jr nz, .nope
jr .ok
.asm_97cdb
call Function97d23
jr nc, .asm_97ce2
jr .asm_97ced
.bug_contest
call _TryWildEncounter_BugContest
jr nc, .nope
jr .ok_bug_contest
.asm_97ce2
.nope
ld a, 1
and a
ret
.asm_97ce6
.ok
ld a, BANK(RockSmashBattleScript)
ld hl, RockSmashBattleScript
jr .asm_97cf4
jr .done
.asm_97ced
.ok_bug_contest
ld a, BANK(BugCatchingContestBattleScript)
ld hl, BugCatchingContestBattleScript
jr .asm_97cf4
jr .done
.asm_97cf4
.done
call CallScript
scf
ret
@@ -142,45 +142,45 @@ RockSmashBattleScript: ; 97cf9
end
; 97cfd
Function97cfd:: ; 97cfd
CanUseSweetScent:: ; 97cfd
ld hl, StatusFlags
bit 5, [hl]
jr nz, .asm_97d21
jr nz, .no
ld a, [wPermission]
cp $4
jr z, .asm_97d17
jr z, .ice_check
cp $7
jr z, .asm_97d17
jr z, .ice_check
callba Function149dd
jr nc, .asm_97d21
jr nc, .no
.asm_97d17
.ice_check
ld a, [StandingTile]
call CheckIceTile
jr z, .asm_97d21
jr z, .no
scf
ret
.asm_97d21
.no
and a
ret
; 97d23
Function97d23: ; 97d23
_TryWildEncounter_BugContest: ; 97d23
call TryWildEncounter_BugContest
ret nc
call Function97d31
call ChooseWildEncounter_BugContest
callba CheckRepelEffect
ret
; 97d31
Function97d31:: ; 97d31
ChooseWildEncounter_BugContest:: ; 97d31
; Pick a random mon out of ContestMons.
.asm_97d31
.loop
call Random
cp 100 << 1
jr nc, .asm_97d31
jr nc, .loop
srl a
ld hl, ContestMons
@@ -232,10 +232,10 @@ TryWildEncounter_BugContest: ; 97d64
ld a, [StandingTile]
call CheckSuperTallGrassTile
ld b, $66
jr z, .asm_97d70
jr z, .ok
ld b, $33
.asm_97d70
.ok
callba ApplyMusicEffectOnEncounterRate
callba ApplyCleanseTagEffectOnEncounterRate
call Random

View File

@@ -83,11 +83,11 @@ SpecialsPointers:: ; c029
add_special PlayMapMusic
add_special RestartMapMusic
add_special HealMachineAnim
add_special Function8379
add_special Functionc25a
add_special Functionc268
add_special Functionc276
add_special Functionc284
add_special Special_SurfStartStep
add_special Special_FindGreaterThanThatLevel
add_special Special_FindAtLeastThatHappy
add_special Special_FindThatSpecies
add_special Special_FindThatSpeciesYourTrainerID
add_special Functionc3ef
add_special Function17421
add_special Function17440
@@ -163,7 +163,7 @@ SpecialsPointers:: ; c029
add_special Function103612
add_special SpecialHoOhChamber
add_special Function102142
add_special Function4989a
add_special Special_CelebiShrineEvent
add_special Function49bf9
add_special SpecialPokeSeer
add_special SpecialBuenasPassword
@@ -225,40 +225,40 @@ SpecialSeenMon: ; c252
ret
; c25a
Functionc25a: ; c25a
Special_FindGreaterThanThatLevel: ; c25a
ld a, [ScriptVar]
ld b, a
callba Function4dbd2
jr z, Functionc298
jr Functionc292
callba _FindGreaterThanThatLevel
jr z, FoundNone
jr FoundOne
Functionc268: ; c268
Special_FindAtLeastThatHappy: ; c268
ld a, [ScriptVar]
ld b, a
callba Function4dbd9
jr z, Functionc298
jr Functionc292
callba _FindAtLeastThatHappy
jr z, FoundNone
jr FoundOne
Functionc276: ; c276
Special_FindThatSpecies: ; c276
ld a, [ScriptVar]
ld b, a
callba Function4dbe0
jr z, Functionc298
jr Functionc292
callba _FindThatSpecies
jr z, FoundNone
jr FoundOne
Functionc284: ; c284
Special_FindThatSpeciesYourTrainerID: ; c284
ld a, [ScriptVar]
ld b, a
callba Function4dbe6
jr z, Functionc298
jr Functionc292
callba _FindThatSpeciesYourTrainerID
jr z, FoundNone
jr FoundOne
Functionc292: ; c292
FoundOne: ; c292
ld a, $1
ld [ScriptVar], a
ret
Functionc298: ; c298
FoundNone: ; c298
xor a
ld [ScriptVar], a
ret