summaryrefslogtreecommitdiff
path: root/src/engine/bank4.asm
diff options
context:
space:
mode:
authorxCrystal <rgr.crystal@gmail.com>2018-04-10 16:25:35 +0200
committerxCrystal <rgr.crystal@gmail.com>2018-04-10 16:25:35 +0200
commit2bbc1a63239201be8f1a7b360e81d19192093a8f (patch)
tree3970359d9ac5db26b39229911d975fff0825f772 /src/engine/bank4.asm
parent6895547b0d2c86d769b29dc8eb5f5021723fc763 (diff)
Add leading zero to temporary bankX.asm filenames so they show up in order
Diffstat (limited to 'src/engine/bank4.asm')
-rw-r--r--src/engine/bank4.asm1542
1 files changed, 0 insertions, 1542 deletions
diff --git a/src/engine/bank4.asm b/src/engine/bank4.asm
deleted file mode 100644
index 5140705..0000000
--- a/src/engine/bank4.asm
+++ /dev/null
@@ -1,1542 +0,0 @@
-Func_10000: ; 10000 (4:4000)
- ld a, $0
- ld [wTileMapFill], a
- call EmptyScreen
- call LoadDuelHUDTiles
- ld de, $307f
- call Func_2275
- call Set_OBJ_8x8
- xor a
- ldh [hSCX], a
- ldh [hSCY], a
- ld a, [wLCDC]
- bit 7, a
- jr nz, .asm_10025
- xor a
- ld [rSCX], a
- ld [rSCY], a
-
-.asm_10025
- call Func_1288c
- call ZeroObjectPositions
- ld a, $1
- ld [wVBlankOAMCopyToggle], a
- ret
-
-Func_10031: ; 10031 (4:4031)
- ldh a, [hBankSRAM]
- push af
- ld a, $1
- call BankswitchSRAM
- call $4cbb
- call DisableSRAM
- call $4b28
- call SetFlushAllPalettes
- call EnableLCD
- call DoFrameIfLCDEnabled
- call $4cea
- call SetFlushAllPalettes
- pop af
- call BankswitchSRAM
- call DisableSRAM
- ret
-
-Func_10059: ; 10059 (4:4059)
- INCROM $10059, $100a2
-
-Func_100a2: ; 100a2 (4:40a2)
- INCROM $100a2, $1029e
-
-Medal_1029e: ; 1029e (4:429e)
- sub $8
- ld c, a
- ld [wd115], a
- ld a, [wd291]
- push af
- push bc
- call PauseSong
- ld a, MUSIC_STOP
- call PlaySong
- farcall Func_70000
- call DisableLCD
- call $4000
- ld a, $fa
- ld [wd114], a
- call $410c
- pop bc
- ld a, c
- add a
- ld c, a
- ld b, $0
- ld hl, Unknown_1030b
- add hl, bc
- ld a, [hli]
- ld [wTxRam2], a
- ld a, [hl]
- ld [wTxRam2 + 1], a
- call $4031
- ld a, MUSIC_MEDAL
- call PlaySong
- ld a, $ff
- ld [wd116], a
-.asm_102e2
- call DoFrameIfLCDEnabled
- ld a, [wd116]
- inc a
- ld [wd116], a
- and $f
- jr nz, .asm_102e2
- call $4197
- ld a, [wd116]
- cp $e0
- jr nz, .asm_102e2
- ldtx hl, WonTheMedalText
- call Func_2c73
- call Func_3c96
- call ResumeSong
- pop af
- ld [wd291], a
- ret
-
-Unknown_1030b: ; 1030b (4:430b)
- INCROM $1030b, $1031b
-
-BoosterPack_1031b: ; 1031b (4:431b)
- ld c, a
- ld a, [wd291]
- push af
- push bc
- call DisableLCD
- call $4000
- xor a
- ld [wTextBoxFrameType], a
- pop bc
- push bc
- ld b, $0
- ld hl, $43a5
- add hl, bc
- ld a, [hl]
- ld c, a
- add a
- add a
- ld c, a
- ld hl, $43c2
- add hl, bc
- ld a, [hli]
- push hl
- ld bc, $0600
- call $70ca
- pop hl
- ld a, [hli]
- ld [wTxRam3], a
- xor a
- ld [wTxRam3 + 1], a
- ld a, [hli]
- ld [wTxRam2], a
- ld a, [hl]
- ld [wTxRam2 + 1], a
- call $4031
- call PauseSong
- ld a, MUSIC_BOOSTER_PACK
- call PlaySong
- pop bc
- ld a, c
- farcall GenerateBoosterPack
- ldtx hl, ReceivedBoosterPackText
- ld a, [wd117]
- cp $1
- jr nz, .asm_10373
- ldtx hl, AndAnotherBoosterPackText
-.asm_10373
- call Func_2c73
- call Func_3c96
- call ResumeSong
- ldtx hl, CheckedCardsInBoosterPackText
- call Func_2c73
- call DisableLCD
- call Func_1288c
- call ZeroObjectPositions
- ld a, $1
- ld [wVBlankOAMCopyToggle], a
- ld a, $4
- ld [wTextBoxFrameType], a
- farcall $1, $7599
- farcall Func_c1a4
- call DoFrameIfLCDEnabled
- pop af
- ld [wd291], a
- ret
-; 0x103a5
-
- INCROM $103a5, $103d2
-
-Func_103d2: ; 103d2 (4:43d2)
- INCROM $103d2, $103d3
-
-Duel_Init: ; 103d3 (4:43d3)
- ld a, [wd291]
- push af
- call DisableLCD
- call $4000
- ld a, $4
- ld [wTextBoxFrameType], a
- lb de, 0, 12
- lb bc, 20, 6
- call DrawRegularTextBox
- ld a, [wcc19]
- add a
- add a
- ld c, a
- ld b, $0
- ld hl, $445b
- add hl, bc
- ld a, [hli]
- ld [wTxRam2], a
- ld a, [hli]
- ld [wTxRam2 + 1], a
- push hl
- ld a, [wOpponentName]
- ld [wTxRam2_b], a
- ld a, [wOpponentName + 1]
- ld [wTxRam2_b + 1], a
- ld hl, $4451
- call $51b3 ; LoadDuelistName
- pop hl
- ld a, [hli]
- ld [wTxRam2], a
- ld c, a
- ld a, [hli]
- ld [wTxRam2 + 1], a
- or c
- jr z, .asm_10425
- ld hl, $4456
- call $51b3 ; LoadDeckName
-
-.asm_10425
- ld bc, $0703
- ld a, [wOpponentPortrait]
- call Func_3e2a ; LoadDuelistPortrait
- ld a, [wMatchStartTheme]
- call PlaySong
- call $4031
- call DoFrameIfLCDEnabled
- lb bc, $2f, $1d ; cursor tile, tile behind cursor
- lb de, 18, 17 ; x, y
- call SetCursorParametersForTextBox
- call WaitForButtonAorB ; wait for the user to press a or b
- call Func_3c96
- call Func_10ab4 ; fade out
- pop af
- ld [wd291], a
- ret
-; 0x10451
-
- INCROM $10451, $10548
-
-Func_10548: ; 10548 (4:4548)
- INCROM $10548, $10756
-
-Func_10756: ; 10756 (4:4756)
- INCROM $10756, $10a70
-
-Func_10a70: ; 10a70 (4:4a70)
- push hl
- push bc
- push de
- ld b, a
- ld c, $f
- ld hl, wPCPacks
-.asm_10a79
- ld a, [hli]
- and $7f
- cp b
- jr z, .asm_10a97
- dec c
- jr nz, .asm_10a79
- ld c, $f
- ld hl, wPCPacks
-.asm_10a87
- ld a, [hl]
- and $7f
- jr z, .asm_10a93
- inc hl
- dec c
- jr nz, .asm_10a87
- debug_ret
- jr .asm_10a97
-
-.asm_10a93
- ld a, b
- or $80
- ld [hl], a
-
-.asm_10a97
- pop de
- pop bc
- pop hl
- ret
-
-Func_10a9b: ; 10a9b (4:4a9b)
- INCROM $10a9b, $10ab4
-
-Func_10ab4: ; 10ab4 (4:4ab4)
- INCROM $10ab4, $10af9
-
-Func_10af9: ; 10af9 (4:4af9)
- INCROM $10af9, $10c96
-
-Func_10c96: ; 10c96 (4:4c96)
- ldh a, [hBankSRAM]
- push af
- push bc
- ld a, $1
- call BankswitchSRAM
- call $4cbb
- call Func_10ab4
- pop bc
- ld a, c
- or a
- jr nz, .asm_10cb0
- call $4cea
- call Func_10af9
-
-.asm_10cb0
- call EnableLCD
- pop af
- call BankswitchSRAM
- call DisableSRAM
- ret
-; 0x10cbb
-
- INCROM $10cbb, $10dba
-
-Func_10dba: ; 10dba (4:4dba)
- ld a, $1
- farcall Func_c29b
- ld a, [wd0ba]
- ld hl, $4e17
- farcall Func_111e9
-.asm_10dca
- call DoFrameIfLCDEnabled
- call HandleMenuInput
- jr nc, .asm_10dca
- ld a, e
- ld [wd0ba], a
- ldh a, [hCurrentMenuItem]
- cp e
- jr z, .asm_10ddd
- ld a, $4
-
-.asm_10ddd
- ld [wd10e], a
- push af
- ld hl, $4df0
- call JumpToFunctionInTable
- farcall Func_c135
- call DoFrameIfLCDEnabled
- pop af
- ret
-; 0x10df0
-
- INCROM $10df0, $10e28
-
-Func_10e28: ; 10e28 (4:4e28)
- INCROM $10e28, $10e55
-
-Func_10e55: ; 10e55 (4:4e55)
- ld a, [wd336]
- ld [wWhichSprite], a
- ld a, [wd33e]
- or a
- jr nz, .asm_10e65
- call Func_10e71
- ret
-.asm_10e65
- cp $2
- jr z, .asm_10e6d
- call Func_11060
- ret
-.asm_10e6d
- call LoadOverworldMapSelection
- ret
-
-Func_10e71: ; 10e71 (4:4e71)
- ldh a, [hButtonsPressed]
- and D_PAD
- jr z, .asm_10e83
- farcall Func_c5d5
- ld [wd334], a
- call Func_10e97
- jr .asm_10e96
-.asm_10e83
- ldh a, [hButtonsPressed]
- and A_BUTTON
- jr z, .asm_10e96
- ld a, $2
- call PlaySFX
- call Func_11016
- call Func_11024
- jr .asm_10e96
-.asm_10e96
- ret
-
-Func_10e97: ; 10e97 (4:4e97)
- push hl
- pop hl
- ld a, [wd32e]
- rlca
- rlca
- ld c, a
- ld a, [wd334]
- add c
- ld c, a
- ld b, $0
- ld hl, Unknown_10ebc
- add hl, bc
- ld a, [hl]
- or a
- jr z, .asm_10eb9
- ld [wd32e], a
- call Func_10f2e
- ld a, $1
- call PlaySFX
-.asm_10eb9
- pop bc
- pop hl
- ret
-
-Unknown_10ebc: ; 10ebc (4:4ebc)
- INCROM $10ebc, $10efd
-
-Func_10efd: ; 10efd (4:4efd)
- push hl
- push de
- rlca
- ld e, a
- ld d, $0
- ld hl, Unknown_10f14
- add hl, de
- pop de
- ld a, [hli]
- add $8
- add d
- ld d, a
- ld a, [hl]
- add $10
- add e
- ld e, a
- pop hl
- ret
-
-Unknown_10f14: ; 10f14 (4:4f14)
- INCROM $10f14, $10f2e
-
-Func_10f2e: ; 10f2e (4:4f2e)
- push hl
- push de
- lb de, 1, 1
- call Func_22ae
- call Func_10f4a
- rlca
- ld e, a
- ld d, $0
- ld hl, Unknown_397b
- add hl, de
- ld a, [hli]
- ld h, [hl]
- ld l, a
- call Func_2c29
- pop de
- pop hl
- ret
-
-Func_10f4a: ; 10f4a (4:4f4a)
- push bc
- ld a, [wd32e]
- cp $2
- jr nz, .asm_10f5f
- ld c, a
- ld a, $1e
- farcall CheckIfEventFlagSet
- or a
- ld a, c
- jr nz, .asm_10f5f
- ld a, $d
-.asm_10f5f
- pop bc
- ret
-
-LoadOverworldMapSelection: ; 10f61 (4:4f61)
- push hl
- push bc
- ld a, [wd32e]
- rlca
- rlca
- ld c, a
- ld b, $0
- ld hl, OverworldMapIndexes
- add hl, bc
- ld a, [hli]
- ld [wd0bb], a
- ld a, [hli]
- ld [wd0bc], a
- ld a, [hli]
- ld [wd0bd], a
- ld a, $0
- ld [wd0be], a
- ld hl, wd0b4
- set 4, [hl]
- pop bc
- pop hl
- ret
-
-INCLUDE "data/overworld_indexes.asm"
-
-Func_10fbc: ; 10fbc (4:4fbc)
- ld a, $25
- farcall Func_1299f
- ld c, SPRITE_ANIM_COORD_X
- call GetSpriteAnimBufferProperty
- ld a, $80
- ld [hli], a
- ld a, $10
- ld [hl], a
- ld b, $34
- ld a, [wConsole]
- cp CONSOLE_CGB
- jr nz, .asm_10fd8
- ld b, $37
-.asm_10fd8
- ld a, b
- farcall Func_12ab5
- ret
-
-Func_10fde: ; 10fde (4:4fde)
- ld a, [wd32e]
- ld [wd33d], a
- xor a
- ld [wd33e], a
- ld a, $25
- call Func_1299f
- ld a, [wWhichSprite]
- ld [wd33b], a
- ld b, $35
- ld a, [wConsole]
- cp $2
- jr nz, .asm_10ffe
- ld b, $38
-.asm_10ffe
- ld a, b
- ld [wd33c], a
- call Func_12ab5
- ld a, $3e
- farcall CheckIfEventFlagSet
- or a
- jr nz, .asm_11015
- ld c, SPRITE_ANIM_FIELD_0F
- call GetSpriteAnimBufferProperty
- set 7, [hl]
-.asm_11015
- ret
-
-Func_11016: ; 11016 (4:5016)
- ld a, [wd33b]
- ld [wWhichSprite], a
- ld a, [wd33c]
- inc a
- call Func_12ab5
- ret
-
-Func_11024: ; 11024 (4:5024)
- ld a, $57
- call PlaySFX
- ld a, [wd336]
- ld [wWhichSprite], a
- ld c, SPRITE_ANIM_FIELD_0F
- call GetSpriteAnimBufferProperty
- set 2, [hl]
- ld hl, Unknown_1229f
- ld a, [wd33d]
- dec a
- add a
- ld c, a
- ld b, $0
- add hl, bc
- ld a, [hli]
- ld h, [hl]
- ld l, a
- ld a, [wd32e]
- dec a
- add a
- ld c, a
- ld b, $0
- add hl, bc
- ld a, [hli]
- ld [wd33f], a
- ld a, [hl]
- ld [wd340], a
- ld a, $1
- ld [wd33e], a
- xor a
- ld [wd341], a
- ret
-
-Func_11060: ; 11060 (4:5060)
- ld a, [wd336]
- ld [wWhichSprite], a
- ld a, [wd341]
- or a
- jp nz, Func_11184
- ld a, [wd33f]
- ld l, a
- ld a, [wd340]
- ld h, a
- ld a, [hli]
- ld b, a
- ld a, [hli]
- ld c, a
- and b
- cp $ff
- jr z, .asm_110a0
- ld a, c
- or b
- jr nz, .asm_11094
- ld a, [wd33d]
- ld e, a
- ld a, [wd32e]
- cp e
- jr z, .asm_110a0
- ld de, $0000
- call Func_10efd
- ld b, d
- ld c, e
-.asm_11094
- ld a, l
- ld [wd33f], a
- ld a, h
- ld [wd340], a
- call Func_110a6
- ret
-.asm_110a0
- ld a, $2
- ld [wd33e], a
- ret
-
-Func_110a6: ; 110a6 (4:50a6)
- push hl
- push bc
- ld c, SPRITE_ANIM_COORD_X
- call GetSpriteAnimBufferProperty
- pop bc
- ld a, b
- sub [hl]
- ld [wd343], a
- ld a, $0
- sbc $0
- ld [wd344], a
- inc hl
- ld a, c
- sub [hl]
- ld [wd345], a
- ld a, $0
- sbc $0
- ld [wd346], a
- ld a, [wd343]
- ld b, a
- ld a, [wd344]
- bit 7, a
- jr z, .asm_110d8
- ld a, [wd343]
- cpl
- inc a
- ld b, a
-.asm_110d8
- ld a, [wd345]
- ld c, a
- ld a, [wd346]
- bit 7, a
- jr z, .asm_110e9
- ld a, [wd345]
- cpl
- inc a
- ld c, a
-.asm_110e9
- ld a, b
- cp c
- jr c, .asm_110f2
- call Func_11102
- jr .asm_110f5
-.asm_110f2
- call Func_1113e
-.asm_110f5
- xor a
- ld [wd347], a
- ld [wd348], a
- farcall Func_c5e9
- pop hl
- ret
-
-Func_11102: ; 11102 (4:5102)
- ld a, b
- ld [wd341], a
- ld e, a
- ld d, $0
- ld hl, wd343
- xor a
- ld [hli], a
- bit 7, [hl]
- jr z, .asm_11115
- dec a
- jr .asm_11116
-.asm_11115
- inc a
-.asm_11116
- ld [hl], a
- ld b, c
- ld c, $0
- call DivideBCbyDE
- ld a, [wd346]
- bit 7, a
- jr z, .asm_11127
- call Func_11179
-.asm_11127
- ld a, c
- ld [wd345], a
- ld a, b
- ld [wd346], a
- ld hl, wd344
- ld a, $1
- bit 7, [hl]
- jr z, .asm_1113a
- ld a, $3
-.asm_1113a
- ld [wd334], a
- ret
-
-Func_1113e: ; 1113e (4:513e)
- ld a, c
- ld [wd341], a
- ld e, a
- ld d, $0
- ld hl, wd345
- xor a
- ld [hli], a
- bit 7, [hl]
- jr z, .asm_11151
- dec a
- jr .asm_11152
-.asm_11151
- inc a
-.asm_11152
- ld [hl], a
- ld c, $0
- call DivideBCbyDE
- ld a, [wd344]
- bit 7, a
- jr z, .asm_11162
- call Func_11179
-.asm_11162
- ld a, c
- ld [wd343], a
- ld a, b
- ld [wd344], a
- ld hl, wd346
- ld a, $2
- bit 7, [hl]
- jr z, .asm_11175
- ld a, $0
-.asm_11175
- ld [wd334], a
- ret
-
-Func_11179: ; 11179 (4:5179)
- ld a, c
- cpl
- add $1
- ld c, a
- ld a, b
- cpl
- adc $0
- ld b, a
- ret
-
-Func_11184: ; 11184 (4:5184)
- ld a, [wd347]
- ld d, a
- ld a, [wd348]
- ld e, a
- ld c, SPRITE_ANIM_COORD_X
- call GetSpriteAnimBufferProperty
- ld a, [wd343]
- add d
- ld d, a
- ld a, [wd344]
- adc [hl]
- ld [hl], a
- inc hl
- ld a, [wd345]
- add e
- ld e, a
- ld a, [wd346]
- adc [hl]
- ld [hl], a
- ld a, d
- ld [wd347], a
- ld a, e
- ld [wd348], a
- ld hl, wd341
- dec [hl]
- ret
-; 0x111b3
-
- INCROM $111b3, $111e9
-
-Func_111e9: ; 111e9 (4:51e9)
- INCROM $111e9, $1124d
-
-Func_1124d: ; 1124d (4:524d)
- INCROM $1124d, $11320
-
-Func_11320: ; 11320 (4:5320)
- INCROM $11320, $11343
-
-Func_11343: ; 11343 (4:5343)
- INCROM $11343, $11416
-
-Func_11416: ; 11416 (4:5416)
- INCROM $11416, $11430
-
-Func_11430: ; 11430 (4:5430)
- INCROM $11430, $1157c
-
-Func_1157c: ; 1157c (4:557c)
- ld a, c
- or a
- jr nz, .asm_11586
- farcall Func_c228
- jr .asm_1159f
-
-.asm_11586
- ld a, $2
- ld [wd0bc], a
- ld a, $4
- ld [wd0bd], a
- ld a, $2
- ld [wd0be], a
- ld a, $1
- ld [wd0bb], a
- ld a, $1
- ld [wd32e], a
-
-.asm_1159f
- call $5238
- ret
-; 0x115a3
-
-Func_115a3: ; 115a3 (4:55a3)
- INCROM $115a3, $1162a
-
-INCLUDE "data/map_scripts.asm"
-
-; loads a pointer into hl found on PointerTable_118f5
-Func_1184a: ; 1184a (4:584a)
- ; this may have been a macro
- rlca
- add LOW(PointerTable_118f5)
- ld l, a
- ld a, HIGH(PointerTable_118f5)
- adc $00
- ld h, a
- ld a, [hli]
- ld h, [hl]
- ld l, a
- ret
-
-Func_11857: ; 11857 (4:5857)
- push hl
- push bc
- call Func_1184a
- ld a, [hli]
- ld [wd3ab], a
- ld a, [hli]
- ld [wd3b3], a
- ld a, [hli]
- ld [wd3b1], a
- ld a, [hli]
- push af
- ld a, [hli]
- ld [wd3b2], a
- pop bc
- ld a, [wConsole]
- cp $2
- jr nz, .asm_1187a
- ld a, b
- ld [wd3b1], a
-.asm_1187a
- pop bc
- pop hl
- ret
-
-; this appears to find data about the NPC we're talking to
-Func_1187d: ; 1187d (4:587d)
- push hl
- call Func_1184a
- ld bc, $5
- add hl, bc
- ld c, [hl]
- inc hl
- ld b, [hl]
- inc hl
- ld a, [hli]
- ld [wd0c8], a
- ld a, [hli]
- ld [wd0c9], a
- pop hl
- ret
-
-Func_11893: ; 11893 (4:5893)
- push hl
- push bc
- call Func_1184a
- ld bc, $0007
- add hl, bc
- ld a, [hli]
- ld [wd0c8], a
- ld a, [hli]
- ld [wd0c9], a
- pop bc
- pop hl
- ret
-
-Func_118a7: ; 118a7 (4:58a7)
- push hl
- push bc
- call Func_1184a
- ld bc, $0007
- add hl, bc
- ld a, [hli]
- ld [wOpponentName], a
- ld a, [hli]
- ld [wOpponentName + 1], a
- ld a, [hli]
- ld [wOpponentPortrait], a
- pop bc
- pop hl
- ret
-
-Func_118bf: ; 118bf (4:58bf)
- push hl
- push bc
- call Func_1184a
- ld bc, $000a
- add hl, bc
- ld a, [hli]
- ld [wcc19], a
- ld a, [hli]
- ld [wDuelTheme], a
- pop bc
- pop hl
- ret
-
-Func_118d3: ; 118d3 (4:58d3)
- push hl
- push bc
- push af
- call Func_1184a
- ld bc, $000c
- add hl, bc
- ld a, [hli]
- ld [wMatchStartTheme], a
- pop af
- cp $2
- jr nz, .asm_118f2
- ld a, [wCurMap]
- cp $20
- jr nz, .asm_118f2
- ld a, $17
- ld [wMatchStartTheme], a
-
-.asm_118f2
- pop bc
- pop hl
- ret
-
-INCLUDE "data/npcs.asm"
-
-Func_11f4e: ; 11f4e (4:5f4e)
- INCROM $11f4e, $1217b
-
-OverworldScriptTable: ; 1217b (4:617b)
- dw OWScript_EndScriptLoop1
- dw OWScript_CloseTextBox
- dw OWScript_PrintTextString
- dw Func_ccdc
- dw OWScript_AskQuestionJump
- dw OWScript_StartBattle
- dw Func_cd83
- dw Func_cda8
- dw OWScript_PrintTextCloseBox
- dw Func_cdcb
- dw Func_ce26
- dw Func_ce84
- dw OWScript_GiveBoosterPacks
- dw Func_cf0c
- dw Func_cf12
- dw Func_cf3f
- dw Func_cf4c
- dw Func_cf53
- dw Func_cf7b
- dw Func_cf2d
- dw Func_cf96
- dw Func_cfc6
- dw Func_cfd4
- dw Func_d00b
- dw Func_d025
- dw Func_d032
- dw Func_d03f
- dw OWScript_ScriptJump
- dw Func_d04f
- dw Func_d055
- dw OWScript_MovePlayer
- dw Func_cee2
- dw Func_d080
- dw Func_d088
- dw Func_d095
- dw Func_d0be
- dw Func_d0ce
- dw Func_d0d9
- dw Func_d0f2
- dw Func_ce4a
- dw Func_ceba
- dw Func_d103
- dw Func_d125
- dw Func_d135
- dw Func_d16b
- dw Func_cd4f
- dw Func_cd94
- dw Func_ce52
- dw Func_cdd8
- dw Func_cdf5
- dw Func_d195
- dw Func_d1ad
- dw Func_d1b3
- dw OWScript_EndScriptCloseText
- dw Func_d244
- dw Func_d24c
- dw DeckMachine_d336
- dw Func_d271
- dw Func_d36d
- dw Func_ce6f
- dw Func_d209
- dw Func_d38f
- dw Func_d396
- dw Func_cd76
- dw Func_d39d
- dw Func_d3b9
- dw Func_d3c9
- dw Func_d3d1
- dw Func_d3d4
- dw Func_d3e0
- dw Func_d3fe
- dw Func_d408
- dw Func_d40f
- dw Func_d416
- dw Func_d423
- dw Func_d429
- dw Func_d41d
- dw Func_d42f
- dw Func_d435
- dw Func_cce4
- dw Func_d2f6
- dw Func_d317
- dw Func_d43d
- dw OWScript_EndScriptLoop2
- dw OWScript_EndScriptLoop3
- dw OWScript_EndScriptLoop4
- dw OWScript_EndScriptLoop5
- dw OWScript_EndScriptLoop6
- dw OWScript_CustomModifyEventFlags
- dw Func_d460
- dw OWScript_JumpIfFlagSet
- dw Func_d484
- dw Func_d49e
- dw Func_d4a6
- dw Func_d4ae
- dw OWScript_SetEventFlags
- dw Func_d4c3
- dw Func_d4ca
- dw OWScript_JumpIfFlagNotSet
- dw Func_d452
- dw OWScript_EndScriptLoop7
- dw OWScript_EndScriptLoop8
- dw OWScript_EndScriptLoop9
- dw OWScript_EndScriptLoop10
-
- INCROM $1224b, $1229f
-
-Unknown_1229f: ; 1229f (4:629f)
- INCROM $1229f, $126d1
-
-; usually, the game doesn't loop here at all, since as soon as a main menu option
-; is selected, there is no need to come back to the menu.
-; the only exception is after returning from Card Pop!
-_GameLoop: ; 126d1 (4:66d1)
- call ZeroObjectPositions
- ld hl, wVBlankOAMCopyToggle
- inc [hl]
- farcall Func_70018
- ld a, $ff
- ld [wd627], a
-.main_menu_loop
- ld a, PLAYER_TURN
- ldh [hWhoseTurn], a
- farcall Func_c1f8
- farcall Func_1d078
- ld a, [wd628]
- ld hl, MainMenuFunctionTable
- call JumpToFunctionInTable
- jr c, .main_menu_loop ; return to main menu
- jr _GameLoop ; virtually restart game
-
-; this is never reached
- scf
- ret
-
-MainMenuFunctionTable:
- dw MainMenu_CardPop
- dw MainMenu_ContinueFromDiary
- dw MainMenu_NewGame
- dw MainMenu_ContinueDuel
-
-MainMenu_NewGame: ; 12704 (4:6704)
- farcall Func_c1b1
- call Func_128a9
- farcall Func_1996e
- call EnableSRAM
- ld a, [sa007]
- ld [wd421], a
- ld a, [sa006]
- ld [wTextSpeed], a
- call DisableSRAM
- ld a, MUSIC_STOP
- call PlaySong
- farcall Func_70000
- ld a, $9
- ld [wd111], a
- call Func_39fc
- farcall Func_1d306
- ld a, GAME_EVENT_OVERWORLD
- ld [wGameEvent], a
- farcall $03, ExecuteGameEvent
- or a
- ret
-
-MainMenu_ContinueFromDiary: ; 12741 (4:6741)
- ld a, MUSIC_STOP
- call PlaySong
- call Func_11320
- jr nc, MainMenu_NewGame
- farcall Func_c1ed
- farcall Func_70000
- call EnableSRAM
- xor a
- ld [$ba44], a
- call DisableSRAM
- ld a, GAME_EVENT_OVERWORLD
- ld [wGameEvent], a
- farcall $03, ExecuteGameEvent
- or a
- ret
-
-MainMenu_CardPop: ; 12768 (4:6768)
- ld a, MUSIC_CARD_POP
- call PlaySong
- bank1call Func_7571
- farcall Func_c1a4
- call DoFrameIfLCDEnabled
- ld a, MUSIC_STOP
- call PlaySong
- scf
- ret
-
-MainMenu_ContinueDuel: ; 1277e (4:677e)
- ld a, MUSIC_STOP
- call PlaySong
- farcall Func_c9cb
- farcall $04, Func_3a40
- farcall Func_70000
- ld a, GAME_EVENT_CONTINUE_DUEL
- ld [wGameEvent], a
- farcall $03, ExecuteGameEvent
- or a
- ret
-; 0x1279a
-
- INCROM $1279a, $12871
-
-Func_12871: ; 12871 (4:6871)
- INCROM $12871, $1288c
-
-Func_1288c: ; 1288c (4:688c)
- INCROM $1288c, $128a9
-
-Func_128a9: ; 128a9 (4:68a9)
- INCROM $128a9, $1296e
-
-Func_1296e: ; 1296e (4:696e)
- INCROM $1296e, $1299f
-
-Func_1299f: ; 1299f (4:699f)
- push af
- ld a, [wd5d7]
- or a
- jr z, .asm_129a8
- pop af
- ret
-.asm_129a8
- pop af
- push bc
- push hl
- call Func_12c05
- ld [wd5d3], a
- xor a
- ld [wWhichSprite], a
- call Func_3db7
- ld bc, $0010
-.asm_129bb
- ld a, [hl]
- or a
- jr z, .asm_129cf
- add hl, bc
- ld a, [wWhichSprite]
- inc a
- ld [wWhichSprite], a
- cp $10
- jr nz, .asm_129bb
- debug_ret
- scf
- jr .asm_129d6
-.asm_129cf
- ld a, $1
- ld [hl], a
- call Func_129d9
- or a
-.asm_129d6
- pop hl
- pop bc
- ret
-
-Func_129d9: ; 129d9 (4:69d9)
- push hl
- push bc
- push hl
- inc hl
- ld c, $f
- xor a
-.asm_129e0
- ld [hli], a
- dec c
- jr nz, .asm_129e0
- pop hl
- ld bc, $0004
- add hl, bc
- ld a, [wd5d3]
- ld [hli], a
- ld a, $ff
- ld [hl], a
- ld bc, $0009
- add hl, bc
- ld a, $ff
- ld [hl], a
- pop bc
- pop hl
- ret
-; 0x129fa
-
- INCROM $129fa, $12a21
-
-Func_12a21: ; 12a21 (4:6a21)
- INCROM $12a21, $12ab5
-
-Func_12ab5: ; 12ab5 (4:6ab5)
- push hl
- push af
- ld c, SPRITE_ANIM_FIELD_05
- call GetSpriteAnimBufferProperty
- pop af
- cp [hl]
- pop hl
- ret z
- push hl
- call Func_12ae2
- call Func_12b13
- pop hl
- ret
-; 0x12ac9
-
- INCROM $12ac9, $12ae2
-
-Func_12ae2: ; 12ae2 (4:6ae2)
- push bc
- push af
- call Func_3db7
- pop af
- push hl
- ld bc, $0005
- add hl, bc
- ld [hli], a
- push hl
- ld l, $6
- farcall Func_8020f
- farcall Func_80229
- pop hl
- ld a, [wd4c6]
- ld [hli], a
- ld a, [wd4c4]
- ld [hli], a
- ld c, a
- ld a, [wd4c5]
- ld [hli], a
- ld b, a
- ld a, $3
- add c
- ld [hli], a
- ld a, $0
- adc b
- ld [hli], a
- pop hl
- pop bc
- ret
-
-Func_12b13: ; 12b13 (4:6b13)
- push bc
- push de
- push hl
-.asm_12b16
- push hl
- ld bc, $0006
- add hl, bc
- ld a, [hli]
- ld [wd4c6], a
- inc hl
- inc hl
- ld a, [hl]
- ld [wd4c4], a
- add $4
- ld [hli], a
- ld a, [hl]
- ld [wd4c5], a
- adc $0
- ld [hl], a
- ld de, wd23e
- ld bc, $0004
- call Func_3bf5
- pop hl
- ld de, wd23e
- ld a, [de]
- call Func_12b6a
- inc de
- ld a, [de]
- call Func_12b89
- jr c, .asm_12b16
- inc de
- ld bc, $0002
- add hl, bc
- push hl
- ld bc, $000d
- add hl, bc
- ld b, [hl]
- pop hl
- ld a, [de]
- bit 0, b
- jr z, .asm_12b5a
- cpl
- inc a
-.asm_12b5a
- add [hl]
- ld [hli], a
- inc de
- ld a, [de]
- bit 1, b
- jr z, .asm_12b64
- cpl
- inc a
-.asm_12b64
- add [hl]
- ld [hl], a
- pop hl
- pop de
- pop bc
- ret
-
-Func_12b6a: ; 12b6a (4:6b6a)
- ld [wd4ca], a
- push hl
- push bc
- push de
- push hl
- ld bc, $0006
- add hl, bc
- ld a, [hli]
- ld [wd4c6], a
- ld a, [hli]
- ld [wd4c4], a
- ld a, [hli]
- ld [wd4c5], a
- pop hl
- call Func_3d72
- pop de
- pop bc
- pop hl
- ret
-
-Func_12b89: ; 12b89 (4:6b89)
- push hl
- push bc
- ld bc, $000e
- add hl, bc
- ld [hl], a
- or a
- jr nz, .asm_12ba4
- ld bc, $fff9
- add hl, bc
- ld a, [hli]
- add $3
- ld c, a
- ld a, [hli]
- adc $0
- ld b, a
- ld a, c
- ld [hli], a
- ld a, b
- ld [hl], a
- scf
-.asm_12ba4
- pop bc
- pop hl
- ret
-
-Func_12ba7: ; 12ba7 (4:6ba7)
- INCROM $12ba7, $12bcd
-
-Func_12bcd: ; 12bcd (4:6bcd)
- INCROM $12bcd, $12c05
-
-Func_12c05: ; 12c05 (4:6c05)
- push hl
- push bc
- push de
- ld b, a
- ld d, $0
- ld a, [wd618]
- ld c, a
- ld hl, wd5d8
- or a
- jr z, .asm_12c22
-.asm_12c15
- inc hl
- ld a, [hl]
- cp b
- jr z, .asm_12c3a
- inc hl
- ld a, [hli]
- add [hl]
- ld d, a
- inc hl
- dec c
- jr nz, .asm_12c15
-.asm_12c22
- ld a, [wd618]
- cp $10
- jr nc, .asm_12c48
- inc a
- ld [wd618], a
- inc hl
- push hl
- ld a, b
- ld [hli], a
- call Func_12c4f
- push af
- ld a, d
- ld [hli], a
- pop af
- ld [hl], a
- pop hl
-.asm_12c3a
- dec hl
- inc [hl]
- inc hl
- inc hl
- ld a, [hli]
- add [hl]
- cp $81
- jr nc, .asm_12c48
- ld a, d
- or a
- jr .asm_12c4b
-.asm_12c48
- debug_ret
- xor a
- scf
-.asm_12c4b
- pop de
- pop bc
- pop hl
- ret
-
-Func_12c4f: ; 12c4f (4:6c4f)
- push af
- xor a
- ld [wd4cb], a
- ld a, d
- ld [wd4ca], a
- pop af
- farcall Func_8025b
- ret
-
-Func_12c5e: ; 12c5e (4:6c5e)
- INCROM $12c5e, $12c7f
-
-Func_12c7f: ; 12c7f (4:6c7f)
- INCROM $12c7f, $131b3
-
-Func_131b3: ; 131b3 (4:71b3)
- INCROM $131b3, $131d3
-
-Func_131d3: ; 131d3 (4:71d3)
- INCROM $131d3, $1344d
-
-Func_1344d: ; 1344d (4:744d)
- call PauseSong
- ld a, MUSIC_MEDAL
- call PlaySong
- ldtx hl, DefeatedFiveOpponentsText
- call Func_2c73
- call Func_3c96
- call ResumeSong
- ret
-; 0x13462
-
- INCROM $13462, $13485
-
-Func_13485: ; 13485 (4:7485)
- call EnableSRAM
- ld a, [$ba68]
- or a
- ret z
- ld a, [$ba56]
- ld [wTxRam3], a
- ld a, [$ba57]
- ld [wTxRam3 + 1], a
- call DisableSRAM
- call PauseSong
- ld a, MUSIC_MEDAL
- call PlaySong
- ldtx hl, ConsecutiveWinRecordIncreasedText
- call Func_2c73
- call Func_3c96
- call ResumeSong
- ret
-; 0x134b1
-
- INCROM $134b1, $14000