|0100

	;mmu-write #02 DEO2
	;mmu-read #02 DEO2
	;mmu-read2 #02 DEO2
	#0200 pstr #0a18 DEO
	#010e DEO
	#010f DEO

BRK

@pstr ( str* -- )

	&w
		LDAk #18 DEO
		INC2 LDAk ,&w JCN
	POP2

JMP2r

@mmu-write 01 0100 0000 =hello 0001 0800
@mmu-read 01 0100 0001 0800 0000 0200
@mmu-read2 01 0100 0001 0800 0000 0205

@hello "hello $1