RFS repository created from software component of the MZ80A_RFS repository branch v2.1

asm/include/macros.asm

@@ -0,0 +1,34 @@
+; the following is only to get the original length of 2048 bytes
+ALIGN:     MACRO    ?boundary
+               DS       ?boundary - 1 - ($ + ?boundary - 1) % ?boundary, 0FFh
+           ENDM
+
+; the following is only to get the original length of 2048 bytes
+ALIGN_NOPS:MACRO    ?boundary
+               DS       ?boundary - 1 - ($ + ?boundary - 1) % ?boundary, 000h
+           ENDM
+
+;
+; Pads up to a certain address.
+; Gives an error message if that address is already exceeded.
+;
+PAD:       MACRO ?address
+	           IF $ > ?address
+		           ERROR "Alignment exceeds %s"; % ?address
+	           ENDIF
+	           ds ?address - $
+	       ENDM
+
+;
+; Pads up to the next multiple of the specified address.
+;
+;ALIGN: MACRO ?boundary
+;	ds ?boundary - 1 - ($ + ?boundary - 1) % ?boundary
+;	ENDM
+
+;
+; Pads to ensure a section of the given size does not cross a 100H boundary.
+;
+ALIGN_FIT8: MACRO ?size
+	           ds (($ + ?size - 1) >> 8) != ($ >> 8) && (100H - ($ & 0FFH)) || 0
+	       ENDM