first commit
This commit is contained in:
commit
f3fd560eae
1
.gitignore
vendored
Normal file
1
.gitignore
vendored
Normal file
@ -0,0 +1 @@
|
||||
build
|
||||
16
Makefile
Normal file
16
Makefile
Normal file
@ -0,0 +1,16 @@
|
||||
NAME=animation
|
||||
|
||||
ASSEMBLER=rgbasm
|
||||
LINKER=rgblink
|
||||
POSTPROC=rgbfix
|
||||
|
||||
SRC=./src
|
||||
BUILD=./build
|
||||
ENTRY=${SRC}/main.asm
|
||||
ROM_OUTPUT=${BUILD}/${NAME}.gb
|
||||
OBJECT_OUTPUT=${BUILD}/${NAME}.o
|
||||
|
||||
all : ${ENTRY}
|
||||
${ASSEMBLER} -o ${OBJECT_OUTPUT} ${ENTRY} \
|
||||
&& ${LINKER} -o ${ROM_OUTPUT} -n ${NAME}.sym ${OBJECT_OUTPUT} \
|
||||
&& ${POSTPROC} -v -p 0 ${ROM_OUTPUT}
|
||||
9
README.md
Normal file
9
README.md
Normal file
@ -0,0 +1,9 @@
|
||||
= tA's terribleAssembly =
|
||||
|
||||
just me messing about trying to learn gameboy assembly
|
||||
|
||||
== running ==
|
||||
|
||||
simply run `make` in the root directory to build the ROM
|
||||
|
||||
will appear as a `.gb` file in `./build`
|
||||
54
animation.sym
Normal file
54
animation.sym
Normal file
@ -0,0 +1,54 @@
|
||||
; File generated by rgblink
|
||||
|
||||
00:0634 parecivo_tile_data
|
||||
00:0234 Map
|
||||
00:01F8 CheckBoundry
|
||||
00:01E5 game_loop
|
||||
00:0230 CheckBoundry.skipRender
|
||||
00:021E CheckBoundry.swap
|
||||
00:022C CheckBoundry.render
|
||||
00:0150 Start
|
||||
00:0017 dPlayerHeight
|
||||
00:0016 dPlayerWidth
|
||||
00:0018 dPlayerSpriteTiles
|
||||
00:0008 CopyDMARoutine
|
||||
00:0004 DMARoutine.wait
|
||||
00:0000 DMARoutine
|
||||
00:0008 DMARoutine.end
|
||||
00:000F CopyDMARoutine.copy
|
||||
00:0853 Read_Pad
|
||||
00:084A MemCpy.copy
|
||||
00:0883 Read_Pad.onenibble
|
||||
00:086C Read_Pad.legalUpDown
|
||||
00:0875 Read_Pad.legalLeftRight
|
||||
00:084A MemCpy
|
||||
00:0744 Wait_VBlank
|
||||
00:0816 Clear_Map
|
||||
00:0824 Load_Tiles
|
||||
00:07D7 PC_Update
|
||||
00:0750 Player_To_OAM
|
||||
00:0747 Wait_VBlank.wait
|
||||
00:07D1 Player_To_OAM.add4hl
|
||||
00:0762 Player_To_OAM.finner
|
||||
00:075E Player_To_OAM.fouter
|
||||
00:0786 Player_To_OAM.sinner
|
||||
00:077B Player_To_OAM.souter
|
||||
00:07A5 Player_To_OAM.tloop1
|
||||
00:07AA Player_To_OAM.tloop2
|
||||
00:07C1 Player_To_OAM.lloop1
|
||||
00:07C6 Player_To_OAM.lloop2
|
||||
00:07E6 PC_Update.up
|
||||
00:07F1 PC_Update.left
|
||||
00:07FC PC_Update.right
|
||||
00:0807 PC_Update.last
|
||||
00:081D Clear_Map.loop
|
||||
00:C005 rPlayerX
|
||||
00:C006 rPlayerY
|
||||
00:C004 ANS
|
||||
00:C002 N
|
||||
00:C000 X
|
||||
00:C100 wShadowOAM
|
||||
00:FF88 hVBlankFlag
|
||||
00:FF89 hCurKeys
|
||||
00:FF8A hNewKeys
|
||||
00:FF80 hOAMDMA
|
||||
129
ass/map.ass
Normal file
129
ass/map.ass
Normal file
@ -0,0 +1,129 @@
|
||||
; MAP.Z80
|
||||
;
|
||||
; Map Source File.
|
||||
;
|
||||
; Info:
|
||||
; Section : Map
|
||||
; Bank : 0
|
||||
; Map size : 32 x 32
|
||||
; Tile set : tiles.gbr
|
||||
; Plane count : 1 plane (8 bits)
|
||||
; Plane order : Tiles are continues
|
||||
; Tile offset : 0
|
||||
; Split data : No
|
||||
;
|
||||
; This file was generated by GBMB v1.8
|
||||
|
||||
MapWidth EQU 32
|
||||
MapHeight EQU 32
|
||||
MapBank EQU 0
|
||||
Map_Size EQU (10*101)+4
|
||||
|
||||
SECTION "Map", ROM0
|
||||
|
||||
Map:
|
||||
DB $03,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$03
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$03,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$03,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$03,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$03,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$03,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$03,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$03,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$03,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $03,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$03
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$03,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$03,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$03,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$03,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$03,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$03,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$03,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$03,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $03,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$03
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$03,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$03,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$03,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$03,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$03,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$03,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$03,$00
|
||||
DB $00,$00,$04,$05,$00,$00,$00,$03,$03,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$03,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $03,$03,$00,$00,$06,$07,$00,$00,$03,$03
|
||||
DB $03,$03,$00,$00,$00,$01,$00,$00,$03,$03
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$03,$03,$03,$00,$08,$09,$00,$03
|
||||
DB $03,$03,$03,$03,$03,$00,$00,$02,$00,$03
|
||||
DB $03,$03,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$03,$03,$03,$03,$03,$03
|
||||
DB $03,$03,$03,$03,$03,$03,$03,$03,$03,$03
|
||||
DB $03,$03,$03,$03,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00
|
||||
|
||||
; End of MAP.Z80
|
||||
BIN
ass/map.gbm
Normal file
BIN
ass/map.gbm
Normal file
Binary file not shown.
27
ass/parecivo.ass
Normal file
27
ass/parecivo.ass
Normal file
@ -0,0 +1,27 @@
|
||||
;-----------------------------------------
|
||||
; Animation Test: .i pa .e re .e ci .e vo
|
||||
;-----------------------------------------
|
||||
|
||||
SECTION "parecivoTiles", ROM0
|
||||
|
||||
parecivo_tile_data_size EQU $0110
|
||||
parecivo_tile_count EQU $11
|
||||
|
||||
parecivo_tile_data::
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$7F,$7F,$40,$40,$4E,$4E,$51,$51,$51,$51,$51,$51,$5E,$5E
|
||||
DB $00,$00,$FE,$FE,$02,$02,$02,$02,$02,$02,$02,$02,$02,$02,$02,$02
|
||||
DB $00,$00,$7F,$7F,$40,$40,$57,$57,$48,$48,$48,$48,$48,$48,$48,$48
|
||||
DB $00,$00,$FE,$FE,$02,$02,$02,$02,$82,$82,$82,$82,$02,$02,$E2,$E2
|
||||
DB $00,$00,$7F,$7F,$40,$40,$4F,$4F,$50,$50,$50,$50,$50,$50,$50,$50
|
||||
DB $00,$00,$FE,$FE,$02,$02,$02,$02,$92,$92,$82,$82,$12,$12,$12,$12
|
||||
DB $00,$00,$7F,$7F,$40,$40,$50,$50,$50,$50,$48,$48,$48,$48,$45,$45
|
||||
DB $00,$00,$FE,$FE,$02,$02,$42,$42,$42,$42,$82,$82,$82,$82,$02,$02
|
||||
DB $50,$50,$51,$51,$51,$51,$51,$51,$50,$50,$40,$40,$7F,$7F,$00,$00
|
||||
DB $E2,$E2,$12,$12,$12,$12,$12,$12,$EA,$EA,$02,$02,$FE,$FE,$00,$00
|
||||
DB $49,$49,$49,$49,$49,$49,$49,$49,$48,$48,$40,$40,$7F,$7F,$00,$00
|
||||
DB $12,$12,$12,$12,$E2,$E2,$02,$02,$F2,$F2,$02,$02,$FE,$FE,$00,$00
|
||||
DB $50,$50,$50,$50,$50,$50,$50,$50,$4F,$4F,$40,$40,$7F,$7F,$00,$00
|
||||
DB $12,$12,$12,$12,$92,$92,$92,$92,$3A,$3A,$02,$02,$FE,$FE,$00,$00
|
||||
DB $45,$45,$42,$42,$40,$40,$40,$40,$40,$40,$40,$40,$7F,$7F,$00,$00
|
||||
DB $32,$32,$4A,$4A,$4A,$4A,$4A,$4A,$32,$32,$02,$02,$FE,$FE,$00,$00
|
||||
BIN
ass/parecivo.png
Normal file
BIN
ass/parecivo.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 353 B |
25
ass/tiles.ass
Normal file
25
ass/tiles.ass
Normal file
@ -0,0 +1,25 @@
|
||||
SECTION "Tiles", ROM0
|
||||
|
||||
Tiles_Size EQU 8*20
|
||||
|
||||
Tiles:
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $00,$00,$00,$00,$00,$00,$00,$00
|
||||
DB $3C,$3C,$42,$42,$81,$81,$A5,$A5
|
||||
DB $81,$81,$99,$99,$42,$42,$3C,$3C
|
||||
DB $18,$18,$FF,$FF,$99,$99,$99,$99
|
||||
DB $BD,$BD,$24,$24,$24,$24,$24,$24
|
||||
DB $00,$FF,$7E,$81,$66,$A5,$42,$81
|
||||
DB $42,$81,$66,$A5,$7E,$81,$00,$FF
|
||||
DB $00,$00,$3E,$3E,$51,$5F,$0C,$0B
|
||||
DB $06,$05,$1F,$1C,$37,$2C,$7F,$7F
|
||||
DB $00,$00,$00,$00,$00,$00,$80,$80
|
||||
DB $40,$C0,$38,$F8,$34,$EC,$F8,$F8
|
||||
DB $0F,$00,$0F,$02,$0F,$00,$05,$03
|
||||
DB $02,$01,$06,$01,$0F,$00,$0F,$10
|
||||
DB $00,$E0,$80,$E0,$00,$E0,$80,$C0
|
||||
DB $C0,$C0,$60,$E0,$30,$F0,$90,$70
|
||||
DB $2F,$10,$0F,$20,$06,$01,$07,$00
|
||||
DB $04,$02,$04,$02,$0C,$02,$18,$06
|
||||
DB $90,$68,$08,$E0,$00,$C0,$00,$C0
|
||||
DB $80,$40,$80,$40,$80,$60,$C0,$30
|
||||
BIN
ass/tiles.gbr
Normal file
BIN
ass/tiles.gbr
Normal file
Binary file not shown.
840
inc/hardware.inc
Normal file
840
inc/hardware.inc
Normal file
@ -0,0 +1,840 @@
|
||||
;*
|
||||
;* Gameboy Hardware definitions
|
||||
;*
|
||||
;* Based on Jones' hardware.inc
|
||||
;* And based on Carsten Sorensen's ideas.
|
||||
;*
|
||||
;* Rev 1.1 - 15-Jul-97 : Added define check
|
||||
;* Rev 1.2 - 18-Jul-97 : Added revision check macro
|
||||
;* Rev 1.3 - 19-Jul-97 : Modified for RGBASM V1.05
|
||||
;* Rev 1.4 - 27-Jul-97 : Modified for new subroutine prefixes
|
||||
;* Rev 1.5 - 15-Aug-97 : Added _HRAM, PAD, CART defines
|
||||
;* : and Nintendo Logo
|
||||
;* Rev 1.6 - 30-Nov-97 : Added rDIV, rTIMA, rTMA, & rTAC
|
||||
;* Rev 1.7 - 31-Jan-98 : Added _SCRN0, _SCRN1
|
||||
;* Rev 1.8 - 15-Feb-98 : Added rSB, rSC
|
||||
;* Rev 1.9 - 16-Feb-98 : Converted I/O registers to $FFXX format
|
||||
;* Rev 2.0 - : Added GBC registers
|
||||
;* Rev 2.1 - : Added MBC5 & cart RAM enable/disable defines
|
||||
;* Rev 2.2 - : Fixed NR42,NR43, & NR44 equates
|
||||
;* Rev 2.3 - : Fixed incorrect _HRAM equate
|
||||
;* Rev 2.4 - 27-Apr-13 : Added some cart defines (AntonioND)
|
||||
;* Rev 2.5 - 03-May-15 : Fixed format (AntonioND)
|
||||
;* Rev 2.6 - 09-Apr-16 : Added GBC OAM and cart defines (AntonioND)
|
||||
;* Rev 2.7 - 19-Jan-19 : Added rPCMXX (ISSOtm)
|
||||
;* Rev 2.8 - 03-Feb-19 : Added audio registers flags (Álvaro Cuesta)
|
||||
|
||||
; If all of these are already defined, don't do it again.
|
||||
|
||||
IF !DEF(HARDWARE_INC)
|
||||
HARDWARE_INC SET 1
|
||||
|
||||
rev_Check_hardware_inc : MACRO
|
||||
;NOTE: REVISION NUMBER CHANGES MUST BE ADDED
|
||||
;TO SECOND PARAMETER IN FOLLOWING LINE.
|
||||
IF \1 > 2.8 ;PUT REVISION NUMBER HERE
|
||||
WARN "Version \1 or later of 'hardware.inc' is required."
|
||||
ENDC
|
||||
ENDM
|
||||
|
||||
_HW EQU $FF00
|
||||
|
||||
_VRAM EQU $8000 ; $8000->$9FFF
|
||||
_BGTILES EQU $9000
|
||||
_SCRN0 EQU $9800 ; $9800->$9BFF
|
||||
_SCRN0_END EQU $9BFF
|
||||
_SCRN1 EQU $9C00 ; $9C00->$9FFF
|
||||
_SRAM EQU $A000 ; $A000->$BFFF
|
||||
_RAM EQU $C000 ; $C000->$DFFF
|
||||
_OAMRAM EQU $FE00 ; $FE00->$FE9F
|
||||
_AUD3WAVERAM EQU $FF30 ; $FF30->$FF3F
|
||||
_HRAM EQU $FF80 ; $FF80->$FFFE
|
||||
|
||||
; *** MBC5 Equates ***
|
||||
|
||||
rRAMG EQU $0000 ; $0000->$1fff
|
||||
rROMB0 EQU $2000 ; $2000->$2fff
|
||||
rROMB1 EQU $3000 ; $3000->$3fff - If more than 256 ROM banks are present.
|
||||
rRAMB EQU $4000 ; $4000->$5fff - Bit 3 enables rumble (if present)
|
||||
|
||||
|
||||
; --
|
||||
; -- OAM flags
|
||||
; --
|
||||
|
||||
OAMF_PRI EQU %10000000 ; Priority
|
||||
OAMF_YFLIP EQU %01000000 ; Y flip
|
||||
OAMF_XFLIP EQU %00100000 ; X flip
|
||||
OAMF_PAL0 EQU %00000000 ; Palette number; 0,1 (DMG)
|
||||
OAMF_PAL1 EQU %00010000 ; Palette number; 0,1 (DMG)
|
||||
OAMF_BANK0 EQU %00000000 ; Bank number; 0,1 (GBC)
|
||||
OAMF_BANK1 EQU %00001000 ; Bank number; 0,1 (GBC)
|
||||
|
||||
OAMF_PALMASK EQU %00000111 ; Palette (GBC)
|
||||
|
||||
OAMB_PRI EQU 7 ; Priority
|
||||
OAMB_YFLIP EQU 6 ; Y flip
|
||||
OAMB_XFLIP EQU 5 ; X flip
|
||||
OAMB_PAL1 EQU 4 ; Palette number; 0,1 (DMG)
|
||||
OAMB_BANK1 EQU 3 ; Bank number; 0,1 (GBC)
|
||||
|
||||
|
||||
;***************************************************************************
|
||||
;*
|
||||
;* Custom registers
|
||||
;*
|
||||
;***************************************************************************
|
||||
|
||||
; --
|
||||
; -- P1 ($FF00)
|
||||
; -- Register for reading joy pad info. (R/W)
|
||||
; --
|
||||
rP1 EQU $FF00
|
||||
|
||||
P1F_5 EQU %00100000 ; P15 out port
|
||||
P1F_4 EQU %00010000 ; P14 out port
|
||||
P1F_3 EQU %00001000 ; P13 in port
|
||||
P1F_2 EQU %00000100 ; P12 in port
|
||||
P1F_1 EQU %00000010 ; P11 in port
|
||||
P1F_0 EQU %00000001 ; P10 in port
|
||||
|
||||
; --
|
||||
; -- SB ($FF01)
|
||||
; -- Serial Transfer Data (R/W)
|
||||
; --
|
||||
rSB EQU $FF01
|
||||
|
||||
; --
|
||||
; -- SC ($FF02)
|
||||
; -- Serial I/O Control (R/W)
|
||||
; --
|
||||
rSC EQU $FF02
|
||||
|
||||
; --
|
||||
; -- DIV ($FF04)
|
||||
; -- Divider register (R/W)
|
||||
; --
|
||||
rDIV EQU $FF04
|
||||
|
||||
|
||||
; --
|
||||
; -- TIMA ($FF05)
|
||||
; -- Timer counter (R/W)
|
||||
; --
|
||||
rTIMA EQU $FF05
|
||||
|
||||
|
||||
; --
|
||||
; -- TMA ($FF06)
|
||||
; -- Timer modulo (R/W)
|
||||
; --
|
||||
rTMA EQU $FF06
|
||||
|
||||
|
||||
; --
|
||||
; -- TAC ($FF07)
|
||||
; -- Timer control (R/W)
|
||||
; --
|
||||
rTAC EQU $FF07
|
||||
|
||||
TACF_START EQU %00000100
|
||||
TACF_STOP EQU %00000000
|
||||
TACF_4KHZ EQU %00000000
|
||||
TACF_16KHZ EQU %00000011
|
||||
TACF_65KHZ EQU %00000010
|
||||
TACF_262KHZ EQU %00000001
|
||||
|
||||
; --
|
||||
; -- IF ($FF0F)
|
||||
; -- Interrupt Flag (R/W)
|
||||
; --
|
||||
rIF EQU $FF0F
|
||||
|
||||
; --
|
||||
; -- LCDC ($FF40)
|
||||
; -- LCD Control (R/W)
|
||||
; --
|
||||
rLCDC EQU $FF40
|
||||
|
||||
LCDCF_OFF EQU %00000000 ; LCD Control Operation
|
||||
LCDCF_ON EQU %10000000 ; LCD Control Operation
|
||||
LCDCF_WIN9800 EQU %00000000 ; Window Tile Map Display Select
|
||||
LCDCF_WIN9C00 EQU %01000000 ; Window Tile Map Display Select
|
||||
LCDCF_WINOFF EQU %00000000 ; Window Display
|
||||
LCDCF_WINON EQU %00100000 ; Window Display
|
||||
LCDCF_BG8800 EQU %00000000 ; BG & Window Tile Data Select
|
||||
LCDCF_BG8000 EQU %00010000 ; BG & Window Tile Data Select
|
||||
LCDCF_BG9800 EQU %00000000 ; BG Tile Map Display Select
|
||||
LCDCF_BG9C00 EQU %00001000 ; BG Tile Map Display Select
|
||||
LCDCF_OBJ8 EQU %00000000 ; OBJ Construction
|
||||
LCDCF_OBJ16 EQU %00000100 ; OBJ Construction
|
||||
LCDCF_OBJOFF EQU %00000000 ; OBJ Display
|
||||
LCDCF_OBJON EQU %00000010 ; OBJ Display
|
||||
LCDCF_BGOFF EQU %00000000 ; BG Display
|
||||
LCDCF_BGON EQU %00000001 ; BG Display
|
||||
; "Window Character Data Select" follows BG
|
||||
|
||||
|
||||
; --
|
||||
; -- STAT ($FF41)
|
||||
; -- LCDC Status (R/W)
|
||||
; --
|
||||
rSTAT EQU $FF41
|
||||
|
||||
STATF_LYC EQU %01000000 ; LYCEQULY Coincidence (Selectable)
|
||||
STATF_MODE10 EQU %00100000 ; Mode 10
|
||||
STATF_MODE01 EQU %00010000 ; Mode 01 (V-Blank)
|
||||
STATF_MODE00 EQU %00001000 ; Mode 00 (H-Blank)
|
||||
STATF_LYCF EQU %00000100 ; Coincidence Flag
|
||||
STATF_HB EQU %00000000 ; H-Blank
|
||||
STATF_VB EQU %00000001 ; V-Blank
|
||||
STATF_OAM EQU %00000010 ; OAM-RAM is used by system
|
||||
STATF_LCD EQU %00000011 ; Both OAM and VRAM used by system
|
||||
STATF_BUSY EQU %00000010 ; When set, VRAM access is unsafe
|
||||
|
||||
|
||||
; --
|
||||
; -- SCY ($FF42)
|
||||
; -- Scroll Y (R/W)
|
||||
; --
|
||||
rSCY EQU $FF42
|
||||
|
||||
|
||||
; --
|
||||
; -- SCY ($FF43)
|
||||
; -- Scroll X (R/W)
|
||||
; --
|
||||
rSCX EQU $FF43
|
||||
|
||||
|
||||
; --
|
||||
; -- LY ($FF44)
|
||||
; -- LCDC Y-Coordinate (R)
|
||||
; --
|
||||
; -- Values range from 0->153. 144->153 is the VBlank period.
|
||||
; --
|
||||
rLY EQU $FF44
|
||||
|
||||
|
||||
; --
|
||||
; -- LYC ($FF45)
|
||||
; -- LY Compare (R/W)
|
||||
; --
|
||||
; -- When LYEQUEQULYC, STATF_LYCF will be set in STAT
|
||||
; --
|
||||
rLYC EQU $FF45
|
||||
|
||||
|
||||
; --
|
||||
; -- DMA ($FF46)
|
||||
; -- DMA Transfer and Start Address (W)
|
||||
; --
|
||||
rDMA EQU $FF46
|
||||
|
||||
|
||||
; --
|
||||
; -- BGP ($FF47)
|
||||
; -- BG Palette Data (W)
|
||||
; --
|
||||
; -- Bit 7-6 - Intensity for %11
|
||||
; -- Bit 5-4 - Intensity for %10
|
||||
; -- Bit 3-2 - Intensity for %01
|
||||
; -- Bit 1-0 - Intensity for %00
|
||||
; --
|
||||
rBGP EQU $FF47
|
||||
|
||||
|
||||
; --
|
||||
; -- OBP0 ($FF48)
|
||||
; -- Object Palette 0 Data (W)
|
||||
; --
|
||||
; -- See BGP for info
|
||||
; --
|
||||
rOBP0 EQU $FF48
|
||||
|
||||
|
||||
; --
|
||||
; -- OBP1 ($FF49)
|
||||
; -- Object Palette 1 Data (W)
|
||||
; --
|
||||
; -- See BGP for info
|
||||
; --
|
||||
rOBP1 EQU $FF49
|
||||
|
||||
|
||||
; --
|
||||
; -- WY ($FF4A)
|
||||
; -- Window Y Position (R/W)
|
||||
; --
|
||||
; -- 0 <EQU WY <EQU 143
|
||||
; --
|
||||
rWY EQU $FF4A
|
||||
|
||||
|
||||
; --
|
||||
; -- WX ($FF4B)
|
||||
; -- Window X Position (R/W)
|
||||
; --
|
||||
; -- 7 <EQU WX <EQU 166
|
||||
; --
|
||||
rWX EQU $FF4B
|
||||
|
||||
|
||||
; --
|
||||
; -- KEY 1 ($FF4D)
|
||||
; -- Select CPU Speed (R/W)
|
||||
; --
|
||||
rKEY1 EQU $FF4D
|
||||
|
||||
|
||||
; --
|
||||
; -- VBK ($FF4F)
|
||||
; -- Select Video RAM Bank (R/W)
|
||||
; --
|
||||
rVBK EQU $FF4F
|
||||
|
||||
|
||||
; --
|
||||
; -- HDMA1 ($FF51)
|
||||
; -- Horizontal Blanking, General Purpose DMA (W)
|
||||
; --
|
||||
rHDMA1 EQU $FF51
|
||||
|
||||
|
||||
; --
|
||||
; -- HDMA2 ($FF52)
|
||||
; -- Horizontal Blanking, General Purpose DMA (W)
|
||||
; --
|
||||
rHDMA2 EQU $FF52
|
||||
|
||||
|
||||
; --
|
||||
; -- HDMA3 ($FF53)
|
||||
; -- Horizontal Blanking, General Purpose DMA (W)
|
||||
; --
|
||||
rHDMA3 EQU $FF53
|
||||
|
||||
|
||||
; --
|
||||
; -- HDMA4 ($FF54)
|
||||
; -- Horizontal Blanking, General Purpose DMA (W)
|
||||
; --
|
||||
rHDMA4 EQU $FF54
|
||||
|
||||
|
||||
; --
|
||||
; -- HDMA5 ($FF55)
|
||||
; -- Horizontal Blanking, General Purpose DMA (R/W)
|
||||
; --
|
||||
rHDMA5 EQU $FF55
|
||||
|
||||
|
||||
; --
|
||||
; -- RP ($FF56)
|
||||
; -- Infrared Communications Port (R/W)
|
||||
; --
|
||||
rRP EQU $FF56
|
||||
|
||||
|
||||
; --
|
||||
; -- BCPS ($FF68)
|
||||
; -- Background Color Palette Specification (R/W)
|
||||
; --
|
||||
rBCPS EQU $FF68
|
||||
|
||||
|
||||
; --
|
||||
; -- BCPD ($FF69)
|
||||
; -- Background Color Palette Data (R/W)
|
||||
; --
|
||||
rBCPD EQU $FF69
|
||||
|
||||
|
||||
; --
|
||||
; -- BCPS ($FF6A)
|
||||
; -- Object Color Palette Specification (R/W)
|
||||
; --
|
||||
rOCPS EQU $FF6A
|
||||
|
||||
|
||||
; --
|
||||
; -- BCPD ($FF6B)
|
||||
; -- Object Color Palette Data (R/W)
|
||||
; --
|
||||
rOCPD EQU $FF6B
|
||||
|
||||
|
||||
; --
|
||||
; -- SVBK ($FF4F)
|
||||
; -- Select Main RAM Bank (R/W)
|
||||
; --
|
||||
rSVBK EQU $FF70
|
||||
|
||||
|
||||
; --
|
||||
; -- IE ($FFFF)
|
||||
; -- Interrupt Enable (R/W)
|
||||
; --
|
||||
rIE EQU $FFFF
|
||||
|
||||
|
||||
IEF_HILO EQU %00010000 ; Transition from High to Low of Pin number P10-P13
|
||||
IEF_SERIAL EQU %00001000 ; Serial I/O transfer end
|
||||
IEF_TIMER EQU %00000100 ; Timer Overflow
|
||||
IEF_LCDC EQU %00000010 ; LCDC (see STAT)
|
||||
IEF_VBLANK EQU %00000001 ; V-Blank
|
||||
|
||||
|
||||
|
||||
|
||||
;***************************************************************************
|
||||
;*
|
||||
;* Sound control registers
|
||||
;*
|
||||
;***************************************************************************
|
||||
|
||||
; --
|
||||
; -- AUDVOL/NR50 ($FF24)
|
||||
; -- Channel control / ON-OFF / Volume (R/W)
|
||||
; --
|
||||
; -- Bit 7 - Vin->SO2 ON/OFF (Vin??)
|
||||
; -- Bit 6-4 - SO2 output level (volume) (# 0-7)
|
||||
; -- Bit 3 - Vin->SO1 ON/OFF (Vin??)
|
||||
; -- Bit 2-0 - SO1 output level (volume) (# 0-7)
|
||||
; --
|
||||
rNR50 EQU $FF24
|
||||
rAUDVOL EQU rNR50
|
||||
|
||||
AUDVOL_VIN_LEFT EQU %10000000 ; SO2
|
||||
AUDVOL_VIN_RIGHT EQU %00001000 ; SO1
|
||||
|
||||
|
||||
; --
|
||||
; -- AUDTERM/NR51 ($FF25)
|
||||
; -- Selection of Sound output terminal (R/W)
|
||||
; --
|
||||
; -- Bit 7 - Output sound 4 to SO2 terminal
|
||||
; -- Bit 6 - Output sound 3 to SO2 terminal
|
||||
; -- Bit 5 - Output sound 2 to SO2 terminal
|
||||
; -- Bit 4 - Output sound 1 to SO2 terminal
|
||||
; -- Bit 3 - Output sound 4 to SO1 terminal
|
||||
; -- Bit 2 - Output sound 3 to SO1 terminal
|
||||
; -- Bit 1 - Output sound 2 to SO1 terminal
|
||||
; -- Bit 0 - Output sound 0 to SO1 terminal
|
||||
; --
|
||||
rNR51 EQU $FF25
|
||||
rAUDTERM EQU rNR51
|
||||
|
||||
; SO2
|
||||
AUDTERM_4_LEFT EQU %10000000
|
||||
AUDTERM_3_LEFT EQU %01000000
|
||||
AUDTERM_2_LEFT EQU %00100000
|
||||
AUDTERM_1_LEFT EQU %00010000
|
||||
; SO1
|
||||
AUDTERM_4_RIGHT EQU %00001000
|
||||
AUDTERM_3_RIGHT EQU %00000100
|
||||
AUDTERM_2_RIGHT EQU %00000010
|
||||
AUDTERM_1_RIGHT EQU %00000001
|
||||
|
||||
|
||||
; --
|
||||
; -- AUDENA/NR52 ($FF26)
|
||||
; -- Sound on/off (R/W)
|
||||
; --
|
||||
; -- Bit 7 - All sound on/off (sets all audio regs to 0!)
|
||||
; -- Bit 3 - Sound 4 ON flag (doesn't work!)
|
||||
; -- Bit 2 - Sound 3 ON flag (doesn't work!)
|
||||
; -- Bit 1 - Sound 2 ON flag (doesn't work!)
|
||||
; -- Bit 0 - Sound 1 ON flag (doesn't work!)
|
||||
; --
|
||||
rNR52 EQU $FF26
|
||||
rAUDENA EQU rNR52
|
||||
|
||||
AUDENA_ON EQU %10000000
|
||||
AUDENA_OFF EQU %00000000 ; sets all audio regs to 0!
|
||||
|
||||
|
||||
;***************************************************************************
|
||||
;*
|
||||
;* SoundChannel #1 registers
|
||||
;*
|
||||
;***************************************************************************
|
||||
|
||||
; --
|
||||
; -- AUD1SWEEP/NR10 ($FF10)
|
||||
; -- Sweep register (R/W)
|
||||
; --
|
||||
; -- Bit 6-4 - Sweep Time
|
||||
; -- Bit 3 - Sweep Increase/Decrease
|
||||
; -- 0: Addition (frequency increases???)
|
||||
; -- 1: Subtraction (frequency increases???)
|
||||
; -- Bit 2-0 - Number of sweep shift (# 0-7)
|
||||
; -- Sweep Time: (n*7.8ms)
|
||||
; --
|
||||
rNR10 EQU $FF10
|
||||
rAUD1SWEEP EQU rNR10
|
||||
|
||||
AUD1SWEEP_UP EQU %00000000
|
||||
AUD1SWEEP_DOWN EQU %00001000
|
||||
|
||||
|
||||
; --
|
||||
; -- AUD1LEN/NR11 ($FF11)
|
||||
; -- Sound length/Wave pattern duty (R/W)
|
||||
; --
|
||||
; -- Bit 7-6 - Wave Pattern Duty (00:12.5% 01:25% 10:50% 11:75%)
|
||||
; -- Bit 5-0 - Sound length data (# 0-63)
|
||||
; --
|
||||
rNR11 EQU $FF11
|
||||
rAUD1LEN EQU rNR11
|
||||
|
||||
|
||||
; --
|
||||
; -- AUD1ENV/NR12 ($FF12)
|
||||
; -- Envelope (R/W)
|
||||
; --
|
||||
; -- Bit 7-4 - Initial value of envelope
|
||||
; -- Bit 3 - Envelope UP/DOWN
|
||||
; -- 0: Decrease
|
||||
; -- 1: Range of increase
|
||||
; -- Bit 2-0 - Number of envelope sweep (# 0-7)
|
||||
; --
|
||||
rNR12 EQU $FF12
|
||||
rAUD1ENV EQU rNR12
|
||||
|
||||
|
||||
; --
|
||||
; -- AUD1LOW/NR13 ($FF13)
|
||||
; -- Frequency lo (W)
|
||||
; --
|
||||
rNR13 EQU $FF13
|
||||
rAUD1LOW EQU rNR13
|
||||
|
||||
|
||||
; --
|
||||
; -- AUD1HIGH/NR14 ($FF14)
|
||||
; -- Frequency hi (W)
|
||||
; --
|
||||
; -- Bit 7 - Initial (when set, sound restarts)
|
||||
; -- Bit 6 - Counter/consecutive selection
|
||||
; -- Bit 2-0 - Frequency's higher 3 bits
|
||||
; --
|
||||
rNR14 EQU $FF14
|
||||
rAUD1HIGH EQU rNR14
|
||||
|
||||
|
||||
;***************************************************************************
|
||||
;*
|
||||
;* SoundChannel #2 registers
|
||||
;*
|
||||
;***************************************************************************
|
||||
|
||||
; --
|
||||
; -- AUD2LEN/NR21 ($FF16)
|
||||
; -- Sound Length; Wave Pattern Duty (R/W)
|
||||
; --
|
||||
; -- see AUD1LEN for info
|
||||
; --
|
||||
rNR21 EQU $FF16
|
||||
rAUD2LEN EQU rNR21
|
||||
|
||||
|
||||
; --
|
||||
; -- AUD2ENV/NR22 ($FF17)
|
||||
; -- Envelope (R/W)
|
||||
; --
|
||||
; -- see AUD1ENV for info
|
||||
; --
|
||||
rNR22 EQU $FF17
|
||||
rAUD2ENV EQU rNR22
|
||||
|
||||
|
||||
; --
|
||||
; -- AUD2LOW/NR23 ($FF18)
|
||||
; -- Frequency lo (W)
|
||||
; --
|
||||
rNR23 EQU $FF18
|
||||
rAUD2LOW EQU rNR23
|
||||
|
||||
|
||||
; --
|
||||
; -- AUD2HIGH/NR24 ($FF19)
|
||||
; -- Frequency hi (W)
|
||||
; --
|
||||
; -- see AUD1HIGH for info
|
||||
; --
|
||||
rNR24 EQU $FF19
|
||||
rAUD2HIGH EQU rNR24
|
||||
|
||||
|
||||
;***************************************************************************
|
||||
;*
|
||||
;* SoundChannel #3 registers
|
||||
;*
|
||||
;***************************************************************************
|
||||
|
||||
; --
|
||||
; -- AUD3ENA/NR30 ($FF1A)
|
||||
; -- Sound on/off (R/W)
|
||||
; --
|
||||
; -- Bit 7 - Sound ON/OFF (1EQUON,0EQUOFF)
|
||||
; --
|
||||
rNR30 EQU $FF1A
|
||||
rAUD3ENA EQU rNR30
|
||||
|
||||
|
||||
; --
|
||||
; -- AUD3LEN/NR31 ($FF1B)
|
||||
; -- Sound length (R/W)
|
||||
; --
|
||||
; -- Bit 7-0 - Sound length
|
||||
; --
|
||||
rNR31 EQU $FF1B
|
||||
rAUD3LEN EQU rNR31
|
||||
|
||||
|
||||
; --
|
||||
; -- AUD3LEVEL/NR32 ($FF1C)
|
||||
; -- Select output level
|
||||
; --
|
||||
; -- Bit 6-5 - Select output level
|
||||
; -- 00: 0/1 (mute)
|
||||
; -- 01: 1/1
|
||||
; -- 10: 1/2
|
||||
; -- 11: 1/4
|
||||
; --
|
||||
rNR32 EQU $FF1C
|
||||
rAUD3LEVEL EQU rNR32
|
||||
|
||||
|
||||
; --
|
||||
; -- AUD3LOW/NR33 ($FF1D)
|
||||
; -- Frequency lo (W)
|
||||
; --
|
||||
; -- see AUD1LOW for info
|
||||
; --
|
||||
rNR33 EQU $FF1D
|
||||
rAUD3LOW EQU rNR33
|
||||
|
||||
|
||||
; --
|
||||
; -- AUD3HIGH/NR34 ($FF1E)
|
||||
; -- Frequency hi (W)
|
||||
; --
|
||||
; -- see AUD1HIGH for info
|
||||
; --
|
||||
rNR34 EQU $FF1E
|
||||
rAUD3HIGH EQU rNR34
|
||||
|
||||
|
||||
; --
|
||||
; -- AUD4LEN/NR41 ($FF20)
|
||||
; -- Sound length (R/W)
|
||||
; --
|
||||
; -- Bit 5-0 - Sound length data (# 0-63)
|
||||
; --
|
||||
rNR41 EQU $FF20
|
||||
rAUD4LEN EQU rNR41
|
||||
|
||||
|
||||
; --
|
||||
; -- AUD4ENV/NR42 ($FF21)
|
||||
; -- Envelope (R/W)
|
||||
; --
|
||||
; -- see AUD1ENV for info
|
||||
; --
|
||||
rNR42 EQU $FF21
|
||||
rAUD4ENV EQU rNR42
|
||||
|
||||
|
||||
; --
|
||||
; -- AUD4POLY/NR43 ($FF22)
|
||||
; -- Polynomial counter (R/W)
|
||||
; --
|
||||
; -- Bit 7-4 - Selection of the shift clock frequency of the (scf)
|
||||
; -- polynomial counter (0000-1101)
|
||||
; -- freqEQUdrf*1/2^scf (not sure)
|
||||
; -- Bit 3 - Selection of the polynomial counter's step
|
||||
; -- 0: 15 steps
|
||||
; -- 1: 7 steps
|
||||
; -- Bit 2-0 - Selection of the dividing ratio of frequencies (drf)
|
||||
; -- 000: f/4 001: f/8 010: f/16 011: f/24
|
||||
; -- 100: f/32 101: f/40 110: f/48 111: f/56 (fEQU4.194304 Mhz)
|
||||
; --
|
||||
rNR43 EQU $FF22
|
||||
rAUD4POLY EQU rNR43
|
||||
|
||||
|
||||
; --
|
||||
; -- AUD4GO/NR44 ($FF23)
|
||||
; -- (has wrong name and value (ff30) in Dr.Pan's doc!)
|
||||
; --
|
||||
; -- Bit 7 - Inital
|
||||
; -- Bit 6 - Counter/consecutive selection
|
||||
; --
|
||||
rNR44 EQU $FF23
|
||||
rAUD4GO EQU rNR44 ; silly name!
|
||||
|
||||
|
||||
; --
|
||||
; -- PCM12 ($FF76)
|
||||
; -- Sound channel 1&2 PCM amplitude (R)
|
||||
; --
|
||||
; -- Bit 7-4 - Copy of sound channel 2's PCM amplitude
|
||||
; -- Bit 3-0 - Copy of sound channel 1's PCM amplitude
|
||||
; --
|
||||
rPCM12 EQU $FF76
|
||||
|
||||
|
||||
; --
|
||||
; -- PCM34 ($FF77)
|
||||
; -- Sound channel 3&4 PCM amplitude (R)
|
||||
; --
|
||||
; -- Bit 7-4 - Copy of sound channel 4's PCM amplitude
|
||||
; -- Bit 3-0 - Copy of sound channel 3's PCM amplitude
|
||||
; --
|
||||
rPCM34 EQU $FF77
|
||||
|
||||
|
||||
;***************************************************************************
|
||||
;*
|
||||
;* Flags common to multiple sound channels
|
||||
;*
|
||||
;***************************************************************************
|
||||
|
||||
; --
|
||||
; -- Square wave duty cycle
|
||||
; --
|
||||
; -- Can be used with AUD1LEN and AUD2LEN
|
||||
; -- See AUD1LEN for more info
|
||||
; --
|
||||
AUDLEN_DUTY_12_5 EQU %00000000 ; 12.5%
|
||||
AUDLEN_DUTY_25 EQU %01000000 ; 25%
|
||||
AUDLEN_DUTY_50 EQU %10000000 ; 50%
|
||||
AUDLEN_DUTY_75 EQU %11000000 ; 75%
|
||||
|
||||
|
||||
; --
|
||||
; -- Audio envelope flags
|
||||
; --
|
||||
; -- Can be used with AUD1ENV, AUD2ENV, AUD4ENV
|
||||
; -- See AUD1ENV for more info
|
||||
; --
|
||||
AUDENV_UP EQU %00001000
|
||||
AUDENV_DOWN EQU %00000000
|
||||
|
||||
|
||||
; --
|
||||
; -- Audio trigger flags
|
||||
; --
|
||||
; -- Can be used with AUD1HIGH, AUD2HIGH, AUD3HIGH
|
||||
; -- See AUD1HIGH for more info
|
||||
; --
|
||||
|
||||
AUDHIGH_RESTART EQU %10000000
|
||||
AUDHIGH_LENGTH_ON EQU %01000000
|
||||
AUDHIGH_LENGTH_OFF EQU %00000000
|
||||
|
||||
|
||||
;***************************************************************************
|
||||
;*
|
||||
;* Cart related
|
||||
;*
|
||||
;***************************************************************************
|
||||
|
||||
CART_COMPATIBLE_DMG EQU $00
|
||||
CART_COMPATIBLE_DMG_GBC EQU $80
|
||||
CART_COMPATIBLE_GBC EQU $C0
|
||||
|
||||
CART_ROM EQU $00
|
||||
CART_ROM_MBC1 EQU $01
|
||||
CART_ROM_MBC1_RAM EQU $02
|
||||
CART_ROM_MBC1_RAM_BAT EQU $03
|
||||
CART_ROM_MBC2 EQU $05
|
||||
CART_ROM_MBC2_BAT EQU $06
|
||||
CART_ROM_RAM EQU $08
|
||||
CART_ROM_RAM_BAT EQU $09
|
||||
CART_ROM_MBC3_BAT_RTC EQU $0F
|
||||
CART_ROM_MBC3_RAM_BAT_RTC EQU $10
|
||||
CART_ROM_MBC3 EQU $11
|
||||
CART_ROM_MBC3_RAM EQU $12
|
||||
CART_ROM_MBC3_RAM_BAT EQU $13
|
||||
CART_ROM_MBC5 EQU $19
|
||||
CART_ROM_MBC5_BAT EQU $1A
|
||||
CART_ROM_MBC5_RAM_BAT EQU $1B
|
||||
CART_ROM_MBC5_RUMBLE EQU $1C
|
||||
CART_ROM_MBC5_RAM_RUMBLE EQU $1D
|
||||
CART_ROM_MBC5_RAM_BAT_RUMBLE EQU $1E
|
||||
CART_ROM_MBC7_RAM_BAT_GYRO EQU $22
|
||||
CART_ROM_POCKET_CAMERA EQU $FC
|
||||
|
||||
CART_ROM_256K EQU 0 ; 2 banks
|
||||
CART_ROM_512K EQU 1 ; 4 banks
|
||||
CART_ROM_1M EQU 2 ; 8 banks
|
||||
CART_ROM_2M EQU 3 ; 16 banks
|
||||
CART_ROM_4M EQU 4 ; 32 banks
|
||||
CART_ROM_8M EQU 5 ; 64 banks
|
||||
CART_ROM_16M EQU 6 ; 128 banks
|
||||
CART_ROM_32M EQU 7 ; 256 banks
|
||||
CART_ROM_64M EQU 8 ; 512 banks
|
||||
|
||||
CART_RAM_NONE EQU 0
|
||||
CART_RAM_16K EQU 1 ; 1 incomplete bank
|
||||
CART_RAM_64K EQU 2 ; 1 bank
|
||||
CART_RAM_256K EQU 3 ; 4 banks
|
||||
CART_RAM_1M EQU 4 ; 16 banks
|
||||
|
||||
CART_RAM_ENABLE EQU $0A
|
||||
CART_RAM_DISABLE EQU $00
|
||||
|
||||
;***************************************************************************
|
||||
;*
|
||||
;* Keypad related
|
||||
;*
|
||||
;***************************************************************************
|
||||
|
||||
PADF_DOWN EQU $80
|
||||
PADF_UP EQU $40
|
||||
PADF_LEFT EQU $20
|
||||
PADF_RIGHT EQU $10
|
||||
PADF_START EQU $08
|
||||
PADF_SELECT EQU $04
|
||||
PADF_B EQU $02
|
||||
PADF_A EQU $01
|
||||
|
||||
PADB_DOWN EQU $7
|
||||
PADB_UP EQU $6
|
||||
PADB_LEFT EQU $5
|
||||
PADB_RIGHT EQU $4
|
||||
PADB_START EQU $3
|
||||
PADB_SELECT EQU $2
|
||||
PADB_B EQU $1
|
||||
PADB_A EQU $0
|
||||
|
||||
;***************************************************************************
|
||||
;*
|
||||
;* Screen related
|
||||
;*
|
||||
;***************************************************************************
|
||||
|
||||
SCRN_X EQU 160 ; Width of screen in pixels
|
||||
SCRN_Y EQU 144 ; Height of screen in pixels
|
||||
SCRN_X_B EQU 20 ; Width of screen in bytes
|
||||
SCRN_Y_B EQU 18 ; Height of screen in bytes
|
||||
|
||||
SCRN_VX EQU 256 ; Virtual width of screen in pixels
|
||||
SCRN_VY EQU 256 ; Virtual height of screen in pixels
|
||||
SCRN_VX_B EQU 32 ; Virtual width of screen in bytes
|
||||
SCRN_VY_B EQU 32 ; Virtual height of screen in bytes
|
||||
|
||||
;*
|
||||
;* Nintendo scrolling logo
|
||||
;* (Code won't work on a real GameBoy)
|
||||
;* (if next lines are altered.)
|
||||
NINTENDO_LOGO : MACRO
|
||||
DB $CE,$ED,$66,$66,$CC,$0D,$00,$0B,$03,$73,$00,$83,$00,$0C,$00,$0D
|
||||
DB $00,$08,$11,$1F,$88,$89,$00,$0E,$DC,$CC,$6E,$E6,$DD,$DD,$D9,$99
|
||||
DB $BB,$BB,$67,$63,$6E,$0E,$EC,$CC,$DD,$DC,$99,$9F,$BB,$B9,$33,$3E
|
||||
ENDM
|
||||
|
||||
ENDC ;HARDWARE_INC
|
||||
BIN
src/.actor.asm.swp
Normal file
BIN
src/.actor.asm.swp
Normal file
Binary file not shown.
BIN
src/.animation.asm.swo
Normal file
BIN
src/.animation.asm.swo
Normal file
Binary file not shown.
BIN
src/.entry.asm.swp
Normal file
BIN
src/.entry.asm.swp
Normal file
Binary file not shown.
59
src/actor.asm
Normal file
59
src/actor.asm
Normal file
@ -0,0 +1,59 @@
|
||||
;-----------------
|
||||
; Actor Animation
|
||||
;-----------------
|
||||
|
||||
SECTION "Actor Variables Struct", WRAM, ALIGN[8]
|
||||
|
||||
wWorldX: dw
|
||||
wWorldY: dw
|
||||
wActorState: db
|
||||
wActorCounter: db
|
||||
wActorData: dw
|
||||
wActorTile: dw
|
||||
|
||||
SECTION "Actor", ROM0
|
||||
|
||||
Actor::
|
||||
.structs:
|
||||
dw ActorIdle
|
||||
.tiles:
|
||||
ActorIdle::
|
||||
db 60
|
||||
dw .framePa
|
||||
db 15
|
||||
dw .frameRe
|
||||
db 15
|
||||
dw .frameCi
|
||||
db 15
|
||||
dw .frameVo
|
||||
.framePa
|
||||
db (.framePaEnd - @) / 4
|
||||
db -8, -8, 1, 0
|
||||
db -8, 0, 2, 0
|
||||
db 0, -8, 9, 0
|
||||
db 0, 0, 10, 0
|
||||
.framePaEnd
|
||||
|
||||
.frameRe
|
||||
db (.frameReEnd - @) / 4
|
||||
db -8, -8, 3, 0
|
||||
db -8, 0, 4, 0
|
||||
db 0, -8, 11, 0
|
||||
db 0, 0, 12, 0
|
||||
.frameReEnd
|
||||
|
||||
.frameCi
|
||||
db (.frameCiEnd - @) / 4
|
||||
db -8, -8, 5, 0
|
||||
db -8, 0, 6, 0
|
||||
db 0, -8, 13, 0
|
||||
db 0, 0, 14, 0
|
||||
.frameCiEnd
|
||||
|
||||
.frameVo
|
||||
db (.frameVoEnd - @) / 4
|
||||
db -8, -8, 7, 0
|
||||
db -8, 0, 8, 0
|
||||
db 0, -8, 15, 0
|
||||
db 0, 0, 16, 0
|
||||
.frameVoEnd
|
||||
59
src/animation.asm
Normal file
59
src/animation.asm
Normal file
@ -0,0 +1,59 @@
|
||||
;----------------
|
||||
; Animation Subs
|
||||
;----------------
|
||||
|
||||
SECTION "Animation Variables", HRAM
|
||||
|
||||
hCameraX: dw
|
||||
hCameraY: dw
|
||||
|
||||
hWorkingX: dw
|
||||
hWorkingY: dw
|
||||
hWorkingScreenX: db
|
||||
hWorkingScreenY: db
|
||||
hWorkingState: db
|
||||
hWorkingCounter: db
|
||||
hWorkingData: dw
|
||||
hWorkingTile: dw
|
||||
hWorkingEnd:
|
||||
|
||||
SECTION "Animations Subs", ROM0
|
||||
|
||||
; RenderActor:
|
||||
; takes a pointer to an actor struct
|
||||
; and renders it to shadow OAM, advancinc
|
||||
; the animation frame and constructing
|
||||
; each frame as needed.
|
||||
|
||||
; initial input:
|
||||
; [hl] <- start of Actor Struct in WRAM
|
||||
; output:
|
||||
; an oam object for each line in the frame data,
|
||||
; copied to shadowOAM (wShadowOAM)
|
||||
|
||||
RenderActor::
|
||||
|
||||
; load world X and Y to temp RAM
|
||||
ld a, [hli]
|
||||
ld [hWorkingX], a
|
||||
ld a, [hli]
|
||||
ld [hWorkingX+1], a
|
||||
ld a, [hli]
|
||||
ld [hWorkingY], a
|
||||
ld a, [hli]
|
||||
ld [hWorkingY+1], a
|
||||
; done loading X and Y
|
||||
; figure out if within 256 of camera
|
||||
; ---------
|
||||
; first compare upper byte of XXYY
|
||||
; if this is more than 1 away, break
|
||||
ld a, [hCameraX]
|
||||
ld b, a
|
||||
ld a, [hWorkingX]
|
||||
; b = camera byte
|
||||
; a = actor byte
|
||||
; work out if actor minus camera is <= 1
|
||||
sub b
|
||||
; ---------
|
||||
|
||||
.skipRendering
|
||||
33
src/defines.asm
Normal file
33
src/defines.asm
Normal file
@ -0,0 +1,33 @@
|
||||
;----------------
|
||||
; Definitions
|
||||
;----------------
|
||||
|
||||
P1F_NONE EQU $30
|
||||
P1F_BUTTONS EQU $10
|
||||
P1F_DPAD EQU $20
|
||||
|
||||
;----------------
|
||||
; RAM Vars
|
||||
;----------------
|
||||
|
||||
SECTION "ROM Vars", ROM0
|
||||
|
||||
dPlayerWidth: db 2
|
||||
dPlayerHeight: db 2
|
||||
dPlayerSpriteTiles: db $01, $02, $09, $0A
|
||||
|
||||
SECTION "WRAM Vars", WRAM0[$C000]
|
||||
|
||||
X: dw
|
||||
N: dw
|
||||
ANS: db
|
||||
|
||||
rPlayerX: db
|
||||
rPlayerY: db
|
||||
|
||||
SECTION "HRAM Vars", HRAM
|
||||
|
||||
hVBlankFlag: db
|
||||
hCurKeys: db
|
||||
hNewKeys: db
|
||||
|
||||
59
src/dma.asm
Normal file
59
src/dma.asm
Normal file
@ -0,0 +1,59 @@
|
||||
;------------------
|
||||
; DMA Subroutines
|
||||
;------------------
|
||||
|
||||
; In order to use, simply put your destination
|
||||
; address into the `a` register, and call `hOAMDMA`
|
||||
|
||||
; Here we copy our DMA Routine into
|
||||
; HRAM, which it needs to be in so
|
||||
; it can function.
|
||||
|
||||
; Note: we can only copy into HRAM
|
||||
; while the screen /ISN'T/ updating
|
||||
|
||||
SECTION "OAM DMA Routine", ROM0
|
||||
|
||||
; A DMA Transfor takes 160 microseconds
|
||||
; to complete, which is 40 machine cycles.
|
||||
; here we copy the high bit of our destination
|
||||
; address (stored in a) to the DMA register
|
||||
; then wait the time needed for the copy to
|
||||
; complete.
|
||||
|
||||
DMARoutine:
|
||||
ldh [rDMA], a
|
||||
ld a, 40
|
||||
.wait
|
||||
dec a
|
||||
jr nz, .wait
|
||||
ret
|
||||
.end
|
||||
|
||||
CopyDMARoutine:
|
||||
ld hl, DMARoutine
|
||||
ld b, DMARoutine.end - DMARoutine
|
||||
ld c, LOW(hOAMDMA)
|
||||
.copy
|
||||
ld a, [hli]
|
||||
ldh [c], a
|
||||
inc c
|
||||
dec b
|
||||
jr nz, .copy
|
||||
ret
|
||||
|
||||
; We reserve space in HRAM to keep our
|
||||
; DMA routine.
|
||||
|
||||
SECTION "OAM DMA", HRAM
|
||||
hOAMDMA:
|
||||
ds DMARoutine.end - DMARoutine
|
||||
|
||||
; We also reserve space to have a copy
|
||||
; of OAM that we can write to at any time
|
||||
; The DMA will then mirror this data to
|
||||
; the real OAM.
|
||||
|
||||
SECTION "Shadow OAM", WRAM0,ALIGN[8]
|
||||
wShadowOAM::
|
||||
ds 4*40
|
||||
160
src/entry.asm
Normal file
160
src/entry.asm
Normal file
@ -0,0 +1,160 @@
|
||||
;----------------
|
||||
; Program Start
|
||||
;----------------
|
||||
|
||||
BUFFER EQU 160
|
||||
TRUE EQU $42
|
||||
FALSE EQU $69
|
||||
|
||||
SECTION "Program Start", ROM0[$150]
|
||||
Start:
|
||||
ei
|
||||
ld a, IEF_VBLANK
|
||||
ld [rIE], a
|
||||
xor a
|
||||
ld [hVBlankFlag], a
|
||||
call Wait_VBlank
|
||||
xor a
|
||||
ldh [rLCDC], a
|
||||
call Clear_Map
|
||||
call Load_Tiles
|
||||
; call Load_Map
|
||||
ld a, %11100100
|
||||
ld [rBGP], a
|
||||
ld [rOBP0], a
|
||||
xor a
|
||||
ld [rSCY], a
|
||||
ld [rSCX], a
|
||||
ld [rNR52], a
|
||||
ld a, LCDCF_ON | LCDCF_OBJON | LCDCF_BGON
|
||||
ld [rLCDC], a
|
||||
|
||||
call CopyDMARoutine
|
||||
|
||||
ld a, 72
|
||||
ld [rPlayerX], a
|
||||
ld a, 88
|
||||
ld [rPlayerY], a
|
||||
|
||||
;----
|
||||
; Testing
|
||||
;----
|
||||
ld a, HIGH(ANS)
|
||||
ld h, a
|
||||
ld a, LOW(ANS)
|
||||
ld l, a
|
||||
|
||||
; Case One: Camera@E100 vs Actor@E195 (Pass)
|
||||
ld a, $E1
|
||||
ld [N], a
|
||||
ld a, $E1
|
||||
ld [X], a
|
||||
ld a, $00
|
||||
ld [N+1], a
|
||||
ld a, $95
|
||||
ld [X+1], a
|
||||
call CheckBoundry
|
||||
|
||||
; Case One: Camera@E095 vs Actor@E120 (Pass)
|
||||
ld a, $E0
|
||||
ld [N], a
|
||||
ld a, $E1
|
||||
ld [X], a
|
||||
ld a, $95
|
||||
ld [N+1], a
|
||||
ld a, $20
|
||||
ld [X+1], a
|
||||
call CheckBoundry
|
||||
|
||||
; Case One: Camera@E100 vs Actor@E1FF (Fail)
|
||||
ld a, $E1
|
||||
ld [N], a
|
||||
ld a, $E1
|
||||
ld [X], a
|
||||
ld a, $00
|
||||
ld [N+1], a
|
||||
ld a, $FF
|
||||
ld [X+1], a
|
||||
call CheckBoundry
|
||||
|
||||
; Case One: Camera@E1F0 vs Actor@E2DE (Fail)
|
||||
ld a, $E1
|
||||
ld [N], a
|
||||
ld a, $E2
|
||||
ld [X], a
|
||||
ld a, $F0
|
||||
ld [N+1], a
|
||||
ld a, $DE
|
||||
ld [X+1], a
|
||||
call CheckBoundry
|
||||
|
||||
game_loop:
|
||||
call Wait_VBlank
|
||||
call Read_Pad
|
||||
call PC_Update
|
||||
call Player_To_OAM
|
||||
ld a, HIGH(wShadowOAM)
|
||||
call hOAMDMA
|
||||
jr game_loop
|
||||
|
||||
CheckBoundry::
|
||||
;-----
|
||||
; Check if word X is within BUFFER ahead of N
|
||||
; BUFFER is always <= 255
|
||||
; hl contains address to save result to
|
||||
;-----
|
||||
;= load high bytes
|
||||
ld a, [N]
|
||||
ld b, a
|
||||
ld a, [X]
|
||||
sub b
|
||||
;= if carry is set, N is behind X, so skip
|
||||
jr c, .skipRender
|
||||
ld b, a
|
||||
ld a, 2
|
||||
cp b
|
||||
;= if the difference is 2 or greater
|
||||
;= we are not within BUFFER, so skip
|
||||
jr c, .skipRender
|
||||
jr z, .skipRender
|
||||
dec a
|
||||
cp b
|
||||
;= if the high byte differ by 1, we
|
||||
;= need to check over a a page
|
||||
jr z, .swap
|
||||
;= load the low bytes
|
||||
ld a, [N+1]
|
||||
ld b, a
|
||||
ld a, [X+1]
|
||||
sub b
|
||||
ld b, a
|
||||
ld a, BUFFER
|
||||
cp b
|
||||
;= if the difference is greater than
|
||||
;= the buffer, skip
|
||||
jr c, .skipRender
|
||||
jr .render
|
||||
.swap
|
||||
;= load the low bytes in the opposite order
|
||||
ld a, [X+1]
|
||||
ld b, a
|
||||
ld a, [N+1]
|
||||
sub b
|
||||
ld b, a
|
||||
ld a, $FF - BUFFER
|
||||
cp b
|
||||
;= if they differ by the inverse of the buffer
|
||||
;= they will not be within the gap between pages
|
||||
jr nc, .skipRender
|
||||
.render
|
||||
;= success, do rendering stuff
|
||||
; beep boop rendering stuff
|
||||
ld a, TRUE
|
||||
ld [hli], a
|
||||
ret
|
||||
.skipRender
|
||||
;= failure, skip this one
|
||||
; doing other stuff here
|
||||
ld a, FALSE
|
||||
ld [hli], a
|
||||
ret
|
||||
45
src/header.asm
Normal file
45
src/header.asm
Normal file
@ -0,0 +1,45 @@
|
||||
;-----------------
|
||||
; Gameboy Header
|
||||
;-----------------
|
||||
|
||||
SECTION "Header", ROM0[$100]
|
||||
|
||||
; Jump to the "Start" label
|
||||
; which we must define ourselves
|
||||
|
||||
EntryPoint:
|
||||
nop
|
||||
jp Start;
|
||||
|
||||
; ROM Header $104 to $150
|
||||
RomHeader:
|
||||
; Nintendo Logo $104-$133
|
||||
db $CE,$ED,$66,$66,$CC,$0D,$00,$0B,$03,$73,$00,$83,$00,$0C,$00,$0D
|
||||
db $00,$08,$11,$1F,$88,$89,$00,$0E,$DC,$CC,$6E,$E6,$DD,$DD,$D9,$99
|
||||
db $BB,$BB,$67,$63,$6E,$0E,$EC,$CC,$DD,$DC,$99,$9F,$BB,$B9,$33,$3E
|
||||
; Title (11 characters) $134-$13E
|
||||
db "ANIMATION",$00,$00
|
||||
; Manufacturer Code (4 characters) $13F-$142
|
||||
db "LATA"
|
||||
; CGB Flag $143
|
||||
db $00
|
||||
; Licensee Code (2 characters) $144-$145
|
||||
db "00"
|
||||
; SGB Flag $146
|
||||
db $00
|
||||
; Cartridge Type $147
|
||||
db $00
|
||||
; ROM Size $148
|
||||
db $00
|
||||
; RAM Size $149
|
||||
db $00
|
||||
; Destination Code $14A
|
||||
db $01
|
||||
; Depreciated Licensee Code $14B
|
||||
db $33
|
||||
; Version Number $14C
|
||||
db $00
|
||||
; Header Checksum $14D
|
||||
db $00
|
||||
; Global Checksum $14E-$14F
|
||||
db $00, $00
|
||||
11
src/main.asm
Normal file
11
src/main.asm
Normal file
@ -0,0 +1,11 @@
|
||||
INCLUDE "inc/hardware.inc"
|
||||
INCLUDE "ass/parecivo.ass"
|
||||
INCLUDE "ass/tiles.ass"
|
||||
INCLUDE "ass/map.ass"
|
||||
INCLUDE "src/entry.asm"
|
||||
INCLUDE "src/header.asm"
|
||||
INCLUDE "src/defines.asm"
|
||||
INCLUDE "src/dma.asm"
|
||||
INCLUDE "src/util.asm"
|
||||
INCLUDE "src/vid.asm"
|
||||
INCLUDE "src/misc.asm"
|
||||
167
src/misc.asm
Normal file
167
src/misc.asm
Normal file
@ -0,0 +1,167 @@
|
||||
Player_To_OAM:
|
||||
; -- first loop --
|
||||
ld hl, wShadowOAM
|
||||
ld a, [dPlayerHeight]
|
||||
ld b, a
|
||||
ld d, 16
|
||||
ld a, [rPlayerY]
|
||||
add d ; d has the base Y value (counting offsets)
|
||||
ld d, a
|
||||
.fouter
|
||||
ld a, [dPlayerWidth]
|
||||
ld c, a ; c is finner counter
|
||||
.finner
|
||||
ld a, d
|
||||
ld [hl], a
|
||||
ld a, 4
|
||||
call .add4hl
|
||||
; end of finner loop
|
||||
dec c
|
||||
jr nz, .finner
|
||||
ld a, d
|
||||
ld d, 8
|
||||
add d
|
||||
ld d, a
|
||||
; end of fouter loop
|
||||
dec b
|
||||
jr nz, .fouter
|
||||
; -- second loop --
|
||||
ld hl, wShadowOAM+1
|
||||
ld a, [dPlayerHeight]
|
||||
ld b, a
|
||||
.souter
|
||||
ld d, 8
|
||||
ld a, [rPlayerX]
|
||||
add d
|
||||
ld d, a
|
||||
ld a, [dPlayerWidth]
|
||||
ld c, a
|
||||
.sinner
|
||||
ld a, d
|
||||
ld [hl], a
|
||||
add 8
|
||||
ld d, a
|
||||
ld a, 4
|
||||
call .add4hl
|
||||
dec c
|
||||
jr nz, .sinner
|
||||
dec b
|
||||
jr nz, .souter
|
||||
; -- third loop --
|
||||
ld hl, wShadowOAM+2
|
||||
ld de, dPlayerSpriteTiles
|
||||
ld a, [dPlayerHeight]
|
||||
ld b, a
|
||||
ld a, [dPlayerWidth]
|
||||
ld c, a
|
||||
xor a
|
||||
.tloop1
|
||||
add b
|
||||
dec c
|
||||
jr nz, .tloop1
|
||||
ld c, a
|
||||
.tloop2
|
||||
ld a, [de]
|
||||
ld [hl], a
|
||||
ld a, 4
|
||||
call .add4hl
|
||||
inc de
|
||||
dec c
|
||||
jr nz, .tloop2
|
||||
; -- fourth loop --
|
||||
ld hl, wShadowOAM+3
|
||||
ld a, [dPlayerHeight]
|
||||
ld b, a
|
||||
ld a, [dPlayerWidth]
|
||||
ld c, a
|
||||
xor a
|
||||
.lloop1
|
||||
add b
|
||||
dec c
|
||||
jr nz, .lloop1
|
||||
ld c, a
|
||||
.lloop2
|
||||
xor a
|
||||
ld [hl], a
|
||||
ld a, 4
|
||||
call .add4hl
|
||||
dec c
|
||||
jr nz, .lloop2
|
||||
ret
|
||||
|
||||
.add4hl:
|
||||
add a, l ; a = low + old_l
|
||||
ld l, a ; a = low + old_l = new_l
|
||||
adc a, h ; a = new_l + old_h + carry
|
||||
sub l ; a = old_h + carry
|
||||
ld h, a
|
||||
ret
|
||||
|
||||
PC_Update:
|
||||
ld b, 0
|
||||
ld c, 0
|
||||
ld a, [hCurKeys]
|
||||
and %10000000
|
||||
cp %10000000 ; 0 if down pressed
|
||||
jr nz, .up
|
||||
ld b, 1
|
||||
.up:
|
||||
ld a, [hCurKeys]
|
||||
and %01000000
|
||||
cp %01000000 ; 0 if up pressed
|
||||
jr nz, .left
|
||||
ld b, 255
|
||||
.left:
|
||||
ld a, [hCurKeys]
|
||||
and %00100000
|
||||
cp %00100000 ; 0 if down pressed
|
||||
jr nz, .right
|
||||
ld c, 255
|
||||
.right:
|
||||
ld a, [hCurKeys]
|
||||
and %00010000
|
||||
cp %00010000 ; 0 if up pressed
|
||||
jr nz, .last
|
||||
ld c, 1
|
||||
.last:
|
||||
ld a, [rPlayerX]
|
||||
add c
|
||||
ld [rPlayerX], a
|
||||
ld a, [rPlayerY]
|
||||
add b
|
||||
ld [rPlayerY], a
|
||||
.end:
|
||||
ret
|
||||
|
||||
|
||||
Clear_Map:
|
||||
xor a
|
||||
ld hl, _SCRN0
|
||||
ld bc, _SCRN0_END - _SCRN0
|
||||
.loop:
|
||||
ld [hli], a
|
||||
dec bc
|
||||
ld a, b
|
||||
or c
|
||||
jr z, .loop
|
||||
ret
|
||||
|
||||
Load_Tiles:
|
||||
ld hl, _BGTILES
|
||||
ld de, parecivo_tile_data
|
||||
ld bc, parecivo_tile_data_size
|
||||
call MemCpy
|
||||
ld hl, _VRAM
|
||||
ld de, parecivo_tile_data
|
||||
ld bc, parecivo_tile_data_size
|
||||
call MemCpy
|
||||
ret
|
||||
|
||||
Load_Map:
|
||||
ld hl, _SCRN0
|
||||
ld de, Map
|
||||
ld bc, Map_Size
|
||||
call MemCpy
|
||||
ret
|
||||
|
||||
|
||||
70
src/util.asm
Normal file
70
src/util.asm
Normal file
@ -0,0 +1,70 @@
|
||||
;----------------------
|
||||
; Utility Subroutines
|
||||
;----------------------
|
||||
|
||||
SECTION "Util Subs", ROM0
|
||||
|
||||
; MemCpy assumes:
|
||||
; hl contains destination address
|
||||
; de contains source address
|
||||
; bc contains number of bytes to copy
|
||||
|
||||
MemCpy:
|
||||
.copy
|
||||
ld a, [de]
|
||||
ld [hli], a
|
||||
inc de
|
||||
dec bc
|
||||
ld a, b
|
||||
or c
|
||||
jr nz, .copy
|
||||
ret
|
||||
|
||||
; Read_Pad will set the variable _PAD
|
||||
; such that bits are as follows:
|
||||
; 7 - 4: down up left right
|
||||
; 3 - 0: start select b a
|
||||
|
||||
Read_Pad:
|
||||
ld a,P1F_BUTTONS
|
||||
call .onenibble
|
||||
ld b,a ; B7-4 = 1; B3-0 = unpressed buttons
|
||||
|
||||
ld a,P1F_DPAD
|
||||
call .onenibble
|
||||
swap a ; A3-0 = unpressed directions; A7-4 = 1
|
||||
xor b ; A = pressed buttons + directions
|
||||
ld b,a ; B = pressed buttons + directions
|
||||
; check illegal buttons
|
||||
and %11000000 ; Up and Down buttons
|
||||
cp %11000000
|
||||
jr nz, .legalUpDown
|
||||
ld a, b
|
||||
and %00111111
|
||||
ld b, a
|
||||
.legalUpDown
|
||||
and %00110000 ; Left and Right buttons
|
||||
cp %00110000
|
||||
jr nz, .legalLeftRight
|
||||
ld a, b
|
||||
and %11001111
|
||||
.legalLeftRight
|
||||
ld a,P1F_NONE
|
||||
ld [rP1],a
|
||||
|
||||
ldh a,[hCurKeys]
|
||||
xor b ; A = keys that changed state
|
||||
and b ; A = keys that changed to pressed
|
||||
ldh [hNewKeys],a
|
||||
ld a,b
|
||||
ldh [hCurKeys],a
|
||||
ret
|
||||
|
||||
.onenibble:
|
||||
ldh [rP1],a
|
||||
ldh a,[rP1]
|
||||
ldh a,[rP1]
|
||||
ldh a,[rP1]
|
||||
or $F0
|
||||
ret
|
||||
|
||||
22
src/vid.asm
Normal file
22
src/vid.asm
Normal file
@ -0,0 +1,22 @@
|
||||
;--------------------
|
||||
; Video Subroutines
|
||||
;--------------------
|
||||
|
||||
SECTION "VBlank Int", ROM0[$40]
|
||||
ld a, 1
|
||||
ld [hVBlankFlag], a
|
||||
reti
|
||||
|
||||
SECTION "Vid Subs", ROM0
|
||||
|
||||
Wait_VBlank::
|
||||
ld hl, hVBlankFlag ; hl=pointer to vblank_flag
|
||||
.wait: ; wait...
|
||||
halt ; suspend CPU - wait for ANY interrupt
|
||||
nop
|
||||
xor a
|
||||
cp a,[hl] ; vblank flag still zero?
|
||||
jr z, .wait ; wait more if zero
|
||||
ld [hl],a ; set vblank_flag back to zero
|
||||
ret
|
||||
|
||||
54
testing/ISSOtm.asm
Normal file
54
testing/ISSOtm.asm
Normal file
@ -0,0 +1,54 @@
|
||||
PlayerGfx::
|
||||
INCLUDE "res/actors/player.pal.asm" ; CGB palette
|
||||
db OAMF_PAL1 ; Additional attr
|
||||
dw PlayerTiles
|
||||
|
||||
PlayerTiles:
|
||||
; number of tiles:
|
||||
db (.displayStructs - .tiles) / 16
|
||||
.tiles
|
||||
INCBIN "res/actors/player.2bpp"
|
||||
.displayStructs
|
||||
dw PlayerStandingUp
|
||||
dw PlayerWalkingUp
|
||||
dw PlayerStandingDown
|
||||
dw PlayerWalkingDown
|
||||
dw PlayerStandingLeft
|
||||
dw PlayerWalkingLeft
|
||||
dw PlayerStandingRight
|
||||
dw PlayerWalkingRight
|
||||
|
||||
PlayerWalkingDown:
|
||||
db $20
|
||||
db 8
|
||||
dw .frame0
|
||||
db 8
|
||||
dw .frame1
|
||||
db 8
|
||||
dw .frame0
|
||||
db 8
|
||||
dw .frame2
|
||||
|
||||
.frame0
|
||||
db (.frame0End - @) / 4
|
||||
db -31, -8, 0, 0
|
||||
db -15, -8, 2, 0
|
||||
db -31, 0, 4, 0
|
||||
db -15, 0, 6, 0
|
||||
.frame0End
|
||||
|
||||
.frame1
|
||||
db (.frame1End - @) / 4
|
||||
db -31, -8, 8, 0
|
||||
db -15, -8, 10, 0
|
||||
db -31, 0, 12, 0
|
||||
db -15, 0, 14, 0
|
||||
.frame1End
|
||||
|
||||
.frame2
|
||||
db (.frame2End - @) / 4
|
||||
db -31, -8, 16, 0
|
||||
db -15, -8, 18, 0
|
||||
db -31, 0, 20, 0
|
||||
db -15, 0, 22, 0
|
||||
.frame2End
|
||||
Loading…
Reference in New Issue
Block a user