jumptable macro repurposed

This commit is contained in:
PikalaxALT
2015-12-26 21:59:03 -05:00
parent 2bd45ca574
commit f030315b1f
66 changed files with 1241 additions and 1759 deletions

View File

@@ -3,7 +3,7 @@
INCLUDE "battle/objects/engine.asm" INCLUDE "battle/objects/engine.asm"
INCLUDE "battle/objects/data.asm" INCLUDE "battle/objects/data.asm"
INCLUDE "battle/objects/functions.asm" INCLUDE "battle/objects/functions.asm"
INCLUDE "battle/objects/library.asm" INCLUDE "battle/objects/helpers.asm"
INCLUDE "battle/objects/framesets.asm" INCLUDE "battle/objects/framesets.asm"
INCLUDE "battle/objects/oam.asm" INCLUDE "battle/objects/oam.asm"
INCLUDE "battle/objects/gfx_headers.asm" INCLUDE "battle/objects/gfx_headers.asm"

File diff suppressed because it is too large Load Diff

View File

@@ -1849,9 +1849,8 @@ HandleWeather: ; 3cb9e
dec a dec a
ld c, a ld c, a
ld b, 0 ld b, 0
rept 2
add hl, bc add hl, bc
endr add hl, bc
ld a, [hli] ld a, [hli]
ld h, [hl] ld h, [hl]
ld l, a ld l, a
@@ -2575,9 +2574,8 @@ Function3d02b: ; 3d02b
dec a dec a
ld c, a ld c, a
ld b, 0 ld b, 0
rept 2
add hl, bc add hl, bc
endr add hl, bc
ld a, [hli] ld a, [hli]
ld h, [hl] ld h, [hl]
ld l, a ld l, a
@@ -2615,9 +2613,8 @@ endr
rl [hl] rl [hl]
ret nc ret nc
ld a, $ff ld a, $ff
rept 2
ld [hli], a ld [hli], a
endr ld [hli], a
ld [hl], a ld [hl], a
ret ret
; 3d0ab ; 3d0ab
@@ -4747,18 +4744,16 @@ HandleStatBoostingHeldItems: ; 3de97
ld a, [hli] ld a, [hli]
cp $ff cp $ff
jr z, .finish jr z, .finish
rept 2
inc hl inc hl
endr inc hl
cp b cp b
jr nz, .loop jr nz, .loop
pop bc pop bc
ld a, [bc] ld a, [bc]
ld [wd265], a ld [wd265], a
push bc push bc
rept 2
dec hl dec hl
endr dec hl
ld a, [hli] ld a, [hli]
ld h, [hl] ld h, [hl]
ld l, a ld l, a
@@ -5822,9 +5817,8 @@ MoveSelectionScreen: ; 3e4bc
ld a, [wMenuCursorY] ld a, [wMenuCursorY]
ld b, a ld b, a
ld a, [wNumMoves] ld a, [wNumMoves]
rept 2
inc a inc a
endr inc a
cp b cp b
jp nz, .menu_loop jp nz, .menu_loop
ld a, $1 ld a, $1
@@ -6008,9 +6002,8 @@ MoveInfoBox: ; 3e6c8
lb bc, 1, 2 lb bc, 1, 2
call PrintNum call PrintNum
pop hl pop hl
rept 2
inc hl inc hl
endr inc hl
ld [hl], "/" ld [hl], "/"
inc hl inc hl
ld de, wNamedObjectIndexBuffer ld de, wNamedObjectIndexBuffer
@@ -6818,9 +6811,8 @@ CheckUnownLetter: ; 3eb75
.next .next
; Make sure we haven't gone past the end of the table ; Make sure we haven't gone past the end of the table
rept 2
inc e inc e
endr inc e
ld a, e ld a, e
cp a, .Set1 - .LetterSets cp a, .Set1 - .LetterSets
jr c, .loop jr c, .loop
@@ -7176,9 +7168,8 @@ BadgeStatBoosts: ; 3ed45
; Swap badges 3 (PlainBadge) and 5 (MineralBadge). ; Swap badges 3 (PlainBadge) and 5 (MineralBadge).
ld d, a ld d, a
and (1 << PLAINBADGE) and (1 << PLAINBADGE)
rept 2
add a add a
endr add a
ld b, a ld b, a
ld a, d ld a, d
and (1 << MINERALBADGE) and (1 << MINERALBADGE)
@@ -7197,9 +7188,8 @@ endr
ld a, b ld a, b
srl b srl b
call c, BoostStat call c, BoostStat
rept 2
inc hl inc hl
endr inc hl
; Check every other badge. ; Check every other badge.
srl b srl b
dec c dec c
@@ -7328,9 +7318,8 @@ _BattleRandom:: ; 3edd8
; a * 5 + 1 ; a * 5 + 1
ld c, a ld c, a
rept 2
add a add a
endr add a
add c add c
inc a inc a
@@ -7467,9 +7456,8 @@ GiveExperiencePoints: ; 3ee3b
ld [de], a ld [de], a
.skip .skip
rept 2
inc de inc de
endr inc de
dec c dec c
jr nz, .loop1 jr nz, .loop1
xor a xor a
@@ -7544,9 +7532,8 @@ endr
inc [hl] inc [hl]
jr nz, .skip2 jr nz, .skip2
ld a, $ff ld a, $ff
rept 2
ld [hli], a ld [hli], a
endr ld [hli], a
ld [hl], a ld [hl], a
.skip2 .skip2
@@ -7881,9 +7868,8 @@ Function3f136: ; 3f136
inc [hl] inc [hl]
jr nz, .asm_3f186 jr nz, .asm_3f186
ld a, $ff ld a, $ff
rept 2
ld [hli], a ld [hli], a
endr ld [hli], a
ld [hl], a ld [hl], a
.asm_3f186 .asm_3f186
@@ -8800,9 +8786,8 @@ CheckPayDay: ; 3f71d
rl [hl] rl [hl]
jr nc, .okay jr nc, .okay
ld a, $ff ld a, $ff
rept 2
ld [hli], a ld [hli], a
endr ld [hli], a
ld [hl], a ld [hl], a
.okay .okay
@@ -9202,13 +9187,11 @@ Function3fa42: ; 3fa42
ld d, 5 ld d, 5
.loop .loop
push hl push hl
rept 2
inc hl inc hl
endr inc hl
ld a, [hl] ld a, [hl]
rept 2
dec hl dec hl
endr dec hl
and a and a
jr z, .copy jr z, .copy
push de push de
@@ -9308,18 +9291,16 @@ Function3fac8: ; 3fac8
ld c, $1 ld c, $1
.loop2 .loop2
ld a, b ld a, b
rept 2
add b add b
endr add b
ld e, a ld e, a
ld d, $0 ld d, $0
ld hl, wd002 ld hl, wd002
add hl, de add hl, de
push hl push hl
ld a, c ld a, c
rept 2
add c add c
endr add c
ld e, a ld e, a
ld d, $0 ld d, $0
ld hl, wd002 ld hl, wd002

View File

@@ -51,9 +51,8 @@ DoMove: ; 3402c
ld c, a ld c, a
ld b, 0 ld b, 0
ld hl, MoveEffectsPointers ld hl, MoveEffectsPointers
rept 2
add hl, bc add hl, bc
endr add hl, bc
ld a, BANK(MoveEffectsPointers) ld a, BANK(MoveEffectsPointers)
call GetFarHalfword call GetFarHalfword
@@ -102,9 +101,8 @@ endr
ld c, a ld c, a
ld b, 0 ld b, 0
ld hl, BattleCommandPointers ld hl, BattleCommandPointers
rept 2
add hl, bc add hl, bc
endr add hl, bc
pop bc pop bc
ld a, BANK(BattleCommandPointers) ld a, BANK(BattleCommandPointers)
@@ -1076,9 +1074,8 @@ BattleCommand_DoTurn: ; 34555
jp nz, EndMoveEffect jp nz, EndMoveEffect
; SubStatus5 ; SubStatus5
rept 2
inc de inc de
endr inc de
ld a, [de] ld a, [de]
bit SUBSTATUS_TRANSFORMED, a bit SUBSTATUS_TRANSFORMED, a
@@ -1276,9 +1273,8 @@ BattleCommand_Critical: ; 34631
jr nc, .ScopeLens jr nc, .ScopeLens
; +2 critical level ; +2 critical level
rept 2
inc c inc c
endr inc c
.ScopeLens .ScopeLens
push bc push bc
@@ -1522,9 +1518,8 @@ BattleCommand_Stab: ; 346d2
pop hl pop hl
.SkipType .SkipType
rept 2
inc hl inc hl
endr inc hl
jr .TypesLoop jr .TypesLoop
.end .end
@@ -2741,9 +2736,8 @@ EndMoveEffect: ; 352a3
ld a, [BattleScriptBufferLoc + 1] ld a, [BattleScriptBufferLoc + 1]
ld h, a ld h, a
ld a, $ff ld a, $ff
rept 2
ld [hli], a ld [hli], a
endr ld [hli], a
ld [hl], a ld [hl], a
ret ret
@@ -3457,9 +3451,8 @@ BattleCommand_DamageCalc: ; 35612
xor a xor a
ld hl, hDividend ld hl, hDividend
rept 2
ld [hli], a ld [hli], a
endr ld [hli], a
ld [hl], a ld [hl], a
; Level * 2 ; Level * 2
@@ -3480,9 +3473,8 @@ endr
pop bc pop bc
; + 2 ; + 2
rept 2
inc [hl] inc [hl]
endr inc [hl]
; * bp ; * bp
inc hl inc hl
@@ -4075,9 +4067,8 @@ BattleCommand_PainSplit: ; 35926
ld [Buffer3], a ld [Buffer3], a
ld a, [hl] ld a, [hl]
ld [Buffer4], a ld [Buffer4], a
rept 2
dec de dec de
endr dec de
ld a, [de] ld a, [de]
dec de dec de
add b add b
@@ -4587,9 +4578,8 @@ BattleCommand_Spite: ; 35c0f
call GetMoveName call GetMoveName
call BattleRandom call BattleRandom
and 3 and 3
rept 2
inc a inc a
endr inc a
ld b, a ld b, a
ld a, [hl] ld a, [hl]
and $3f and $3f
@@ -6380,9 +6370,8 @@ CalcStats: ; 3661d
dec c dec c
ld b, 0 ld b, 0
ld hl, StatLevelMultipliers ld hl, StatLevelMultipliers
rept 2
add hl, bc add hl, bc
endr add hl, bc
xor a xor a
ld [hMultiplicand + 0], a ld [hMultiplicand + 0], a
@@ -6538,9 +6527,8 @@ BattleCommand_UnleashEnergy: ; 366e5
ld [wEnemyMoveStruct + MOVE_EFFECT], a ld [wEnemyMoveStruct + MOVE_EFFECT], a
call BattleRandom call BattleRandom
and 1 and 1
rept 2
inc a inc a
endr inc a
ld [bc], a ld [bc], a
ld a, 1 ld a, 1
ld [wKickCounter], a ld [wKickCounter], a
@@ -6579,9 +6567,8 @@ BattleCommand_CheckRampage: ; 3671a
set SUBSTATUS_CONFUSED, [hl] set SUBSTATUS_CONFUSED, [hl]
call BattleRandom call BattleRandom
and %00000001 and %00000001
rept 2
inc a inc a
endr inc a
inc de ; ConfuseCount inc de ; ConfuseCount
ld [de], a ld [de], a
.continue_rampage .continue_rampage
@@ -7464,9 +7451,8 @@ endr
ld a, [hli] ld a, [hli]
cp b cp b
jr z, .found_trap_text jr z, .found_trap_text
rept 2
inc hl inc hl
endr inc hl
jr .find_trap_text jr .find_trap_text
.found_trap_text .found_trap_text
@@ -7552,9 +7538,8 @@ BattleCommand_Recoil: ; 36cb2
ld [Buffer2], a ld [Buffer2], a
ld a, [hl] ld a, [hl]
ld [Buffer1], a ld [Buffer1], a
rept 2
dec hl dec hl
endr dec hl
ld a, [hl] ld a, [hl]
ld [Buffer3], a ld [Buffer3], a
sub c sub c
@@ -7651,9 +7636,8 @@ BattleCommand_FinishConfusingTarget: ; 36d70
set SUBSTATUS_CONFUSED, [hl] set SUBSTATUS_CONFUSED, [hl]
call BattleRandom call BattleRandom
and 3 and 3
rept 2
inc a inc a
endr inc a
ld [bc], a ld [bc], a
ld a, BATTLE_VARS_MOVE_EFFECT ld a, BATTLE_VARS_MOVE_EFFECT
@@ -7844,9 +7828,8 @@ BattleCommand_Substitute: ; 36e7c
rr b rr b
srl a srl a
rr b rr b
rept 2
dec hl dec hl
endr dec hl
ld a, b ld a, b
ld [de], a ld [de], a
ld a, [hld] ld a, [hld]
@@ -8457,9 +8440,8 @@ BattleCommand_Transform: ; 371cd
ld a, [hli] ld a, [hli]
ld [de], a ld [de], a
inc hl inc hl
rept 2
inc de inc de
endr inc de
ld bc, NUM_MOVES ld bc, NUM_MOVES
call CopyBytes call CopyBytes
ld a, [hBattleTurn] ld a, [hBattleTurn]
@@ -9125,9 +9107,8 @@ BattleCommand_GetMagnitude: ; 37991
ld a, [hli] ld a, [hli]
cp b cp b
jr nc, .ok jr nc, .ok
rept 2
inc hl inc hl
endr inc hl
jr .loop jr .loop
.ok .ok
@@ -9528,16 +9509,14 @@ BattleCommand_TimeBasedHealContinue: ; 37b7e
inc c inc c
cp WEATHER_SUN cp WEATHER_SUN
jr z, .Heal jr z, .Heal
rept 2
dec c dec c
endr dec c
.Heal .Heal
ld b, 0 ld b, 0
ld hl, .Multipliers ld hl, .Multipliers
rept 2
add hl, bc add hl, bc
endr add hl, bc
ld a, [hli] ld a, [hli]
ld h, [hl] ld h, [hl]

View File

@@ -558,10 +558,10 @@ endm
; ANIM_OBJ_COTTON ; ANIM_OBJ_COTTON
battleanimobj $01, $ff, BATTLEANIMFRAMESET_89, BATTLEANIMFUNC_4F, $04, $1f battleanimobj $01, $ff, BATTLEANIMFRAMESET_89, BATTLEANIMFUNC_4F, $04, $1f
; ANIM_OBJ_B8 ; ANIM_OBJ_PLAYERFEETFOLLOW
battleanimobj $00, $00, BATTLEANIMFRAMESET_B5, BATTLEANIMFUNC_00, $00, $28 battleanimobj $00, $00, BATTLEANIMFRAMESET_B5, BATTLEANIMFUNC_00, $00, $28
; ANIM_OBJ_B9 ; ANIM_OBJ_ENEMYFEETFOLLOW
battleanimobj $00, $00, BATTLEANIMFRAMESET_B6, BATTLEANIMFUNC_00, $01, $29 battleanimobj $00, $00, BATTLEANIMFRAMESET_B6, BATTLEANIMFUNC_00, $01, $29
; ANIM_OBJ_BA ; ANIM_OBJ_BA

File diff suppressed because it is too large Load Diff

View File

@@ -5,10 +5,10 @@ BattleIntroSlidingPics: ; 4e980
ld [rSVBK], a ld [rSVBK], a
call .subfunction1 call .subfunction1
ld a, rSCX - $ff00 ld a, rSCX - $ff00
ld [hLCDStatCustom], a ld [hFFC6], a
call .subfunction2 call .subfunction2
xor a xor a
ld [hLCDStatCustom], a ld [hFFC6], a
pop af pop af
ld [rSVBK], a ld [rSVBK], a
ret ret

View File

@@ -210,8 +210,8 @@ BATTLEANIMSTRUCT_LENGTH EQU const_value
const ANIM_OBJ_B5 const ANIM_OBJ_B5
const ANIM_OBJ_FLOWER const ANIM_OBJ_FLOWER
const ANIM_OBJ_COTTON const ANIM_OBJ_COTTON
const ANIM_OBJ_B8 const ANIM_OBJ_PLAYERFEETFOLLOW
const ANIM_OBJ_B9 const ANIM_OBJ_ENEMYFEETFOLLOW
const ANIM_OBJ_BA const ANIM_OBJ_BA
const ANIM_OBJ_BB const ANIM_OBJ_BB

View File

@@ -15,7 +15,7 @@
const BATTLETOWERACTION_0D ; more time stuff in SRAM bank 5 const BATTLETOWERACTION_0D ; more time stuff in SRAM bank 5
const BATTLETOWERACTION_EGGTICKET ; egg ticket const BATTLETOWERACTION_EGGTICKET ; egg ticket
const BATTLETOWERACTION_0F ; check w3_d090 const BATTLETOWERACTION_0F ; check w3_d090
const BATTLETOWERACTION_10 ; jumptable based on 5:a800 const BATTLETOWERACTION_10 ; dw based on 5:a800
const BATTLETOWERACTION_11 ; store 0 in 5:aa8d const BATTLETOWERACTION_11 ; store 0 in 5:aa8d
const BATTLETOWERACTION_12 ; store 1 in 5:aa8d const BATTLETOWERACTION_12 ; store 1 in 5:aa8d
const BATTLETOWERACTION_13 ; check 5:aa8d const BATTLETOWERACTION_13 ; check 5:aa8d

View File

@@ -39,9 +39,9 @@ Predef_StartBattle: ; 8c20f
call DmgToCgbBGPals call DmgToCgbBGPals
call DelayFrame call DelayFrame
xor a xor a
ld [hLCDStatCustom], a ld [hFFC6], a
ld [hLCDStatCustom + 1], a ld [hFFC7], a
ld [hLCDStatCustom + 2], a ld [hFFC8], a
ld [hSCY], a ld [hSCY], a
ld a, $1 ld a, $1
@@ -74,9 +74,8 @@ Function8c26d: ; 8c26d
ld [hBGMapMode], a ld [hBGMapMode], a
ld hl, wJumptableIndex ld hl, wJumptableIndex
xor a xor a
rept 2
ld [hli], a ld [hli], a
endr ld [hli], a
ld [hl], a ld [hl], a
call WipeLYOverrides call WipeLYOverrides
ret ret
@@ -146,20 +145,10 @@ INCBIN "gfx/overworld/trainer_battle_pokeball_tiles.2bpp"
FlashyTransitionToBattle: ; 8c314 FlashyTransitionToBattle: ; 8c314
ld a, [wJumptableIndex] jumptable .dw, wJumptableIndex
ld e, a
ld d, 0
ld hl, .jumptable
rept 2
add hl, de
endr
ld a, [hli]
ld h, [hl]
ld l, a
jp [hl]
; 8c323 ; 8c323
.jumptable: ; 8c323 (23:4323) .dw: ; 8c323 (23:4323)
dw StartTrainerBattle_DetermineWhichAnimation ; 00 dw StartTrainerBattle_DetermineWhichAnimation ; 00
; Animation 1: cave ; Animation 1: cave
@@ -314,11 +303,11 @@ StartTrainerBattle_SetUpForWavyOutro: ; 8c3e8 (23:43e8)
call StartTrainerBattle_NextScene call StartTrainerBattle_NextScene
ld a, $43 ld a, $43
ld [hLCDStatCustom], a ld [hFFC6], a
xor a xor a
ld [hLCDStatCustom + 1], a ld [hFFC7], a
ld a, $90 ld a, $90
ld [hLCDStatCustom + 2], a ld [hFFC8], a
xor a xor a
ld [wcf64], a ld [wcf64], a
ld [wcf65], a ld [wcf65], a
@@ -784,9 +773,8 @@ StartTrainerBattle_DrawSineWave: ; 8c6f7 (23:46f7)
ld a, d ld a, d
ld d, 0 ld d, 0
ld hl, .sinewave ld hl, .sinewave
rept 2
add hl, de add hl, de
endr add hl, de
ld e, [hl] ld e, [hl]
inc hl inc hl
ld d, [hl] ld d, [hl]

View File

@@ -42,12 +42,12 @@ _DepositPKMN: ; e2391 (38:6391)
jp [hl] jp [hl]
.Jumptable: ; e23df (38:63df) .Jumptable: ; e23df (38:63df)
jumptable_start
jumptable .Init dw .Init
jumptable .HandleJoypad dw .HandleJoypad
jumptable .WhatsUp dw .WhatsUp
jumptable .Submenu dw .Submenu
jumptable BillsPC_EndJumptableLoop dw BillsPC_EndJumptableLoop
.Init: ; e23e9 (38:63e9) .Init: ; e23e9 (38:63e9)
@@ -151,11 +151,11 @@ endr
jp [hl] jp [hl]
BillsPCDepositJumptable: ; e24a1 (38:64a1) BillsPCDepositJumptable: ; e24a1 (38:64a1)
jumptable_start
jumptable BillsPCDepositFuncDeposit ; Deposit Pokemon dw BillsPCDepositFuncDeposit ; Deposit Pokemon
jumptable BillsPCDepositFuncStats ; Pokemon Stats dw BillsPCDepositFuncStats ; Pokemon Stats
jumptable BillsPCDepositFuncRelease ; Release Pokemon dw BillsPCDepositFuncRelease ; Release Pokemon
jumptable BillsPCDepositFuncCancel ; Cancel dw BillsPCDepositFuncCancel ; Cancel
BillsPCDepositFuncDeposit: ; e24a9 (38:64a9) BillsPCDepositFuncDeposit: ; e24a9 (38:64a9)
@@ -310,12 +310,12 @@ _WithdrawPKMN: ; e2583 (38:6583)
jp [hl] jp [hl]
.Jumptable: ; e25d2 (38:65d2) .Jumptable: ; e25d2 (38:65d2)
jumptable_start
jumptable .Init dw .Init
jumptable .Joypad dw .Joypad
jumptable .PrepSubmenu dw .PrepSubmenu
jumptable BillsPC_Withdraw dw BillsPC_Withdraw
jumptable BillsPC_EndJumptableLoop dw BillsPC_EndJumptableLoop
.Init: ; e25dc (38:65dc) .Init: ; e25dc (38:65dc)
@@ -410,7 +410,7 @@ BillsPC_Withdraw: ; e2675 (38:6675)
and 3 and 3
ld e, a ld e, a
ld d, 0 ld d, 0
ld hl, .jumptable ld hl, .dw
rept 2 rept 2
add hl, de add hl, de
endr endr
@@ -419,7 +419,7 @@ endr
ld l, a ld l, a
jp [hl] jp [hl]
.jumptable: ; e2699 (38:6699) #mark .dw: ; e2699 (38:6699) #mark
dw .withdraw ; Withdraw dw .withdraw ; Withdraw
dw .stats ; Stats dw .stats ; Stats
dw .release ; Release dw .release ; Release
@@ -562,14 +562,14 @@ _MovePKMNWithoutMail: ; e2759
; e27ac ; e27ac
.Jumptable: ; e27ac .Jumptable: ; e27ac
jumptable_start
jumptable .Init dw .Init
jumptable .Joypad dw .Joypad
jumptable .PrepSubmenu dw .PrepSubmenu
jumptable .MoveMonWOMailSubmenu dw .MoveMonWOMailSubmenu
jumptable .PrepInsertCursor dw .PrepInsertCursor
jumptable .Joypad2 dw .Joypad2
jumptable BillsPC_EndJumptableLoop dw BillsPC_EndJumptableLoop
; e27ba ; e27ba
.Init: ; e27ba .Init: ; e27ba
@@ -2016,12 +2016,12 @@ endr
ld a, [hli] ld a, [hli]
ld h, [hl] ld h, [hl]
ld l, a ld l, a
ld de, .jumptable_return ld de, .dw_return
push de push de
jp [hl] jp [hl]
; e322a ; e322a
.jumptable_return: ; e322a .dw_return: ; e322a
pop af pop af
ld e, a ld e, a
callba Function14ad5 callba Function14ad5
@@ -2033,11 +2033,11 @@ endr
; e3245 ; e3245
.Jumptable: ; e3245 .Jumptable: ; e3245
jumptable_start
jumptable .BoxToBox dw .BoxToBox
jumptable .PartyToBox dw .PartyToBox
jumptable .BoxToParty dw .BoxToParty
jumptable .PartyToParty dw .PartyToParty
; e324d ; e324d
.BoxToBox: ; e324d .BoxToBox: ; e324d

View File

@@ -81,15 +81,15 @@ endr
; e01a0 (38:41a0) ; e01a0 (38:41a0)
.Jumptable: ; e01a0 .Jumptable: ; e01a0
jumptable_start
jumptable .AskPlayWithThree dw .AskPlayWithThree
jumptable .DeductCoins dw .DeductCoins
jumptable .ChooseACard dw .ChooseACard
jumptable .PlaceYourBet dw .PlaceYourBet
jumptable .CheckTheCard dw .CheckTheCard
jumptable .TabulateTheResult dw .TabulateTheResult
jumptable .PlayAgain dw .PlayAgain
jumptable .Quit dw .Quit
; e01b0 ; e01b0
.Increment: ; e01b0 .Increment: ; e01b0
@@ -108,7 +108,7 @@ endr
ret ret
.SaidNo .SaidNo
ld a, 7 ; .QuitTableIndex ld a, 7
ld [wJumptableIndex], a ld [wJumptableIndex], a
ret ret
; e01cd ; e01cd
@@ -132,7 +132,7 @@ endr
jr nc, .deduct ; You have at least 3 coins. jr nc, .deduct ; You have at least 3 coins.
ld hl, .NotEnoughCoinsText ld hl, .NotEnoughCoinsText
call CardFlip_UpdateCoinBalanceDisplay call CardFlip_UpdateCoinBalanceDisplay
ld a, 7 ; .QuitTableIndex ld a, 7
ld [wJumptableIndex], a ld [wJumptableIndex], a
ret ret
@@ -329,7 +329,7 @@ endr
call CardFlip_BlankDiscardedCardSlot call CardFlip_BlankDiscardedCardSlot
.LoopAround .LoopAround
ld a, 1 ; .DeductCoinsTableIndex ld a, 1
ld [wJumptableIndex], a ld [wJumptableIndex], a
ret ret
; e0356 ; e0356
@@ -659,13 +659,13 @@ CardFlip_BlankDiscardedCardSlot: ; e0534
; e0553 ; e0553
.Jumptable: ; e0553 .Jumptable: ; e0553
jumptable_start
jumptable .Level1 dw .Level1
jumptable .Level2 dw .Level2
jumptable .Level3 dw .Level3
jumptable .Level4 dw .Level4
jumptable .Level5 dw .Level5
jumptable .Level6 dw .Level6
; e055f ; e055f
.Level1: ; e055f .Level1: ; e055f
@@ -848,62 +848,62 @@ CardFlip_CheckWinCondition: ; e0637
; e0643 ; e0643
.Jumptable: ; e0643 .Jumptable: ; e0643
jumptable_start
jumptable .Impossible dw .Impossible
jumptable .Impossible dw .Impossible
jumptable .PikaJiggly dw .PikaJiggly
jumptable .PikaJiggly dw .PikaJiggly
jumptable .PoliOddish dw .PoliOddish
jumptable .PoliOddish dw .PoliOddish
jumptable .Impossible dw .Impossible
jumptable .Impossible dw .Impossible
jumptable .Pikachu dw .Pikachu
jumptable .Jigglypuff dw .Jigglypuff
jumptable .Poliwag dw .Poliwag
jumptable .Oddish dw .Oddish
jumptable .OneTwo dw .OneTwo
jumptable .One dw .One
jumptable .PikaOne dw .PikaOne
jumptable .JigglyOne dw .JigglyOne
jumptable .PoliOne dw .PoliOne
jumptable .OddOne dw .OddOne
jumptable .OneTwo dw .OneTwo
jumptable .Two dw .Two
jumptable .PikaTwo dw .PikaTwo
jumptable .JigglyTwo dw .JigglyTwo
jumptable .PoliTwo dw .PoliTwo
jumptable .OddTwo dw .OddTwo
jumptable .ThreeFour dw .ThreeFour
jumptable .Three dw .Three
jumptable .PikaThree dw .PikaThree
jumptable .JigglyThree dw .JigglyThree
jumptable .PoliThree dw .PoliThree
jumptable .OddThree dw .OddThree
jumptable .ThreeFour dw .ThreeFour
jumptable .Four dw .Four
jumptable .PikaFour dw .PikaFour
jumptable .JigglyFour dw .JigglyFour
jumptable .PoliFour dw .PoliFour
jumptable .OddFour dw .OddFour
jumptable .FiveSix dw .FiveSix
jumptable .Five dw .Five
jumptable .PikaFive dw .PikaFive
jumptable .JigglyFive dw .JigglyFive
jumptable .PoliFive dw .PoliFive
jumptable .OddFive dw .OddFive
jumptable .FiveSix dw .FiveSix
jumptable .Six dw .Six
jumptable .PikaSix dw .PikaSix
jumptable .JigglySix dw .JigglySix
jumptable .PoliSix dw .PoliSix
jumptable .OddSix dw .OddSix
; e06a3 ; e06a3
.Impossible: ; e06a3 .Impossible: ; e06a3

View File

@@ -367,9 +367,8 @@ ApplyHPBarPals: ; 8c43
.okay .okay
ld l, c ld l, c
ld h, $0 ld h, $0
rept 2
add hl, hl add hl, hl
endr add hl, hl
ld bc, Palettes_a8be ld bc, Palettes_a8be
add hl, bc add hl, bc
ld bc, 4 ld bc, 4
@@ -405,9 +404,8 @@ LoadStatsScreenPals: ; 8c8a
ld hl, StatsScreenPals ld hl, StatsScreenPals
ld b, 0 ld b, 0
dec c dec c
rept 2
add hl, bc add hl, bc
endr add hl, bc
ld a, [rSVBK] ld a, [rSVBK]
push af push af
ld a, $5 ld a, $5
@@ -441,9 +439,8 @@ endr
ld bc, PALPACKET_LENGTH ld bc, PALPACKET_LENGTH
call CopyBytes call CopyBytes
pop hl pop hl
rept 2
inc hl inc hl
endr inc hl
ld a, [hli] ld a, [hli]
ld [wSGBPals + 3], a ld [wSGBPals + 3], a
ld a, [hli] ld a, [hli]
@@ -818,9 +815,8 @@ GetFrontpicPalettePointer: ; 9764
GetTrainerPalettePointer: ; 976b GetTrainerPalettePointer: ; 976b
ld l, a ld l, a
ld h, 0 ld h, 0
rept 2
add hl,hl add hl,hl
endr add hl,hl
ld bc, TrainerPalettes ld bc, TrainerPalettes
add hl, bc add hl, bc
ret ret
@@ -1152,9 +1148,8 @@ Function994a: ; 994a
jr nz, .asm_99a6 jr nz, .asm_99a6
ld a, $20 ld a, $20
ld [rJOYP], a ld [rJOYP], a
rept 2
ld a, [rJOYP] ld a, [rJOYP]
endr ld a, [rJOYP]
call SGBDelayCycles call SGBDelayCycles
call SGBDelayCycles call SGBDelayCycles
ld a, $30 ld a, $30
@@ -1962,9 +1957,8 @@ LoadMapPals: ; b1de
ld e, a ld e, a
ld d, 0 ld d, 0
ld hl, .TilesetColorsPointers ld hl, .TilesetColorsPointers
rept 2
add hl, de add hl, de
endr add hl, de
ld a, [hli] ld a, [hli]
ld h, [hl] ld h, [hl]
ld l, a ld l, a

View File

@@ -183,7 +183,7 @@ Credits:: ; 109847
call ByteFill call ByteFill
ld a, rSCX - $ff00 ld a, rSCX - $ff00
ld [hLCDStatCustom], a ld [hFFC6], a
call GetCreditsPalette call GetCreditsPalette
call SetPalettes call SetPalettes
@@ -211,7 +211,7 @@ Credits:: ; 109847
.exit_credits .exit_credits
call ClearBGPalettes call ClearBGPalettes
xor a xor a
ld [hLCDStatCustom], a ld [hFFC6], a
ld [hBGMapAddress], a ld [hBGMapAddress], a
pop af pop af
ld [hVBlank], a ld [hVBlank], a
@@ -269,20 +269,20 @@ endr
.Jumptable: ; 109937 (42:5937) .Jumptable: ; 109937 (42:5937)
jumptable_start
jumptable ParseCredits dw ParseCredits
jumptable Credits_Next dw Credits_Next
jumptable Credits_Next dw Credits_Next
jumptable Credits_PrepBGMapUpdate dw Credits_PrepBGMapUpdate
jumptable Credits_UpdateGFXRequestPath dw Credits_UpdateGFXRequestPath
jumptable Credits_RequestGFX dw Credits_RequestGFX
jumptable Credits_LYOverride dw Credits_LYOverride
jumptable Credits_Next dw Credits_Next
jumptable Credits_Next dw Credits_Next
jumptable Credits_Next dw Credits_Next
jumptable Credits_UpdateGFXRequestPath dw Credits_UpdateGFXRequestPath
jumptable Credits_RequestGFX dw Credits_RequestGFX
jumptable Credits_LoopBack dw Credits_LoopBack
Credits_Next: ; 109951 (42:5951) Credits_Next: ; 109951 (42:5951)

View File

@@ -119,7 +119,7 @@ PlaceGameFreakPresents: ; e4670
ld a, [wJumptableIndex] ld a, [wJumptableIndex]
ld e, a ld e, a
ld d, 0 ld d, 0
ld hl, .jumptable ld hl, .dw
rept 2 rept 2
add hl, de add hl, de
endr endr
@@ -129,7 +129,7 @@ endr
jp [hl] jp [hl]
; e467f ; e467f
.jumptable: ; e467f .dw: ; e467f
dw PlaceGameFreakPresents_0 dw PlaceGameFreakPresents_0
dw PlaceGameFreakPresents_1 dw PlaceGameFreakPresents_1
dw PlaceGameFreakPresents_2 dw PlaceGameFreakPresents_2
@@ -625,7 +625,7 @@ IntroScene5: ; e4a7a (39:4a7a)
call ClearTileMap call ClearTileMap
xor a xor a
ld [hBGMapMode], a ld [hBGMapMode], a
ld [hLCDStatCustom], a ld [hFFC6], a
ld a, $1 ld a, $1
ld [rVBK], a ld [rVBK], a
ld hl, IntroTilemap005 ld hl, IntroTilemap005
@@ -819,7 +819,7 @@ IntroScene8: ; e4bd3 (39:4bd3)
IntroScene9: ; e4c04 (39:4c04) IntroScene9: ; e4c04 (39:4c04)
; Set up the next scene (same bg). ; Set up the next scene (same bg).
xor a xor a
ld [hLCDStatCustom], a ld [hFFC6], a
call ClearSprites call ClearSprites
hlcoord 0, 0, AttrMap hlcoord 0, 0, AttrMap
; first 12 rows have palette 1 ; first 12 rows have palette 1
@@ -893,7 +893,7 @@ IntroScene11: ; e4c86 (39:4c86)
call ClearTileMap call ClearTileMap
xor a xor a
ld [hBGMapMode], a ld [hBGMapMode], a
ld [hLCDStatCustom], a ld [hFFC6], a
ld a, $1 ld a, $1
ld [rVBK], a ld [rVBK], a
ld hl, IntroTilemap007 ld hl, IntroTilemap007
@@ -2103,7 +2103,7 @@ Intro_ResetLYOverrides: ; e5516 (39:5516)
pop af pop af
ld [rSVBK], a ld [rSVBK], a
ld a, $43 ld a, $43
ld [hLCDStatCustom], a ld [hFFC6], a
ret ret
Intro_PerspectiveScrollBG: ; e552f (39:552f) Intro_PerspectiveScrollBG: ; e552f (39:552f)

View File

@@ -1355,7 +1355,7 @@ Function822f0: ; 822f0
and 3 and 3
ld e, a ld e, a
ld d, 0 ld d, 0
ld hl, .jumptable ld hl, .dw
rept 2 rept 2
add hl, de add hl, de
endr endr
@@ -1365,7 +1365,7 @@ endr
jp [hl] jp [hl]
; 82301 ; 82301
.jumptable: ; 82301 .dw: ; 82301
dw Function82309 dw Function82309
dw Function82339 dw Function82339
dw Function8234b dw Function8234b

View File

@@ -104,7 +104,7 @@ _KrisDecorationMenu: ; 0x2675c
ret ret
.FindOwndDecos: ; 2683a (9:683a) .FindOwndDecos: ; 2683a (9:683a)
ld hl, .jumptable ld hl, .dw
.loop .loop
ld a, [hli] ld a, [hli]
ld e, a ld e, a
@@ -127,7 +127,7 @@ _KrisDecorationMenu: ; 0x2675c
ret ret
; 26855 (9:6855) ; 26855 (9:6855)
.jumptable: ; 26855 .dw: ; 26855
dwb FindOwnedBeds, 0 ; bed dwb FindOwnedBeds, 0 ; bed
dwb FindOwnedCarpets, 1 ; carpet dwb FindOwnedCarpets, 1 ; carpet
dwb FindOwnedPlants, 2 ; plant dwb FindOwnedPlants, 2 ; plant

View File

@@ -37,9 +37,8 @@ EngineFlagAction:: ; 80430
.read .read
ld hl, EngineFlags ld hl, EngineFlags
; location ; location
rept 2
add hl, de add hl, de
endr add hl, de
; bit ; bit
add hl, de add hl, de

View File

@@ -771,9 +771,8 @@ TryReadSign: ; 96a38
push hl push hl
call PlayTalkObject call PlayTalkObject
pop hl pop hl
rept 2
inc hl inc hl
endr inc hl
call GetMapScriptHeaderBank call GetMapScriptHeaderBank
call GetFarHalfword call GetFarHalfword
call GetMapScriptHeaderBank call GetMapScriptHeaderBank

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