Clean up changes in 3c6c80f

This commit is contained in:
xCrystal 2017-12-29 19:22:33 +01:00
parent 3c6c80f1b2
commit 2a7ba6685a
10 changed files with 23 additions and 20 deletions

View File

@ -50,6 +50,7 @@ OAM_X_FLIP EQU 5
OAM_Y_FLIP EQU 6 OAM_Y_FLIP EQU 6
OAM_PRIORITY EQU 7 ; 0: OBJ above BG, 1: OBJ behind BG (colors 1-3) OAM_PRIORITY EQU 7 ; 0: OBJ above BG, 1: OBJ behind BG (colors 1-3)
; BP Map attribute flags
PALETTE_MASK EQU %111 PALETTE_MASK EQU %111
VRAM_BANK_1 EQU 1 << OAM_TILE_BANK ; $08 VRAM_BANK_1 EQU 1 << OAM_TILE_BANK ; $08
OBP_NUM EQU 1 << OAM_OBP_NUM ; $10 OBP_NUM EQU 1 << OAM_OBP_NUM ; $10
@ -57,6 +58,10 @@ X_FLIP EQU 1 << OAM_X_FLIP ; $20
Y_FLIP EQU 1 << OAM_Y_FLIP ; $40 Y_FLIP EQU 1 << OAM_Y_FLIP ; $40
BEHIND_BG EQU 1 << OAM_PRIORITY ; $80 BEHIND_BG EQU 1 << OAM_PRIORITY ; $80
; Other useful constants
LCDC_DEFAULT EQU %11100011
LY_VBLANK EQU 144
; Hardware registers ; Hardware registers
rJOYP EQU $ff00 ; Joypad (R/W) rJOYP EQU $ff00 ; Joypad (R/W)
rSB EQU $ff01 ; Serial transfer data (R/W) rSB EQU $ff01 ; Serial transfer data (R/W)
@ -114,16 +119,14 @@ rWave_d EQU $ff3d
rWave_e EQU $ff3e rWave_e EQU $ff3e
rWave_f EQU $ff3f rWave_f EQU $ff3f
rLCDC EQU $ff40 ; LCD Control (R/W) rLCDC EQU $ff40 ; LCD Control (R/W)
rLCDC_SPRITE_ENABLE EQU 1 rLCDC_SPRITES_ENABLE EQU 1 ; 0=Off, 1=On
rLCDC_SPRITE_SIZE EQU 2 rLCDC_SPRITE_SIZE EQU 2 ; 0=8x8, 1=8x16
rLCDC_WINDOW_TILEMAP EQU 6 rLCDC_WINDOW_TILEMAP EQU 6 ; 0=9800-9BFF, 1=9C00-9FFF
rLCDC_ENABLE EQU 7 rLCDC_ENABLE EQU 7 ; 0=Off, 1=On
rLCDC_DEFAULT EQU %11100011
rSTAT EQU $ff41 ; LCDC Status (R/W) rSTAT EQU $ff41 ; LCDC Status (R/W)
rSCY EQU $ff42 ; Scroll Y (R/W) rSCY EQU $ff42 ; Scroll Y (R/W)
rSCX EQU $ff43 ; Scroll X (R/W) rSCX EQU $ff43 ; Scroll X (R/W)
rLY EQU $ff44 ; LCDC Y-Coordinate (R) rLY EQU $ff44 ; LCDC Y-Coordinate (R)
LY_VBLANK EQU 144
rLYC EQU $ff45 ; LY Compare (R/W) rLYC EQU $ff45 ; LY Compare (R/W)
rDMA EQU $ff46 ; DMA Transfer and Start Address (W) rDMA EQU $ff46 ; DMA Transfer and Start Address (W)
rBGP EQU $ff47 ; BG Palette Data (R/W) - Non CGB Mode Only rBGP EQU $ff47 ; BG Palette Data (R/W) - Non CGB Mode Only

View File

@ -1073,7 +1073,7 @@ SGBBorder_PushBGPals:
ld bc, $100 tiles ld bc, $100 tiles
call CopyData call CopyData
call DrawDefaultTiles call DrawDefaultTiles
ld a, rLCDC_DEFAULT ld a, LCDC_DEFAULT
ld [rLCDC], a ld [rLCDC], a
ld hl, PalPacket_9d06 ld hl, PalPacket_9d06
call PushSGBPals call PushSGBPals
@ -1107,7 +1107,7 @@ SGBBorder_MorePalPushing:
ld bc, 16 palettes ld bc, 16 palettes
call CopyData call CopyData
call DrawDefaultTiles call DrawDefaultTiles
ld a, rLCDC_DEFAULT ld a, LCDC_DEFAULT
ld [rLCDC], a ld [rLCDC], a
ld hl, PalPacket_9d46 ld hl, PalPacket_9d46
call PushSGBPals call PushSGBPals
@ -1131,7 +1131,7 @@ SGBBorder_YetMorePalPushing:
dec b dec b
jr nz, .loop jr nz, .loop
call DrawDefaultTiles call DrawDefaultTiles
ld a, rLCDC_DEFAULT ld a, LCDC_DEFAULT
ld [rLCDC], a ld [rLCDC], a
ld hl, PalPacket_9d36 ld hl, PalPacket_9d36
call PushSGBPals call PushSGBPals

View File

@ -34,7 +34,7 @@ _DummyGame: ; e1e5b (38:5e5b)
ld [wJumptableIndex], a ld [wJumptableIndex], a
ld a, $1 ld a, $1
ld [hBGMapMode], a ld [hBGMapMode], a
ld a, rLCDC_DEFAULT ld a, LCDC_DEFAULT
ld [rLCDC], a ld [rLCDC], a
ld a, $e4 ld a, $e4
call DmgToCgbBGPals call DmgToCgbBGPals

View File

@ -116,7 +116,7 @@ DoMysteryGift: ; 1048ba (41:48ba)
.PrintTextAndExit: ; 1049c5 (41:49c5) .PrintTextAndExit: ; 1049c5 (41:49c5)
call PrintText call PrintText
ld a, rLCDC_DEFAULT ld a, LCDC_DEFAULT
ld [rLCDC], a ld [rLCDC], a
ret ret
; 1049cd (41:49cd) ; 1049cd (41:49cd)
@ -1497,7 +1497,7 @@ Function10571a: ; 10571a (41:571a)
asm_105726: ; 105726 (41:5726) asm_105726: ; 105726 (41:5726)
call PrintText call PrintText
ld a, rLCDC_DEFAULT ld a, LCDC_DEFAULT
ld [rLCDC], a ld [rLCDC], a
ret ret
; 10572e (41:572e) ; 10572e (41:572e)

View File

@ -48,7 +48,7 @@ NamingScreen: ; 116c1
call DisableLCD call DisableLCD
call LoadNamingScreenGFX call LoadNamingScreenGFX
call NamingScreen_InitText call NamingScreen_InitText
ld a, rLCDC_DEFAULT ld a, LCDC_DEFAULT
ld [rLCDC], a ld [rLCDC], a
call .GetNamingScreenSetup call .GetNamingScreenSetup
call WaitBGMap call WaitBGMap
@ -1017,7 +1017,7 @@ _ComposeMailMessage: ; 11e75 (mail?)
add hl, bc add hl, bc
ld [hl], $0 ld [hl], $0
call .InitCharset call .InitCharset
ld a, rLCDC_DEFAULT ld a, LCDC_DEFAULT
ld [rLCDC], a ld [rLCDC], a
call .initwNamingScreenMaxNameLength call .initwNamingScreenMaxNameLength
ld b, SCGB_DIPLOMA ld b, SCGB_DIPLOMA

View File

@ -59,7 +59,7 @@ PokeGear: ; 90b8d (24:4b8d)
call InitPokegearModeIndicatorArrow call InitPokegearModeIndicatorArrow
ld a, 8 ld a, 8
call SkipMusic call SkipMusic
ld a, rLCDC_DEFAULT ld a, LCDC_DEFAULT
ld [rLCDC], a ld [rLCDC], a
call TownMap_InitCursorAndPlayerIconPositions call TownMap_InitCursorAndPlayerIconPositions
xor a xor a
@ -1851,7 +1851,7 @@ _TownMap: ; 9191c
farcall ClearSpriteAnims farcall ClearSpriteAnims
ld a, 8 ld a, 8
call SkipMusic call SkipMusic
ld a, rLCDC_DEFAULT ld a, LCDC_DEFAULT
ld [rLCDC], a ld [rLCDC], a
call TownMap_GetCurrentLandmark call TownMap_GetCurrentLandmark
ld [wTownMapPlayerIconLandmark], a ld [wTownMapPlayerIconLandmark], a

View File

@ -85,7 +85,7 @@ UnownPuzzle: ; e1190
call ClearBGPalettes call ClearBGPalettes
call ClearTileMap call ClearTileMap
call ClearSprites call ClearSprites
ld a, rLCDC_DEFAULT ld a, LCDC_DEFAULT
ld [rLCDC], a ld [rLCDC], a
ret ret
; e124e ; e124e

View File

@ -55,7 +55,7 @@ UnusedTitleScreen: ; 10c000
call EnableLCD call EnableLCD
ld a, [rLCDC] ld a, [rLCDC]
set rLCDC_SPRITE_ENABLE, a set rLCDC_SPRITES_ENABLE, a
set rLCDC_SPRITE_SIZE, a set rLCDC_SPRITE_SIZE, a
ld [rLCDC], a ld [rLCDC], a

View File

@ -125,7 +125,7 @@ Init:: ; 17d
ld [hWX], a ld [hWX], a
ld [rWX], a ld [rWX], a
ld a, rLCDC_DEFAULT ; %11100011 ld a, LCDC_DEFAULT ; %11100011
; LCD on ; LCD on
; Win tilemap 1 ; Win tilemap 1
; Win on ; Win on

View File

@ -62,7 +62,7 @@ DisableLCD:: ; 568
jr nz, .wait jr nz, .wait
ld a, [rLCDC] ld a, [rLCDC]
and $ff ^ 1 << rLCDC_ENABLE and $ff ^ (1 << rLCDC_ENABLE)
ld [rLCDC], a ld [rLCDC], a
xor a xor a