2025-04-27 07:49:33 -04:00

31 lines
659 B
Plaintext
Raw Permalink Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

;*** Message substitution block for resident messages
Subst struc
SubstType db ? ; value type (char, string, hex - see below)
SubstPtr dw ? ; offset in RESGROUP of value
Subst ends
ENDOFSUBST equ 0 ; could be used after last subst of a set
CHAR equ 1 ; a single character
STRING equ 2 ; an ASCIIZ string
HEX equ 3 ; a word value to be displayed in hex
; Note: RPrint is hard-coded for these values of
; CHAR, STRING, and HEXDWORD.
;*** Message text macro, equates
msg macro name,text
local EndText
name db EndText-$-1 ;; message length byte
db text
public name
EndText label byte
endm
CR equ 13
LF equ 10