You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
88 lines
1.5 KiB
88 lines
1.5 KiB
; Stores a 16-bit value into the address stored in HL
|
|
; 5 bytes, 24 clocks
|
|
; \1 The value to store (immediate or register)
|
|
MACRO STORE16
|
|
ld [hl], HIGH(\1)
|
|
inc hl
|
|
ld [hl], LOW(\1)
|
|
ENDM
|
|
|
|
; Reads a 16-bit value into HL
|
|
; \1 The address to read
|
|
MACRO LOAD16
|
|
ld a, [\1]
|
|
ld l, a
|
|
ld a, [\1 + 1]
|
|
ld h, a
|
|
ENDM
|
|
|
|
; Copies bytes to a memory location
|
|
; 7 bytes, 48*N-4 clocks
|
|
; \1 Destination address (16-bit register)
|
|
; \2 Source address (16-bit register)
|
|
; \3 Number of bytes (8-bit register)
|
|
MACRO MEMCPY
|
|
.loop\@:
|
|
ld a, [\2] ; 8
|
|
inc \2 ; 8
|
|
ld [\1], a ; 8
|
|
inc \1 ; 8
|
|
dec \3 ; 4
|
|
jr nz, .loop\@ ; 12/8
|
|
ENDM
|
|
|
|
; Adds A to a 16-bit register
|
|
; \1 Destination register
|
|
; 5 * 4 = 20 cycles
|
|
MACRO ADD16
|
|
add LOW(\1)
|
|
ld LOW(\1), a
|
|
adc HIGH(\1)
|
|
sub LOW(\1)
|
|
ld HIGH(\1), a
|
|
ENDM
|
|
|
|
; Load between two 16-bit registers
|
|
; \1 Destination register
|
|
; \2 Source register
|
|
MACRO LD16
|
|
ld HIGH(\1), HIGH(\2)
|
|
ld LOW(\1), LOW(\2)
|
|
ENDM
|
|
|
|
; Performs SRL on a register N times
|
|
; \1 8-bit register
|
|
; \2 Number of shifts (1-7)
|
|
MACRO srln
|
|
ASSERT \2 >= 1 && \2 <= 7
|
|
REPT \2
|
|
srl \1
|
|
ENDR
|
|
ENDM
|
|
|
|
; SLA on a 16-bit register
|
|
MACRO SLA16
|
|
sla LOW(\1)
|
|
rl HIGH(\1)
|
|
ENDM
|
|
|
|
; Check \1 - \2
|
|
; \1 16-bit register
|
|
; \2 16-bit immediate/register
|
|
MACRO CP16
|
|
ld a, HIGH(\1)
|
|
cp HIGH(\2)
|
|
jr nz, .done\@
|
|
ld a, LOW(\1)
|
|
cp LOW(\1)
|
|
.done\@
|
|
ENDM
|
|
|
|
; A = MIN(A, x)
|
|
; \1 Other value
|
|
MACRO MIN
|
|
cp \1
|
|
jr c, .skip\@
|
|
ld a, \1
|
|
.skip\@:
|
|
ENDM
|