View difference between Paste ID: SDmVhhMp and eYNtZS2G
SHOW: | | - or go back to the newest paste.
1
;################################################################################
2
3
	define extmem,     	org=1000h,    space=XDATA
4
	STACK:			.equ	%EF	;Work. Register Group E, Work. Register F
5
init:
6
	ORG			%000c
7
start:
8
9
	ld	p3m,#00010001b     	 ;P34 is set as DM (bits D4D3=10)
10
	ld	p01m, #10010110b	;Set P00-03 as A11-A8(D1=1), P04-P07 as A15-A12(D7=1), Stack is set as
11
;internal(D2=1)
12
					;P10-17 as AD7-AD0 (D4D3=10), Normal Memory Timing (D5=0)
13
	
14
	ld	SPL,STACK
15
	srp	#10h				;set reg. pointer to Working Reg. 1, Bank 0
16
	ld	r1,#low 	DUMMY	;load r1 with the low address of DUMMY
17
	ld	r0,#high	DUMMY	;load r0 with the high address of DUMMY
18
	ld	r3, #%FF
19
Loop:
20
	lde		@rr0, r3
21
	jp		Loop
22
23
	segment extmem			;Data Segment - external data memory
24
25
DUMMY:		ds	%1
26
27
;################################################################################