.TITLE Hello World

R0=%0
R1=%1
TPS==177564
TPB==177566

	.=400

START:	MOV #1,@#TPS
	MOV #HELLO,R0
LOOP:	TSTB @#TPS
	BPL LOOP
	MOVB (R0)+,R1
	BEQ STOP
	MOVB R1,@#TPB
	BR LOOP

STOP:	HALT

HELLO:	.ASCIZ /Hello World/

	.END START