test/ind-addr.s


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27


.org $0
reset:
	cps
	lda #1
	ldb #1
main:
	jsr (rot)
	jmp main

rotate_left:
	rlb
	rts

rotate_right:
	rrb
	rts

.org $1000
rot:
	.qword rotate_left
r
.org $0
v
.org $1000
v
done