; Test file for .orgASM
.equ TEST 14
TEST2 .equ 18
TEST .equ 12 ; Duplicate

.org 5

#nolist
	ADD B, A
	SET PC, 0x8000
.list
	SET A, 10 + 'b' - 0b101101 * 0x14 / (0o7 << TEST) | (4 >> (10 & 13)) ^ ~10
	SET PC, label1 ; Forward-referencing
label1:
:label2
	SET A,B ; Comment "te'st"
	SET pop, A
	JSR $++
	SET A,    [B]
$:
	SET B	, [0]
	SET C, [A+2]
	ADD A, B
	.org 0x8000
$:
	SET A, $+0x20
label3:
invalid label:
	IFB A, Z
	MUL notaregister, b
	INVALIDOPCODE A, Z
label1: ; Duplicate
	DIV A,I
	SET PC, pop
	JSR label3
	SET A, A
	SET 10, A
.org 0x8000
	SET A, $+0x10
#ifdef TEST
	SET A, 1
#end
#ifdef NOTDEFINED
	SET A, 0
#end
	SET PC, POP
#ifdef
#ifdef TOO MANY PARAMETERS
#end
	.dat 0, 1, 0x2, 0x03, 'b', "Hello\nworld!"