mirror of
https://github.com/thornAvery/kep-hack.git
synced 2025-09-17 02:40:50 +12:00
split rgbasm macros into macros.asm
This commit is contained in:
yenatch
parent
a548c1d097
commit
12f8023599
260
constants.asm
260
constants.asm
|
|
@ -2,107 +2,8 @@ _JAPAN EQU 0
|
||||||
_GREEN EQU 0
|
_GREEN EQU 0
|
||||||
_YELLOW EQU 0
|
_YELLOW EQU 0
|
||||||
|
|
||||||
;\1 = X
|
|
||||||
;\2 = Y
|
|
||||||
FuncCoord: MACRO
|
|
||||||
Coord = $C3A0 + 20 * \2 + \1
|
|
||||||
ENDM
|
|
||||||
|
|
||||||
;\1 = Map Width
|
|
||||||
;\2 = Rows above (Y-blocks)
|
|
||||||
;\3 = X movement (X-blocks)
|
|
||||||
EVENT_DISP: MACRO
|
|
||||||
dw ($C6EF + (\1) + ((\1) + 6) * ((\2) >> 1) + ((\3) >> 1)) ; Ev.Disp
|
|
||||||
db \2,\3 ;Y,X
|
|
||||||
ENDM
|
|
||||||
|
|
||||||
FLYWARP_DATA: MACRO
|
|
||||||
EVENT_DISP \1,\2,\3
|
|
||||||
db ((\2) & $01) ;sub-block Y
|
|
||||||
db ((\3) & $01) ;sub-block X
|
|
||||||
ENDM
|
|
||||||
|
|
||||||
; external map entry macro
|
|
||||||
EMAP: MACRO ; emap x-coordinate,y-coordinate,textpointer
|
|
||||||
; the appearance of towns and routes in the town map, indexed by map id
|
|
||||||
; nybble: y-coordinate
|
|
||||||
; nybble: x-coordinate
|
|
||||||
; word : pointer to map name
|
|
||||||
db (\1 + (\2 << 4))
|
|
||||||
dw \3
|
|
||||||
ENDM
|
|
||||||
|
|
||||||
; internal map entry macro
|
|
||||||
IMAP: MACRO ; imap mapid_less_than,x-coordinate,y-coordinate,textpointer
|
|
||||||
; the appearance of buildings and dungeons in the town map
|
|
||||||
; byte : maximum map id subject to this rule
|
|
||||||
; nybble: y-coordinate
|
|
||||||
; nybble: x-coordinate
|
|
||||||
; word : pointer to map name
|
|
||||||
db \1
|
|
||||||
db \2 + \3 << 4
|
|
||||||
dw \4
|
|
||||||
ENDM
|
|
||||||
|
|
||||||
; tilesets' headers macro
|
|
||||||
TSETHEAD: MACRO
|
|
||||||
db BANK(\2)
|
|
||||||
dw \1,\2,\3
|
|
||||||
db \4,\5,\6,\7,\8
|
|
||||||
ENDM
|
|
||||||
|
|
||||||
; macro for two nibbles
|
|
||||||
dn: MACRO
|
|
||||||
db (\1 << 4 | \2)
|
|
||||||
ENDM
|
|
||||||
|
|
||||||
; macro for putting a byte then a word
|
|
||||||
dbw: MACRO
|
|
||||||
db \1
|
|
||||||
dw \2
|
|
||||||
ENDM
|
|
||||||
|
|
||||||
; data format macros
|
|
||||||
RGB: MACRO
|
|
||||||
dw (\3 << 10 | \2 << 5 | \1)
|
|
||||||
ENDM
|
|
||||||
|
|
||||||
; text macros
|
|
||||||
TX_NUM: MACRO
|
|
||||||
; print a big-endian decimal number.
|
|
||||||
; \1: address to read from
|
|
||||||
; \2: number of bytes to read
|
|
||||||
; \3: number of digits to display
|
|
||||||
db $09
|
|
||||||
dw \1
|
|
||||||
db \2 << 4 | \3
|
|
||||||
ENDM
|
|
||||||
|
|
||||||
TX_FAR: MACRO
|
|
||||||
db $17
|
|
||||||
dw \1
|
|
||||||
db BANK(\1)
|
|
||||||
ENDM
|
|
||||||
|
|
||||||
; text engine command $1
|
|
||||||
TX_RAM: MACRO
|
|
||||||
; prints text to screen
|
|
||||||
; \1: RAM address to read from
|
|
||||||
db $1
|
|
||||||
dw \1
|
|
||||||
ENDM
|
|
||||||
|
|
||||||
; Predef macro.
|
|
||||||
PREDEF: MACRO
|
|
||||||
ld a, (\1 - PredefPointers) / 3
|
|
||||||
call Predef
|
|
||||||
ENDM
|
|
||||||
|
|
||||||
PREDEF_JUMP: MACRO
|
|
||||||
ld a, (\1 - PredefPointers) / 3
|
|
||||||
jp Predef
|
|
||||||
ENDM
|
|
||||||
|
|
||||||
|
INCLUDE "macros.asm"
|
||||||
|
|
||||||
INCLUDE "hram.asm"
|
INCLUDE "hram.asm"
|
||||||
|
|
||||||
|
|
@ -2218,163 +2119,4 @@ BRUNOS_ROOM_WIDTH EQU $05
|
||||||
AGATHAS_ROOM_HEIGHT EQU $06
|
AGATHAS_ROOM_HEIGHT EQU $06
|
||||||
AGATHAS_ROOM_WIDTH EQU $05
|
AGATHAS_ROOM_WIDTH EQU $05
|
||||||
|
|
||||||
;1_channel EQU $00
|
|
||||||
;2_channels EQU $40
|
|
||||||
;3_channels EQU $80
|
|
||||||
;4_channels EQU $C0
|
|
||||||
|
|
||||||
CH0 EQU 0
|
|
||||||
CH1 EQU 1
|
|
||||||
CH2 EQU 2
|
|
||||||
CH3 EQU 3
|
|
||||||
CH4 EQU 4
|
|
||||||
CH5 EQU 5
|
|
||||||
CH6 EQU 6
|
|
||||||
CH7 EQU 7
|
|
||||||
|
|
||||||
;Note Pitch
|
|
||||||
C_ EQU $0
|
|
||||||
C# EQU $1
|
|
||||||
D_ EQU $2
|
|
||||||
D# EQU $3
|
|
||||||
E_ EQU $4
|
|
||||||
F_ EQU $5
|
|
||||||
F# EQU $6
|
|
||||||
G_ EQU $7
|
|
||||||
G# EQU $8
|
|
||||||
A_ EQU $9
|
|
||||||
A# EQU $A
|
|
||||||
B_ EQU $B
|
|
||||||
|
|
||||||
;drum instruments
|
|
||||||
snare1 EQU $01
|
|
||||||
snare2 EQU $02
|
|
||||||
snare3 EQU $03
|
|
||||||
snare4 EQU $04
|
|
||||||
snare5 EQU $05
|
|
||||||
triangle1 EQU $06
|
|
||||||
triangle2 EQU $07
|
|
||||||
snare6 EQU $08
|
|
||||||
snare7 EQU $09
|
|
||||||
snare8 EQU $0a
|
|
||||||
snare9 EQU $0b
|
|
||||||
cymbal1 EQU $0c
|
|
||||||
cymbal2 EQU $0d
|
|
||||||
cymbal3 EQU $0e
|
|
||||||
mutedsnare1 EQU $0f
|
|
||||||
triangle3 EQU $10
|
|
||||||
mutedsnare2 EQU $11
|
|
||||||
mutedsnare3 EQU $12
|
|
||||||
mutedsnare4 EQU $13
|
|
||||||
|
|
||||||
unknownsfx0x10: MACRO
|
|
||||||
db $10
|
|
||||||
db \1
|
|
||||||
ENDM
|
|
||||||
|
|
||||||
unknownsfx0x20: MACRO
|
|
||||||
db $20 | \1
|
|
||||||
db \2
|
|
||||||
db \3
|
|
||||||
db \4
|
|
||||||
ENDM
|
|
||||||
|
|
||||||
unknownnoise0x20: MACRO
|
|
||||||
db $20 | \1
|
|
||||||
db \2
|
|
||||||
db \3
|
|
||||||
ENDM
|
|
||||||
|
|
||||||
;format: note pitch, length (in 16ths)
|
|
||||||
note: MACRO
|
|
||||||
db (\1 << 4) | (\2 - 1)
|
|
||||||
ENDM
|
|
||||||
|
|
||||||
;format: dnote length (in 16ths), instrument
|
|
||||||
dnote: MACRO
|
|
||||||
db $B0 | (\1 - 1)
|
|
||||||
db \2
|
|
||||||
ENDM
|
|
||||||
|
|
||||||
;format: rest length (in 16ths)
|
|
||||||
rest: MACRO
|
|
||||||
db $C0 | (\1 - 1)
|
|
||||||
ENDM
|
|
||||||
|
|
||||||
; format: notetype speed, volume, fade
|
|
||||||
notetype: MACRO
|
|
||||||
db $D0 | \1
|
|
||||||
db (\2 << 4) | \3
|
|
||||||
ENDM
|
|
||||||
|
|
||||||
dspeed: MACRO
|
|
||||||
db $D0 | \1
|
|
||||||
ENDM
|
|
||||||
|
|
||||||
octave: MACRO
|
|
||||||
db $E8 - \1
|
|
||||||
ENDM
|
|
||||||
|
|
||||||
togglecall: MACRO
|
|
||||||
db $E8
|
|
||||||
ENDM
|
|
||||||
|
|
||||||
;format: vibrato delay, rate, depth
|
|
||||||
vibrato: MACRO
|
|
||||||
db $EA
|
|
||||||
db \1
|
|
||||||
db (\2 << 4) | \3
|
|
||||||
ENDM
|
|
||||||
|
|
||||||
pitchbend: MACRO
|
|
||||||
db $EB
|
|
||||||
db \1
|
|
||||||
db \2
|
|
||||||
ENDM
|
|
||||||
|
|
||||||
duty: MACRO
|
|
||||||
db $EC
|
|
||||||
db \1
|
|
||||||
ENDM
|
|
||||||
|
|
||||||
tempo: MACRO
|
|
||||||
db $ED
|
|
||||||
db \1
|
|
||||||
db \2
|
|
||||||
ENDM
|
|
||||||
|
|
||||||
unknownmusic0xee: MACRO
|
|
||||||
db $EE
|
|
||||||
db \1
|
|
||||||
ENDM
|
|
||||||
|
|
||||||
stereopanning: MACRO
|
|
||||||
db $F0
|
|
||||||
db \1
|
|
||||||
ENDM
|
|
||||||
|
|
||||||
executemusic: MACRO
|
|
||||||
db $F8
|
|
||||||
ENDM
|
|
||||||
|
|
||||||
dutycycle: MACRO
|
|
||||||
db $FC
|
|
||||||
db \1
|
|
||||||
ENDM
|
|
||||||
|
|
||||||
;format: callchannel address
|
|
||||||
;callchannel: MACRO
|
|
||||||
; db $FD
|
|
||||||
; dw \1
|
|
||||||
;ENDM
|
|
||||||
|
|
||||||
;format: loopchannel count, address
|
|
||||||
;loopchannel: MACRO
|
|
||||||
; db $FE
|
|
||||||
; db \1
|
|
||||||
; dw \2
|
|
||||||
;ENDM
|
|
||||||
|
|
||||||
endchannel: MACRO
|
|
||||||
db $FF
|
|
||||||
ENDM
|
|
||||||
|
|
|
||||||
265
macros.asm
Normal file
265
macros.asm
Normal file
|
|
@ -0,0 +1,265 @@
|
||||||
|
|
||||||
|
;\1 = X
|
||||||
|
;\2 = Y
|
||||||
|
FuncCoord: MACRO
|
||||||
|
Coord = $C3A0 + 20 * \2 + \1
|
||||||
|
ENDM
|
||||||
|
|
||||||
|
;\1 = Map Width
|
||||||
|
;\2 = Rows above (Y-blocks)
|
||||||
|
;\3 = X movement (X-blocks)
|
||||||
|
EVENT_DISP: MACRO
|
||||||
|
dw ($C6EF + (\1) + ((\1) + 6) * ((\2) >> 1) + ((\3) >> 1)) ; Ev.Disp
|
||||||
|
db \2,\3 ;Y,X
|
||||||
|
ENDM
|
||||||
|
|
||||||
|
FLYWARP_DATA: MACRO
|
||||||
|
EVENT_DISP \1,\2,\3
|
||||||
|
db ((\2) & $01) ;sub-block Y
|
||||||
|
db ((\3) & $01) ;sub-block X
|
||||||
|
ENDM
|
||||||
|
|
||||||
|
; external map entry macro
|
||||||
|
EMAP: MACRO ; emap x-coordinate,y-coordinate,textpointer
|
||||||
|
; the appearance of towns and routes in the town map, indexed by map id
|
||||||
|
; nybble: y-coordinate
|
||||||
|
; nybble: x-coordinate
|
||||||
|
; word : pointer to map name
|
||||||
|
db (\1 + (\2 << 4))
|
||||||
|
dw \3
|
||||||
|
ENDM
|
||||||
|
|
||||||
|
; internal map entry macro
|
||||||
|
IMAP: MACRO ; imap mapid_less_than,x-coordinate,y-coordinate,textpointer
|
||||||
|
; the appearance of buildings and dungeons in the town map
|
||||||
|
; byte : maximum map id subject to this rule
|
||||||
|
; nybble: y-coordinate
|
||||||
|
; nybble: x-coordinate
|
||||||
|
; word : pointer to map name
|
||||||
|
db \1
|
||||||
|
db \2 + \3 << 4
|
||||||
|
dw \4
|
||||||
|
ENDM
|
||||||
|
|
||||||
|
; tilesets' headers macro
|
||||||
|
TSETHEAD: MACRO
|
||||||
|
db BANK(\2)
|
||||||
|
dw \1,\2,\3
|
||||||
|
db \4,\5,\6,\7,\8
|
||||||
|
ENDM
|
||||||
|
|
||||||
|
; macro for two nibbles
|
||||||
|
dn: MACRO
|
||||||
|
db (\1 << 4 | \2)
|
||||||
|
ENDM
|
||||||
|
|
||||||
|
; macro for putting a byte then a word
|
||||||
|
dbw: MACRO
|
||||||
|
db \1
|
||||||
|
dw \2
|
||||||
|
ENDM
|
||||||
|
|
||||||
|
; data format macros
|
||||||
|
RGB: MACRO
|
||||||
|
dw (\3 << 10 | \2 << 5 | \1)
|
||||||
|
ENDM
|
||||||
|
|
||||||
|
; text macros
|
||||||
|
TX_NUM: MACRO
|
||||||
|
; print a big-endian decimal number.
|
||||||
|
; \1: address to read from
|
||||||
|
; \2: number of bytes to read
|
||||||
|
; \3: number of digits to display
|
||||||
|
db $09
|
||||||
|
dw \1
|
||||||
|
db \2 << 4 | \3
|
||||||
|
ENDM
|
||||||
|
|
||||||
|
TX_FAR: MACRO
|
||||||
|
db $17
|
||||||
|
dw \1
|
||||||
|
db BANK(\1)
|
||||||
|
ENDM
|
||||||
|
|
||||||
|
; text engine command $1
|
||||||
|
TX_RAM: MACRO
|
||||||
|
; prints text to screen
|
||||||
|
; \1: RAM address to read from
|
||||||
|
db $1
|
||||||
|
dw \1
|
||||||
|
ENDM
|
||||||
|
|
||||||
|
; Predef macro.
|
||||||
|
PREDEF: MACRO
|
||||||
|
ld a, (\1 - PredefPointers) / 3
|
||||||
|
call Predef
|
||||||
|
ENDM
|
||||||
|
|
||||||
|
PREDEF_JUMP: MACRO
|
||||||
|
ld a, (\1 - PredefPointers) / 3
|
||||||
|
jp Predef
|
||||||
|
ENDM
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
;1_channel EQU $00
|
||||||
|
;2_channels EQU $40
|
||||||
|
;3_channels EQU $80
|
||||||
|
;4_channels EQU $C0
|
||||||
|
|
||||||
|
CH0 EQU 0
|
||||||
|
CH1 EQU 1
|
||||||
|
CH2 EQU 2
|
||||||
|
CH3 EQU 3
|
||||||
|
CH4 EQU 4
|
||||||
|
CH5 EQU 5
|
||||||
|
CH6 EQU 6
|
||||||
|
CH7 EQU 7
|
||||||
|
|
||||||
|
;Note Pitch
|
||||||
|
C_ EQU $0
|
||||||
|
C# EQU $1
|
||||||
|
D_ EQU $2
|
||||||
|
D# EQU $3
|
||||||
|
E_ EQU $4
|
||||||
|
F_ EQU $5
|
||||||
|
F# EQU $6
|
||||||
|
G_ EQU $7
|
||||||
|
G# EQU $8
|
||||||
|
A_ EQU $9
|
||||||
|
A# EQU $A
|
||||||
|
B_ EQU $B
|
||||||
|
|
||||||
|
;drum instruments
|
||||||
|
snare1 EQU $01
|
||||||
|
snare2 EQU $02
|
||||||
|
snare3 EQU $03
|
||||||
|
snare4 EQU $04
|
||||||
|
snare5 EQU $05
|
||||||
|
triangle1 EQU $06
|
||||||
|
triangle2 EQU $07
|
||||||
|
snare6 EQU $08
|
||||||
|
snare7 EQU $09
|
||||||
|
snare8 EQU $0a
|
||||||
|
snare9 EQU $0b
|
||||||
|
cymbal1 EQU $0c
|
||||||
|
cymbal2 EQU $0d
|
||||||
|
cymbal3 EQU $0e
|
||||||
|
mutedsnare1 EQU $0f
|
||||||
|
triangle3 EQU $10
|
||||||
|
mutedsnare2 EQU $11
|
||||||
|
mutedsnare3 EQU $12
|
||||||
|
mutedsnare4 EQU $13
|
||||||
|
|
||||||
|
unknownsfx0x10: MACRO
|
||||||
|
db $10
|
||||||
|
db \1
|
||||||
|
ENDM
|
||||||
|
|
||||||
|
unknownsfx0x20: MACRO
|
||||||
|
db $20 | \1
|
||||||
|
db \2
|
||||||
|
db \3
|
||||||
|
db \4
|
||||||
|
ENDM
|
||||||
|
|
||||||
|
unknownnoise0x20: MACRO
|
||||||
|
db $20 | \1
|
||||||
|
db \2
|
||||||
|
db \3
|
||||||
|
ENDM
|
||||||
|
|
||||||
|
;format: note pitch, length (in 16ths)
|
||||||
|
note: MACRO
|
||||||
|
db (\1 << 4) | (\2 - 1)
|
||||||
|
ENDM
|
||||||
|
|
||||||
|
;format: dnote length (in 16ths), instrument
|
||||||
|
dnote: MACRO
|
||||||
|
db $B0 | (\1 - 1)
|
||||||
|
db \2
|
||||||
|
ENDM
|
||||||
|
|
||||||
|
;format: rest length (in 16ths)
|
||||||
|
rest: MACRO
|
||||||
|
db $C0 | (\1 - 1)
|
||||||
|
ENDM
|
||||||
|
|
||||||
|
; format: notetype speed, volume, fade
|
||||||
|
notetype: MACRO
|
||||||
|
db $D0 | \1
|
||||||
|
db (\2 << 4) | \3
|
||||||
|
ENDM
|
||||||
|
|
||||||
|
dspeed: MACRO
|
||||||
|
db $D0 | \1
|
||||||
|
ENDM
|
||||||
|
|
||||||
|
octave: MACRO
|
||||||
|
db $E8 - \1
|
||||||
|
ENDM
|
||||||
|
|
||||||
|
togglecall: MACRO
|
||||||
|
db $E8
|
||||||
|
ENDM
|
||||||
|
|
||||||
|
;format: vibrato delay, rate, depth
|
||||||
|
vibrato: MACRO
|
||||||
|
db $EA
|
||||||
|
db \1
|
||||||
|
db (\2 << 4) | \3
|
||||||
|
ENDM
|
||||||
|
|
||||||
|
pitchbend: MACRO
|
||||||
|
db $EB
|
||||||
|
db \1
|
||||||
|
db \2
|
||||||
|
ENDM
|
||||||
|
|
||||||
|
duty: MACRO
|
||||||
|
db $EC
|
||||||
|
db \1
|
||||||
|
ENDM
|
||||||
|
|
||||||
|
tempo: MACRO
|
||||||
|
db $ED
|
||||||
|
db \1
|
||||||
|
db \2
|
||||||
|
ENDM
|
||||||
|
|
||||||
|
unknownmusic0xee: MACRO
|
||||||
|
db $EE
|
||||||
|
db \1
|
||||||
|
ENDM
|
||||||
|
|
||||||
|
stereopanning: MACRO
|
||||||
|
db $F0
|
||||||
|
db \1
|
||||||
|
ENDM
|
||||||
|
|
||||||
|
executemusic: MACRO
|
||||||
|
db $F8
|
||||||
|
ENDM
|
||||||
|
|
||||||
|
dutycycle: MACRO
|
||||||
|
db $FC
|
||||||
|
db \1
|
||||||
|
ENDM
|
||||||
|
|
||||||
|
;format: callchannel address
|
||||||
|
;callchannel: MACRO
|
||||||
|
; db $FD
|
||||||
|
; dw \1
|
||||||
|
;ENDM
|
||||||
|
|
||||||
|
;format: loopchannel count, address
|
||||||
|
;loopchannel: MACRO
|
||||||
|
; db $FE
|
||||||
|
; db \1
|
||||||
|
; dw \2
|
||||||
|
;ENDM
|
||||||
|
|
||||||
|
endchannel: MACRO
|
||||||
|
db $FF
|
||||||
|
ENDM
|
||||||
|
|
||||||
Loading…
Reference in a new issue