mirror of
https://gitlab.com/xCrystal/pokecrystal-board.git
synced 2025-04-09 05:44:44 -07:00
commit
8c435054a0
@ -1,7 +1,7 @@
|
|||||||
; wInputType:: ; c2c7
|
; wInputType:: ; c2c7
|
||||||
AUTO_INPUT EQU $ff
|
AUTO_INPUT EQU $ff
|
||||||
|
|
||||||
; wCurrentDexMode:: ; c7d4
|
; wCurDexMode:: ; c7d4
|
||||||
const_def
|
const_def
|
||||||
const DEXMODE_NEW
|
const DEXMODE_NEW
|
||||||
const DEXMODE_OLD
|
const DEXMODE_OLD
|
||||||
|
@ -32,7 +32,7 @@ CelebiShrineEvent:
|
|||||||
inc d
|
inc d
|
||||||
push de
|
push de
|
||||||
ld a, 36 * SPRITEOAMSTRUCT_LENGTH
|
ld a, 36 * SPRITEOAMSTRUCT_LENGTH
|
||||||
ld [wCurrSpriteOAMAddr], a
|
ld [wCurSpriteOAMAddr], a
|
||||||
farcall DoNextFrameForAllSprites
|
farcall DoNextFrameForAllSprites
|
||||||
call CelebiEvent_CountDown
|
call CelebiEvent_CountDown
|
||||||
ld c, 2
|
ld c, 2
|
||||||
|
@ -10,15 +10,15 @@ CheckForHiddenItems:
|
|||||||
add SCREEN_HEIGHT / 4
|
add SCREEN_HEIGHT / 4
|
||||||
ld [wBuffer3], a
|
ld [wBuffer3], a
|
||||||
; Get the pointer for the first bg_event in the map...
|
; Get the pointer for the first bg_event in the map...
|
||||||
ld hl, wCurrMapBGEventsPointer
|
ld hl, wCurMapBGEventsPointer
|
||||||
ld a, [hli]
|
ld a, [hli]
|
||||||
ld h, [hl]
|
ld h, [hl]
|
||||||
ld l, a
|
ld l, a
|
||||||
; ... before even checking to see if there are any BG events on this map.
|
; ... before even checking to see if there are any BG events on this map.
|
||||||
ld a, [wCurrMapBGEventCount]
|
ld a, [wCurMapBGEventCount]
|
||||||
and a
|
and a
|
||||||
jr z, .nobgeventitems
|
jr z, .nobgeventitems
|
||||||
; For i = 1:wCurrMapBGEventCount...
|
; For i = 1:wCurMapBGEventCount...
|
||||||
.loop
|
.loop
|
||||||
; Store the counter in wBuffer2, and store the bg_event pointer in the stack.
|
; Store the counter in wBuffer2, and store the bg_event pointer in the stack.
|
||||||
ld [wBuffer2], a
|
ld [wBuffer2], a
|
||||||
|
@ -38,7 +38,7 @@ ShakeHeadbuttTree:
|
|||||||
add hl, bc
|
add hl, bc
|
||||||
ld [hl], FIELDMOVE_TREE
|
ld [hl], FIELDMOVE_TREE
|
||||||
ld a, 36 * SPRITEOAMSTRUCT_LENGTH
|
ld a, 36 * SPRITEOAMSTRUCT_LENGTH
|
||||||
ld [wCurrSpriteOAMAddr], a
|
ld [wCurSpriteOAMAddr], a
|
||||||
farcall DoNextFrameForAllSprites
|
farcall DoNextFrameForAllSprites
|
||||||
call HideHeadbuttTree
|
call HideHeadbuttTree
|
||||||
ld a, 32
|
ld a, 32
|
||||||
@ -53,7 +53,7 @@ ShakeHeadbuttTree:
|
|||||||
jr z, .done
|
jr z, .done
|
||||||
dec [hl]
|
dec [hl]
|
||||||
ld a, 36 * SPRITEOAMSTRUCT_LENGTH
|
ld a, 36 * SPRITEOAMSTRUCT_LENGTH
|
||||||
ld [wCurrSpriteOAMAddr], a
|
ld [wCurSpriteOAMAddr], a
|
||||||
farcall DoNextFrameForAllSprites
|
farcall DoNextFrameForAllSprites
|
||||||
call DelayFrame
|
call DelayFrame
|
||||||
jr .loop
|
jr .loop
|
||||||
@ -126,7 +126,7 @@ OWCutAnimation:
|
|||||||
bit 7, a
|
bit 7, a
|
||||||
jr nz, .finish
|
jr nz, .finish
|
||||||
ld a, 36 * SPRITEOAMSTRUCT_LENGTH
|
ld a, 36 * SPRITEOAMSTRUCT_LENGTH
|
||||||
ld [wCurrSpriteOAMAddr], a
|
ld [wCurSpriteOAMAddr], a
|
||||||
callfar DoNextFrameForAllSprites
|
callfar DoNextFrameForAllSprites
|
||||||
call OWCutJumptable
|
call OWCutJumptable
|
||||||
call DelayFrame
|
call DelayFrame
|
||||||
@ -328,7 +328,7 @@ FlyFromAnim:
|
|||||||
bit 7, a
|
bit 7, a
|
||||||
jr nz, .exit
|
jr nz, .exit
|
||||||
ld a, 0 * SPRITEOAMSTRUCT_LENGTH
|
ld a, 0 * SPRITEOAMSTRUCT_LENGTH
|
||||||
ld [wCurrSpriteOAMAddr], a
|
ld [wCurSpriteOAMAddr], a
|
||||||
callfar DoNextFrameForAllSprites
|
callfar DoNextFrameForAllSprites
|
||||||
call FlyFunction_FrameTimer
|
call FlyFunction_FrameTimer
|
||||||
call DelayFrame
|
call DelayFrame
|
||||||
@ -365,7 +365,7 @@ FlyToAnim:
|
|||||||
bit 7, a
|
bit 7, a
|
||||||
jr nz, .exit
|
jr nz, .exit
|
||||||
ld a, 0 * SPRITEOAMSTRUCT_LENGTH
|
ld a, 0 * SPRITEOAMSTRUCT_LENGTH
|
||||||
ld [wCurrSpriteOAMAddr], a
|
ld [wCurSpriteOAMAddr], a
|
||||||
callfar DoNextFrameForAllSprites
|
callfar DoNextFrameForAllSprites
|
||||||
call FlyFunction_FrameTimer
|
call FlyFunction_FrameTimer
|
||||||
call DelayFrame
|
call DelayFrame
|
||||||
|
@ -13,7 +13,7 @@ ReturnFromMapSetupScript::
|
|||||||
ld a, [wMapNumber]
|
ld a, [wMapNumber]
|
||||||
ld c, a
|
ld c, a
|
||||||
call GetWorldMapLocation
|
call GetWorldMapLocation
|
||||||
ld [wCurrentLandmark], a
|
ld [wCurLandmark], a
|
||||||
call .CheckNationalParkGate
|
call .CheckNationalParkGate
|
||||||
jr z, .nationalparkgate
|
jr z, .nationalparkgate
|
||||||
|
|
||||||
@ -23,7 +23,7 @@ ReturnFromMapSetupScript::
|
|||||||
|
|
||||||
.nationalparkgate
|
.nationalparkgate
|
||||||
ld a, -1
|
ld a, -1
|
||||||
ld [wCurrentLandmark], a
|
ld [wCurLandmark], a
|
||||||
|
|
||||||
.not_gate
|
.not_gate
|
||||||
ld hl, wEnteredMapFromContinue
|
ld hl, wEnteredMapFromContinue
|
||||||
@ -33,8 +33,8 @@ ReturnFromMapSetupScript::
|
|||||||
|
|
||||||
call .CheckMovingWithinLandmark
|
call .CheckMovingWithinLandmark
|
||||||
jr z, .dont_do_map_sign
|
jr z, .dont_do_map_sign
|
||||||
ld a, [wCurrentLandmark]
|
ld a, [wCurLandmark]
|
||||||
ld [wPreviousLandmark], a
|
ld [wPrevLandmark], a
|
||||||
|
|
||||||
call .CheckSpecialMap
|
call .CheckSpecialMap
|
||||||
jr z, .dont_do_map_sign
|
jr z, .dont_do_map_sign
|
||||||
@ -48,8 +48,8 @@ ReturnFromMapSetupScript::
|
|||||||
ret
|
ret
|
||||||
|
|
||||||
.dont_do_map_sign
|
.dont_do_map_sign
|
||||||
ld a, [wCurrentLandmark]
|
ld a, [wCurLandmark]
|
||||||
ld [wPreviousLandmark], a
|
ld [wPrevLandmark], a
|
||||||
ld a, $90
|
ld a, $90
|
||||||
ldh [rWY], a
|
ldh [rWY], a
|
||||||
ldh [hWY], a
|
ldh [hWY], a
|
||||||
@ -58,9 +58,9 @@ ReturnFromMapSetupScript::
|
|||||||
ret
|
ret
|
||||||
|
|
||||||
.CheckMovingWithinLandmark:
|
.CheckMovingWithinLandmark:
|
||||||
ld a, [wCurrentLandmark]
|
ld a, [wCurLandmark]
|
||||||
ld c, a
|
ld c, a
|
||||||
ld a, [wPreviousLandmark]
|
ld a, [wPrevLandmark]
|
||||||
cp c
|
cp c
|
||||||
ret z
|
ret z
|
||||||
cp SPECIAL_MAP
|
cp SPECIAL_MAP
|
||||||
@ -140,7 +140,7 @@ InitMapNameFrame:
|
|||||||
ret
|
ret
|
||||||
|
|
||||||
PlaceMapNameCenterAlign:
|
PlaceMapNameCenterAlign:
|
||||||
ld a, [wCurrentLandmark]
|
ld a, [wCurLandmark]
|
||||||
ld e, a
|
ld e, a
|
||||||
farcall GetLandmarkName
|
farcall GetLandmarkName
|
||||||
call .GetNameLength
|
call .GetNameLength
|
||||||
|
@ -38,7 +38,7 @@ MomTriesToBuySomething::
|
|||||||
inc [hl]
|
inc [hl]
|
||||||
.ok
|
.ok
|
||||||
ld a, PHONE_MOM
|
ld a, PHONE_MOM
|
||||||
ld [wCurrentCaller], a
|
ld [wCurCaller], a
|
||||||
ld bc, wEngineBuffer2
|
ld bc, wEngineBuffer2
|
||||||
ld hl, 0
|
ld hl, 0
|
||||||
add hl, bc
|
add hl, bc
|
||||||
|
@ -182,7 +182,7 @@ SlotsLoop:
|
|||||||
call SlotsJumptable
|
call SlotsJumptable
|
||||||
call Slots_SpinReels
|
call Slots_SpinReels
|
||||||
xor a
|
xor a
|
||||||
ld [wCurrSpriteOAMAddr], a
|
ld [wCurSpriteOAMAddr], a
|
||||||
callfar DoNextFrameForFirst16Sprites
|
callfar DoNextFrameForFirst16Sprites
|
||||||
call .PrintCoinsAndPayout
|
call .PrintCoinsAndPayout
|
||||||
call .Stubbed_Function927d3
|
call .Stubbed_Function927d3
|
||||||
@ -778,9 +778,9 @@ Slots_UpdateReelPositionAndOAM:
|
|||||||
ld hl, REEL_X_COORD
|
ld hl, REEL_X_COORD
|
||||||
add hl, bc
|
add hl, bc
|
||||||
ld a, [hl]
|
ld a, [hl]
|
||||||
ld [wCurrReelXCoord], a
|
ld [wCurReelXCoord], a
|
||||||
ld a, 10 * 8
|
ld a, 10 * 8
|
||||||
ld [wCurrReelYCoord], a
|
ld [wCurReelYCoord], a
|
||||||
ld hl, REEL_POSITION
|
ld hl, REEL_POSITION
|
||||||
add hl, bc
|
add hl, bc
|
||||||
ld e, [hl]
|
ld e, [hl]
|
||||||
@ -813,9 +813,9 @@ Slots_UpdateReelPositionAndOAM:
|
|||||||
ld h, [hl]
|
ld h, [hl]
|
||||||
ld l, a
|
ld l, a
|
||||||
.loop
|
.loop
|
||||||
ld a, [wCurrReelYCoord]
|
ld a, [wCurReelYCoord]
|
||||||
ld [hli], a ; y
|
ld [hli], a ; y
|
||||||
ld a, [wCurrReelXCoord]
|
ld a, [wCurReelXCoord]
|
||||||
ld [hli], a ; x
|
ld [hli], a ; x
|
||||||
ld a, [de]
|
ld a, [de]
|
||||||
ld [hli], a ; tile id
|
ld [hli], a ; tile id
|
||||||
@ -824,9 +824,9 @@ Slots_UpdateReelPositionAndOAM:
|
|||||||
set OAM_PRIORITY, a
|
set OAM_PRIORITY, a
|
||||||
ld [hli], a ; attributes
|
ld [hli], a ; attributes
|
||||||
|
|
||||||
ld a, [wCurrReelYCoord]
|
ld a, [wCurReelYCoord]
|
||||||
ld [hli], a ; y
|
ld [hli], a ; y
|
||||||
ld a, [wCurrReelXCoord]
|
ld a, [wCurReelXCoord]
|
||||||
add 1 * TILE_WIDTH
|
add 1 * TILE_WIDTH
|
||||||
ld [hli], a ; x
|
ld [hli], a ; x
|
||||||
ld a, [de]
|
ld a, [de]
|
||||||
@ -838,9 +838,9 @@ Slots_UpdateReelPositionAndOAM:
|
|||||||
set OAM_PRIORITY, a
|
set OAM_PRIORITY, a
|
||||||
ld [hli], a ; attributes
|
ld [hli], a ; attributes
|
||||||
inc de
|
inc de
|
||||||
ld a, [wCurrReelYCoord]
|
ld a, [wCurReelYCoord]
|
||||||
sub 2 * TILE_WIDTH
|
sub 2 * TILE_WIDTH
|
||||||
ld [wCurrReelYCoord], a
|
ld [wCurReelYCoord], a
|
||||||
cp 2 * TILE_WIDTH
|
cp 2 * TILE_WIDTH
|
||||||
jr nz, .loop
|
jr nz, .loop
|
||||||
ret
|
ret
|
||||||
@ -1412,35 +1412,35 @@ Slots_CheckMatchedFirstTwoReels:
|
|||||||
ret
|
ret
|
||||||
|
|
||||||
.CheckBottomRow:
|
.CheckBottomRow:
|
||||||
ld hl, wCurrReelStopped
|
ld hl, wCurReelStopped
|
||||||
ld a, [wReel1Stopped]
|
ld a, [wReel1Stopped]
|
||||||
cp [hl]
|
cp [hl]
|
||||||
call z, .StoreResult
|
call z, .StoreResult
|
||||||
ret
|
ret
|
||||||
|
|
||||||
.CheckUpwardsDiag:
|
.CheckUpwardsDiag:
|
||||||
ld hl, wCurrReelStopped + 1
|
ld hl, wCurReelStopped + 1
|
||||||
ld a, [wReel1Stopped]
|
ld a, [wReel1Stopped]
|
||||||
cp [hl]
|
cp [hl]
|
||||||
call z, .StoreResult
|
call z, .StoreResult
|
||||||
ret
|
ret
|
||||||
|
|
||||||
.CheckMiddleRow:
|
.CheckMiddleRow:
|
||||||
ld hl, wCurrReelStopped + 1
|
ld hl, wCurReelStopped + 1
|
||||||
ld a, [wReel1Stopped + 1]
|
ld a, [wReel1Stopped + 1]
|
||||||
cp [hl]
|
cp [hl]
|
||||||
call z, .StoreResult
|
call z, .StoreResult
|
||||||
ret
|
ret
|
||||||
|
|
||||||
.CheckDownwardsDiag:
|
.CheckDownwardsDiag:
|
||||||
ld hl, wCurrReelStopped + 1
|
ld hl, wCurReelStopped + 1
|
||||||
ld a, [wReel1Stopped + 2]
|
ld a, [wReel1Stopped + 2]
|
||||||
cp [hl]
|
cp [hl]
|
||||||
call z, .StoreResult
|
call z, .StoreResult
|
||||||
ret
|
ret
|
||||||
|
|
||||||
.CheckTopRow:
|
.CheckTopRow:
|
||||||
ld hl, wCurrReelStopped + 2
|
ld hl, wCurReelStopped + 2
|
||||||
ld a, [wReel1Stopped + 2]
|
ld a, [wReel1Stopped + 2]
|
||||||
cp [hl]
|
cp [hl]
|
||||||
call z, .StoreResult
|
call z, .StoreResult
|
||||||
@ -1509,7 +1509,7 @@ Slots_CheckMatchedAllThreeReels:
|
|||||||
ret
|
ret
|
||||||
|
|
||||||
.CheckBottomRow:
|
.CheckBottomRow:
|
||||||
ld hl, wCurrReelStopped
|
ld hl, wCurReelStopped
|
||||||
ld a, [wReel1Stopped]
|
ld a, [wReel1Stopped]
|
||||||
cp [hl]
|
cp [hl]
|
||||||
ret nz
|
ret nz
|
||||||
@ -1519,7 +1519,7 @@ Slots_CheckMatchedAllThreeReels:
|
|||||||
ret
|
ret
|
||||||
|
|
||||||
.CheckUpwardsDiag:
|
.CheckUpwardsDiag:
|
||||||
ld hl, wCurrReelStopped + 2
|
ld hl, wCurReelStopped + 2
|
||||||
ld a, [wReel1Stopped]
|
ld a, [wReel1Stopped]
|
||||||
cp [hl]
|
cp [hl]
|
||||||
ret nz
|
ret nz
|
||||||
@ -1529,7 +1529,7 @@ Slots_CheckMatchedAllThreeReels:
|
|||||||
ret
|
ret
|
||||||
|
|
||||||
.CheckMiddleRow:
|
.CheckMiddleRow:
|
||||||
ld hl, wCurrReelStopped + 1
|
ld hl, wCurReelStopped + 1
|
||||||
ld a, [wReel1Stopped + 1]
|
ld a, [wReel1Stopped + 1]
|
||||||
cp [hl]
|
cp [hl]
|
||||||
ret nz
|
ret nz
|
||||||
@ -1539,7 +1539,7 @@ Slots_CheckMatchedAllThreeReels:
|
|||||||
ret
|
ret
|
||||||
|
|
||||||
.CheckDownwardsDiag:
|
.CheckDownwardsDiag:
|
||||||
ld hl, wCurrReelStopped
|
ld hl, wCurReelStopped
|
||||||
ld a, [wReel1Stopped + 2]
|
ld a, [wReel1Stopped + 2]
|
||||||
cp [hl]
|
cp [hl]
|
||||||
ret nz
|
ret nz
|
||||||
@ -1549,7 +1549,7 @@ Slots_CheckMatchedAllThreeReels:
|
|||||||
ret
|
ret
|
||||||
|
|
||||||
.CheckTopRow:
|
.CheckTopRow:
|
||||||
ld hl, wCurrReelStopped + 2
|
ld hl, wCurReelStopped + 2
|
||||||
ld a, [wReel1Stopped + 2]
|
ld a, [wReel1Stopped + 2]
|
||||||
cp [hl]
|
cp [hl]
|
||||||
ret nz
|
ret nz
|
||||||
@ -1563,7 +1563,7 @@ Slots_CheckMatchedAllThreeReels:
|
|||||||
ret
|
ret
|
||||||
|
|
||||||
Slots_CopyReelState:
|
Slots_CopyReelState:
|
||||||
ld de, wCurrReelStopped
|
ld de, wCurReelStopped
|
||||||
ld a, [hli]
|
ld a, [hli]
|
||||||
ld [de], a
|
ld [de], a
|
||||||
inc de
|
inc de
|
||||||
|
@ -22,7 +22,7 @@ PlaySpriteAnimations:
|
|||||||
push af
|
push af
|
||||||
|
|
||||||
ld a, LOW(wVirtualOAM)
|
ld a, LOW(wVirtualOAM)
|
||||||
ld [wCurrSpriteOAMAddr], a
|
ld [wCurSpriteOAMAddr], a
|
||||||
call DoNextFrameForAllSprites
|
call DoNextFrameForAllSprites
|
||||||
|
|
||||||
pop af
|
pop af
|
||||||
@ -55,11 +55,11 @@ DoNextFrameForAllSprites:
|
|||||||
dec e
|
dec e
|
||||||
jr nz, .loop
|
jr nz, .loop
|
||||||
|
|
||||||
ld a, [wCurrSpriteOAMAddr]
|
ld a, [wCurSpriteOAMAddr]
|
||||||
ld l, a
|
ld l, a
|
||||||
ld h, HIGH(wVirtualOAM)
|
ld h, HIGH(wVirtualOAM)
|
||||||
|
|
||||||
.loop2 ; Clear (wVirtualOAM + [wCurrSpriteOAMAddr] --> wVirtualOAMEnd)
|
.loop2 ; Clear (wVirtualOAM + [wCurSpriteOAMAddr] --> wVirtualOAMEnd)
|
||||||
ld a, l
|
ld a, l
|
||||||
cp LOW(wVirtualOAMEnd)
|
cp LOW(wVirtualOAMEnd)
|
||||||
jr nc, .done
|
jr nc, .done
|
||||||
@ -94,11 +94,11 @@ DoNextFrameForFirst16Sprites:
|
|||||||
dec e
|
dec e
|
||||||
jr nz, .loop
|
jr nz, .loop
|
||||||
|
|
||||||
ld a, [wCurrSpriteOAMAddr]
|
ld a, [wCurSpriteOAMAddr]
|
||||||
ld l, a
|
ld l, a
|
||||||
ld h, HIGH(wVirtualOAMSprite16)
|
ld h, HIGH(wVirtualOAMSprite16)
|
||||||
|
|
||||||
.loop2 ; Clear (wVirtualOAM + [wCurrSpriteOAMAddr] --> Sprites + $40)
|
.loop2 ; Clear (wVirtualOAM + [wCurSpriteOAMAddr] --> Sprites + $40)
|
||||||
ld a, l
|
ld a, l
|
||||||
cp LOW(wVirtualOAMSprite16)
|
cp LOW(wVirtualOAMSprite16)
|
||||||
jr nc, .done
|
jr nc, .done
|
||||||
@ -233,27 +233,27 @@ UpdateAnimFrame:
|
|||||||
cp -4
|
cp -4
|
||||||
jr z, .delete
|
jr z, .delete
|
||||||
call GetFrameOAMPointer
|
call GetFrameOAMPointer
|
||||||
; add byte to [wCurrAnimVTile]
|
; add byte to [wCurAnimVTile]
|
||||||
ld a, [wCurrAnimVTile]
|
ld a, [wCurAnimVTile]
|
||||||
add [hl]
|
add [hl]
|
||||||
ld [wCurrAnimVTile], a
|
ld [wCurAnimVTile], a
|
||||||
inc hl
|
inc hl
|
||||||
; load pointer into hl
|
; load pointer into hl
|
||||||
ld a, [hli]
|
ld a, [hli]
|
||||||
ld h, [hl]
|
ld h, [hl]
|
||||||
ld l, a
|
ld l, a
|
||||||
push bc
|
push bc
|
||||||
ld a, [wCurrSpriteOAMAddr]
|
ld a, [wCurSpriteOAMAddr]
|
||||||
ld e, a
|
ld e, a
|
||||||
ld d, HIGH(wVirtualOAM)
|
ld d, HIGH(wVirtualOAM)
|
||||||
ld a, [hli]
|
ld a, [hli]
|
||||||
ld c, a ; number of objects
|
ld c, a ; number of objects
|
||||||
.loop
|
.loop
|
||||||
; first byte: y (px)
|
; first byte: y (px)
|
||||||
; [de] = [wCurrAnimYCoord] + [wCurrAnimYOffset] + [wGlobalAnimYOffset] + AddOrSubtractY([hl])
|
; [de] = [wCurAnimYCoord] + [wCurAnimYOffset] + [wGlobalAnimYOffset] + AddOrSubtractY([hl])
|
||||||
ld a, [wCurrAnimYCoord]
|
ld a, [wCurAnimYCoord]
|
||||||
ld b, a
|
ld b, a
|
||||||
ld a, [wCurrAnimYOffset]
|
ld a, [wCurAnimYOffset]
|
||||||
add b
|
add b
|
||||||
ld b, a
|
ld b, a
|
||||||
ld a, [wGlobalAnimYOffset]
|
ld a, [wGlobalAnimYOffset]
|
||||||
@ -265,10 +265,10 @@ UpdateAnimFrame:
|
|||||||
inc hl
|
inc hl
|
||||||
inc de
|
inc de
|
||||||
; second byte: x (px)
|
; second byte: x (px)
|
||||||
; [de] = [wCurrAnimXCoord] + [wCurrAnimXOffset] + [wGlobalAnimXOffset] + AddOrSubtractX([hl])
|
; [de] = [wCurAnimXCoord] + [wCurAnimXOffset] + [wGlobalAnimXOffset] + AddOrSubtractX([hl])
|
||||||
ld a, [wCurrAnimXCoord]
|
ld a, [wCurAnimXCoord]
|
||||||
ld b, a
|
ld b, a
|
||||||
ld a, [wCurrAnimXOffset]
|
ld a, [wCurAnimXOffset]
|
||||||
add b
|
add b
|
||||||
ld b, a
|
ld b, a
|
||||||
ld a, [wGlobalAnimXOffset]
|
ld a, [wGlobalAnimXOffset]
|
||||||
@ -280,8 +280,8 @@ UpdateAnimFrame:
|
|||||||
inc hl
|
inc hl
|
||||||
inc de
|
inc de
|
||||||
; third byte: vtile
|
; third byte: vtile
|
||||||
; [de] = [wCurrAnimVTile] + [hl]
|
; [de] = [wCurAnimVTile] + [hl]
|
||||||
ld a, [wCurrAnimVTile]
|
ld a, [wCurAnimVTile]
|
||||||
add [hl]
|
add [hl]
|
||||||
ld [de], a
|
ld [de], a
|
||||||
inc hl
|
inc hl
|
||||||
@ -293,7 +293,7 @@ UpdateAnimFrame:
|
|||||||
inc hl
|
inc hl
|
||||||
inc de
|
inc de
|
||||||
ld a, e
|
ld a, e
|
||||||
ld [wCurrSpriteOAMAddr], a
|
ld [wCurSpriteOAMAddr], a
|
||||||
cp LOW(wVirtualOAMEnd)
|
cp LOW(wVirtualOAMEnd)
|
||||||
jr nc, .reached_the_end
|
jr nc, .reached_the_end
|
||||||
dec c
|
dec c
|
||||||
@ -315,7 +315,7 @@ UpdateAnimFrame:
|
|||||||
AddOrSubtractY:
|
AddOrSubtractY:
|
||||||
push hl
|
push hl
|
||||||
ld a, [hl]
|
ld a, [hl]
|
||||||
ld hl, wCurrSpriteAddSubFlags
|
ld hl, wCurSpriteAddSubFlags
|
||||||
bit 6, [hl]
|
bit 6, [hl]
|
||||||
jr z, .ok
|
jr z, .ok
|
||||||
; 8 - a
|
; 8 - a
|
||||||
@ -330,7 +330,7 @@ AddOrSubtractY:
|
|||||||
AddOrSubtractX:
|
AddOrSubtractX:
|
||||||
push hl
|
push hl
|
||||||
ld a, [hl]
|
ld a, [hl]
|
||||||
ld hl, wCurrSpriteAddSubFlags
|
ld hl, wCurSpriteAddSubFlags
|
||||||
bit 5, [hl] ; x flip
|
bit 5, [hl] ; x flip
|
||||||
jr z, .ok
|
jr z, .ok
|
||||||
; 8 - a
|
; 8 - a
|
||||||
@ -343,7 +343,7 @@ AddOrSubtractX:
|
|||||||
ret
|
ret
|
||||||
|
|
||||||
GetSpriteOAMAttr:
|
GetSpriteOAMAttr:
|
||||||
ld a, [wCurrSpriteAddSubFlags]
|
ld a, [wCurSpriteAddSubFlags]
|
||||||
ld b, a
|
ld b, a
|
||||||
ld a, [hl]
|
ld a, [hl]
|
||||||
xor b
|
xor b
|
||||||
@ -356,19 +356,19 @@ GetSpriteOAMAttr:
|
|||||||
|
|
||||||
InitSpriteAnimBuffer:
|
InitSpriteAnimBuffer:
|
||||||
xor a
|
xor a
|
||||||
ld [wCurrSpriteAddSubFlags], a
|
ld [wCurSpriteAddSubFlags], a
|
||||||
ld hl, SPRITEANIMSTRUCT_TILE_ID
|
ld hl, SPRITEANIMSTRUCT_TILE_ID
|
||||||
add hl, bc
|
add hl, bc
|
||||||
ld a, [hli]
|
ld a, [hli]
|
||||||
ld [wCurrAnimVTile], a
|
ld [wCurAnimVTile], a
|
||||||
ld a, [hli]
|
ld a, [hli]
|
||||||
ld [wCurrAnimXCoord], a
|
ld [wCurAnimXCoord], a
|
||||||
ld a, [hli]
|
ld a, [hli]
|
||||||
ld [wCurrAnimYCoord], a
|
ld [wCurAnimYCoord], a
|
||||||
ld a, [hli]
|
ld a, [hli]
|
||||||
ld [wCurrAnimXOffset], a
|
ld [wCurAnimXOffset], a
|
||||||
ld a, [hli]
|
ld a, [hli]
|
||||||
ld [wCurrAnimYOffset], a
|
ld [wCurAnimYOffset], a
|
||||||
ret
|
ret
|
||||||
|
|
||||||
GetSpriteAnimVTile:
|
GetSpriteAnimVTile:
|
||||||
@ -448,7 +448,7 @@ GetSpriteAnimFrame:
|
|||||||
ld a, [hl]
|
ld a, [hl]
|
||||||
and $c0
|
and $c0
|
||||||
srl a
|
srl a
|
||||||
ld [wCurrSpriteAddSubFlags], a
|
ld [wCurSpriteAddSubFlags], a
|
||||||
pop af
|
pop af
|
||||||
ret
|
ret
|
||||||
|
|
||||||
|
@ -26,7 +26,7 @@ Pack:
|
|||||||
jr .loop
|
jr .loop
|
||||||
|
|
||||||
.done
|
.done
|
||||||
ld a, [wCurrPocket]
|
ld a, [wCurPocket]
|
||||||
ld [wLastPocket], a
|
ld [wLastPocket], a
|
||||||
ld hl, wOptions
|
ld hl, wOptions
|
||||||
res NO_TEXT_SCROLL, [hl]
|
res NO_TEXT_SCROLL, [hl]
|
||||||
@ -63,7 +63,7 @@ Pack:
|
|||||||
|
|
||||||
.InitItemsPocket:
|
.InitItemsPocket:
|
||||||
xor a ; ITEM_POCKET
|
xor a ; ITEM_POCKET
|
||||||
ld [wCurrPocket], a
|
ld [wCurPocket], a
|
||||||
call ClearPocketList
|
call ClearPocketList
|
||||||
call DrawPocketName
|
call DrawPocketName
|
||||||
call WaitBGMap_DrawPackGFX
|
call WaitBGMap_DrawPackGFX
|
||||||
@ -91,7 +91,7 @@ Pack:
|
|||||||
|
|
||||||
.InitKeyItemsPocket:
|
.InitKeyItemsPocket:
|
||||||
ld a, KEY_ITEM_POCKET
|
ld a, KEY_ITEM_POCKET
|
||||||
ld [wCurrPocket], a
|
ld [wCurPocket], a
|
||||||
call ClearPocketList
|
call ClearPocketList
|
||||||
call DrawPocketName
|
call DrawPocketName
|
||||||
call WaitBGMap_DrawPackGFX
|
call WaitBGMap_DrawPackGFX
|
||||||
@ -119,7 +119,7 @@ Pack:
|
|||||||
|
|
||||||
.InitTMHMPocket:
|
.InitTMHMPocket:
|
||||||
ld a, TM_HM_POCKET
|
ld a, TM_HM_POCKET
|
||||||
ld [wCurrPocket], a
|
ld [wCurPocket], a
|
||||||
call ClearPocketList
|
call ClearPocketList
|
||||||
call DrawPocketName
|
call DrawPocketName
|
||||||
xor a
|
xor a
|
||||||
@ -213,7 +213,7 @@ Pack:
|
|||||||
|
|
||||||
.InitBallsPocket:
|
.InitBallsPocket:
|
||||||
ld a, BALL_POCKET
|
ld a, BALL_POCKET
|
||||||
ld [wCurrPocket], a
|
ld [wCurPocket], a
|
||||||
call ClearPocketList
|
call ClearPocketList
|
||||||
call DrawPocketName
|
call DrawPocketName
|
||||||
call WaitBGMap_DrawPackGFX
|
call WaitBGMap_DrawPackGFX
|
||||||
@ -500,7 +500,7 @@ TossMenu:
|
|||||||
ret
|
ret
|
||||||
|
|
||||||
Unreferenced_ResetPocketCursorPositions:
|
Unreferenced_ResetPocketCursorPositions:
|
||||||
ld a, [wCurrPocket]
|
ld a, [wCurPocket]
|
||||||
and a ; ITEM_POCKET
|
and a ; ITEM_POCKET
|
||||||
jr z, .items
|
jr z, .items
|
||||||
dec a ; BALL_POCKET
|
dec a ; BALL_POCKET
|
||||||
@ -532,7 +532,7 @@ RegisterItem:
|
|||||||
ld a, [wItemAttributeParamBuffer]
|
ld a, [wItemAttributeParamBuffer]
|
||||||
and a
|
and a
|
||||||
jr nz, .cant_register
|
jr nz, .cant_register
|
||||||
ld a, [wCurrPocket]
|
ld a, [wCurPocket]
|
||||||
rrca
|
rrca
|
||||||
rrca
|
rrca
|
||||||
and REGISTERED_POCKET
|
and REGISTERED_POCKET
|
||||||
@ -636,7 +636,7 @@ BattlePack:
|
|||||||
jr .loop
|
jr .loop
|
||||||
|
|
||||||
.end
|
.end
|
||||||
ld a, [wCurrPocket]
|
ld a, [wCurPocket]
|
||||||
ld [wLastPocket], a
|
ld [wLastPocket], a
|
||||||
ld hl, wOptions
|
ld hl, wOptions
|
||||||
res NO_TEXT_SCROLL, [hl]
|
res NO_TEXT_SCROLL, [hl]
|
||||||
@ -673,7 +673,7 @@ BattlePack:
|
|||||||
|
|
||||||
.InitItemsPocket:
|
.InitItemsPocket:
|
||||||
xor a ; ITEM_POCKET
|
xor a ; ITEM_POCKET
|
||||||
ld [wCurrPocket], a
|
ld [wCurPocket], a
|
||||||
call ClearPocketList
|
call ClearPocketList
|
||||||
call DrawPocketName
|
call DrawPocketName
|
||||||
call WaitBGMap_DrawPackGFX
|
call WaitBGMap_DrawPackGFX
|
||||||
@ -701,7 +701,7 @@ BattlePack:
|
|||||||
|
|
||||||
.InitKeyItemsPocket:
|
.InitKeyItemsPocket:
|
||||||
ld a, KEY_ITEM_POCKET
|
ld a, KEY_ITEM_POCKET
|
||||||
ld [wCurrPocket], a
|
ld [wCurPocket], a
|
||||||
call ClearPocketList
|
call ClearPocketList
|
||||||
call DrawPocketName
|
call DrawPocketName
|
||||||
call WaitBGMap_DrawPackGFX
|
call WaitBGMap_DrawPackGFX
|
||||||
@ -729,7 +729,7 @@ BattlePack:
|
|||||||
|
|
||||||
.InitTMHMPocket:
|
.InitTMHMPocket:
|
||||||
ld a, TM_HM_POCKET
|
ld a, TM_HM_POCKET
|
||||||
ld [wCurrPocket], a
|
ld [wCurPocket], a
|
||||||
call ClearPocketList
|
call ClearPocketList
|
||||||
call DrawPocketName
|
call DrawPocketName
|
||||||
xor a
|
xor a
|
||||||
@ -752,7 +752,7 @@ BattlePack:
|
|||||||
|
|
||||||
.InitBallsPocket:
|
.InitBallsPocket:
|
||||||
ld a, BALL_POCKET
|
ld a, BALL_POCKET
|
||||||
ld [wCurrPocket], a
|
ld [wCurPocket], a
|
||||||
call ClearPocketList
|
call ClearPocketList
|
||||||
call DrawPocketName
|
call DrawPocketName
|
||||||
call WaitBGMap_DrawPackGFX
|
call WaitBGMap_DrawPackGFX
|
||||||
@ -903,7 +903,7 @@ InitPackBuffers:
|
|||||||
; pocket id -> jumptable index
|
; pocket id -> jumptable index
|
||||||
ld a, [wLastPocket]
|
ld a, [wLastPocket]
|
||||||
maskbits NUM_POCKETS
|
maskbits NUM_POCKETS
|
||||||
ld [wCurrPocket], a
|
ld [wCurPocket], a
|
||||||
inc a
|
inc a
|
||||||
add a
|
add a
|
||||||
dec a
|
dec a
|
||||||
@ -919,7 +919,7 @@ DepositSellInitPackBuffers:
|
|||||||
ldh [hBGMapMode], a
|
ldh [hBGMapMode], a
|
||||||
ld [wJumptableIndex], a ; PACKSTATE_INITGFX
|
ld [wJumptableIndex], a ; PACKSTATE_INITGFX
|
||||||
ld [wPackJumptableIndex], a ; PACKSTATE_INITGFX
|
ld [wPackJumptableIndex], a ; PACKSTATE_INITGFX
|
||||||
ld [wCurrPocket], a ; ITEM_POCKET
|
ld [wCurPocket], a ; ITEM_POCKET
|
||||||
ld [wPackUsedItem], a
|
ld [wPackUsedItem], a
|
||||||
ld [wSwitchItem], a
|
ld [wSwitchItem], a
|
||||||
call Pack_InitGFX
|
call Pack_InitGFX
|
||||||
@ -1004,7 +1004,7 @@ DepositSellPack:
|
|||||||
ret
|
ret
|
||||||
|
|
||||||
InitPocket:
|
InitPocket:
|
||||||
ld [wCurrPocket], a
|
ld [wCurPocket], a
|
||||||
call ClearPocketList
|
call ClearPocketList
|
||||||
call DrawPocketName
|
call DrawPocketName
|
||||||
call WaitBGMap_DrawPackGFX
|
call WaitBGMap_DrawPackGFX
|
||||||
@ -1209,7 +1209,7 @@ Pack_PrintTextNoScroll:
|
|||||||
WaitBGMap_DrawPackGFX:
|
WaitBGMap_DrawPackGFX:
|
||||||
call WaitBGMap
|
call WaitBGMap
|
||||||
DrawPackGFX:
|
DrawPackGFX:
|
||||||
ld a, [wCurrPocket]
|
ld a, [wCurPocket]
|
||||||
maskbits NUM_POCKETS
|
maskbits NUM_POCKETS
|
||||||
ld e, a
|
ld e, a
|
||||||
ld d, 0
|
ld d, 0
|
||||||
@ -1381,7 +1381,7 @@ PlacePackGFX:
|
|||||||
ret
|
ret
|
||||||
|
|
||||||
DrawPocketName:
|
DrawPocketName:
|
||||||
ld a, [wCurrPocket]
|
ld a, [wCurPocket]
|
||||||
; * 15
|
; * 15
|
||||||
ld d, a
|
ld d, a
|
||||||
swap a
|
swap a
|
||||||
|
@ -4,7 +4,7 @@ _Multiply::
|
|||||||
ld b, a
|
ld b, a
|
||||||
|
|
||||||
xor a
|
xor a
|
||||||
ldh [hProduct], a
|
ldh [hMultiplicand - 1], a
|
||||||
ldh [hMathBuffer + 1], a
|
ldh [hMathBuffer + 1], a
|
||||||
ldh [hMathBuffer + 2], a
|
ldh [hMathBuffer + 2], a
|
||||||
ldh [hMathBuffer + 3], a
|
ldh [hMathBuffer + 3], a
|
||||||
@ -36,7 +36,7 @@ _Multiply::
|
|||||||
|
|
||||||
ldh a, [hMathBuffer + 1]
|
ldh a, [hMathBuffer + 1]
|
||||||
ld c, a
|
ld c, a
|
||||||
ldh a, [hProduct]
|
ldh a, [hMultiplicand - 1]
|
||||||
adc c
|
adc c
|
||||||
ldh [hMathBuffer + 1], a
|
ldh [hMathBuffer + 1], a
|
||||||
|
|
||||||
@ -58,9 +58,9 @@ _Multiply::
|
|||||||
rla
|
rla
|
||||||
ldh [hMultiplicand + 0], a
|
ldh [hMultiplicand + 0], a
|
||||||
|
|
||||||
ldh a, [hProduct]
|
ldh a, [hMultiplicand - 1]
|
||||||
rla
|
rla
|
||||||
ldh [hProduct], a
|
ldh [hMultiplicand - 1], a
|
||||||
|
|
||||||
jr .loop
|
jr .loop
|
||||||
|
|
||||||
|
@ -67,7 +67,7 @@ NewGame:
|
|||||||
call OakSpeech
|
call OakSpeech
|
||||||
call InitializeWorld
|
call InitializeWorld
|
||||||
ld a, 1
|
ld a, 1
|
||||||
ld [wPreviousLandmark], a
|
ld [wPrevLandmark], a
|
||||||
|
|
||||||
ld a, SPAWN_HOME
|
ld a, SPAWN_HOME
|
||||||
ld [wDefaultSpawnpoint], a
|
ld [wDefaultSpawnpoint], a
|
||||||
|
@ -672,7 +672,7 @@ NamingScreen_TryAddCharacter:
|
|||||||
MailComposition_TryAddCharacter:
|
MailComposition_TryAddCharacter:
|
||||||
ld a, [wNamingScreenMaxNameLength]
|
ld a, [wNamingScreenMaxNameLength]
|
||||||
ld c, a
|
ld c, a
|
||||||
ld a, [wNamingScreenCurrNameLength]
|
ld a, [wNamingScreenCurNameLength]
|
||||||
cp c
|
cp c
|
||||||
ret nc
|
ret nc
|
||||||
|
|
||||||
@ -683,7 +683,7 @@ NamingScreen_LoadNextCharacter:
|
|||||||
ld [hl], a
|
ld [hl], a
|
||||||
|
|
||||||
NamingScreen_AdvanceCursor_CheckEndOfString:
|
NamingScreen_AdvanceCursor_CheckEndOfString:
|
||||||
ld hl, wNamingScreenCurrNameLength
|
ld hl, wNamingScreenCurNameLength
|
||||||
inc [hl]
|
inc [hl]
|
||||||
call NamingScreen_GetTextCursorPosition
|
call NamingScreen_GetTextCursorPosition
|
||||||
ld a, [hl]
|
ld a, [hl]
|
||||||
@ -698,11 +698,11 @@ NamingScreen_AdvanceCursor_CheckEndOfString:
|
|||||||
ret
|
ret
|
||||||
|
|
||||||
; unused
|
; unused
|
||||||
ld a, [wNamingScreenCurrNameLength]
|
ld a, [wNamingScreenCurNameLength]
|
||||||
and a
|
and a
|
||||||
ret z
|
ret z
|
||||||
push hl
|
push hl
|
||||||
ld hl, wNamingScreenCurrNameLength
|
ld hl, wNamingScreenCurNameLength
|
||||||
dec [hl]
|
dec [hl]
|
||||||
call NamingScreen_GetTextCursorPosition
|
call NamingScreen_GetTextCursorPosition
|
||||||
ld c, [hl]
|
ld c, [hl]
|
||||||
@ -724,7 +724,7 @@ NamingScreen_AdvanceCursor_CheckEndOfString:
|
|||||||
INCLUDE "data/text/unused_dakutens.asm"
|
INCLUDE "data/text/unused_dakutens.asm"
|
||||||
|
|
||||||
NamingScreen_DeleteCharacter:
|
NamingScreen_DeleteCharacter:
|
||||||
ld hl, wNamingScreenCurrNameLength
|
ld hl, wNamingScreenCurNameLength
|
||||||
ld a, [hl]
|
ld a, [hl]
|
||||||
and a
|
and a
|
||||||
ret z
|
ret z
|
||||||
@ -744,7 +744,7 @@ NamingScreen_GetTextCursorPosition:
|
|||||||
ld a, [hli]
|
ld a, [hli]
|
||||||
ld h, [hl]
|
ld h, [hl]
|
||||||
ld l, a
|
ld l, a
|
||||||
ld a, [wNamingScreenCurrNameLength]
|
ld a, [wNamingScreenCurNameLength]
|
||||||
ld e, a
|
ld e, a
|
||||||
ld d, 0
|
ld d, 0
|
||||||
add hl, de
|
add hl, de
|
||||||
@ -874,7 +874,7 @@ LoadNamingScreenGFX:
|
|||||||
ld [wJumptableIndex], a
|
ld [wJumptableIndex], a
|
||||||
ld [wNamingScreenLetterCase], a
|
ld [wNamingScreenLetterCase], a
|
||||||
ldh [hBGMapMode], a
|
ldh [hBGMapMode], a
|
||||||
ld [wNamingScreenCurrNameLength], a
|
ld [wNamingScreenCurNameLength], a
|
||||||
ld a, $7
|
ld a, $7
|
||||||
ldh [hWX], a
|
ldh [hWX], a
|
||||||
ret
|
ret
|
||||||
@ -1109,7 +1109,7 @@ INCBIN "gfx/icons/mail_big.2bpp"
|
|||||||
call NamingScreen_GetLastCharacter
|
call NamingScreen_GetLastCharacter
|
||||||
call MailComposition_TryAddLastCharacter
|
call MailComposition_TryAddLastCharacter
|
||||||
jr c, .start
|
jr c, .start
|
||||||
ld hl, wNamingScreenCurrNameLength
|
ld hl, wNamingScreenCurNameLength
|
||||||
ld a, [hl]
|
ld a, [hl]
|
||||||
cp MAIL_LINE_LENGTH
|
cp MAIL_LINE_LENGTH
|
||||||
ret nz
|
ret nz
|
||||||
@ -1135,7 +1135,7 @@ INCBIN "gfx/icons/mail_big.2bpp"
|
|||||||
|
|
||||||
.b
|
.b
|
||||||
call NamingScreen_DeleteCharacter
|
call NamingScreen_DeleteCharacter
|
||||||
ld hl, wNamingScreenCurrNameLength
|
ld hl, wNamingScreenCurNameLength
|
||||||
ld a, [hl]
|
ld a, [hl]
|
||||||
cp MAIL_LINE_LENGTH
|
cp MAIL_LINE_LENGTH
|
||||||
ret nz
|
ret nz
|
||||||
@ -1350,20 +1350,20 @@ MailComposition_TryAddLastCharacter:
|
|||||||
jp MailComposition_TryAddCharacter
|
jp MailComposition_TryAddCharacter
|
||||||
|
|
||||||
; unused
|
; unused
|
||||||
ld a, [wNamingScreenCurrNameLength]
|
ld a, [wNamingScreenCurNameLength]
|
||||||
and a
|
and a
|
||||||
ret z
|
ret z
|
||||||
cp $11
|
cp $11
|
||||||
jr nz, .asm_121c3
|
jr nz, .asm_121c3
|
||||||
push hl
|
push hl
|
||||||
ld hl, wNamingScreenCurrNameLength
|
ld hl, wNamingScreenCurNameLength
|
||||||
dec [hl]
|
dec [hl]
|
||||||
dec [hl]
|
dec [hl]
|
||||||
jr .asm_121c8
|
jr .asm_121c8
|
||||||
|
|
||||||
.asm_121c3
|
.asm_121c3
|
||||||
push hl
|
push hl
|
||||||
ld hl, wNamingScreenCurrNameLength
|
ld hl, wNamingScreenCurNameLength
|
||||||
dec [hl]
|
dec [hl]
|
||||||
|
|
||||||
.asm_121c8
|
.asm_121c8
|
||||||
|
@ -489,9 +489,9 @@ SavePlayerData:
|
|||||||
ld de, sPlayerData
|
ld de, sPlayerData
|
||||||
ld bc, wPlayerDataEnd - wPlayerData
|
ld bc, wPlayerDataEnd - wPlayerData
|
||||||
call CopyBytes
|
call CopyBytes
|
||||||
ld hl, wCurrMapData
|
ld hl, wCurMapData
|
||||||
ld de, sCurrMapData
|
ld de, sCurMapData
|
||||||
ld bc, wCurrMapDataEnd - wCurrMapData
|
ld bc, wCurMapDataEnd - wCurMapData
|
||||||
call CopyBytes
|
call CopyBytes
|
||||||
jp CloseSRAM
|
jp CloseSRAM
|
||||||
|
|
||||||
@ -550,9 +550,9 @@ SaveBackupPlayerData:
|
|||||||
ld de, sBackupPlayerData
|
ld de, sBackupPlayerData
|
||||||
ld bc, wPlayerDataEnd - wPlayerData
|
ld bc, wPlayerDataEnd - wPlayerData
|
||||||
call CopyBytes
|
call CopyBytes
|
||||||
ld hl, wCurrMapData
|
ld hl, wCurMapData
|
||||||
ld de, sBackupCurrMapData
|
ld de, sBackupCurMapData
|
||||||
ld bc, wCurrMapDataEnd - wCurrMapData
|
ld bc, wCurMapDataEnd - wCurMapData
|
||||||
call CopyBytes
|
call CopyBytes
|
||||||
call CloseSRAM
|
call CloseSRAM
|
||||||
ret
|
ret
|
||||||
@ -724,9 +724,9 @@ LoadPlayerData:
|
|||||||
ld de, wPlayerData
|
ld de, wPlayerData
|
||||||
ld bc, wPlayerDataEnd - wPlayerData
|
ld bc, wPlayerDataEnd - wPlayerData
|
||||||
call CopyBytes
|
call CopyBytes
|
||||||
ld hl, sCurrMapData
|
ld hl, sCurMapData
|
||||||
ld de, wCurrMapData
|
ld de, wCurMapData
|
||||||
ld bc, wCurrMapDataEnd - wCurrMapData
|
ld bc, wCurMapDataEnd - wCurMapData
|
||||||
call CopyBytes
|
call CopyBytes
|
||||||
call CloseSRAM
|
call CloseSRAM
|
||||||
ld a, BANK(sBattleTowerChallengeState)
|
ld a, BANK(sBattleTowerChallengeState)
|
||||||
@ -779,9 +779,9 @@ LoadBackupPlayerData:
|
|||||||
ld de, wPlayerData
|
ld de, wPlayerData
|
||||||
ld bc, wPlayerDataEnd - wPlayerData
|
ld bc, wPlayerDataEnd - wPlayerData
|
||||||
call CopyBytes
|
call CopyBytes
|
||||||
ld hl, sBackupCurrMapData
|
ld hl, sBackupCurMapData
|
||||||
ld de, wCurrMapData
|
ld de, wCurMapData
|
||||||
ld bc, wCurrMapDataEnd - wCurrMapData
|
ld bc, wCurMapDataEnd - wCurMapData
|
||||||
call CopyBytes
|
call CopyBytes
|
||||||
call CloseSRAM
|
call CloseSRAM
|
||||||
ret
|
ret
|
||||||
|
@ -401,7 +401,7 @@ Dummy_CheckScriptFlags3Bit5:
|
|||||||
ret
|
ret
|
||||||
|
|
||||||
RunSceneScript:
|
RunSceneScript:
|
||||||
ld a, [wCurrMapSceneScriptCount]
|
ld a, [wCurMapSceneScriptCount]
|
||||||
and a
|
and a
|
||||||
jr z, .nope
|
jr z, .nope
|
||||||
|
|
||||||
@ -412,7 +412,7 @@ RunSceneScript:
|
|||||||
|
|
||||||
ld e, a
|
ld e, a
|
||||||
ld d, 0
|
ld d, 0
|
||||||
ld hl, wCurrMapSceneScriptsPointer
|
ld hl, wCurMapSceneScriptsPointer
|
||||||
ld a, [hli]
|
ld a, [hli]
|
||||||
ld h, [hl]
|
ld h, [hl]
|
||||||
ld l, a
|
ld l, a
|
||||||
|
@ -61,7 +61,7 @@ _GetVarAction::
|
|||||||
dwb wSpecialPhoneCallID, RETVAR_STRBUF2
|
dwb wSpecialPhoneCallID, RETVAR_STRBUF2
|
||||||
dwb wNrOfBeatenBattleTowerTrainers, RETVAR_STRBUF2
|
dwb wNrOfBeatenBattleTowerTrainers, RETVAR_STRBUF2
|
||||||
dwb wKurtApricornQuantity, RETVAR_STRBUF2
|
dwb wKurtApricornQuantity, RETVAR_STRBUF2
|
||||||
dwb wCurrentCaller, RETVAR_ADDR_DE
|
dwb wCurCaller, RETVAR_ADDR_DE
|
||||||
dwb wBlueCardBalance, RETVAR_ADDR_DE
|
dwb wBlueCardBalance, RETVAR_ADDR_DE
|
||||||
dwb wBuenasPassword, RETVAR_ADDR_DE
|
dwb wBuenasPassword, RETVAR_ADDR_DE
|
||||||
dwb wKenjiBreakTimer, RETVAR_STRBUF2
|
dwb wKenjiBreakTimer, RETVAR_STRBUF2
|
||||||
|
@ -738,14 +738,14 @@ JumpRoamMon:
|
|||||||
ret
|
ret
|
||||||
|
|
||||||
_BackUpMapIndices:
|
_BackUpMapIndices:
|
||||||
ld a, [wRoamMons_CurrentMapNumber]
|
ld a, [wRoamMons_CurMapNumber]
|
||||||
ld [wRoamMons_LastMapNumber], a
|
ld [wRoamMons_LastMapNumber], a
|
||||||
ld a, [wRoamMons_CurrentMapGroup]
|
ld a, [wRoamMons_CurMapGroup]
|
||||||
ld [wRoamMons_LastMapGroup], a
|
ld [wRoamMons_LastMapGroup], a
|
||||||
ld a, [wMapNumber]
|
ld a, [wMapNumber]
|
||||||
ld [wRoamMons_CurrentMapNumber], a
|
ld [wRoamMons_CurMapNumber], a
|
||||||
ld a, [wMapGroup]
|
ld a, [wMapGroup]
|
||||||
ld [wRoamMons_CurrentMapGroup], a
|
ld [wRoamMons_CurMapGroup], a
|
||||||
ret
|
ret
|
||||||
|
|
||||||
INCLUDE "data/wild/roammon_maps.asm"
|
INCLUDE "data/wild/roammon_maps.asm"
|
||||||
|
@ -321,7 +321,7 @@ Function90199:
|
|||||||
jr nz, .OutOfArea
|
jr nz, .OutOfArea
|
||||||
; If the person can't take a call at that time, don't do the call
|
; If the person can't take a call at that time, don't do the call
|
||||||
ld a, b
|
ld a, b
|
||||||
ld [wCurrentCaller], a
|
ld [wCurCaller], a
|
||||||
ld hl, PhoneContacts
|
ld hl, PhoneContacts
|
||||||
ld bc, PHONE_TABLE_WIDTH
|
ld bc, PHONE_TABLE_WIDTH
|
||||||
call AddNTimes
|
call AddNTimes
|
||||||
@ -389,7 +389,7 @@ LoadCallerScript:
|
|||||||
nop
|
nop
|
||||||
nop
|
nop
|
||||||
ld a, e
|
ld a, e
|
||||||
ld [wCurrentCaller], a
|
ld [wCurCaller], a
|
||||||
and a
|
and a
|
||||||
jr nz, .actualcaller
|
jr nz, .actualcaller
|
||||||
ld a, BANK(WrongNumber)
|
ld a, BANK(WrongNumber)
|
||||||
@ -463,7 +463,7 @@ RingTwice_StartCall:
|
|||||||
ret
|
ret
|
||||||
|
|
||||||
Phone_CallerTextboxWithName:
|
Phone_CallerTextboxWithName:
|
||||||
ld a, [wCurrentCaller]
|
ld a, [wCurCaller]
|
||||||
ld b, a
|
ld b, a
|
||||||
call Function90363
|
call Function90363
|
||||||
ret
|
ret
|
||||||
@ -680,12 +680,12 @@ Phone_GetTrainerClassName:
|
|||||||
ret
|
ret
|
||||||
|
|
||||||
GetCallerLocation:
|
GetCallerLocation:
|
||||||
ld a, [wCurrentCaller]
|
ld a, [wCurCaller]
|
||||||
call GetCallerTrainerClass
|
call GetCallerTrainerClass
|
||||||
ld d, c
|
ld d, c
|
||||||
ld e, b
|
ld e, b
|
||||||
push de
|
push de
|
||||||
ld a, [wCurrentCaller]
|
ld a, [wCurCaller]
|
||||||
ld hl, PhoneContacts + PHONE_CONTACT_MAP_GROUP
|
ld hl, PhoneContacts + PHONE_CONTACT_MAP_GROUP
|
||||||
ld bc, PHONE_TABLE_WIDTH
|
ld bc, PHONE_TABLE_WIDTH
|
||||||
call AddNTimes
|
call AddNTimes
|
||||||
|
@ -58,7 +58,7 @@ Pokedex:
|
|||||||
call PlaySFX
|
call PlaySFX
|
||||||
call WaitSFX
|
call WaitSFX
|
||||||
call ClearSprites
|
call ClearSprites
|
||||||
ld a, [wCurrentDexMode]
|
ld a, [wCurDexMode]
|
||||||
ld [wLastDexMode], a
|
ld [wLastDexMode], a
|
||||||
|
|
||||||
pop af
|
pop af
|
||||||
@ -96,7 +96,7 @@ InitPokedex:
|
|||||||
call Pokedex_CheckUnlockedUnownMode
|
call Pokedex_CheckUnlockedUnownMode
|
||||||
|
|
||||||
ld a, [wLastDexMode]
|
ld a, [wLastDexMode]
|
||||||
ld [wCurrentDexMode], a
|
ld [wCurDexMode], a
|
||||||
|
|
||||||
call Pokedex_OrderMonsByMode
|
call Pokedex_OrderMonsByMode
|
||||||
call Pokedex_InitCursorPosition
|
call Pokedex_InitCursorPosition
|
||||||
@ -178,7 +178,7 @@ Pokedex_GetLandmark:
|
|||||||
call GetWorldMapLocation
|
call GetWorldMapLocation
|
||||||
|
|
||||||
.load
|
.load
|
||||||
ld [wDexCurrentLocation], a
|
ld [wDexCurLocation], a
|
||||||
ret
|
ret
|
||||||
|
|
||||||
Pokedex_RunJumptable:
|
Pokedex_RunJumptable:
|
||||||
@ -235,7 +235,7 @@ Pokedex_InitMainScreen:
|
|||||||
ld a, POKEDEX_SCX
|
ld a, POKEDEX_SCX
|
||||||
ldh [hSCX], a
|
ldh [hSCX], a
|
||||||
|
|
||||||
ld a, [wCurrentDexMode]
|
ld a, [wCurDexMode]
|
||||||
cp DEXMODE_OLD
|
cp DEXMODE_OLD
|
||||||
ld a, $4a
|
ld a, $4a
|
||||||
jr z, .okay
|
jr z, .okay
|
||||||
@ -442,7 +442,7 @@ DexEntryScreen_MenuActionJumptable:
|
|||||||
ld a, $90
|
ld a, $90
|
||||||
ldh [hWY], a
|
ldh [hWY], a
|
||||||
call Pokedex_GetSelectedMon
|
call Pokedex_GetSelectedMon
|
||||||
ld a, [wDexCurrentLocation]
|
ld a, [wDexCurLocation]
|
||||||
ld e, a
|
ld e, a
|
||||||
predef Pokedex_GetArea
|
predef Pokedex_GetArea
|
||||||
call Pokedex_BlackOutBG
|
call Pokedex_BlackOutBG
|
||||||
@ -513,7 +513,7 @@ Pokedex_InitOptionScreen:
|
|||||||
call ClearSprites
|
call ClearSprites
|
||||||
call Pokedex_DrawOptionScreenBG
|
call Pokedex_DrawOptionScreenBG
|
||||||
call Pokedex_InitArrowCursor
|
call Pokedex_InitArrowCursor
|
||||||
ld a, [wCurrentDexMode] ; Index of the topmost visible item in a scrolling menu ???
|
ld a, [wCurDexMode] ; Index of the topmost visible item in a scrolling menu ???
|
||||||
ld [wDexArrowCursorPosIndex], a
|
ld [wDexArrowCursorPosIndex], a
|
||||||
call Pokedex_DisplayModeDescription
|
call Pokedex_DisplayModeDescription
|
||||||
call WaitBGMap
|
call WaitBGMap
|
||||||
@ -585,12 +585,12 @@ Pokedex_UpdateOptionScreen:
|
|||||||
ld b, DEXMODE_ABC
|
ld b, DEXMODE_ABC
|
||||||
|
|
||||||
.ChangeMode:
|
.ChangeMode:
|
||||||
ld a, [wCurrentDexMode]
|
ld a, [wCurDexMode]
|
||||||
cp b
|
cp b
|
||||||
jr z, .skip_changing_mode ; Skip if new mode is same as current.
|
jr z, .skip_changing_mode ; Skip if new mode is same as current.
|
||||||
|
|
||||||
ld a, b
|
ld a, b
|
||||||
ld [wCurrentDexMode], a
|
ld [wCurDexMode], a
|
||||||
call Pokedex_OrderMonsByMode
|
call Pokedex_OrderMonsByMode
|
||||||
call Pokedex_DisplayChangingModesMessage
|
call Pokedex_DisplayChangingModesMessage
|
||||||
xor a
|
xor a
|
||||||
@ -799,7 +799,7 @@ Pokedex_InitUnownMode:
|
|||||||
call Pokedex_LoadUnownFont
|
call Pokedex_LoadUnownFont
|
||||||
call Pokedex_DrawUnownModeBG
|
call Pokedex_DrawUnownModeBG
|
||||||
xor a
|
xor a
|
||||||
ld [wDexCurrentUnownIndex], a
|
ld [wDexCurUnownIndex], a
|
||||||
call Pokedex_LoadUnownFrontpicTiles
|
call Pokedex_LoadUnownFrontpicTiles
|
||||||
call Pokedex_UnownModePlaceCursor
|
call Pokedex_UnownModePlaceCursor
|
||||||
farcall PrintUnownWord
|
farcall PrintUnownWord
|
||||||
@ -849,7 +849,7 @@ Pokedex_UnownModeHandleDPadInput:
|
|||||||
.right
|
.right
|
||||||
ld a, [wDexUnownCount]
|
ld a, [wDexUnownCount]
|
||||||
ld e, a
|
ld e, a
|
||||||
ld hl, wDexCurrentUnownIndex
|
ld hl, wDexCurUnownIndex
|
||||||
ld a, [hl]
|
ld a, [hl]
|
||||||
inc a
|
inc a
|
||||||
cp e
|
cp e
|
||||||
@ -859,7 +859,7 @@ Pokedex_UnownModeHandleDPadInput:
|
|||||||
jr .update
|
jr .update
|
||||||
|
|
||||||
.left
|
.left
|
||||||
ld hl, wDexCurrentUnownIndex
|
ld hl, wDexCurUnownIndex
|
||||||
ld a, [hl]
|
ld a, [hl]
|
||||||
and a
|
and a
|
||||||
ret z
|
ret z
|
||||||
@ -886,7 +886,7 @@ Pokedex_UnownModeEraseCursor:
|
|||||||
jr Pokedex_UnownModeUpdateCursorGfx
|
jr Pokedex_UnownModeUpdateCursorGfx
|
||||||
|
|
||||||
Pokedex_UnownModePlaceCursor:
|
Pokedex_UnownModePlaceCursor:
|
||||||
ld a, [wDexCurrentUnownIndex]
|
ld a, [wDexCurUnownIndex]
|
||||||
ld c, $5a ; diamond cursor
|
ld c, $5a ; diamond cursor
|
||||||
|
|
||||||
Pokedex_UnownModeUpdateCursorGfx:
|
Pokedex_UnownModeUpdateCursorGfx:
|
||||||
@ -1460,7 +1460,7 @@ Pokedex_PrintListing:
|
|||||||
; Prints the list of Pokémon on the main Pokédex screen.
|
; Prints the list of Pokémon on the main Pokédex screen.
|
||||||
|
|
||||||
; This check is completely useless.
|
; This check is completely useless.
|
||||||
ld a, [wCurrentDexMode]
|
ld a, [wCurDexMode]
|
||||||
cp DEXMODE_OLD
|
cp DEXMODE_OLD
|
||||||
jr z, .okay
|
jr z, .okay
|
||||||
ld c, 11
|
ld c, 11
|
||||||
@ -1522,7 +1522,7 @@ Pokedex_PrintListing:
|
|||||||
ret
|
ret
|
||||||
|
|
||||||
Pokedex_PrintNumberIfOldMode:
|
Pokedex_PrintNumberIfOldMode:
|
||||||
ld a, [wCurrentDexMode]
|
ld a, [wCurDexMode]
|
||||||
cp DEXMODE_OLD
|
cp DEXMODE_OLD
|
||||||
jr z, .printnum
|
jr z, .printnum
|
||||||
ret
|
ret
|
||||||
@ -1613,7 +1613,7 @@ Pokedex_OrderMonsByMode:
|
|||||||
ld bc, wPokedexOrderEnd - wPokedexOrder
|
ld bc, wPokedexOrderEnd - wPokedexOrder
|
||||||
xor a
|
xor a
|
||||||
call ByteFill
|
call ByteFill
|
||||||
ld a, [wCurrentDexMode]
|
ld a, [wCurDexMode]
|
||||||
ld hl, .Jumptable
|
ld hl, .Jumptable
|
||||||
call Pokedex_LoadPointer
|
call Pokedex_LoadPointer
|
||||||
jp hl
|
jp hl
|
||||||
@ -1968,7 +1968,7 @@ Pokedex_DisplayTypeNotFoundMessage:
|
|||||||
next "was not found.@"
|
next "was not found.@"
|
||||||
|
|
||||||
Pokedex_UpdateCursorOAM:
|
Pokedex_UpdateCursorOAM:
|
||||||
ld a, [wCurrentDexMode]
|
ld a, [wCurDexMode]
|
||||||
cp DEXMODE_OLD
|
cp DEXMODE_OLD
|
||||||
jp z, Pokedex_PutOldModeCursorOAM
|
jp z, Pokedex_PutOldModeCursorOAM
|
||||||
call Pokedex_PutNewModeABCModeCursorOAM
|
call Pokedex_PutNewModeABCModeCursorOAM
|
||||||
@ -2070,7 +2070,7 @@ Pokedex_PutNewModeABCModeCursorOAM:
|
|||||||
db -1
|
db -1
|
||||||
|
|
||||||
Pokedex_UpdateSearchResultsCursorOAM:
|
Pokedex_UpdateSearchResultsCursorOAM:
|
||||||
ld a, [wCurrentDexMode]
|
ld a, [wCurDexMode]
|
||||||
cp DEXMODE_OLD
|
cp DEXMODE_OLD
|
||||||
jp z, Pokedex_PutOldModeCursorOAM
|
jp z, Pokedex_PutOldModeCursorOAM
|
||||||
ld hl, .CursorOAM
|
ld hl, .CursorOAM
|
||||||
@ -2498,7 +2498,7 @@ Pokedex_LoadUnownFont:
|
|||||||
Pokedex_LoadUnownFrontpicTiles:
|
Pokedex_LoadUnownFrontpicTiles:
|
||||||
ld a, [wUnownLetter]
|
ld a, [wUnownLetter]
|
||||||
push af
|
push af
|
||||||
ld a, [wDexCurrentUnownIndex]
|
ld a, [wDexCurUnownIndex]
|
||||||
ld e, a
|
ld e, a
|
||||||
ld d, 0
|
ld d, 0
|
||||||
ld hl, wUnownDex
|
ld hl, wUnownDex
|
||||||
|
@ -43,7 +43,7 @@ DrawPokedexListWindow:
|
|||||||
ld [hl], $3f
|
ld [hl], $3f
|
||||||
hlcoord 5, 16
|
hlcoord 5, 16
|
||||||
ld [hl], $40
|
ld [hl], $40
|
||||||
ld a, [wCurrentDexMode]
|
ld a, [wCurDexMode]
|
||||||
cp DEXMODE_OLD
|
cp DEXMODE_OLD
|
||||||
jr z, .OldMode
|
jr z, .OldMode
|
||||||
; scroll bar
|
; scroll bar
|
||||||
|
@ -23,7 +23,7 @@ PrintUnownWord:
|
|||||||
ld bc, 12
|
ld bc, 12
|
||||||
ld a, " "
|
ld a, " "
|
||||||
call ByteFill
|
call ByteFill
|
||||||
ld a, [wDexCurrentUnownIndex]
|
ld a, [wDexCurUnownIndex]
|
||||||
ld e, a
|
ld e, a
|
||||||
ld d, 0
|
ld d, 0
|
||||||
ld hl, wUnownDex
|
ld hl, wUnownDex
|
||||||
|
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