aboutsummaryrefslogtreecommitdiffstats
path: root/macros/scripts/events.asm
diff options
context:
space:
mode:
Diffstat (limited to 'macros/scripts/events.asm')
-rw-r--r--macros/scripts/events.asm158
1 files changed, 79 insertions, 79 deletions
diff --git a/macros/scripts/events.asm b/macros/scripts/events.asm
index 81404ade..ea67cd0a 100644
--- a/macros/scripts/events.asm
+++ b/macros/scripts/events.asm
@@ -1,7 +1,7 @@
;\1 = event index
;\2 = return result in carry instead of zero flag
-CheckEvent: MACRO
-event_byte = ((\1) / 8)
+MACRO CheckEvent
+ DEF event_byte = ((\1) / 8)
ld a, [wEventFlags + event_byte]
IF _NARG > 1
@@ -19,9 +19,9 @@ ENDM
;\1 = event index
-CheckEventReuseA: MACRO
+MACRO CheckEventReuseA
IF event_byte != ((\1) / 8)
-event_byte = ((\1) / 8)
+ DEF event_byte = ((\1) / 8)
ld a, [wEventFlags + event_byte]
ENDC
@@ -31,10 +31,10 @@ ENDM
;\1 = event index
;\2 = event index of the last event used before the branch
-CheckEventAfterBranchReuseA: MACRO
-event_byte = ((\2) / 8)
+MACRO CheckEventAfterBranchReuseA
+ DEF event_byte = ((\2) / 8)
IF event_byte != ((\1) / 8)
-event_byte = ((\1) / 8)
+ DEF event_byte = ((\1) / 8)
ld a, [wEventFlags + event_byte]
ENDC
@@ -45,7 +45,7 @@ ENDM
;\1 = reg
;\2 = event index
;\3 = event index this event is relative to (optional, this is needed when there is a fixed flag address)
-EventFlagBit: MACRO
+MACRO EventFlagBit
IF _NARG > 2
ld \1, ((\3) % 8) + ((\2) - (\3))
ELSE
@@ -56,34 +56,34 @@ ENDM
;\1 = reg
;\2 = event index
-EventFlagAddress: MACRO
-event_byte = ((\2) / 8)
+MACRO EventFlagAddress
+ DEF event_byte = ((\2) / 8)
ld \1, wEventFlags + event_byte
ENDM
-EventFlagAddressA: MACRO
-event_byte = ((\1) / 8)
+MACRO EventFlagAddressA
+ DEF event_byte = ((\1) / 8)
ld [wEventFlags + event_byte], a
ENDM
-AEventFlagAddress: MACRO
-event_byte = ((\1) / 8)
+MACRO AEventFlagAddress
+ DEF event_byte = ((\1) / 8)
ld a, [wEventFlags + event_byte]
ENDM
;\1 = event index
-CheckEventHL: MACRO
-event_byte = ((\1) / 8)
+MACRO CheckEventHL
+ DEF event_byte = ((\1) / 8)
ld hl, wEventFlags + event_byte
bit (\1) % 8, [hl]
ENDM
;\1 = event index
-CheckEventReuseHL: MACRO
-IF event_byte != ((\1) / 8)
-event_byte = ((\1) / 8)
+MACRO CheckEventReuseHL
+ IF event_byte != ((\1) / 8)
+ DEF event_byte = ((\1) / 8)
ld hl, wEventFlags + event_byte
ENDC
@@ -93,18 +93,18 @@ ENDM
; dangerous, only use when HL is guaranteed to be the desired value
;\1 = event index
-CheckEventForceReuseHL: MACRO
-event_byte = ((\1) / 8)
+MACRO CheckEventForceReuseHL
+ DEF event_byte = ((\1) / 8)
bit (\1) % 8, [hl]
ENDM
;\1 = event index
;\2 = event index of the last event used before the branch
-CheckEventAfterBranchReuseHL: MACRO
-event_byte = ((\2) / 8)
-IF event_byte != ((\1) / 8)
-event_byte = ((\1) / 8)
+MACRO CheckEventAfterBranchReuseHL
+ DEF event_byte = ((\2) / 8)
+ IF event_byte != ((\1) / 8)
+ DEF event_byte = ((\1) / 8)
ld hl, wEventFlags + event_byte
ENDC
@@ -113,8 +113,8 @@ ENDM
;\1 = event index
-CheckAndSetEvent: MACRO
-event_byte = ((\1) / 8)
+MACRO CheckAndSetEvent
+ DEF event_byte = ((\1) / 8)
ld hl, wEventFlags + event_byte
bit (\1) % 8, [hl]
set (\1) % 8, [hl]
@@ -122,8 +122,8 @@ ENDM
;\1 = event index
-CheckAndResetEvent: MACRO
-event_byte = ((\1) / 8)
+MACRO CheckAndResetEvent
+ DEF event_byte = ((\1) / 8)
ld hl, wEventFlags + event_byte
bit (\1) % 8, [hl]
res (\1) % 8, [hl]
@@ -131,7 +131,7 @@ ENDM
;\1 = event index
-CheckAndSetEventA: MACRO
+MACRO CheckAndSetEventA
ld a, [wEventFlags + ((\1) / 8)]
bit (\1) % 8, a
set (\1) % 8, a
@@ -140,7 +140,7 @@ ENDM
;\1 = event index
-CheckAndResetEventA: MACRO
+MACRO CheckAndResetEventA
ld a, [wEventFlags + ((\1) / 8)]
bit (\1) % 8, a
res (\1) % 8, a
@@ -148,9 +148,9 @@ CheckAndResetEventA: MACRO
ENDM
-CheckAndSetEventReuseHL: MACRO
+MACRO CheckAndSetEventReuseHL
IF event_byte != ((\1) / 8)
-event_byte = ((\1) / 8)
+ DEF event_byte = ((\1) / 8)
ld hl, wEventFlags + event_byte
ENDC
@@ -158,9 +158,9 @@ event_byte = ((\1) / 8)
set (\1) % 8, [hl]
ENDM
-CheckAndResetEventReuseHL: MACRO
+MACRO CheckAndResetEventReuseHL
IF event_byte != ((\1) / 8)
-event_byte = ((\1) / 8)
+ DEF event_byte = ((\1) / 8)
ld hl, wEventFlags + event_byte
ENDC
@@ -170,17 +170,17 @@ ENDM
;\1 = event index
-SetEvent: MACRO
-event_byte = ((\1) / 8)
+MACRO SetEvent
+ DEF event_byte = ((\1) / 8)
ld hl, wEventFlags + event_byte
set (\1) % 8, [hl]
ENDM
;\1 = event index
-SetEventReuseHL: MACRO
+MACRO SetEventReuseHL
IF event_byte != ((\1) / 8)
-event_byte = ((\1) / 8)
+ DEF event_byte = ((\1) / 8)
ld hl, wEventFlags + event_byte
ENDC
@@ -190,10 +190,10 @@ ENDM
;\1 = event index
;\2 = event index of the last event used before the branch
-SetEventAfterBranchReuseHL: MACRO
-event_byte = ((\2) / 8)
-IF event_byte != ((\1) / 8)
-event_byte = ((\1) / 8)
+MACRO SetEventAfterBranchReuseHL
+ DEF event_byte = ((\2) / 8)
+ IF event_byte != ((\1) / 8)
+ DEF event_byte = ((\1) / 8)
ld hl, wEventFlags + event_byte
ENDC
@@ -203,8 +203,8 @@ ENDM
; dangerous, only use when HL is guaranteed to be the desired value
;\1 = event index
-SetEventForceReuseHL: MACRO
-event_byte = ((\1) / 8)
+MACRO SetEventForceReuseHL
+ DEF event_byte = ((\1) / 8)
set (\1) % 8, [hl]
ENDM
@@ -212,7 +212,7 @@ ENDM
;\1 = event index
;\2 = event index
;\3, \4, ... = additional (optional) event indices
-SetEvents: MACRO
+MACRO SetEvents
SetEvent \1
REPT _NARG - 1
SetEventReuseHL \2
@@ -222,17 +222,17 @@ ENDM
;\1 = event index
-ResetEvent: MACRO
-event_byte = ((\1) / 8)
+MACRO ResetEvent
+ DEF event_byte = ((\1) / 8)
ld hl, wEventFlags + event_byte
res (\1) % 8, [hl]
ENDM
;\1 = event index
-ResetEventReuseHL: MACRO
+MACRO ResetEventReuseHL
IF event_byte != ((\1) / 8)
-event_byte = ((\1) / 8)
+ DEF event_byte = ((\1) / 8)
ld hl, wEventFlags + event_byte
ENDC
@@ -242,10 +242,10 @@ ENDM
;\1 = event index
;\2 = event index of the last event used before the branch
-ResetEventAfterBranchReuseHL: MACRO
-event_byte = ((\2) / 8)
-IF event_byte != ((\1) / 8)
-event_byte = ((\1) / 8)
+MACRO ResetEventAfterBranchReuseHL
+ DEF event_byte = ((\2) / 8)
+ IF event_byte != ((\1) / 8)
+ DEF event_byte = ((\1) / 8)
ld hl, wEventFlags + event_byte
ENDC
@@ -255,8 +255,8 @@ ENDM
; dangerous, only use when HL is guaranteed to be the desired value
;\1 = event index
-ResetEventForceReuseHL: MACRO
-event_byte = ((\1) / 8)
+MACRO ResetEventForceReuseHL
+ DEF event_byte = ((\1) / 8)
res (\1) % 8, [hl]
ENDM
@@ -264,7 +264,7 @@ ENDM
;\1 = event index
;\2 = event index
;\3 = event index (optional)
-ResetEvents: MACRO
+MACRO ResetEvents
ResetEvent \1
REPT _NARG - 1
ResetEventReuseHL \2
@@ -275,9 +275,9 @@ ENDM
;\1 = start
;\2 = end
-SetEventRange: MACRO
-event_start_byte = ((\1) / 8)
-event_end_byte = ((\2) / 8)
+MACRO SetEventRange
+ DEF event_start_byte = ((\1) / 8)
+ DEF event_end_byte = ((\2) / 8)
IF event_end_byte < event_start_byte
FAIL "Incorrect argument order in SetEventRange."
@@ -288,12 +288,12 @@ event_end_byte = ((\2) / 8)
or (1 << (((\2) % 8) + 1)) - (1 << ((\1) % 8))
ld [wEventFlags + event_start_byte], a
ELSE
-event_fill_start = event_start_byte + 1
-event_fill_count = event_end_byte - event_start_byte - 1
+ DEF event_fill_start = event_start_byte + 1
+ DEF event_fill_count = event_end_byte - event_start_byte - 1
IF ((\1) % 8) == 0
-event_fill_start -= 1
-event_fill_count += 1
+ DEF event_fill_start -= 1
+ DEF event_fill_count += 1
ELSE
ld a, [wEventFlags + event_start_byte]
or $ff - ((1 << ((\1) % 8)) - 1)
@@ -301,7 +301,7 @@ event_fill_count += 1
ENDC
IF ((\2) % 8) == 7
-event_fill_count += 1
+ DEF event_fill_count += 1
ENDC
IF event_fill_count == 1
@@ -337,9 +337,9 @@ ENDM
;\1 = start
;\2 = end
;\3 = assume a is 0 if present
-ResetEventRange: MACRO
-event_start_byte = ((\1) / 8)
-event_end_byte = ((\2) / 8)
+MACRO ResetEventRange
+ DEF event_start_byte = ((\1) / 8)
+ DEF event_end_byte = ((\2) / 8)
IF event_end_byte < event_start_byte
FAIL "Incorrect argument order in ResetEventRange."
@@ -350,12 +350,12 @@ event_end_byte = ((\2) / 8)
and ~((1 << (((\2) % 8) + 1)) - (1 << ((\1) % 8))) & $ff
ld [wEventFlags + event_start_byte], a
ELSE
-event_fill_start = event_start_byte + 1
-event_fill_count = event_end_byte - event_start_byte - 1
+ DEF event_fill_start = event_start_byte + 1
+ DEF event_fill_count = event_end_byte - event_start_byte - 1
IF ((\1) % 8) == 0
-event_fill_start -= 1
-event_fill_count += 1
+ DEF event_fill_start -= 1
+ DEF event_fill_count += 1
ELSE
ld a, [wEventFlags + event_start_byte]
and ~($ff - ((1 << ((\1) % 8)) - 1)) & $ff
@@ -363,7 +363,7 @@ event_fill_count += 1
ENDC
IF ((\2) % 8) == 7
-event_fill_count += 1
+ DEF event_fill_count += 1
ENDC
IF event_fill_count == 1
@@ -406,10 +406,10 @@ ENDM
;\1 = event index 1
;\2 = event index 2
;\3 = try to reuse a (optional)
-CheckBothEventsSet: MACRO
+MACRO CheckBothEventsSet
IF ((\1) / 8) == ((\2) / 8)
IF (_NARG < 3) || (((\1) / 8) != event_byte)
-event_byte = ((\1) / 8)
+ DEF event_byte = ((\1) / 8)
ld a, [wEventFlags + ((\1) / 8)]
ENDC
and (1 << ((\1) % 8)) | (1 << ((\2) % 8))
@@ -442,7 +442,7 @@ ENDM
; returns the complement of whether either event is set in Z flag
;\1 = event index 1
;\2 = event index 2
-CheckEitherEventSet: MACRO
+MACRO CheckEitherEventSet
IF ((\1) / 8) == ((\2) / 8)
ld a, [wEventFlags + ((\1) / 8)]
and (1 << ((\1) % 8)) | (1 << ((\2) % 8))
@@ -469,9 +469,9 @@ CheckEitherEventSet: MACRO
ENDM
-CheckEitherEventSetReuseA: MACRO
+MACRO CheckEitherEventSetReuseA
IF event_byte != ((\1) / 8)
-event_byte = ((\1) / 8)
+ DEF event_byte = ((\1) / 8)
ld a, [wEventFlags + event_byte]
ENDC
IF ((\1) / 8) == ((\2) / 8)
@@ -502,7 +502,7 @@ ENDM
; for handling fixed event bits when events are inserted/removed
;\1 = event index
;\2 = fixed flag bit
-AdjustEventBit: MACRO
+MACRO AdjustEventBit
IF ((\1) % 8) != (\2)
add ((\1) % 8) - (\2)
ENDC
generated by cgit v1.3.1-sl0p (git 2.54.0) at 2026-07-22 00:55:50 +0000 — sl0p fork