mirror of
https://gitlab.com/xCrystal/pokecrystal-board.git
synced 2025-04-09 05:44:44 -07:00
Merge pull request #311 from PikalaxALT/master
Bank 4 time functions moved out of main.asm
This commit is contained in:
yenatch
commit
7176eff7aa
@ -8786,7 +8786,7 @@ Function3f77c: ; 3f77c
|
||||
callba Function106187
|
||||
ld c, $c8
|
||||
call DelayFrames
|
||||
ld a, $1
|
||||
ld a, BANK(sLinkBattleStats)
|
||||
call GetSRAMBank
|
||||
call Function3fa42
|
||||
call Function3f85f
|
||||
@ -8861,7 +8861,7 @@ Function3f85f: ; 3f85f
|
||||
call .asm_3f8e0
|
||||
hlcoord 0, 8
|
||||
ld b, $5
|
||||
ld de, $b268
|
||||
ld de, sLinkBattleStats + $8
|
||||
.asm_3f870
|
||||
push bc
|
||||
push hl
|
||||
|
||||
@ -830,3 +830,10 @@ NUM_SPAWNS EQU const_value
|
||||
const SPRITEMOVEFN_1F
|
||||
const SPRITEMOVEFN_20
|
||||
const SPRITEMOVEFN_21
|
||||
|
||||
const_def
|
||||
const PALETTE_AUTO
|
||||
const PALETTE_DAY
|
||||
const PALETTE_NITE
|
||||
const PALETTE_MORN
|
||||
const PALETTE_DARK
|
||||
|
||||
@ -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
|
||||
|
||||
@ -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
|
||||
|
||||
@ -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
|
||||
@ -186,8 +186,8 @@ SpecialsPointers:: ; c029
|
||||
add_special Function4ae12
|
||||
add_special LoadMapPalettes
|
||||
add_special Function4a927
|
||||
add_special Function90a54
|
||||
add_special Function90a88
|
||||
add_special Special_InitialSetDSTFlag
|
||||
add_special Special_InitialClearDSTFlag
|
||||
add_special SpecialNone
|
||||
; c224
|
||||
|
||||
@ -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
|
||||
@ -314,9 +314,9 @@ Special_KrissHousePC: ; c2e7
|
||||
; c2f6
|
||||
|
||||
Special_CheckMysteryGift: ; c2f6
|
||||
ld a, BANK(s0_abe2)
|
||||
ld a, BANK(sMysteryGiftItem)
|
||||
call GetSRAMBank
|
||||
ld a, [s0_abe2]
|
||||
ld a, [sMysteryGiftItem]
|
||||
and a
|
||||
jr z, .no
|
||||
inc a
|
||||
@ -328,9 +328,9 @@ Special_CheckMysteryGift: ; c2f6
|
||||
; c309
|
||||
|
||||
Special_GetMysteryGiftItem: ; c309
|
||||
ld a, BANK(s0_abe2)
|
||||
ld a, BANK(sMysteryGiftItem)
|
||||
call GetSRAMBank
|
||||
ld a, [s0_abe2]
|
||||
ld a, [sMysteryGiftItem]
|
||||
ld [CurItem], a
|
||||
ld a, $1
|
||||
ld [wd10c], a
|
||||
@ -338,12 +338,12 @@ Special_GetMysteryGiftItem: ; c309
|
||||
call ReceiveItem
|
||||
jr nc, .asm_c33d
|
||||
xor a
|
||||
ld [s0_abe2], a
|
||||
ld [sMysteryGiftItem], a
|
||||
call CloseSRAM
|
||||
ld a, [CurItem]
|
||||
ld [wd265], a
|
||||
call GetItemName
|
||||
ld hl, UnknownText_0xc345
|
||||
ld hl, .ReceiveItemText
|
||||
call PrintText
|
||||
ld a, $1
|
||||
ld [ScriptVar], a
|
||||
@ -356,7 +356,7 @@ Special_GetMysteryGiftItem: ; c309
|
||||
ret
|
||||
; c345
|
||||
|
||||
UnknownText_0xc345: ; 0xc345
|
||||
.ReceiveItemText: ; 0xc345
|
||||
; received item
|
||||
text_jump UnknownText_0x1bd3be
|
||||
db "@"
|
||||
@ -639,8 +639,8 @@ Functionc4ac: ; c4ac
|
||||
; c4b9
|
||||
|
||||
SpecialTrainerHouse: ; 0xc4b9
|
||||
ld a, BANK(s0_abfd)
|
||||
ld a, BANK(sMysteryGiftTrainerHouseFlag)
|
||||
call GetSRAMBank
|
||||
ld a, [s0_abfd]
|
||||
ld a, [sMysteryGiftTrainerHouseFlag]
|
||||
ld [ScriptVar], a
|
||||
jp CloseSRAM
|
||||
|
||||
464
engine/time.asm
Executable file
464
engine/time.asm
Executable file
@ -0,0 +1,464 @@
|
||||
Function113d6: ; 113d6
|
||||
call Function114dd
|
||||
ret
|
||||
; 113da
|
||||
|
||||
Function113da: ; 113da
|
||||
xor a
|
||||
ld [wdc2d], a
|
||||
ld [wdc3a], a
|
||||
ld [wdc1c], a
|
||||
ret
|
||||
; 113e5
|
||||
|
||||
Function113e5:: ; 113e5
|
||||
xor a
|
||||
ld [wd464], a
|
||||
|
||||
Function113e9: ; 113e9
|
||||
ld a, [wd464]
|
||||
cp 3
|
||||
jr c, .asm_113f2
|
||||
ld a, 3
|
||||
|
||||
.asm_113f2
|
||||
ld e, a
|
||||
ld d, 0
|
||||
ld hl, .data_113fd
|
||||
add hl, de
|
||||
ld a, [hl]
|
||||
jp Function1142e
|
||||
; 113fd
|
||||
|
||||
.data_113fd
|
||||
db 20, 10, 5, 3
|
||||
; 11401
|
||||
|
||||
Function11401: ; 11401
|
||||
call Function1143c
|
||||
ret nc
|
||||
ld hl, wd464
|
||||
ld a, [hl]
|
||||
cp 3
|
||||
jr nc, .asm_1140e
|
||||
inc [hl]
|
||||
|
||||
.asm_1140e
|
||||
call Function113e9
|
||||
scf
|
||||
ret
|
||||
; 11413
|
||||
|
||||
Function11413: ; 11413
|
||||
ld a, 1
|
||||
|
||||
Function11415: ; 11415
|
||||
ld [hl], a
|
||||
push hl
|
||||
call UpdateTime
|
||||
pop hl
|
||||
inc hl
|
||||
call Function11621
|
||||
ret
|
||||
; 11420
|
||||
|
||||
Function11420: ; 11420
|
||||
inc hl
|
||||
push hl
|
||||
call Function115cf
|
||||
call Function115c8
|
||||
pop hl
|
||||
dec hl
|
||||
call Function11586
|
||||
ret
|
||||
; 1142e
|
||||
|
||||
Function1142e: ; 1142e
|
||||
ld hl, wd465
|
||||
ld [hl], a
|
||||
call UpdateTime
|
||||
ld hl, wd466
|
||||
call Function1162e
|
||||
ret
|
||||
; 1143c
|
||||
|
||||
Function1143c: ; 1143c
|
||||
ld hl, wd466
|
||||
call Function115d6
|
||||
call Function115ae
|
||||
ld hl, wd465
|
||||
call Function11586
|
||||
ret
|
||||
; 1144c
|
||||
|
||||
Function1144c: ; 1144c
|
||||
ld hl, wdc1c
|
||||
jp Function11413
|
||||
; 11452
|
||||
|
||||
Function11452:: ; 11452
|
||||
ld hl, wdc1c
|
||||
call Function11420
|
||||
ret nc
|
||||
xor a
|
||||
ld hl, DailyFlags
|
||||
rept 3
|
||||
ld [hli], a
|
||||
endr
|
||||
ld [hl], a
|
||||
ld hl, wDailyRematchFlags
|
||||
rept 4
|
||||
ld [hli], a
|
||||
endr
|
||||
ld hl, wDailyPhoneItemFlags
|
||||
rept 4
|
||||
ld [hli], a
|
||||
endr
|
||||
ld hl, wDailyPhoneTimeOfDayFlags
|
||||
rept 4
|
||||
ld [hli], a
|
||||
endr
|
||||
ld hl, wdc58
|
||||
ld a, [hl]
|
||||
and a
|
||||
jr z, .asm_11480
|
||||
dec [hl]
|
||||
jr nz, .asm_11483
|
||||
|
||||
.asm_11480
|
||||
call Function11485
|
||||
|
||||
.asm_11483
|
||||
jr Function1144c
|
||||
; 11485
|
||||
|
||||
Function11485: ; 11485
|
||||
call Random
|
||||
and 3
|
||||
add 3
|
||||
ld [wdc58], a
|
||||
ret
|
||||
; 11490
|
||||
|
||||
Function11490: ; 11490
|
||||
ld a, $14
|
||||
ld [wd46c], a
|
||||
ld a, $0
|
||||
ld [wd46d], a
|
||||
call UpdateTime
|
||||
ld hl, wdc35
|
||||
call Function11613
|
||||
ret
|
||||
; 114a4
|
||||
|
||||
|
||||
Function114a4:: ; 114a4 (4:54a4)
|
||||
ld hl, wdc35
|
||||
call Function115db
|
||||
ld a, [wcfd7]
|
||||
and a
|
||||
jr nz, .asm_114d4
|
||||
ld a, [wcfd6]
|
||||
and a
|
||||
jr nz, .asm_114d4
|
||||
ld a, [wcfd4]
|
||||
ld b, a
|
||||
ld a, [wd46d]
|
||||
sub b
|
||||
jr nc, .asm_114c2
|
||||
add $3c
|
||||
.asm_114c2
|
||||
ld [wd46d], a
|
||||
ld a, [wcfd5]
|
||||
ld b, a
|
||||
ld a, [wd46c]
|
||||
sbc b
|
||||
ld [wd46c], a
|
||||
jr c, .asm_114d4
|
||||
and a
|
||||
ret
|
||||
.asm_114d4
|
||||
xor a
|
||||
ld [wd46c], a
|
||||
ld [wd46d], a
|
||||
scf
|
||||
ret
|
||||
|
||||
|
||||
Function114dd: ; 114dd
|
||||
call UpdateTime
|
||||
ld hl, wdc23
|
||||
call Function11621
|
||||
ret
|
||||
; 114e7
|
||||
|
||||
Function114e7:: ; 114e7
|
||||
ld hl, wdc23
|
||||
call Function115cf
|
||||
call Function115c8
|
||||
and a
|
||||
jr z, .asm_114fa
|
||||
|
||||
ld b, a
|
||||
callba ApplyPokerusTick
|
||||
|
||||
.asm_114fa
|
||||
xor a
|
||||
ret
|
||||
; 114fc
|
||||
|
||||
Function114fc: ; 114fc
|
||||
ld a, $2
|
||||
ld hl, wdc3a
|
||||
ld [hl], a
|
||||
call UpdateTime
|
||||
ld hl, wdc3b
|
||||
call Function11621
|
||||
ret
|
||||
; 1150c
|
||||
|
||||
Function1150c: ; 1150c
|
||||
ld hl, wdc3b
|
||||
call Function115cf
|
||||
call Function115c8
|
||||
ld hl, wdc3a
|
||||
call Function11586
|
||||
ret
|
||||
; 1151c
|
||||
|
||||
Function1151c: ; 1151c
|
||||
ld hl, DailyFlags
|
||||
set 2, [hl]
|
||||
ret
|
||||
; 11522
|
||||
|
||||
Function11522: ; 11522
|
||||
and a
|
||||
ld hl, DailyFlags
|
||||
bit 2, [hl]
|
||||
ret nz
|
||||
scf
|
||||
ret
|
||||
; 1152b
|
||||
|
||||
Function1152b: ; 1152b
|
||||
call Function11534
|
||||
ld hl, wdc2d
|
||||
jp Function11415
|
||||
; 11534
|
||||
|
||||
Function11534: ; 11534
|
||||
call GetWeekday
|
||||
ld c, a
|
||||
ld a, $5
|
||||
sub c
|
||||
jr z, .asm_1153f
|
||||
jr nc, .asm_11541
|
||||
|
||||
.asm_1153f
|
||||
add $7
|
||||
|
||||
.asm_11541
|
||||
ret
|
||||
; 11542
|
||||
|
||||
Function11542: ; 11542
|
||||
ld hl, wdc2d
|
||||
jp Function11420
|
||||
; 11548
|
||||
|
||||
Function11548: ; 11548
|
||||
ld a, BANK(s0_abfa)
|
||||
call GetSRAMBank
|
||||
ld hl, s0_abfa
|
||||
ld a, [hli]
|
||||
ld [Buffer1], a
|
||||
ld a, [hl]
|
||||
ld [Buffer2], a
|
||||
call CloseSRAM
|
||||
ld hl, Buffer1
|
||||
call Function11420
|
||||
jr nc, .asm_11572
|
||||
ld hl, Buffer1
|
||||
call Function11413
|
||||
call CloseSRAM
|
||||
callba Function1050c8
|
||||
|
||||
.asm_11572
|
||||
ld a, BANK(s0_abfa)
|
||||
call GetSRAMBank
|
||||
ld hl, Buffer1
|
||||
ld a, [hli]
|
||||
ld [s0_abfa], a
|
||||
ld a, [hl]
|
||||
ld [s0_abfa + 1], a
|
||||
call CloseSRAM
|
||||
ret
|
||||
; 11586
|
||||
|
||||
Function11586: ; 11586
|
||||
cp -1
|
||||
jr z, .skip
|
||||
ld c, a
|
||||
ld a, [hl]
|
||||
sub c
|
||||
jr nc, .ok
|
||||
xor a
|
||||
|
||||
.ok
|
||||
ld [hl], a
|
||||
jr z, .skip
|
||||
xor a
|
||||
ret
|
||||
|
||||
.skip
|
||||
xor a
|
||||
ld [hl], a
|
||||
scf
|
||||
ret
|
||||
; 11599
|
||||
|
||||
Function11599: ; 11599
|
||||
ld a, [wcfd7]
|
||||
and a
|
||||
jr nz, Function115cc
|
||||
ld a, [wcfd6]
|
||||
and a
|
||||
jr nz, Function115cc
|
||||
ld a, [wcfd5]
|
||||
jr nz, Function115cc
|
||||
ld a, [wcfd4]
|
||||
ret
|
||||
; 115ae
|
||||
|
||||
Function115ae: ; 115ae
|
||||
ld a, [wcfd7]
|
||||
and a
|
||||
jr nz, Function115cc
|
||||
ld a, [wcfd6]
|
||||
and a
|
||||
jr nz, Function115cc
|
||||
ld a, [wcfd5]
|
||||
ret
|
||||
; 115be
|
||||
|
||||
Function115be: ; 115be
|
||||
ld a, [wcfd7]
|
||||
and a
|
||||
jr nz, Function115cc
|
||||
ld a, [wcfd6]
|
||||
ret
|
||||
; 115c8
|
||||
|
||||
Function115c8: ; 115c8
|
||||
ld a, [wcfd7]
|
||||
ret
|
||||
; 115cc
|
||||
|
||||
Function115cc: ; 115cc
|
||||
ld a, $ff
|
||||
ret
|
||||
; 115cf
|
||||
|
||||
Function115cf: ; 115cf
|
||||
xor a
|
||||
jr Function11605
|
||||
; 115d2
|
||||
|
||||
Function115d2: ; 115d2
|
||||
inc hl
|
||||
xor a
|
||||
jr Function115f8
|
||||
; 115d6
|
||||
|
||||
Function115d6: ; 115d6
|
||||
rept 2
|
||||
inc hl
|
||||
endr
|
||||
xor a
|
||||
jr Function115eb
|
||||
; 115db
|
||||
|
||||
Function115db: ; 115db
|
||||
rept 3
|
||||
inc hl
|
||||
endr
|
||||
ld a, [hSeconds]
|
||||
ld c, a
|
||||
sub [hl]
|
||||
jr nc, .asm_115e6
|
||||
add 60
|
||||
.asm_115e6
|
||||
ld [hl], c
|
||||
dec hl
|
||||
ld [wcfd4], a
|
||||
|
||||
Function115eb: ; 115eb
|
||||
ld a, [hMinutes]
|
||||
ld c, a
|
||||
sbc [hl]
|
||||
jr nc, .asm_115f3
|
||||
add 60
|
||||
.asm_115f3
|
||||
ld [hl], c
|
||||
dec hl
|
||||
ld [wcfd5], a
|
||||
|
||||
Function115f8: ; 115f8
|
||||
ld a, [hHours]
|
||||
ld c, a
|
||||
sbc [hl]
|
||||
jr nc, .asm_11600
|
||||
add 24
|
||||
.asm_11600
|
||||
ld [hl], c
|
||||
dec hl
|
||||
ld [wcfd6], a
|
||||
|
||||
Function11605
|
||||
ld a, [CurDay]
|
||||
ld c, a
|
||||
sbc [hl]
|
||||
jr nc, .skip
|
||||
add 20 * 7
|
||||
.skip
|
||||
ld [hl], c
|
||||
ld [wcfd7], a
|
||||
ret
|
||||
; 11613
|
||||
|
||||
Function11613: ; 11613
|
||||
ld a, [CurDay]
|
||||
ld [hli], a
|
||||
ld a, [hHours]
|
||||
ld [hli], a
|
||||
ld a, [hMinutes]
|
||||
ld [hli], a
|
||||
ld a, [hSeconds]
|
||||
ld [hli], a
|
||||
ret
|
||||
; 11621
|
||||
|
||||
Function11621: ; 11621
|
||||
ld a, [CurDay]
|
||||
ld [hl], a
|
||||
ret
|
||||
; 11626
|
||||
|
||||
Function11626: ; 11626
|
||||
ld a, [CurDay]
|
||||
ld [hli], a
|
||||
ld a, [hHours]
|
||||
ld [hli], a
|
||||
ret
|
||||
; 1162e
|
||||
|
||||
Function1162e: ; 1162e
|
||||
ld a, [CurDay]
|
||||
ld [hli], a
|
||||
ld a, [hHours]
|
||||
ld [hli], a
|
||||
ld a, [hMinutes]
|
||||
ld [hli], a
|
||||
ret
|
||||
; 11639
|
||||
158
home/text.asm
158
home/text.asm
@ -221,49 +221,65 @@ else
|
||||
endc
|
||||
jp z, \2
|
||||
endm
|
||||
dict $15, Char15
|
||||
dict $4f, Line
|
||||
dict $4e, NextLine
|
||||
dict $16, Char16
|
||||
|
||||
dict2: macro
|
||||
if \1 == 0
|
||||
and a
|
||||
else
|
||||
cp \1
|
||||
endc
|
||||
jr nz, \@
|
||||
ld a, \2
|
||||
\@:
|
||||
endm
|
||||
|
||||
dict3: macro
|
||||
if \1 == 0
|
||||
and a
|
||||
else
|
||||
cp \1
|
||||
endc
|
||||
jr z, \2
|
||||
endm
|
||||
|
||||
dict "<DAY>", Char15
|
||||
dict "<LINE>", LineChar
|
||||
dict "<NEXT>", NextLineChar
|
||||
dict TX_FAR, TextFar
|
||||
dict $00, NullChar
|
||||
dict $4c, Function1337
|
||||
dict $4c, Char4C
|
||||
dict $4b, Char4B
|
||||
dict $51, Paragraph
|
||||
dict $49, PrintMomsName
|
||||
dict $52, PrintPlayerName
|
||||
dict $53, PrintRivalName
|
||||
dict "<PARA>", Paragraph
|
||||
dict "<MOM>", PrintMomsName
|
||||
dict "<PLAYER>", PrintPlayerName
|
||||
dict "<RIVAL>", PrintRivalName
|
||||
dict $35, Char35
|
||||
dict $36, Char36
|
||||
dict $37, Char37
|
||||
dict $38, PrintRedsName
|
||||
dict $39, PrintGreensName
|
||||
dict $54, Char54
|
||||
dict $5b, Char5B
|
||||
dict $5e, Char5E
|
||||
dict $5c, Char5C
|
||||
dict $5d, Char5D
|
||||
dict "<RED>", PrintRedsName
|
||||
dict "<GREEN>", PrintGreensName
|
||||
dict "#", PlacePOKe
|
||||
dict "<PC>", PCChar
|
||||
dict "<ROCKET>", RocketChar
|
||||
dict "<TM>", TMChar
|
||||
dict "<TRNER>", TrainerChar
|
||||
dict $23, Char23
|
||||
dict $22, Char22
|
||||
dict $55, ContText
|
||||
dict $56, Char56
|
||||
dict $57, DoneText
|
||||
dict $58, PromptText
|
||||
dict $4a, Char4A
|
||||
dict $24, Char24
|
||||
dict "<CONT>", ContText
|
||||
dict "<......>", SixDotsChar
|
||||
dict "<DONE>", DoneText
|
||||
dict "<PROMPT>", PromptText
|
||||
dict "<PKMN>", PlacePKMN
|
||||
dict $24, PlacePOKE
|
||||
dict $25, NextChar
|
||||
cp $1f
|
||||
jr nz, .ok
|
||||
ld a, $7f
|
||||
.ok
|
||||
dict2 $1f, " "
|
||||
dict $5f, Char5F
|
||||
dict $59, Char59
|
||||
dict $5a, Char5A
|
||||
dict $3f, Char3F
|
||||
dict $14, Char14
|
||||
cp $e4 ; handakuten
|
||||
jr z, .place
|
||||
cp $e5 ; dakuten
|
||||
jr z, .place
|
||||
dict "<TARGET>", PlaceMoveTargetsName
|
||||
dict "<USER>", PlaceMoveUsersName
|
||||
dict "<ENEMY>", PlaceEnemysName
|
||||
dict "<PLAY_G>", PlaceGenderedPlayerName
|
||||
dict3 $e4, .place
|
||||
dict3 $e5, .place
|
||||
|
||||
jr .nope
|
||||
ld b, a
|
||||
@ -319,7 +335,7 @@ Char15:: ; 117b
|
||||
print_name: macro
|
||||
push de
|
||||
ld de, \1
|
||||
jp Function126a
|
||||
jp PlaceCommandCharacter
|
||||
endm
|
||||
|
||||
PrintMomsName: print_name MomsName ; 1186
|
||||
@ -328,46 +344,46 @@ PrintRivalName: print_name RivalName ; 1194
|
||||
PrintRedsName: print_name RedsName ; 119b
|
||||
PrintGreensName: print_name GreensName ; 11a2
|
||||
|
||||
Char5D: print_name Char5DText ; 11a9
|
||||
Char5C: print_name Char5CText ; 11b0
|
||||
Char5B: print_name Char5BText ; 11b7
|
||||
Char5E: print_name Char5EText ; 11be
|
||||
Char54: print_name Char54Text ; 11c5
|
||||
TrainerChar: print_name TrainerCharText ; 11a9
|
||||
TMChar: print_name TMCharText ; 11b0
|
||||
PCChar: print_name PCCharText ; 11b7
|
||||
RocketChar: print_name RocketCharText ; 11be
|
||||
PlacePOKe: print_name PlacePOKeText ; 11c5
|
||||
Char23: print_name Char23Text ; 11cc
|
||||
Char56: print_name Char56Text ; 11d3
|
||||
Char4A: print_name Char4AText ; 11da
|
||||
Char24: print_name Char24Text ; 11e1
|
||||
SixDotsChar: print_name SixDotsCharText ; 11d3
|
||||
PlacePKMN: print_name PlacePKMNText ; 11da
|
||||
PlacePOKE: print_name PlacePOKEText ; 11e1
|
||||
Char35: print_name Char35Text ; 11e8
|
||||
Char36: print_name Char36Text ; 11ef
|
||||
Char37: print_name Char37Text ; 11f6
|
||||
|
||||
|
||||
Char59:: ; 11fd
|
||||
PlaceMoveTargetsName:: ; 11fd
|
||||
ld a, [hBattleTurn]
|
||||
xor 1
|
||||
jr Char59_5A
|
||||
jr PlaceMoveTargetsName_5A
|
||||
|
||||
Char5A:: ; 1203
|
||||
PlaceMoveUsersName:: ; 1203
|
||||
ld a, [hBattleTurn]
|
||||
|
||||
Char59_5A: ; 1205
|
||||
PlaceMoveTargetsName_5A: ; 1205
|
||||
push de
|
||||
and a
|
||||
jr nz, .enemy
|
||||
|
||||
ld de, BattleMonNick
|
||||
jr Function126a
|
||||
jr PlaceCommandCharacter
|
||||
|
||||
.enemy
|
||||
ld de, Char5AText ; Enemy
|
||||
ld de, EnemyText ; Enemy
|
||||
call PlaceString
|
||||
ld h, b
|
||||
ld l, c
|
||||
ld de, EnemyMonNick
|
||||
jr Function126a
|
||||
jr PlaceCommandCharacter
|
||||
|
||||
|
||||
Char3F:: ; 121b
|
||||
PlaceEnemysName:: ; 121b
|
||||
push de
|
||||
|
||||
ld a, [InLinkBattle]
|
||||
@ -390,18 +406,18 @@ Char3F:: ; 121b
|
||||
callab Battle_GetTrainerName
|
||||
pop hl
|
||||
ld de, StringBuffer1
|
||||
jr Function126a
|
||||
jr PlaceCommandCharacter
|
||||
|
||||
.rival
|
||||
ld de, RivalName
|
||||
jr Function126a
|
||||
jr PlaceCommandCharacter
|
||||
|
||||
.linkbattle
|
||||
ld de, OTName
|
||||
jr Function126a
|
||||
jr PlaceCommandCharacter
|
||||
|
||||
|
||||
Char14:: ; 1252
|
||||
PlaceGenderedPlayerName:: ; 1252
|
||||
push de
|
||||
ld de, PlayerName
|
||||
call PlaceString
|
||||
@ -410,12 +426,12 @@ Char14:: ; 1252
|
||||
ld a, [PlayerGender]
|
||||
bit 0, a
|
||||
ld de, String12a5
|
||||
jr z, Function126a
|
||||
jr z, PlaceCommandCharacter
|
||||
ld de, String12a6
|
||||
jr Function126a
|
||||
jr PlaceCommandCharacter
|
||||
|
||||
|
||||
Function126a:: ; 126a
|
||||
PlaceCommandCharacter:: ; 126a
|
||||
call PlaceString
|
||||
ld h, b
|
||||
ld l, c
|
||||
@ -423,16 +439,16 @@ Function126a:: ; 126a
|
||||
jp NextChar
|
||||
; 0x1273
|
||||
|
||||
Char5CText:: db "TM@" ; 1273
|
||||
Char5DText:: db "TRAINER@" ; 1276
|
||||
Char5BText:: db "PC@" ; 127e
|
||||
Char5EText:: db "ROCKET@" ; 1281
|
||||
Char54Text:: db "POKé@" ; 1288
|
||||
TMCharText:: db "TM@" ; 1273
|
||||
TrainerCharText:: db "TRAINER@" ; 1276
|
||||
PCCharText:: db "PC@" ; 127e
|
||||
RocketCharText:: db "ROCKET@" ; 1281
|
||||
PlacePOKeText:: db "POKé@" ; 1288
|
||||
Char23Text:: db "こうげき@" ; 128d
|
||||
Char56Text:: db "……@" ; 1292
|
||||
Char5AText:: db "Enemy @" ; 1295
|
||||
Char4AText:: db $e1, $e2, "@" ; PK MN ; 129c
|
||||
Char24Text:: db $70, $71, "@" ; PO KE ; 129f
|
||||
SixDotsCharText:: db "……@" ; 1292
|
||||
EnemyText:: db "Enemy @" ; 1295
|
||||
PlacePKMNText:: db "<PK><MN>@" ; PK MN ; 129c
|
||||
PlacePOKEText:: db "<PO><KE>@" ; PO KE ; 129f
|
||||
String12a2:: db " @" ; 12a2
|
||||
Char35Text::
|
||||
Char36Text::
|
||||
@ -441,7 +457,7 @@ String12a5:: db "@" ; 12a5
|
||||
String12a6:: db "@" ; 12a6
|
||||
; 12a7
|
||||
|
||||
NextLine:: ; 12a7
|
||||
NextLineChar:: ; 12a7
|
||||
pop hl
|
||||
ld bc, SCREEN_WIDTH * 2
|
||||
add hl, bc
|
||||
@ -457,7 +473,7 @@ Char22:: ; 12b0
|
||||
jp NextChar
|
||||
; 12b9
|
||||
|
||||
Char16:: ; 12b9
|
||||
TextFar:: ; 12b9
|
||||
pop hl
|
||||
push de
|
||||
ld bc, -TileMap + $10000
|
||||
@ -500,7 +516,7 @@ Char16:: ; 12b9
|
||||
; 12ea
|
||||
|
||||
|
||||
Line:: ; 12ea
|
||||
LineChar:: ; 12ea
|
||||
pop hl
|
||||
hlcoord TEXTBOX_INNERX, TEXTBOX_INNERY + 2
|
||||
push hl
|
||||
@ -549,7 +565,7 @@ Char4B:: ; 131f
|
||||
or a
|
||||
call z, Function13cd
|
||||
|
||||
Function1337:: ; 1337
|
||||
Char4C:: ; 1337
|
||||
push de
|
||||
call Function138c
|
||||
call Function138c
|
||||
|
||||
@ -658,27 +658,27 @@ endr
|
||||
ld b, $0
|
||||
callba Function116c1
|
||||
|
||||
ld a, $1
|
||||
ld a, BANK(sBoxMonNicknames)
|
||||
call GetSRAMBank
|
||||
|
||||
ld hl, wd050
|
||||
ld de, $b082
|
||||
ld bc, $000b
|
||||
ld de, sBoxMonNicknames
|
||||
ld bc, PKMN_NAME_LENGTH
|
||||
call CopyBytes
|
||||
|
||||
ld hl, $b082
|
||||
ld hl, sBoxMonNicknames
|
||||
ld de, StringBuffer1
|
||||
call InitName
|
||||
|
||||
call CloseSRAM
|
||||
|
||||
.asm_ebaf
|
||||
ld a, $1
|
||||
ld a, BANK(sBoxMonNicknames)
|
||||
call GetSRAMBank
|
||||
|
||||
ld hl, $b082
|
||||
ld hl, sBoxMonNicknames
|
||||
ld de, wd050
|
||||
ld bc, $000b
|
||||
ld bc, PKMN_NAME_LENGTH
|
||||
call CopyBytes
|
||||
|
||||
call CloseSRAM
|
||||
|
||||
@ -104,6 +104,13 @@ dwcoord: MACRO
|
||||
endr
|
||||
ENDM
|
||||
|
||||
ldcoord: MACRO
|
||||
if _NARG < 3
|
||||
ld [TileMap + SCREEN_WIDTH * (\2) + (\1)], a
|
||||
else
|
||||
ld [\3 + SCREEN_WIDTH * (\2) + (\1)], a
|
||||
endc
|
||||
ENDM
|
||||
|
||||
; pic animations
|
||||
frame: MACRO
|
||||
|
||||
@ -282,5 +282,22 @@
|
||||
charmap "<USER>", $5a
|
||||
charmap "<ENEMY>", $3f
|
||||
charmap "<PKMN>", $4a
|
||||
|
||||
charmap "<PK>", $e1
|
||||
charmap "<MN>", $e2
|
||||
charmap "<PO>", $70
|
||||
charmap "<KE>", $71
|
||||
charmap "<MOM>", $49
|
||||
charmap "<POKE>", $24
|
||||
charmap "<PLAY_G>", $14 ; <PLAYER> + gender
|
||||
charmap "<PARA>", $51
|
||||
charmap "<LINE>", $4f
|
||||
charmap "<NEXT>", $4e
|
||||
charmap "<CONT>", $55
|
||||
charmap "<DONE>", $57
|
||||
charmap "<PROMPT>", $58
|
||||
charmap "<DAY>", $15
|
||||
charmap "<PC>", $5b
|
||||
charmap "<TM>", $5c
|
||||
charmap "<TRNER>", $5d
|
||||
charmap "<ROCKET>", $5e
|
||||
charmap "<......>", $56
|
||||
|
||||
@ -300,12 +300,20 @@ givepoke: macro
|
||||
db givepoke_command
|
||||
db \1 ; pokemon
|
||||
db \2 ; level
|
||||
if _NARG >= 3
|
||||
db \3 ; item
|
||||
if _NARG >= 4
|
||||
db \4 ; trainer
|
||||
if \4
|
||||
dw \5 ; trainer_name_pointer
|
||||
dw \6 ; pkmn_nickname
|
||||
endc
|
||||
else
|
||||
db 0
|
||||
endc
|
||||
else
|
||||
db 0, 0
|
||||
endc
|
||||
endm
|
||||
|
||||
enum giveegg_command
|
||||
|
||||
@ -147,7 +147,7 @@ UnknownScript_0x727ed:
|
||||
closetext
|
||||
writebyte PIKACHU
|
||||
special Special_GameCornerPrizeMonCheckDex
|
||||
givepoke PIKACHU, 25, 0, 0
|
||||
givepoke PIKACHU, 25
|
||||
takecoins 2222
|
||||
jump UnknownScript_0x727d3
|
||||
|
||||
@ -165,7 +165,7 @@ UnknownScript_0x7281b:
|
||||
closetext
|
||||
writebyte PORYGON
|
||||
special Special_GameCornerPrizeMonCheckDex
|
||||
givepoke PORYGON, 15, 0, 0
|
||||
givepoke PORYGON, 15
|
||||
takecoins 5555
|
||||
jump UnknownScript_0x727d3
|
||||
|
||||
@ -183,7 +183,7 @@ UnknownScript_0x72849:
|
||||
closetext
|
||||
writebyte LARVITAR
|
||||
special Special_GameCornerPrizeMonCheckDex
|
||||
givepoke LARVITAR, 40, 0, 0
|
||||
givepoke LARVITAR, 40
|
||||
takecoins 8888
|
||||
jump UnknownScript_0x727d3
|
||||
|
||||
|
||||
@ -211,7 +211,7 @@ ElderScript_0x18d1a5:
|
||||
writetext UnknownText_0x18d697
|
||||
playsound SFX_CAUGHT_MON
|
||||
waitbutton
|
||||
givepoke DRATINI, 15, 0, 0
|
||||
givepoke DRATINI, 15
|
||||
checkevent EVENT_ANSWERED_DRAGON_MASTER_QUIZ_WRONG
|
||||
special SpecialDratini
|
||||
setevent EVENT_GOT_DRATINI
|
||||
|
||||
@ -105,10 +105,10 @@ ElmCheckEverstone:
|
||||
checkevent EVENT_TOLD_ELM_ABOUT_TOGEPI_OVER_THE_PHONE
|
||||
iffalse ElmCheckTogepiEgg
|
||||
writebyte TOGEPI
|
||||
special Functionc284
|
||||
special Special_FindThatSpeciesYourTrainerID
|
||||
iftrue ShowElmTogepiScript
|
||||
writebyte TOGETIC
|
||||
special Functionc284
|
||||
special Special_FindThatSpeciesYourTrainerID
|
||||
iftrue ShowElmTogepiScript
|
||||
writetext UnknownText_0x79a40
|
||||
closetext
|
||||
@ -117,10 +117,10 @@ ElmCheckEverstone:
|
||||
|
||||
ElmEggHatchedScript:
|
||||
writebyte TOGEPI
|
||||
special Functionc284
|
||||
special Special_FindThatSpeciesYourTrainerID
|
||||
iftrue ShowElmTogepiScript
|
||||
writebyte TOGETIC
|
||||
special Functionc284
|
||||
special Special_FindThatSpeciesYourTrainerID
|
||||
iftrue ShowElmTogepiScript
|
||||
jump ElmCheckGotEggAgain
|
||||
|
||||
@ -177,7 +177,7 @@ CyndaquilPokeBallScript:
|
||||
playsound SFX_CAUGHT_MON
|
||||
waitbutton
|
||||
keeptextopen
|
||||
givepoke CYNDAQUIL, 5, BERRY, 0
|
||||
givepoke CYNDAQUIL, 5, BERRY
|
||||
loadmovesprites
|
||||
checkcode VAR_FACING
|
||||
if_equal $3, ElmDirectionsScript
|
||||
@ -207,7 +207,7 @@ TotodilePokeBallScript:
|
||||
playsound SFX_CAUGHT_MON
|
||||
waitbutton
|
||||
keeptextopen
|
||||
givepoke TOTODILE, 5, BERRY, 0
|
||||
givepoke TOTODILE, 5, BERRY
|
||||
loadmovesprites
|
||||
applymovement PLAYER, AfterTotodileMovement
|
||||
jump ElmDirectionsScript
|
||||
@ -235,7 +235,7 @@ ChikoritaPokeBallScript:
|
||||
playsound SFX_CAUGHT_MON
|
||||
waitbutton
|
||||
keeptextopen
|
||||
givepoke CHIKORITA, 5, BERRY, 0
|
||||
givepoke CHIKORITA, 5, BERRY
|
||||
loadmovesprites
|
||||
applymovement PLAYER, AfterChikoritaMovement
|
||||
jump ElmDirectionsScript
|
||||
|
||||
@ -176,7 +176,7 @@ UnknownScript_0x56d26:
|
||||
closetext
|
||||
writebyte ABRA
|
||||
special Special_GameCornerPrizeMonCheckDex
|
||||
givepoke ABRA, 5, 0, 0
|
||||
givepoke ABRA, 5
|
||||
takecoins 100
|
||||
jump UnknownScript_0x56d0c
|
||||
|
||||
@ -194,7 +194,7 @@ UnknownScript_0x56d54:
|
||||
closetext
|
||||
writebyte CUBONE
|
||||
special Special_GameCornerPrizeMonCheckDex
|
||||
givepoke CUBONE, 15, 0, 0
|
||||
givepoke CUBONE, 15
|
||||
takecoins 800
|
||||
jump UnknownScript_0x56d0c
|
||||
|
||||
@ -212,7 +212,7 @@ UnknownScript_0x56d82:
|
||||
closetext
|
||||
writebyte WOBBUFFET
|
||||
special Special_GameCornerPrizeMonCheckDex
|
||||
givepoke WOBBUFFET, 15, 0, 0
|
||||
givepoke WOBBUFFET, 15
|
||||
takecoins 1500
|
||||
jump UnknownScript_0x56d0c
|
||||
|
||||
|
||||
@ -455,7 +455,7 @@ UnknownScript_0x6ee42:
|
||||
spriteface PLAYER, DOWN
|
||||
pause 20
|
||||
clearflag ENGINE_HAVE_EXAMINED_GS_BALL
|
||||
special Function4989a
|
||||
special Special_CelebiShrineEvent
|
||||
loadpokedata CELEBI, 30
|
||||
startbattle
|
||||
returnafterbattle
|
||||
|
||||
@ -48,13 +48,13 @@ UnknownScript_0x7a519:
|
||||
writetext UnknownText_0x7a742
|
||||
yesorno
|
||||
iffalse UnknownScript_0x7a52a
|
||||
special Function90a54
|
||||
special Special_InitialSetDSTFlag
|
||||
yesorno
|
||||
iffalse UnknownScript_0x7a519
|
||||
jump UnknownScript_0x7a531
|
||||
|
||||
UnknownScript_0x7a52a:
|
||||
special Function90a88
|
||||
special Special_InitialClearDSTFlag
|
||||
yesorno
|
||||
iffalse UnknownScript_0x7a519
|
||||
UnknownScript_0x7a531:
|
||||
|
||||
@ -37,7 +37,7 @@ UnknownScript_0x19a6d7:
|
||||
|
||||
UnknownScript_0x19a6e0:
|
||||
writebyte MAGIKARP
|
||||
special Functionc276
|
||||
special Special_FindThatSpecies
|
||||
iffalse UnknownScript_0x19a6d7
|
||||
writetext UnknownText_0x19a93e
|
||||
closetext
|
||||
|
||||
@ -30,7 +30,7 @@ UnknownScript_0x7e217:
|
||||
writetext UnknownText_0x7e355
|
||||
playsound SFX_CAUGHT_MON
|
||||
waitbutton
|
||||
givepoke TYROGUE, 10, 0, 0
|
||||
givepoke TYROGUE, 10
|
||||
setevent EVENT_GOT_TYROGUE_FROM_KIYO
|
||||
UnknownScript_0x7e231:
|
||||
writetext UnknownText_0x7e36a
|
||||
|
||||
Some files were not shown because too many files have changed in this diff Show More
Loading…
x
Reference in New Issue
Block a user