;################################################################################

	define extmem,     	org=1000h,    space=XDATA
	STACK:			.equ	%EF	;Work. Register Group E, Work. Register F
init:
	ORG			%000c
start:

	ld	p3m,#00010001b     	 ;P34 is set as DM (bits D4D3=10)
	ld	p01m, #10010110b	;Set P00-03 as A11-A8(D1=1), P04-P07 as A15-A12(D7=1), Stack is set as
;internal(D2=1)
					;P10-17 as AD7-AD0 (D4D3=10), Normal Memory Timing (D5=0)

	ld	SPL,STACK
	srp	#10h				;set reg. pointer to Working Reg. 1, Bank 0
	ld	r1,#low 	DUMMY	;load r1 with the low address of DUMMY
	ld	r0,#high	DUMMY	;load r0 with the high address of DUMMY
	ld	r3, #%FF
Loop:
	lde		@rr0, r3
	jp		Loop

	segment extmem			;Data Segment - external data memory

DUMMY:		ds	%1

;################################################################################