Merge pull request #191 from andwhyisit/minigames-1

Minigames Part 1

Makefile

@@ -84,6 +84,7 @@ titlemenu\
 pausemenu\
 townmap\
 shop\
+minigames\
 tutorial\
 battle\
 nameentry\

game/src/minigames/core.asm

@@ -0,0 +1,196 @@
+INCLUDE "game/src/common/constants.asm"
+
+SECTION "Minigame A State Machine 1", ROMX[$4000], BANK[$14]
+MinigameAStateMachine::
+  ld a, [$C824]
+  inc a
+  ld [$C824], a
+  ld a, [W_CoreSubStateIndex]
+  ld hl, .table
+  rst $30
+  jp hl
+
+.table
+  dw MinigameADrawingState
+  dw MinigameAMappingState
+  dw MinigameAPrepareFadeInState
+  dw MinigameADoFadeInState
+  dw $410C
+  dw $4134
+  dw $4160
+  dw $41BA
+  dw $41CC
+  dw $41F0
+
+MinigameADrawingState::
+  call $343B
+  ld hl, $C820
+  xor a
+  ld b, 0
+
+.clearLoop
+  ld [hli], a
+  dec b
+  jr nz, .clearLoop
+
+  ld a, $40
+  ld [$C830], a
+  ld a, 0
+  ld [W_ShadowREG_WX], a
+  ld a, $78
+  ld [W_ShadowREG_WY], a
+  ld a, $E3
+  ld [W_ShadowREG_LCDC], a
+  ld a, 1
+  ld [$C840], a
+  ld a, $10
+  ld [$C826], a
+  ld a, 0
+  ld [$C827], a
+  ld bc, 4
+  call WrapLoadMaliasGraphics
+  ld bc, $20
+  call WrapLoadMaliasGraphics
+  ld bc, $21
+  call WrapLoadMaliasGraphics
+  ld bc, $22
+  call WrapLoadMaliasGraphics
+  ld bc, $23
+  call WrapLoadMaliasGraphics
+  ld bc, $24
+  call WrapLoadMaliasGraphics
+  call .setMetaspritePointerTableIndices
+  jp IncSubStateIndex
+
+.setMetaspritePointerTableIndices
+  call $3413
+  ld b, $1E
+  ld hl, $C0A1
+  ld de, $20
+  ld a, $11
+
+.writeLoop
+  ld [hl], a
+  add hl, de
+  dec b
+  jr nz, .writeLoop
+  ret
+
+MinigameAMappingState::
+  ld bc, 0
+  ld e, 0
+  ld a, 1
+  call WrapDecompressTilemap0
+  ld bc, 0
+  ld e, 0
+  ld a, 1
+  call WrapDecompressAttribmap0
+  ld bc, 0
+  ld e, 1
+  ld a, 1
+  call WrapDecompressTilemap1
+  ld bc, 0
+  ld e, 1
+  ld a, 1
+  call WrapDecompressAttribmap1
+  ld b, 0
+  ld c, 0
+  ld hl, $9824
+  call $4374
+  call $43A1
+  ld a, 1
+  ld [$C0C0], a
+  ld [$C0E0], a
+  call $44BC
+  call $587C
+  ld a, 1
+  ld [W_OAM_SpritesReady], a
+  jp IncSubStateIndex
+
+MinigameAPrepareFadeInState::
+  ld hl, $20
+  ld bc, $14
+  ld d, $FF
+  ld e, $FF
+  ld a, $E
+  call WrapSetupPalswapAnimation
+  ld a, 1
+  ld [W_OAM_SpritesReady], a
+  jp IncSubStateIndex
+
+MinigameADoFadeInState::
+  call $4404
+  call $41AB
+  ld a, 1
+  ld [W_OAM_SpritesReady], a
+  call $34E6
+  ld a, [W_PaletteAnimRunning]
+  or a
+  ret nz
+  xor a
+  ld [$C835], a
+  jp IncSubStateIndex
+
+SECTION "Minigame B State Machine 1", ROMX[$5F7C], BANK[$14]
+MinigameBStateMachine::
+  ld a, [W_CoreSubStateIndex]
+  ld hl, .table
+  rst $30
+  jp hl
+
+.table
+  dw MinigameBDrawingState
+  dw MinigameBMappingState
+  dw $5FF5
+  dw $6090
+  dw $6061
+  dw $6085
+  dw $60C7
+  dw $60FC
+  dw $6073
+  dw $6085
+  dw $6234
+  dw $61B9
+  dw $61E2
+  dw $620B
+  dw $6234
+  dw $6234
+
+MinigameBDrawingState::
+  call $343B
+  ld c, $FF
+  ld hl, $C820
+  call $69FB ; Clear loop function.
+  ld a, [$C91F]
+  or a
+  jp nz, .notLessThanOne
+  inc a
+
+.notLessThanOne
+  cp 6
+  jp c, .notGreaterThanFive
+  ld a, 5
+
+.notGreaterThanFive
+  ld [$C820], a
+  call $3413
+  ld bc, $26
+  call WrapLoadMaliasGraphics
+  ld bc, $27
+  call WrapLoadMaliasGraphics
+  ld bc, $28
+  call WrapLoadMaliasGraphics
+  jp IncSubStateIndex
+
+MinigameBMappingState::
+  ld bc, 0
+  ld e, 3
+  ld a, 1
+  call WrapDecompressTilemap0
+  ld bc, 0
+  ld e, 3
+  ld a, 1
+  call WrapDecompressAttribmap0
+  ld a, 1
+  ld [$C4D9], a
+  jp IncSubStateIndex