1s EQUS "Hello, "
2REDEF s EQUS "{s}world!"
3; prints "Hello, world!"
4PRINTLN "{s}"
5
6list: MACRO
7LIST_NAME EQUS "\1"
8REDEF {LIST_NAME} EQUS "["
9REPT _NARG - 1
10REDEF {LIST_NAME} EQUS "{{LIST_NAME}}\2;"
11SHIFT
12ENDR
13REDEF {LIST_NAME} EQUS "{{LIST_NAME}}]"
14PURGE LIST_NAME
15ENDM
16
17	list FOO
18	PRINTLN "{FOO}"
19	list FOO, 1, A, 2, B
20	PRINTLN "{FOO}"
21
22N EQU 42
23REDEF N EQUS "X"
24