From 333b605b2afd472b823aeda0adf0e8b1ea9843c0 Mon Sep 17 00:00:00 2001
From: fishsoupisgood <github@madingley.org>
Date: Mon, 27 May 2019 02:41:51 +0100
Subject: initial commit from asl-1.41r8.tar.gz

---
 tests/t_6804/t_6804.asm | 72 +++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 72 insertions(+)
 create mode 100644 tests/t_6804/t_6804.asm

(limited to 'tests/t_6804/t_6804.asm')

diff --git a/tests/t_6804/t_6804.asm b/tests/t_6804/t_6804.asm
new file mode 100644
index 0000000..78da533
--- /dev/null
+++ b/tests/t_6804/t_6804.asm
@@ -0,0 +1,72 @@
+		cpu	6804
+
+		include	stddef04.inc
+
+		clra
+		clrx
+		clry
+		coma
+		rola
+		asla
+		inca
+		incx
+		incy
+		deca
+		decx
+		decy
+		tax
+		tay
+		txa
+		tya
+		rts
+		rti
+		nop
+
+targ:		beq	targ
+		bne	targ
+		blo	targ
+		bcs	targ
+		bhs	targ
+		bcc	targ
+
+		jmp	$123
+		jsr	$456
+
+		add	(x)
+		add	(y)
+		add	$30
+		add	#$40
+		sub	(x)
+		sub	(y)
+		sub	$50
+		sub	#$60
+		cmp	(x)
+		cmp	(y)
+		cmp	$70
+		cmp	#$80
+		and	(x)
+		and	(y)
+		and	$90
+		and	#$a0
+
+		lda	(x)
+		sta	(y)
+		lda	$82
+		sta	$40
+		lda	#55
+
+		ldxi	#0
+		ldyi	#-1
+
+		mvi	$12,#$45
+
+		dec	$82
+		inc	$40
+		dec	(y)
+		inc	(x)
+
+		bset	1,$12
+		bclr    3,$34
+
+		brset	5,$56,targ
+		brclr	7,$78,targ
-- 
cgit v1.2.3