test/asr.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


; Testing Signed shifts.
;
; Writen by mr b0nk 500 <b0nk@b0nk.xyz>

reset:
	cps
start:
	clc
	lda #0
	sbc.w #$FFFF
	ldb #0
	deb
signshft:
	asr #1
	cab
	beq start
	jmp signshft

.org $FFC0
.qword reset

a
done